cheveguerra/Kelloggs_v4
1
0
Fork 0
mirror of https://github.com/KeymonSoft/Kelloggs_v4.git synced 2026-04-17 18:26:11 +00:00
Code Issues Packages Projects Releases Wiki Activity

- Correccion en codigo de encuesta

Browse Source
This commit is contained in:
Jose Alberto Guerra Ugalde
2024-03-04 18:49:53 -06:00
parent 966404f2ac
commit 0cd6d43cbf
3 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
B4A/C_Cliente.bas
View File

@@ -2169,7 +2169,7 @@ Sub Cuestionario
Starter.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO) VALUES (?,?,?,?)", Array As Object(la_cuenta.Text, encuestaRes,sDate & sTime,enc.GetString("CAT_EP_ID")))
ocultaPanelEncuesta
ELSE IF enc.GetString("CAT_EP_IDTIPOPREGUNTA") = 4 Then
res = Msgbox2(c.GetString("CAT_EP_PREGUNTA"),enc.GetString("CAT_CE_DESCRIPCION"), "Si", "", "No",LoadBitmap(File.DirAssets,"alert2.png")) 'ignore
res = Msgbox2(enc.GetString("CAT_EP_PREGUNTA"),enc.GetString("CAT_CE_DESCRIPCION"), "Si", "", "No",LoadBitmap(File.DirAssets,"alert2.png")) 'ignore
If res = DialogResponse.POSITIVE Then
Starter.skmt.ExecNonQuery2("insert into HIST_ENCUESTA(HE_CLIE, HE_RES, HE_FECHA, HE_TIPO) VALUES (?,?,?,?)", Array As Object(la_cuenta.Text, "SI",sDate & sTime,enc.GetString("CAT_EP_ID")))
Else IF res = DialogResponse.NEGATIVE Then

2
B4A/KelloggsV4.b4a
View File

@@ -869,7 +869,7 @@ Version=12.8
#Region Project Attributes
#ApplicationLabel: Kelloggs Venta
#VersionCode: 3000
#VersionName: 4.02.24
#VersionName: 4.03.03
#SupportedOrientations: portrait
#CanInstallToExternalStorage: False
#BridgeLogger:true

2
B4A/KelloggsV4.b4a.meta
View File

@@ -88,6 +88,6 @@ ModuleClosedNodes6=
ModuleClosedNodes7=3,11,12
ModuleClosedNodes8=
ModuleClosedNodes9=
NavigationStack=C_Promos,cuentaProds,292,0,C_Promos,agregaFijosALista,182,0,Subs,traePromo,982,0,Subs,restaFijosPromo,1093,0,Main,Activity_Create,27,0,Main,Process_Globals,22,0,Main,Globals,24,0,Visual Designer,promociones.bal,-100,6,Subs,fechaKMT2Ticks,515,0,C_Promos,et_promoCant_TextChanged,516,6,C_Promos,b_continuar_Click,509,0
NavigationStack=C_Promos,agregaFijosALista,182,0,Subs,traePromo,982,0,Subs,restaFijosPromo,1093,0,Main,Activity_Create,27,0,Main,Process_Globals,22,0,Main,Globals,24,0,Visual Designer,promociones.bal,-100,6,Subs,fechaKMT2Ticks,515,0,C_Promos,et_promoCant_TextChanged,516,6,C_Promos,b_continuar_Click,509,0,C_Cliente,Cuestionario,2165,1
SelectedBuild=0
VisibleModules=1,27,11,3,12,4,28,13,23,2