radiobutton de no venta se desmarcan y no deja eliminar su venta deshabilitando los botones

This commit is contained in:
cvaldes1201
2024-05-21 17:41:46 -06:00
parent dcb0bd0a29
commit 3046ec99bc
4 changed files with 11 additions and 6 deletions

View File

@@ -1418,7 +1418,7 @@ Sub pedidoGuardado As Boolean
Private g As Cursor = B4XPages.MainPage.skmt.ExecQuery("select gestion from kmt_info where CAT_CL_CODIGO in (Select CUENTA from cuentaa)")
If g.RowCount > 0 Then
g.Position=0
If g.GetString("gestion") = "2" Then guardado = True
If g.GetString("gestion") = "2" or g.GetString("gestion") = "3" Then guardado = True
End If
' Log($"Guardado=${guardado}"$)
Return guardado