cheveguerra/Kelloggs_v4
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_v4.git synced 2026-04-22 04:10:07 +00:00
Code Issues Packages Projects Releases Wiki Activity

Cambios para que si se cambia la impresora no sea necesario borrar la MAC.

Browse Source
This commit is contained in:
cheveguerra
2023-09-07 13:36:19 -06:00
parent 6b816fed9f
commit 8cb1030c97
8 changed files with 41 additions and 21 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
B4A/B4XMainPage.bas
View File

@@ -17,7 +17,6 @@ Version=9.85
'###########################################################################################################
#End Region
Sub Class_Globals
Private Root As B4XView
Private xui As XUI
@@ -58,7 +57,7 @@ Sub Class_Globals
Private ImageView4 As ImageView
Private E_SERVER As EditText
Private B_SERVER As Button
Private B_FECHA As Button
Private B_MACIMP As Button
Private CUANTOS As String
Private foto_g () As Byte
@@ -564,7 +563,7 @@ Sub B_SERVER_Click
Entrar.Visible = True
End Sub
Sub B_FECHA_Click
Sub B_MACIMP_Click
Starter.skmt.ExecNonQuery2("delete from CAT_VARIABLES where CAT_VA_DESCRIPCION = ?", Array As Object ("MACIMP"))
Starter.skmt.ExecNonQuery2("INSERT INTO CAT_VARIABLES(CAT_VA_DESCRIPCION, CAT_VA_VALOR) VALUES (?,?)", Array As Object ("MACIMP","0"))
Panel1.Visible = False