cheveguerra/Guna_Preventa_BAT
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Guna_Preventa_BAT.git synced 2026-04-19 21:59:28 +00:00
Code Issues Packages Projects Releases Wiki Activity

6.03.01

Browse Source 
se agrega la parte de las encuestas y se corrige los indicadores
This commit is contained in:
cvaldes1201
2026-04-13 11:29:14 -06:00
parent f483dbb26c
commit 6cbcd3e592
500 changed files with 14426 additions and 12606 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
B4A/B4XMainPage.bas
View File

@@ -176,6 +176,7 @@ Private Sub B4XPage_Created (Root1 As B4XView)
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS PLAN_LEALTAD (PL_CLIENTE TEXT, PL_BANDERA TEXT)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS ABONOSP(NOTA TEXT, CLIENTE TEXT, SALDO_PENDIENTE TEXT, FECHA TEXT)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS ABONOSPTOD(NOTA TEXT, CLIENTE TEXT, SALDO_PENDIENTE TEXT, FECHA TEXT)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS COMENTARIOS (COMENTARTIO TEXT, CLIENTE TEXT, DESCARGADO TEXT)")
@@ -225,6 +226,9 @@ Private Sub B4XPage_Created (Root1 As B4XView)
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_PRO2265(H_IDCLIENTE TEXT)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS ATIENDE(ATIENDE TEXT, CLIENTE TEXT)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS HIST_ENCUESTA_BAT(CLIENTE)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS ENCUESTAS_BAT (CLIENTE TEXT,RUTA TEXT,ALMACEN TEXT,P1 TEXT,P2 TEXT,P3 TEXT,P4 TEXT,P5 TEXT,P6 TEXT,P7 TEXT,P8 TEXT,P9 TEXT,P10 TEXT, FECHA TEXT)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS CODIGOS_CREDITO(CODIGO TEXT, BANDERA TEXT)")
skmt.ExecNonQuery("CREATE TABLE IF NOT EXISTS TELEFONO(TELEFONO TEXT, CLIENTE TEXT)")
@@ -246,9 +250,11 @@ Private Sub B4XPage_Created (Root1 As B4XView)
Subs.agregaColumna("HIST_ENCUESTA", "HE_LON", "TEXT")
Subs.agregaColumna("hist_ventastodos", "HVD_NUM_TICKET", "TEXT")
Subs.agregaColumna("hist_ventastodos", "HVD_CODPROMO", "TEXT")
Subs.agregaColumna("HIST_VENTAS", "HVD_FECHA", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_NUMEROINT", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_ORDENVISITA", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_NUMEROEXT", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_REFERENCIA", "TEXT")
Subs.agregaColumna("CLIENTES_NUEVOS", "CN_NUMEROINT", "TEXT")
@@ -260,8 +266,11 @@ Private Sub B4XPage_Created (Root1 As B4XView)
Subs.agregaColumna("kmt_info3", "CAT_CL_CLASIFICADOR4", "TEXT")
Subs.agregaColumna("CAT_GUNAPROD", "CAT_GP_CONVERSION3", "TEXT")
Subs.agregaColumna("CAT_GUNAPROD", "CAT_GP_CONVERSION2", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_CLASIFICADOR3", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_CLASIFICADOR2", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_CLASIFICADOR5", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_TIPOCLIENTE", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_LIMITECREDITO", "TEXT")
Subs.agregaColumna("kmt_info3", "CAT_CL_DIASCREDITO", "TEXT")