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

-- mejoras de GlobalDT

Browse Source
This commit is contained in:
rrene
2024-08-01 19:44:55 -07:00
parent 0a938008e7
commit 19aba02fb6
11 changed files with 31 additions and 30 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
OS/OrdenesServicios.aspx.vb
View File

@@ -474,7 +474,7 @@ Partial Class OS_OrdenesServicios
End Sub
Private Sub CargaTiposVenta()
DdlTipoVenta.DataSource = GlobalDTTipoVenta().FiltraParametros("Estatus = 'True' ")
DdlTipoVenta.DataSource = GlobalDTTipoVenta(UsuarioActual.CveEmpresa).FiltraParametros("Estatus = 'True' ")
DdlTipoVenta.DataBind()
End Sub

2
OS/PopUpMateriales.aspx.vb
View File

@@ -127,7 +127,7 @@ Partial Class OS_PopUpMateriales
Dim RowPS As DataRow = DTPS.FiltraParametros("CvePS = " & Material("CvePS").ToString).Rows(0)
Dim PS As String = RowPS("PS").ToString
Dim CveUnidadMedida As Integer = RowPS("CveUnidadMedida").ToString.ToEntero
Dim UM = GlobalDTUnidadesMedida.FiltraParametros("CveUnidadMedida = " & CveUnidadMedida).Rows(0)("UnidadMedida").ToString
Dim UM = GlobalDTUnidadesMedida(UsuarioActual.CveEmpresa).FiltraParametros("CveUnidadMedida = " & CveUnidadMedida).Rows(0)("UnidadMedida").ToString
Dim CveClasificacion As Integer = RowPS("CveClasificacion").ToString.ToEntero
Dim Clasificacion As String = GlobalDTClasificaciones(UsuarioActual.CveEmpresa).FiltraParametros("CveClasificacion = " & CveClasificacion).Rows(0)("Clasificacion").ToString