-- cambio de dato a decimal

This commit is contained in:
2023-11-04 16:42:13 -07:00
parent 25d5dc72ed
commit 61653fa2bc
2 changed files with 8 additions and 4 deletions

View File

@@ -1380,7 +1380,7 @@ Public Class ClsInventarios
.Add("@Cantidad", SqlDbType.Money).Value = Cantidad
.Add("@CveUM", SqlDbType.Int).Value = CveUM
.Add("@CvePS", SqlDbType.Int).Value = CvePS
.Add("@PU", SqlDbType.Money).Value = PU
.Add("@PU", SqlDbType.Decimal).Value = PU
.Add("@PUTC", SqlDbType.Money).Value = PUTC
.Add("@CveSeccionAlmacen", SqlDbType.Int).Value = CveSeccionAlmacen
.Add("@CveAF", SqlDbType.Int).Value = CveAF

View File

@@ -2811,7 +2811,7 @@ Partial Class Inventarios_EntradasSalidas
'codigo provisional, hay entradas con productos, que al asignar serie, debe de tener e ncantidad = 1
If GvRow.DataKey("Cantidad").ToEntero() > 1 Then txtCantidad.Enabled = True
End If
txtCantidad.Text = GvRow.DataKey("Cantidad").ToEntero().ToString
txtCantidad.Text = GvRow.DataKey("Cantidad").ToDecimal().ToString
DdlProducto2.SelectedValue = GvRow.DataKey("CvePS")
DdlProducto2.SelectedText = GvRow.DataKey("CodigoPS")
ElProductoChange()
@@ -2829,8 +2829,12 @@ Partial Class Inventarios_EntradasSalidas
LkAgregarDetalle.Text = "Actualizar"
Dim Origen As Integer = GlobalDTInvConceptos.FiltroPrimeroValor("Origen", String.Format("CveConcepto = {0}", DdlConcepto.SelectedValue)).ToEntero
divPrecio.Visible = Origen = 1
txtPrecio.Visible = Origen = 1
divPrecio.Visible = (Origen = 1)
txtPrecio.Visible = (Origen = 1)
If UsuarioActual.CveRol = 1 Then
divPrecio.Visible = True
txtPrecio.Visible = True
End If
UpAgregar.Update()
RegistraScript("$('#ModalAgregar').modal()")
CargaGVM(DtMovimientos.FiltraParametros("Estatus <> 'E' "))