-- visualización de la OS

Inventarios/EntradasSalidas.aspx.vb

@@ -840,6 +840,12 @@ Partial Class Inventarios_EntradasSalidas
                 LblFolioOrdenCorte.Text = DtMov.Rows(0)("FolioOrdendeCorte").ToString
             End If
 
+            If DtMov.Rows(0)("CveOS").ToString.ToEntero() > 0 Then
+                divOS.Visible = True
+                HplOS.Text = DtMov.Rows(0)("OSFolio").ToString
+                HplOS.NavigateUrl = $"/OS/OrdenesServicios.aspx?CveOS={DtMov.Rows(0)("CveOS")}"
+            End If
+
 
             If (DdlAlmacen.Items.FindByValue(Mov.CveAlmacen.ToString()) Is Nothing) Then
                 Dim dr As DataRow = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveEstatus:=-1).FiltroPrimero(String.Format("CveAlmacen = {0}", Mov.CveAlmacen))