diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index fb992b66b..e6e103354 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -1362,7 +1362,7 @@ Partial Class Inventarios_EntradasSalidas
             registro.Item("CveUM") = CveUM
             registro.Item("UnidadMedida") = UM
             registro.Item("CvePS") = CvePS
-            registro.Item("CodigoPS") = PS
+            registro.Item("CodigoPS") = String.Format("{0} - {1}", Codigo, PS)
             registro.Item("PS") = PS
             registro.Item("PU") = PU
             'registro.Item("PUExtranjero") = PU