cheveguerra/Guna_Preventa
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Guna_Preventa.git synced 2026-04-17 21:06:32 +00:00
Code Issues Packages Projects Releases Wiki Activity

- Se corrigio un error en el codigo de encuestas, habia error cuando la pregunta era de desicion y no se respetaba el orden asugnado.

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-05-06 13:32:45 -06:00
parent c2538923e0
commit 1f9b8860b7
3 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
B4A/C_Cliente.bas
View File

@@ -3753,8 +3753,8 @@ Sub Cuestionario
For i = 0 To enc.RowCount - 1 For i = 0 To enc.RowCount - 1
' If logger Then Log($"ROWCOUNT: ${enc.RowCount}"$) ' If logger Then Log($"ROWCOUNT: ${enc.RowCount}"$)
' If logger Then Log($"tipo: ${enc.GetString("CAT_EP_IDTIPOPREGUNTA")}"$) ' If logger Then Log($"tipo: ${enc.GetString("CAT_EP_IDTIPOPREGUNTA")}"$)
If logger Then Log($"CAT_EP_ID=${enc.GetString("CAT_EP_ID")}, CAT_EP_PREGUNTA=${enc.GetString("CAT_EP_PREGUNTA")}"$) If logger Then Log($"Tipo: ${enc.GetString("CAT_EP_IDTIPOPREGUNTA")}, CAT_EP_ID=${enc.GetString("CAT_EP_ID")}, CAT_EP_PREGUNTA=${enc.GetString("CAT_EP_PREGUNTA")}"$)
If indicePregunta <> 0 Then If enc.GetString("CAT_EP_IDTIPOPREGUNTA") <> 4 and indicePregunta <> 0 Then
indicePregunta = listaPreguntas.IndexOf(enc.GetString("CAT_EP_ID")) + 1 'Nos movemos a la posicion especificada por la respuesta, en las preguntas de tipo desicion, la respuesta nos indica a que pregunta movernos. indicePregunta = listaPreguntas.IndexOf(enc.GetString("CAT_EP_ID")) + 1 'Nos movemos a la posicion especificada por la respuesta, en las preguntas de tipo desicion, la respuesta nos indica a que pregunta movernos.
i = indicePregunta i = indicePregunta
Log($"i = ${i}"$) Log($"i = ${i}"$)

2
B4A/Guna Vistas V3.1.b4a
View File

@@ -184,7 +184,7 @@ Module9=C_NoVenta
NumberOfFiles=62 NumberOfFiles=62
NumberOfLibraries=33 NumberOfLibraries=33
NumberOfModules=23 NumberOfModules=23
Version=12.5 Version=12.8
@EndOfDesignText@ @EndOfDesignText@
#Region Project Attributes #Region Project Attributes
#ApplicationLabel: Guna V3.1 #ApplicationLabel: Guna V3.1

2
B4A/Guna Vistas V3.1.b4a.meta
View File

@@ -70,6 +70,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7= ModuleClosedNodes7=
ModuleClosedNodes8= ModuleClosedNodes8=
ModuleClosedNodes9= ModuleClosedNodes9=
NavigationStack=Main,Activity_Pause,51,0,Main,Activity_KeyPress,40,0,C_Cliente,b_encuesta_1_Click,3929,0,C_Cliente,b_encuesta_continuar_Click,3969,0,C_Principal,JobDone,960,0,C_Cliente,Class_Globals,0,0,C_Cliente,CB2_P8_M3_CheckedChange,3681,0,C_Cliente,CB3_P8_M3_CheckedChange,3693,0,C_Cliente,CB4_P8_M3_CheckedChange,3709,0,C_Cliente,Cuestionario,3905,0 NavigationStack=Main,Activity_KeyPress,40,0,C_Cliente,b_encuesta_1_Click,3929,0,C_Cliente,b_encuesta_continuar_Click,3969,0,C_Principal,JobDone,960,0,C_Cliente,Class_Globals,0,0,C_Cliente,CB2_P8_M3_CheckedChange,3681,0,C_Cliente,CB3_P8_M3_CheckedChange,3693,0,C_Cliente,CB4_P8_M3_CheckedChange,3709,0,Main,Activity_Create,29,0,C_Cliente,Cuestionario,3750,1
SelectedBuild=0 SelectedBuild=0
VisibleModules=21,2,22,12,13,4,8,11,5,10 VisibleModules=21,2,22,12,13,4,8,11,5,10