AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Ventas SMS Permitir modificar precio en ventas de tipo pago directo

Browse Source
This commit is contained in:
rakcsle
2024-05-20 09:35:10 -07:00
parent 02678b3f8d
commit c52b59e32d
2 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
UserControl/AddMedico.ascx.vb
View File

@@ -227,7 +227,7 @@ Partial Class UserControl_AddMedico
TxtFechaIng.Text = "" TxtFechaIng.Text = ""
TxtUsuario.Text = "" TxtUsuario.Text = ""
DdlVendedor.SelectedValueExist(-1) DdlVendedor.SelectedValueExist(UsuarioActual.CveVendedor)
CargaGVMedicoClienteSucursal(-1, UsuarioActual.CveEmpresa) CargaGVMedicoClienteSucursal(-1, UsuarioActual.CveEmpresa)

4
Ventas/Ventas.aspx.vb
View File

@@ -8767,7 +8767,7 @@ Partial Class Ventas
GvPS.Rows(e.NewEditIndex).FCTextBox("TxtPrecio").Enabled = False GvPS.Rows(e.NewEditIndex).FCTextBox("TxtPrecio").Enabled = False
If DdlTipoComprobante.SelectedValue = "Cot" Or RBLTipoVenta.SelectedValue.ToEntero = 1 Then If DdlTipoComprobante.SelectedValue = "Cot" Or RBLTipoVenta.SelectedValue.ToEntero = 2 Then
GvPS.Rows(e.NewEditIndex).FCTextBox("TxtPrecio").Enabled = True GvPS.Rows(e.NewEditIndex).FCTextBox("TxtPrecio").Enabled = True
End If End If
@@ -17682,7 +17682,7 @@ Partial Class Ventas
If EsVentaMedica Then If EsVentaMedica Then
TxtPrecio.Enabled = False TxtPrecio.Enabled = False
If UsuarioActual.CveUsuario = 3986 Or RBLTipoVenta.SelectedValue.ToEntero = 1 Then If UsuarioActual.CveUsuario = 3986 Or RBLTipoVenta.SelectedValue.ToEntero = 2 Then
TxtPrecio.Enabled = True TxtPrecio.Enabled = True
End If End If