mirror of
https://github.com/KeymonSoft/Marquez.git
synced 2026-04-20 06:09:15 +00:00
Version: 5.01.10
Se hizo una pequeña modificacion en el ticket en el apartado de cajas para optener el precio por unidad para que al multiplicarlo por la catidad de el importe correcto.
This commit is contained in:
@@ -70,6 +70,7 @@ Sub Class_Globals
|
||||
|
||||
Dim user As EditText
|
||||
Dim pass As EditText
|
||||
Public tabulador As C_tabulador
|
||||
Dim c As Cursor
|
||||
Dim existe As String
|
||||
Dim paso1 As String
|
||||
@@ -167,6 +168,8 @@ Private Sub B4XPage_Created (Root1 As B4XView)
|
||||
B4XPages.AddPage("Promos", promos)
|
||||
historico.Initialize
|
||||
B4XPages.AddPage("Historico", historico)
|
||||
tabulador.Initialize
|
||||
B4XPages.AddPage("tabulador", tabulador)
|
||||
' respaldoDiario.Initialize
|
||||
' B4XPages.AddPageAndCreate("respaldoDiario", respaldoDiario)
|
||||
ruta = Starter.ruta
|
||||
@@ -182,6 +185,8 @@ Private Sub B4XPage_Created (Root1 As B4XView)
|
||||
skmt.Initialize(ruta,"kmt.db", True)
|
||||
Subs.guardaAppInfo(skmt)
|
||||
|
||||
Starter.skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS TABULADOR_MONEDAS(VEINTE TEXT, DIEZ TEXT, CINCO TEXT, DOS TEXT, PESO TEXT, CENTAVO TEXT, TOTAL TEXT)")
|
||||
Starter.skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS TABULADOR_BILLETES(MIL TEXT, QUINIENTOS TEXT, DOCIENTOS TEXT, CIEN TEXT, CINCUENTA TEXT, VEINTE TEXT)")
|
||||
skmt.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, CN_FOTO TEXT, CN_ALMACEN TEXT, CN_RUTA TEXT,CN_GIRO TEXT)")
|
||||
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS RUTAA (RUTAA TEXT)")
|
||||
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)")
|
||||
|
||||
Reference in New Issue
Block a user