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

-

Browse Source
This commit is contained in:
rrene
2023-12-23 08:29:20 -07:00
parent 60c53f8881
commit 43cca7d816
1 changed files with 2 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
OS/OrdenesServicios.aspx.vb
View File

@@ -839,7 +839,7 @@ Partial Class OS_OrdenesServicios
Private Sub CargaMaterialesDetalle(CveOsDetalle As Integer, Consecutivo As Integer, CveConsecutivoDetalle As Integer) Private Sub CargaMaterialesDetalle(CveOsDetalle As Integer, Consecutivo As Integer, CveConsecutivoDetalle As Integer)
Dim ObjMateriales As New ClsOS Dim ObjMateriales As New ClsOS
If ObjMateriales.GetDetalleMateriales(CveOsDetalle, CveOS, -1) Then If ObjMateriales.GetDetalleMateriales(CveOsDetalle, CveOS) Then
For Each RowE As DataRow In ObjMateriales.DtResultados.Rows For Each RowE As DataRow In ObjMateriales.DtResultados.Rows
@@ -871,7 +871,7 @@ Partial Class OS_OrdenesServicios
Private Sub CargaMateriales() Private Sub CargaMateriales()
Dim objOS As New ClsOS Dim objOS As New ClsOS
If objOS.GetDetalleMateriales(-1, CveOS, 1, True) Then If objOS.GetDetalleMateriales(-1, CveOS) Then
GvMateriales.DataSource = objOS.DtResultados GvMateriales.DataSource = objOS.DtResultados
End If End If
objOS.Dispose() objOS.Dispose()