Inventarios/RepMaximoMinimo.aspx.vb

@@ -225,7 +225,7 @@ Partial Class Inventarios_RepMaximoMinimo
             CargaGrid()
             RegistraScript(String.Format("$('#{0}').modal('hide');", "ModalMaximoMinimo"))
         Else
-            Alert("Seleccione un producto o servicio", TipoMensaje.ToastAdventencia)
+            Alert("Seleccione un producto o servicio", TipoMensaje.MsgAdvertencia)
         End If
     End Sub
 
@@ -234,13 +234,15 @@ Partial Class Inventarios_RepMaximoMinimo
         HFDefinir.Value = "U"
         Dim CveAlmacen As Integer = GvRow.DataKey("CveAlmacen").ToString.ToEntero
         Dim CvePS As Integer = GvRow.DataKey("CvePS").ToString.ToEntero
+        Dim strPS As String = GvRow.DataKey("PS").ToString()
         Dim Maximo As String = GvRow.DataKey("Maximo").ToString
         Dim Minimo As String = GvRow.DataKey("Minimo").ToString
 
         DdlAlmacenModal.Enabled = False
         DdlPSModal.Enabled = False
 
-        DdlAlmacenModal.SelectedValue = CveAlmacen.ToString
+        DdlAlmacenModal.SelectedValue = CveAlmacen.ToString()
+        DdlPSModal.SelectedText = strPS
         DdlPSModal.SelectedValue = CvePS.ToString
         TxtMaximo.Text = Maximo
         TxtMinimo.Text = Minimo