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

cambios en los materiales de ordenes de servicio

Browse Source
This commit is contained in:
Antonio Gonzalez
2019-11-06 12:53:31 -07:00
parent 0e15b34782
commit 42d117e8d5
1 changed files with 10 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
OS/OrdenesServicios.aspx.vb
View File

@@ -1300,8 +1300,8 @@ Partial Class OS_OrdenesServicios
Row.FCLinkButton("imgEstatus").CssClass = "btn btn-circle btn-sm green"
Else
Row.FCLinkButton("imgEstatus").Enabled = False
'TmpDT.Rows(Row.RowIndex)("Estatus") = "False"
'Row.FCLinkButton("imgEstatus").CssClass = "btn btn-circle btn-sm red"
TmpDT.Rows(Row.RowIndex)("Estatus") = "False"
Row.FCLinkButton("imgEstatus").CssClass = "btn btn-circle btn-sm red"
End If
End Sub
Private Sub BtnAddGvDetalle_Click(sender As Object, e As EventArgs) Handles BtnAddGvDetalle.Click
@@ -2265,9 +2265,16 @@ Partial Class OS_OrdenesServicios
TieneError = True
End If
'SI OCURRIO UN ERROR EN LA EXISTENCIA RECARGAMOS EL GRID PARA COLOREAR LOS DETALLES CON ERROR
If ErrorExistencia Then
Alert("Ocurrió un error en la existencia", TipoMensaje.MsgError)
TieneError = True
End If
If Not TieneError Then
Dim ObjOS As New ClsOS
For Each Row As DataRow In TmpDTMaterialesDetalle.Rows
Dim MaterialesDetalleNuevos As DataTable = TmpDTMaterialesDetalle.FiltraParametros("CveMaterial = -1")
For Each Row As DataRow In MaterialesDetalleNuevos.Rows
Dim CveUM As Integer = Row("CveUM").ToString.ToEntero
Dim CvePS As Integer = Row("CvePS").ToString.ToEntero
Dim Cantidad As Integer = Row("Cantidad").ToString.ToEntero
@@ -2287,13 +2294,6 @@ Partial Class OS_OrdenesServicios
ObjOS.Dispose()
End If
'SI OCURRIO UN ERROR EN LA EXISTENCIA RECARGAMOS EL GRID PARA COLOREAR LOS DETALLES CON ERROR
If ErrorExistencia Then
Alert("Ocurrió un error en la existencia", TipoMensaje.MsgError)
TieneError = True
End If
If Not TieneError Then
ObjInventario.Commit()
Alert($"El Traspaso se guardó correctamente con el folio #: <b>{Folio}</b>.", TipoMensaje.MsgInformacion, $"document.location.href=""/Inventarios/TrasladoSolicitud.aspx?CveTraspasoSolicitud={CveTraspasoSolicitud}""")