- Agtegué los datos del query de config.propierties y de la tabla en web a la subrutina "b_mandaUsrs_Click"

This commit is contained in:
Jose Alberto Guerra Ugalde
2024-06-01 19:58:45 -06:00
parent 98be8c8906
commit 1f2cb24bc9
2 changed files with 5 additions and 1 deletions

View File

@@ -734,6 +734,10 @@ Private Sub b_mandaUsrs_Click
dbr.ExecuteCommand(cmd1 , $"guardaCliente_${c.getstring("CAT_CL_CODIGO")}"$)
Next
End If
' Usa este query en el config.properties:
' sql.guardaClientesMardsCensosBORR = INSERT INTO MARIANA.BORR_CAT_CLIENTES_CENSOS (CAT_CL_FOTO, CAT_CL_NUM_SERIEFISICO, CAT_CL_MTOCOMPRA, CAT_CL_CEDIS, CAT_CL_LAT, CAT_CL_LONG, CAT_CL_FBAJA, CAT_CL_FALTA, CAT_CL_CP, CAT_CL_EDO, CAT_CL_MUNI, CAT_CL_COLONIA, CAT_CL_CALLE2, CAT_CL_CALLE1, CAT_CL_NOINT, CAT_CL_NOEXT, CAT_CL_CALLE, CAT_CL_EMAIL, CAT_CL_TELEFONO, CAT_CL_ATIENTE2, CAT_CL_ATIENDE1, CAT_CL_NOMBRE, CAT_CL_GIRO, CAT_CL_DIAS_VISITA, CAT_CL_TIPO_RUTA, CAT_CL_RUTA, CAT_CL_CODIGO, gestion, CAT_CL_CRUCE1, CAT_CL_ESTATUS, CAT_CL_ENVIO_PENDIENTE, CAT_CL_FECHA_CAPTURA, NUEVO, LAT_CENSADOR, LON_CENSADOR, ESTATUS_ORIGINAL, CAMPOS_MODIFICADOS, CAT_CL_DIASEMANA, CAT_CL_SECUENCIA) values ((?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?),(?))
' Usa esta tabla en web:
' CREATE TABLE MARIANA.BORR_CAT_CLIENTES_CENSOS (CAT_CL_FOTO BLOB, CAT_CL_NUM_SERIEFISICO VARCHAR2(100 BYTE), CAT_CL_MTOCOMPRA VARCHAR2(100 BYTE), CAT_CL_CEDIS VARCHAR2(100 BYTE), CAT_CL_LAT VARCHAR2(100 BYTE), CAT_CL_LONG VARCHAR2(100 BYTE), CAT_CL_FBAJA VARCHAR2(100 BYTE), CAT_CL_FALTA VARCHAR2(100 BYTE), CAT_CL_CP VARCHAR2(100 BYTE), CAT_CL_EDO VARCHAR2(100 BYTE), CAT_CL_MUNI VARCHAR2(100 BYTE), CAT_CL_COLONIA VARCHAR2(100 BYTE), CAT_CL_CALLE2 VARCHAR2(300 BYTE), CAT_CL_CALLE1 VARCHAR2(300 BYTE), CAT_CL_NOINT VARCHAR2(100 BYTE), CAT_CL_NOEXT VARCHAR2(100 BYTE), CAT_CL_CALLE VARCHAR2(300 BYTE), CAT_CL_EMAIL VARCHAR2(100 BYTE), CAT_CL_TELEFONO VARCHAR2(100 BYTE), CAT_CL_ATIENTE2 VARCHAR2(100 BYTE), CAT_CL_ATIENDE1 VARCHAR2(100 BYTE), CAT_CL_NOMBRE VARCHAR2(100 BYTE), CAT_CL_GIRO VARCHAR2(100 BYTE), CAT_CL_DIAS_VISITA VARCHAR2(100 BYTE), CAT_CL_TIPO_RUTA VARCHAR2(100 BYTE), CAT_CL_RUTA VARCHAR2(100 BYTE), CAT_CL_CODIGO VARCHAR2(100 BYTE), gestion NUMBER, CAT_CL_CRUCE1 VARCHAR2(100 BYTE), CAT_CL_ESTATUS VARCHAR2(100 BYTE), CAT_CL_ENVIO_PENDIENTE VARCHAR2(100 BYTE), CAT_CL_FECHA_CAPTURA VARCHAR2(100 BYTE), NUEVO VARCHAR2(100 BYTE), LAT_CENSADOR VARCHAR2(100 BYTE), LON_CENSADOR VARCHAR2(100 BYTE), ESTATUS_ORIGINAL VARCHAR2(100 BYTE), CAMPOS_MODIFICADOS VARCHAR2(100 BYTE), CAT_CL_DIASEMANA VARCHAR2(100 BYTE), CAT_CL_SECUENCIA NUMBER);
End Sub
Private Sub cb_importarBDWA_CheckedChange(Checked As Boolean)

View File

@@ -49,6 +49,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=B4XMainPage,i_engrane_Click,623,6,B4XMainPage,Class_Globals,21,4,B4XMainPage,cb_importarBDWA_CheckedChange,700,0,B4XMainPage,B4XPage_Appear,221,1,B4XMainPage,B4XPage_Created,211,0,Subs,importaBDDesdeWhatsApp,1368,6,Visual Designer,login.bal,-100,6,DBRequestManager,ExecuteQuery,31,0,B4XMainPage,b_mandaUsrs_Click,719,6,B4XMainPage,JobDone,463,6
NavigationStack=B4XMainPage,JobDone,463,6,B4XMainPage,i_engrane_Click,623,6,B4XMainPage,cb_importarBDWA_CheckedChange,700,0,B4XMainPage,B4XPage_Appear,221,1,B4XMainPage,B4XPage_Created,211,0,Subs,importaBDDesdeWhatsApp,1368,6,Visual Designer,login.bal,-100,6,DBRequestManager,ExecuteQuery,31,0,B4XMainPage,Class_Globals,21,4,B4XMainPage,b_mandaUsrs_Click,729,6
SelectedBuild=0
VisibleModules=2,14,9,12,4,8,5,15,7,16,13