diff --git a/Acumuladores/RepPolizasVirtuales.aspx b/Acumuladores/RepPolizasVirtuales.aspx
index 845677f19..f86517e65 100644
--- a/Acumuladores/RepPolizasVirtuales.aspx
+++ b/Acumuladores/RepPolizasVirtuales.aspx
@@ -117,7 +117,7 @@
             <div class="row">
                 <div class="col-md-12">
 
-                    <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePolizaVirtual,AnioVehiculo,SerieFolio,CveVenta,Descuento,Enviada,FechaEnvioPoliza,FechaIng,PU,TieneUsado,TipoPoliza,TipoServicio,Total,FechaUsado,Serie,Codigo2,IdProductoPolizaVirtual,RespuestaEnvio,IdBCI,BCI,IdModeloAuto,ModeloAuto,IdMarcaAuto,MarcaAuto,IdMarcaUsado,MarcaUsado" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn " data-sort="true" Style="width: 100%" GridLines="None">
+                    <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" DataKeyNames="CvePolizaVirtual,AnioVehiculo,SerieFolio,CveVenta,Descuento,Enviada,FechaEnvioPoliza,FechaIng,PU,TieneUsado,TipoPoliza,TipoServicio,Total,FechaUsado,Serie,NumeroParte,IdProductoPolizaVirtual,RespuestaEnvio,IdBCI,BCI,IdModeloAuto,ModeloAuto,IdMarcaAuto,MarcaAuto,IdMarcaUsado,MarcaUsado" CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn " data-sort="true" Style="width: 100%" GridLines="None">
                         <Columns>
 
                             <asp:HyperLinkField DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString="/Ventas/Ventas.aspx?CveVenta={0}" DataTextField="SerieFolio" HeaderText="Serie-Folio" ItemStyle-Width="100px" Target="_blank" ControlStyle-CssClass="Texto" >
@@ -129,7 +129,7 @@
                              
                            
                             <asp:BoundField HeaderText="Serie" DataField="Serie" />
-                            <asp:BoundField HeaderText="Codigo CPK" DataField="Codigo2" />
+                            <asp:BoundField HeaderText="Codigo CPK" DataField="NumeroParte" />
                             <asp:BoundField HeaderText="RespuestaEnvio" DataField="RespuestaEnvio" />                            
                              <asp:TemplateField HeaderText="Marca">                              
                                 <ItemTemplate>
diff --git a/App_Code/ClsProductosServicios.vb b/App_Code/ClsProductosServicios.vb
index 5344c61fa..f5a3d51af 100644
--- a/App_Code/ClsProductosServicios.vb
+++ b/App_Code/ClsProductosServicios.vb
@@ -31,7 +31,7 @@ Public Class ClsProductosServicios
     Public Property SATClavePS As String
     Public Property SATDescripcion As String
     Public Property Codigo As String
-    Public Property Codigo2 As String
+    Public Property NumeroParte As String
     Public Property CodigoBarras As String
     Public Property PS As String
     Public Property Precio As Double
@@ -202,7 +202,7 @@ Public Class ClsProductosServicios
 
     End Sub
 #End Region
