From c69ef55fb3718b78efeb9f983df0f618461d036d Mon Sep 17 00:00:00 2001 From: Jose Alberto Guerra Ugalde Date: Thu, 30 May 2024 16:57:53 -0600 Subject: [PATCH] .. --- B4A/C_Principal.bas | 6 +++--- B4A/Durakelo.b4a.meta | 2 +- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/B4A/C_Principal.bas b/B4A/C_Principal.bas index 51b92d7..8084438 100644 --- a/B4A/C_Principal.bas +++ b/B4A/C_Principal.bas @@ -626,7 +626,7 @@ Sub Subir_Click End If 'ENCUESTAS - c=skmt.ExecQuery("SELECT CAT_EP_IDGRUPO, HIST_ENCUESTA.* FROM HIST_ENCUESTA join CAT_ENCUESTA_PREGUNTA on CAT_EP_ID = HE_TIPO") + c=skmt.ExecQuery("SELECT CAT_EP_IDGRUPO, CAT_EP_IDTIPOPREGUNTA, HIST_ENCUESTA.* FROM HIST_ENCUESTA join CAT_ENCUESTA_PREGUNTA on CAT_EP_ID = HE_TIPO") ' S_CP.Text = "Envio Encuesta" ' PB2.Progress = 1 If c.RowCount>0 Then @@ -635,8 +635,8 @@ Sub Subir_Click Dim cmd As DBCommand cmd.Initialize cmd.Name = "insert_encuesta2_DUR" - cmd.Parameters = Array As Object(C.GetString("HE_CLIE"), C.GetString("HE_RES"), C.GetString("HE_FECHA"), c.GetString("HE_TIPO"), l_ruta.Text, c.GetString("CAT_EP_IDGRUPO"), Subs.traeAlmacen) - Log($"${C.GetString("HE_RES")}, ${C.GetString("HE_FECHA")}, ${c.GetString("HE_TIPO")}, ${l_ruta.Text}, ${c.GetString("CAT_EP_IDGRUPO")}, ${Subs.traeAlmacen}"$) + cmd.Parameters = Array As Object(C.GetString("HE_CLIE"), C.GetString("HE_RES"), C.GetString("HE_FECHA"), c.GetString("HE_TIPO"), l_ruta.Text, c.GetString("CAT_EP_IDGRUPO"), Subs.traeAlmacen, c.GetString("CAT_EP_IDTIPOPREGUNTA")) + Log($"${C.GetString("HE_RES")}, ${C.GetString("HE_FECHA")}, ${c.GetString("HE_TIPO")}, ${l_ruta.Text}, ${c.GetString("CAT_EP_IDGRUPO")}, ${Subs.traeAlmacen}, ${c.GetString("CAT_EP_IDTIPOPREGUNTA")}"$) reqManager.ExecuteCommand(cmd , "ins_encuesta") Next End If diff --git a/B4A/Durakelo.b4a.meta b/B4A/Durakelo.b4a.meta index f2a2a5f..37d9638 100644 --- a/B4A/Durakelo.b4a.meta +++ b/B4A/Durakelo.b4a.meta @@ -73,6 +73,6 @@ ModuleClosedNodes6= ModuleClosedNodes7= ModuleClosedNodes8= ModuleClosedNodes9= -NavigationStack=B4XMainPage,JobDone,366,0,Main,Process_Globals,21,0,B4XMainPage,B4XPage_Created,161,0,C_Cliente,cuestionario2,1511,6,C_Cliente,Cuestionario,1843,6,Main,Activity_Create,27,0,Main,Globals,23,0,C_Principal,Subir_Click,483,6,C_Principal,connecta_Click,1958,6,C_Principal,JobDone,1770,0 +NavigationStack=B4XMainPage,JobDone,366,0,Main,Process_Globals,21,0,B4XMainPage,B4XPage_Created,161,0,C_Cliente,cuestionario2,1511,6,C_Cliente,Cuestionario,1843,6,Main,Activity_Create,27,0,Main,Globals,23,0,C_Principal,connecta_Click,1958,6,C_Principal,JobDone,1749,0,C_Principal,Subir_Click,632,6,C_Cuestionario,r_CheckedChange,118,0 SelectedBuild=0 VisibleModules=2,10,4,19,5,6,8,9,11,24