-    Public Function GetPS(CvePS As Integer, CveClasificacion As Integer, CveEmpresa As Integer, Optional Codigo As String = "-1", Optional Codigo2 As String = "-1",
+    Public Function GetPS(CvePS As Integer, CveClasificacion As Integer, CveEmpresa As Integer, Optional Codigo As String = "-1", Optional NumeroParte As String = "-1",
                           Optional CodigoBarras As String = "-1", Optional PS As String = "-1", Optional EsPaquete As Integer = -1, Optional CveSubProyecto As Integer = -1,
                           Optional pAplicaParaVenta As Integer = -1, Optional pEstado As Integer = -1, Optional CveClasificacionCosto As Integer = -1, Optional CveTipoPS As Integer = -1,
                           Optional CveCompuesto As Integer = -1, Optional SATClavePS As String = "-1", Optional TopSelect As Integer = 10000, Optional CveMarca As Integer = -1) As Boolean
@@ -213,7 +213,7 @@ Public Class ClsProductosServicios
         With SqlAdapter.SelectCommand.Parameters
             .Add("@CvePS", SqlDbType.Int).Value = CvePS
             .Add("@Codigo", SqlDbType.VarChar).Value = Codigo
-            .Add("@Codigo2", SqlDbType.VarChar).Value = Codigo2
+            .Add("@NumeroParte", SqlDbType.VarChar).Value = NumeroParte
             .Add("@CodigoBarras", SqlDbType.VarChar).Value = CodigoBarras
             .Add("@PS", SqlDbType.VarChar).Value = PS
             .Add("@CveClasificacion", SqlDbType.Int).Value = CveClasificacion
@@ -242,7 +242,7 @@ Public Class ClsProductosServicios
                 SATDescripcion = Data.Rows(0)("SATDescripcion").ToString
                 Me.CveTipoPS = Data.Rows(0)("CveTipoPS").ToString.ToEntero
                 Me.Codigo = Data.Rows(0)("Codigo").ToString
-                Me.Codigo2 = Data.Rows(0)("Codigo2").ToString
+                Me.NumeroParte = Data.Rows(0)("NumeroParte").ToString
                 Me.CodigoBarras = Data.Rows(0)("CodigoBarras").ToString
                 Me.PS = Data.Rows(0)("PS").ToString
                 Precio = Data.Rows(0)("Precio").ToString.ToDouble
@@ -400,7 +400,7 @@ Public Class ClsProductosServicios
         End Try
         Return Retorno
     End Function
-    Public Function AddPS(CveClasificacion As Integer, CveClasificacionCosto As Integer, CveUnidadMedida As Integer, Codigo As String, Codigo2 As String, CodigoBarras As String, PS As String, Precio As Double, IVA As Double, RetIVA As Double, Inventariable As Boolean, CveProveedorCompra As Integer,
+    Public Function AddPS(CveClasificacion As Integer, CveClasificacionCosto As Integer, CveUnidadMedida As Integer, Codigo As String, NumeroParte As String, CodigoBarras As String, PS As String, Precio As Double, IVA As Double, RetIVA As Double, Inventariable As Boolean, CveProveedorCompra As Integer,
                           AplicaParaConcepto As Boolean, AplicaParaVenta As Boolean, CveUsuario As Integer, CveEmpresa As Integer, CveMetodoInventario As Integer, EsPaquete As Integer,
                           Optional CveTipoPS As Integer = -1, Optional FuePorXML As Boolean = True, Optional TipoServicio As Integer = -1, Optional CveClasificacion2 As Integer = -1,
                           Optional CveMarca As Integer = -1, Optional AlmacenSeccion As String = "", Optional AplicaIEPS As Boolean = False, Optional IEPSPorcentaje As Decimal = -1,
@@ -425,7 +425,7 @@ Public Class ClsProductosServicios
             .Add("@CveClasificacionCosto", SqlDbType.Int).Value = CveClasificacionCosto
             .Add("@CveUnidadMedida", SqlDbType.Int).Value = CveUnidadMedida
             .Add("@Codigo", SqlDbType.VarChar).Value = Codigo
-            .Add("@Codigo2", SqlDbType.VarChar).Value = If(Codigo2 = "", "-1", Codigo2)
+            .Add("@NumeroParte", SqlDbType.VarChar).Value = If(NumeroParte = "", "-1", NumeroParte)
             .Add("@CodigoBarras", SqlDbType.VarChar).Value = If(CodigoBarras = "", "-1", CodigoBarras)
             .Add("@PS", SqlDbType.VarChar).Value = If(PS.Length > 845, PS.Substring(0, 845), PS)
             .Add("@Precio", SqlDbType.Float).Value = Precio
@@ -553,7 +553,7 @@ Public Class ClsProductosServicios
             .Add("@CveClasificacionCosto", SqlDbType.Int).Value = PS.CveClasificacionCosto
             .Add("@CveUnidadMedida", SqlDbType.Int).Value = PS.CveUnidadMedida
             .Add("@Codigo", SqlDbType.VarChar).Value = PS.Codigo
-            .Add("@Codigo2", SqlDbType.VarChar).Value = If(PS.Codigo2 = "", "-1", PS.Codigo2)
+            .Add("@NumeroParte", SqlDbType.VarChar).Value = If(PS.NumeroParte = "", "-1", PS.NumeroParte)
             .Add("@CodigoBarras", SqlDbType.VarChar).Value = If(PS.CodigoBarras = "", "-1", PS.CodigoBarras)
             .Add("@PS", SqlDbType.VarChar).Value = If(PS.PS.Length > 845, PS.PS.Substring(0, 845), PS.PS)
             .Add("@Precio", SqlDbType.Float).Value = PS.Precio
@@ -646,7 +646,7 @@ Public Class ClsProductosServicios
 
         Return Retorno
     End Function
-    Public Function UpdatePS(CveClasificacion As Integer, CveClasificacionCosto As Integer, CveUnidadMedida As Integer, Codigo As String, Codigo2 As String, CodigoBarras As String, PS As String, Precio As Double, IVA As Double, RetIVA As Double, Inventariable As Boolean, CveProveedorCompra As Integer,
+    Public Function UpdatePS(CveClasificacion As Integer, CveClasificacionCosto As Integer, CveUnidadMedida As Integer, Codigo As String, NumeroParte As String, CodigoBarras As String, PS As String, Precio As Double, IVA As Double, RetIVA As Double, Inventariable As Boolean, CveProveedorCompra As Integer,
                              AplicaParaConcepto As Boolean, AplicaParaVenta As Boolean, Estado As Boolean, CveUsuario As Integer, CvePS As Integer, CveMetodoInventario As Integer, EsPaquete As Integer, CveSATPS As Integer, CveEmpresa As Integer, Optional CveTipoPS As Integer = -1, Optional TipoServicio As Integer = -1,
                              Optional CveClasificacion2 As Integer = -1, Optional CveMarca As Integer = -1, Optional AlmacenSeccion As String = "", Optional AplicaIEPS As Boolean = False, Optional IEPSPorcentaje As Decimal = -1,
                              Optional CveCompuesto As Integer = -1, Optional IEPSGrabaIVA As Boolean = False, Optional VentaMinima As Decimal = 0,
@@ -669,7 +669,7 @@ Public Class ClsProductosServicios
             .Add("@CveClasificacionCosto", SqlDbType.Int).Value = CveClasificacionCosto
             .Add("@CveUnidadMedida", SqlDbType.Int).Value = CveUnidadMedida
             .Add("@Codigo", SqlDbType.VarChar).Value = Codigo
-            .Add("@Codigo2", SqlDbType.VarChar).Value = If(Codigo2 = "", "-1", Codigo2)
+            .Add("@NumeroParte", SqlDbType.VarChar).Value = If(NumeroParte = "", "-1", NumeroParte)
             .Add("@CodigoBarras", SqlDbType.VarChar).Value = If(CodigoBarras = "", "-1", CodigoBarras)
             .Add("@PS", SqlDbType.VarChar).Value = PS
             .Add("@Precio", SqlDbType.Float).Value = Precio
diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb
index 100ca0f8b..e6c36d92b 100644
--- a/App_Code/Modelos.vb
+++ b/App_Code/Modelos.vb
@@ -8769,7 +8769,7 @@ Namespace Modelos
             CveClasificacionCosto = -1
             CveClasificacion = -1
             Codigo = ""
-            Codigo2 = ""
+            NumeroParte = ""
             CodigoBarras = ""
             CveMetodoInventario = -1
             CveTipoPS = -1
@@ -8796,7 +8796,7 @@ Namespace Modelos
         Public Property UnidadMedida As String
         Public Property SATClaveUnidadMedida As String
         Public Property Codigo As String
-        Public Property Codigo2 As String
+        Public Property NumeroParte As String
         Public Property CodigoBarras As String
         Public Property PS As String
         Public Property SATClavePS As String
diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb
index ead2bb3c7..4ce782d48 100644
--- a/App_Code/Timbrado.vb
+++ b/App_Code/Timbrado.vb
@@ -459,8 +459,6 @@ Public Class Timbrado
 
                     Clave = "12345678a"
                     TimbraProduccion = False
-                    UsuarioServicio = "UserTest"
-                    ClaveServicio = "1234567890"
                 End If
 
                 Dim llaveByte As Byte(), certByte As Byte()
@@ -1011,6 +1009,8 @@ Public Class Timbrado
     Private Function EnviarInformacionPADE(url As String, payload As String, tokenAuth As String) As String
         Dim Retorno As String = ""
         Try
+            ServicePointManager.SecurityProtocol = SecurityProtocolType.Tls12
+
             Using httpClient As New HttpClient()
                 httpClient.Timeout = New TimeSpan(0, 1, 0)
                 Using request As New HttpRequestMessage(HttpMethod.Post, New Uri(url))
@@ -3171,8 +3171,6 @@ Public Class Timbrado
 
             Clave = "12345678a"
             TimbraProduccion = False
-            UsuarioServicio = "UserTest"
-            ClaveServicio = "1234567890"
 
         End If
 
diff --git a/Inventarios/RecepcionAlmacen.aspx.vb b/Inventarios/RecepcionAlmacen.aspx.vb
index e7a16ee3b..40d70f44a 100644
--- a/Inventarios/RecepcionAlmacen.aspx.vb
+++ b/Inventarios/RecepcionAlmacen.aspx.vb
@@ -4991,7 +4991,7 @@ Partial Class Inventarios_RecepcionAlmacen
                         dt.Rows(dt.Rows.Count - 1)("Producto") = rr(6).Trim
                         dt.Rows(dt.Rows.Count - 1)("Serie") = rr(7).Trim
                         dt.Rows(dt.Rows.Count - 1)("Cantidad") = 1
-                        dt.Rows(dt.Rows.Count - 1)("Código") = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa).FiltroPrimeroValor("Codigo", String.Format("Codigo2 = '{0}'", rr(5).Trim))
+                        dt.Rows(dt.Rows.Count - 1)("Código") = GlobalDTPSSimplificado(UsuarioActual.CveEmpresa).FiltroPrimeroValor("Codigo", String.Format("NumeroParte = '{0}'", rr(5).Trim))
 
                     End If
                 End If
diff --git a/Inventarios/RepEntradasSalidas.aspx b/Inventarios/RepEntradasSalidas.aspx
index fbadd4f2a..8a60e98ab 100644
--- a/Inventarios/RepEntradasSalidas.aspx
+++ b/Inventarios/RepEntradasSalidas.aspx
@@ -222,14 +222,14 @@
     <asp:UpdatePanel ID="UPPMov" runat="server" RenderMode="Inline" UpdateMode="Conditional">
         <ContentTemplate>
             <asp:GridView ID="GvM" Width="100%" runat="server" data-sort="false" GridLines="None"  CssClass="table table-smallpadding table-striped table-hover Widthall ScrollAD" 
-                DataKeyNames="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal,Codigo,Codigo2,PS"
+                DataKeyNames="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal,Codigo,NumeroParte,PS"
                 ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true" AutoGenerateColumns="False" AllowPaging="False" ShowFooter="False">
                 <Columns>
 
                     <%--0--%>
                     <asp:HyperLinkField DataNavigateUrlFields="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal,Tipo" DataNavigateUrlFormatString="~/Inventarios/RepExistenciasCostos.aspx?CvePS={0}&CveMoneda={1}&CveProveedor={2}&CveConcepto={3}&FechaI={4}&FechaF={5}&CveAlmacen={6}&CvePersonal={7}&Tipo={8}" Target="_blank" ItemStyle-Width="10%" HeaderText="Código" ControlStyle-CssClass="Texto" ItemStyle-HorizontalAlign="Left" DataTextField="Codigo" />
                     <%--1--%>
-                    <asp:HyperLinkField DataNavigateUrlFields="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal,Tipo" DataNavigateUrlFormatString="~/Inventarios/RepExistenciasCostos.aspx?CvePS={0}&CveMoneda={1}&CveProveedor={2}&CveConcepto={3}&FechaI={4}&FechaF={5}&CveAlmacen={6}&CvePersonal={7}&Tipo={8}" Target="_blank" ItemStyle-Width="10%" HeaderText="Código2" ControlStyle-CssClass="Texto" ItemStyle-HorizontalAlign="Left" Visible="False" DataTextField="Codigo2" />
+                    <asp:HyperLinkField DataNavigateUrlFields="CvePS,CveMoneda,CveProveedor,CveConcepto,FechaI,FechaF,CveAlmacen,CvePersonal,Tipo" DataNavigateUrlFormatString="~/Inventarios/RepExistenciasCostos.aspx?CvePS={0}&CveMoneda={1}&CveProveedor={2}&CveConcepto={3}&FechaI={4}&FechaF={5}&CveAlmacen={6}&CvePersonal={7}&Tipo={8}" Target="_blank" ItemStyle-Width="10%" HeaderText="NumeroParte" ControlStyle-CssClass="Texto" ItemStyle-HorizontalAlign="Left" Visible="False" DataTextField="NumeroParte" />
                     <%--2--%>
                     <asp:BoundField Visible="false" DataField="CodigoBarras" HeaderText="CodigoBarras" ItemStyle-Width="10%" />
                     <%--3--%>
diff --git a/Sistemas/CatSesiones.aspx b/Sistemas/CatSesiones.aspx
index 8229665b1..4481f93b4 100644
--- a/Sistemas/CatSesiones.aspx
+++ b/Sistemas/CatSesiones.aspx
@@ -29,6 +29,7 @@
         <asp:ListItem Text="Paises" Value="GlobalDTGralPaises"></asp:ListItem>
         <asp:ListItem Text="Estados" Value="GlobalDTGralEstados"></asp:ListItem>
         <asp:ListItem Text="Municipios" Value="GlobalDTGralMunicipios"></asp:ListItem>
+        <asp:ListItem Text="Localidades" Value="GlobalDTLocalidad"></asp:ListItem>
         <asp:ListItem Text="Poblaciones" Value="GlobalDTGralPoblaciones"></asp:ListItem>
         <asp:ListItem Text="Colonias" Value="GlobalDTGralColonias"></asp:ListItem>
         <asp:ListItem Text="Escolaridades" Value="GlobalDTGralEscolaridades"></asp:ListItem>
diff --git a/Sistemas/CatSesiones.aspx.vb b/Sistemas/CatSesiones.aspx.vb
index 88019f100..e6c1af670 100644
--- a/Sistemas/CatSesiones.aspx.vb
+++ b/Sistemas/CatSesiones.aspx.vb
@@ -39,7 +39,9 @@ Partial Class Sistemas_CatSesiones
         ElseIf DdlVariable.SelectedItem.Value = "GlobalDTGralColonias" Then
             CargaColonias()
         ElseIf DdlVariable.SelectedItem.Value = "GlobalDTGralMunicipios" Then
-            CargaMunicipios()
+            CargaMunicipios()
+        ElseIf DdlVariable.SelectedItem.Value = "GlobalDTLocalidad" Then
+            CargaLocalidades()
         ElseIf DdlVariable.SelectedItem.Value = "GlobalDTGralPoblaciones" Then
             CargaPoblaciones()
         ElseIf DdlVariable.SelectedItem.Value = "GlobalDTGralEscolaridades" Then
@@ -494,6 +496,13 @@ Partial Class Sistemas_CatSesiones
         'Dim Gral As New ClsGenerales
         'If Gral.GetGralMunicipios Then Application("GlobalDTGralMunicipios") = Gral.DtResultados Else Application("GlobalDTGralMunicipios") = Nothing
         'Gral.Dispose()
+    End Sub
+
+    Private Sub CargaLocalidades()
+        GlobalDTLocalidad() = Nothing
+        'Dim Gral As New ClsGenerales
+        'If Gral.GetGralMunicipios Then Application("GlobalDTGralMunicipios") = Gral.DtResultados Else Application("GlobalDTGralMunicipios") = Nothing
+        'Gral.Dispose()
     End Sub
 
     Private Sub CargaPoblaciones()
diff --git a/Ventas/ActualizarPrecios.aspx b/Ventas/ActualizarPrecios.aspx
index 7710e97eb..dc529d53a 100644
--- a/Ventas/ActualizarPrecios.aspx
+++ b/Ventas/ActualizarPrecios.aspx
@@ -207,7 +207,7 @@
                     <input type="text" id="TxtBuscar" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBuscar','{0}')", GVPrecios.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
                     <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBuscar','{0}')", GVPrecios.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
                 </div>
-                <asp:GridView ID="GVPrecios" runat="server" GridLines="None" DataKeyNames="CvePS, CvePrecioLista,PrecioLista,PS,Codigo,Codigo2,Porcentaje,CodigoPS"
+                <asp:GridView ID="GVPrecios" runat="server" GridLines="None" DataKeyNames="CvePS, CvePrecioLista,PrecioLista,PS,Codigo,NumeroParte,Porcentaje,CodigoPS"
                     CssClass="table table-striped table-advance table-hover Widthall ScrollAD" AutoGenerateColumns="False" data-sort="true" EmptyDataText="No se encontraron registros">
                     <Columns>
                         <asp:TemplateField ItemStyle-HorizontalAlign="center" ItemStyle-Width="5%">
@@ -216,13 +216,12 @@
                             </ItemTemplate>
                         </asp:TemplateField>
                         <asp:BoundField DataField="Codigo" ItemStyle-Width="5%" HeaderText="Código" />
-                        <%--<asp:BoundField DataField="Codigo2" ItemStyle-Width="5%" HeaderText="Código CPK"/>--%>
                         <asp:TemplateField ItemStyle-Width="5%" Visible="false" >
                             <HeaderTemplate>
-                                <asp:Literal ID="LtlCodigo2" runat="server" Text='<%# If(UsuarioActual.Empresa.Funcionalidad(531) = "1", "Código CPK", "Numero de parte") %>'></asp:Literal>
+                                <asp:Literal ID="LtlNumeroParte" runat="server" Text='<%# If(UsuarioActual.Empresa.Funcionalidad(531) = "1", "Código CPK", "Numero de parte") %>'></asp:Literal>
                             </HeaderTemplate>
                             <ItemTemplate>
-                                <asp:Literal ID="LtlCodigo2" runat="server" Text='<%# Eval("Codigo2", "{0}")%>'></asp:Literal>
+                                <asp:Literal ID="LtlNumeroParte" runat="server" Text='<%# Eval("NumeroParte", "{0}")%>'></asp:Literal>
                             </ItemTemplate>
                         </asp:TemplateField>
                         <asp:BoundField DataField="PS" HeaderText="Producto/Servicio" />
diff --git a/Ventas/ActualizarPrecios.aspx.vb b/Ventas/ActualizarPrecios.aspx.vb
index 0cd9fdd33..f692f952a 100644
--- a/Ventas/ActualizarPrecios.aspx.vb
+++ b/Ventas/ActualizarPrecios.aspx.vb
@@ -405,7 +405,7 @@ Partial Class Ventas_ActualizarPrecios
                                     Select New With
                                         {
                                             .Codigo = row.DataKey("Codigo"),
-                                            .Codigo2 = row.DataKey("Codigo2"),
+                                            .NumeroParte = row.DataKey("NumeroParte"),
                                             .PS = row.DataKey("PS"),
                                             .Precio = row.FCTextBox("TxtPrecio").Text.ToDecimal()
                                         }).QueryToDataTable(True)
@@ -436,7 +436,7 @@ Partial Class Ventas_ActualizarPrecios
 
         DtExcel.Columns("Codigo").ColumnName = "Código"
         DtExcel.Columns("PS").ColumnName = "Producto / Servicio"
-        DtExcel.Columns("Codigo2").ColumnName = "Número de parte"
+        DtExcel.Columns("NumeroParte").ColumnName = "Número de parte"
 
         If UsuarioActual.Empresa.Funcionalidad(531) = "1" OrElse UsuarioActual.Empresa.Funcionalidad(578) = "1" Then 'Empresa Acumuladores
             If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
@@ -687,7 +687,7 @@ Partial Class Ventas_ActualizarPrecios
                 NewRow("Código") = Row("Codigo")
 
                 If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then 'Empresa Acumuladores
-                    NewRow("Código CPK") = Row("Codigo2")
+                    NewRow("Código CPK") = Row("NumeroParte")
                 End If
 
                 NewRow("Producto/Servicio") = Row("PS")
diff --git a/Ventas/ProductosServicios.aspx.vb b/Ventas/ProductosServicios.aspx.vb
index 1826ddc84..8870bcd0d 100644
--- a/Ventas/ProductosServicios.aspx.vb
+++ b/Ventas/ProductosServicios.aspx.vb
@@ -948,7 +948,7 @@ Partial Class ProductosyServicios
                 DdlMarca.SelectedValue = ObjProductosServicios.CveMarca.ToString
                 DdlMarcaPSDes.SelectedValue = ObjProductosServicios.CveMarca.ToString
                 TxtCodigo.Text = ObjProductosServicios.Codigo
-                TxtNumeroParte.Text = ObjProductosServicios.Codigo2
+                TxtNumeroParte.Text = ObjProductosServicios.NumeroParte
                 TxtCodigoBarras.Text = ObjProductosServicios.CodigoBarras
                 CodigoBarrasCargado = ObjProductosServicios.CodigoBarras
                 TxtLitraje.Text = ObjProductosServicios.DtResultados.Rows(0)("Litraje").ToString
@@ -3177,7 +3177,7 @@ Partial Class ProductosyServicios
             End If
 
             If Agregar Then
-                If Not ObjPS.AddPS(CveClasificacion, -1, CveUnidadMedida, TxtCodigo.Text.Trim, TxtCodigo2.Text.Trim, TxtCodigoBarras.Text.Trim, PSS, TxtPrecio.Text.Trim.ToDouble, DdlIVA.SelectedValue.ToDouble,
+                If Not ObjPS.AddPS(CveClasificacion, -1, CveUnidadMedida, TxtCodigo.Text.Trim, TxtNumeroParte.Text.Trim, TxtCodigoBarras.Text.Trim, PSS, TxtPrecio.Text.Trim.ToDouble, DdlIVA.SelectedValue.ToDouble,
                            (TxtRetIVA.Text.Trim.ToDouble / 100), ChkInventariable.Checked, DdlProveedor.txtValue.Value.ToEntero, True, ChkAplicaParaVenta.Checked, UsuarioActual.CveUsuario,
                            CveEmpresaFranquicia, CveMetodoInv, EsPaquete, CveTipoPS:=DdlTipoPS.SelectedValue.ToEntero, FuePorXML:=False, TipoServicio:=-1, CveClasificacion2:=CveClasificacion2,
                            CveMarca:=CveMarcaFranquicia, AlmacenSeccion:=TxtAlmacenSeccion.Text.Trim, AplicaIEPS:=ChkAplicaIeps.Checked, IEPSPorcentaje:=DdlIEPSPorcentaje.SelectedValue.ToDecimal,
@@ -3197,7 +3197,7 @@ Partial Class ProductosyServicios
 
                 If ObjPS.GetPS(-1, -1, CveEmpresaFranquicia, Codigo:=TxtCodigo.Text.Trim.ToUpper) Then
                     Dim CvePS As Integer = ObjPS.DtResultados.FiltroPrimeroValor("CvePS", String.Format(" Codigo  = '{0}'", TxtCodigo.Text.Trim.ToUpper)).ToEntero()
-                    If Not ObjPS.UpdatePS(CveClasificacion, -1, CveUnidadMedida, TxtCodigo.Text.Trim, TxtCodigo2.Text.Trim, TxtCodigoBarras.Text.Trim, PSS, TxtPrecio.Text.Trim.ToDouble, DdlIVA.SelectedValue.ToDouble,
+                    If Not ObjPS.UpdatePS(CveClasificacion, -1, CveUnidadMedida, TxtCodigo.Text.Trim, TxtNumeroParte.Text.Trim, TxtCodigoBarras.Text.Trim, PSS, TxtPrecio.Text.Trim.ToDouble, DdlIVA.SelectedValue.ToDouble,
                                   (TxtRetIVA.Text.Trim.ToDouble / 100), ChkInventariable.Checked, -1, True, ChkAplicaParaVenta.Checked, ChkEstado.Checked, UsuarioActual.CveUsuario, CvePS, CveMetodoInv,
                                   EsPaquete, DdlSATPS.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, CveTipoPS:=DdlTipoPS.SelectedValue.ToEntero, TipoServicio:=-1, CveClasificacion2:=CveClasificacion2, CveMarca:=CveMarcaFranquicia,
                                   AlmacenSeccion:=TxtAlmacenSeccion.Text.Trim, AplicaIEPS:=ChkAplicaIeps.Checked, IEPSPorcentaje:=DdlIEPSPorcentaje.SelectedValue.ToDecimal,