diff --git a/.gitignore b/.gitignore
index e3e70ef3d..2bcb78b3a 100644
--- a/.gitignore
+++ b/.gitignore
@@ -1,127 +1,267 @@
-################################################################################
-# Este archivo .gitignore ha sido creado automáticamente por Microsoft(R) Visual Studio.
-################################################################################
-
-/Empresas
-/Menu
-/Web.config
-/Log.txt
-/.vs/localhost/v14/.suo
-/LogMail.txt
-/.vs
-/packages
-/Temp/637019018406489106-FormatoPS (1).xlsx
-/Temp/637025911245561139-FormatoAlmacenTest2.xlsx
-/Temp/637025910298823073-FormatoAlmacenTest2.xlsx
-/Temp/637025890843842072-FormatoAlmacenTest.xlsx
-/Temp/637025890070124286-FormatoAlmacenTest.xlsx
-/Temp/637025889649837823-FormatoAlmacenTest.xlsx
-/Temp/637025888979809566-FormatoAlmacenTest.xlsx
-/Temp/637025888317991027-FormatoAlmacenTest.xlsx
-/Temp/637025886969280729-FormatoAlmacenTest.xlsx
-/Temp/637025883478481189-FormatoAlmacenTest.xlsx
-/Temp/637025881893726971-FormatoAlmacenTest.xlsx
-/Temp/637025875318390368-FormatoAlmacenTest.xlsx
-/Temp/637025873461693799-FormatoAlmacenTest.xlsx
-/Temp/637025867243299753-FormatoAlmacenTest.xlsx
-/Temp/637025866028329141-FormatoAlmacenTest.xlsx
-/Temp/637025858967837880-FormatoAlmacen (8).xlsx
-/Temp/637025856623805153-FormatoAlmacenTest.xlsx
-/Temp/637025854225974598-FormatoAlmacenTest.xlsx
-/Temp/637025850746443741-FormatoAlmacenTest.xlsx
-/Temp/637025849906896827-FormatoAlmacenTest.xlsx
-/Temp/637025811751064573-FormatoAlmacen (9).xlsx
-/Temp/637025802306385270-FormatoAlmacen (9).xlsx
-/Temp/637024955677385188-FormatoAlmacen (8).xlsx
-/Temp/637024223339157610-FormatoAlmacen (8).xlsx
-/Temp/637024211080831453-FormatoAlmacen (8).xlsx
-/Temp/637024208748075824-FormatoAlmacen (8).xlsx
-/Temp/637024206124827330-FormatoAlmacen (8).xlsx
-/Temp/637024198603668842-FormatoAlmacen (8).xlsx
-/Temp/637024194937999485-FormatoAlmacen (8).xlsx
-/Temp/637024187194477421-FormatoAlmacen (8).xlsx
-/Temp/637024175396114926-FormatoAlmacen(1).xlsx
-/Temp/637024174152414578-FormatoAlmacen(1).xlsx
-/Temp/637024172516905613-FormatoAlmacen(1).xlsx
-/Temp/637024172339379953-FormatoAlmacen(1).xlsx
-/Temp/637024168678743644-FormatoAlmacen(1).xlsx
-/Temp/637024167899990250-FormatoAlmacen(1).xlsx
-/Temp/637024163796303799-FormatoAlmacen(1).xlsx
-/Temp/637024162382548932-FormatoAlmacen(1).xlsx
-/Temp/637024154734150595-FormatoAlmacen(1).xlsx
-/Temp/637024152618695056-FormatoAlmacen(1).xlsx
-/Temp/637024129146071459-FormatoAlmacen(1).xlsx
-/Temp/637024111695874769-FormatoAlmacen(1).xlsx
-/Temp/637022418959236013-FormatoAlmacen (4).xlsx
-/Temp/637022412610855769-FormatoAlmacen (4).xlsx
-/Temp/637022411585353362-FormatoAlmacen (4).xlsx
-/Temp/637022404788752537-FormatoAlmacen (3).xlsx
-/Temp/637022403501450734-FormatoAlmacen (3).xlsx
-/Temp/637022402924630398-FormatoAlmacen (3).xlsx
-/Temp/637022401250489074-FormatoAlmacen (5).xlsx
-/Temp/637022398545213986-FormatoAlmacen (3).xlsx
-/Temp/637022382214133336-FormatoAlmacen (5).xlsx
-/Temp/637022380557097080-FormatoAlmacen (5).xlsx
-/Temp/637022379412790662-FormatoAlmacen (5).xlsx
-/Temp/637022378793902185-FormatoAlmacen (5).xlsx
-/Temp/637021654534481890-FormatoAlmacen (3).xlsx
-/Temp/637021651345315739-FormatoAlmacen (3).xlsx
-/Temp/637021616508913486-FormatoAlmacen (3).xlsx
-/Temp/637021593875864770-FormatoAlmacen (3).xlsx
-/Temp/637021592631992296-FormatoAlmacen (3).xlsx
-/Temp/637021592488982043-FormatoAlmacen (3).xlsx
-/Temp/637021560097934922-FormatoAlmacen (3).xlsx
-/Temp/637021554559110062-FormatoPS (1).xlsx
-/Temp/637021550053083909-FormatoAlmacen (3).xlsx
-/Temp/637021547214247040-FormatoAlmacen (3).xlsx
-/Temp/637021545638924577-FormatoAlmacen (3).xlsx
-/Temp/637021527971651311-FormatoAlmacen (3).xlsx
-/Temp/637021527073950270-FormatoAlmacen (3).xlsx
-/Temp/637021526064707043-FormatoAlmacen (3).xlsx
-/Temp/637021522586485282-FormatoAlmacen (3).xlsx
-/Temp/637021521403851473-FormatoAlmacen (3).xlsx
-/Temp/637021519837377736-FormatoAlmacen (3).xlsx
-/Temp/637021515778751967-FormatoAlmacen (3).xlsx
-/Temp/637020728341171393-FormatoAlmacen (2).xlsx
-/Temp/637020724850629405-FormatoAlmacen (2).xlsx
-/Temp/637020723186758192-FormatoAlmacen (2).xlsx
-/Temp/637020721382428289-FormatoAlmacen (2).xlsx
-/Temp/637019818530193505-FormatoPS (1).xlsx
-/Temp/637019811169546741-FormatoPS (1).xlsx
-/Temp/637019803848526814-FormatoPS (1).xlsx
-/Temp/637019796396388291-FormatoPS (1).xlsx
-/Temp/637019783731773074-FormatoPS (1).xlsx
-/Temp/637019781961714106-FormatoPS (1).xlsx
-/Temp/637019780290041928-FormatoPS (1).xlsx
-/Temp/637019777705293557-FormatoPS (1).xlsx
-/Temp/637019766664551609-FormatoPS (1).xlsx
-/Temp/637019765307733182-FormatoPS (1).xlsx
-/Temp/637019764041447352-FormatoPS (1).xlsx
-/Temp/637019759922681271-FormatoPS (1).xlsx
-/Temp/637019028539049368-FormatoPS (1).xlsx
-/Temp/637019027752495331-FormatoPS (1).xlsx
-/Temp/637019026870914833-FormatoPS (1).xlsx
-/Temp/637019020024023961-FormatoPS (1).xlsx
-/Temp/637019018783282466-FormatoPS (1).xlsx
-/Temp/637025921934403738-FormatoAlmacen (4)(1).xlsx
-/Temp/637025871940254054-FormatoAlmacenTest.xlsx
-/Temp/637025819297716436-FormatoAlmacen (9).xlsx
-/Temp/637025813094826506-FormatoAlmacen (9).xlsx
-/Temp/637025803627482072-FormatoAlmacen (9).xlsx
-/Temp/637024210197949659-FormatoAlmacen (8).xlsx
-/Temp/637024207387517397-FormatoAlmacen (8).xlsx
-/Temp/637024203939520361-FormatoAlmacen (8).xlsx
-/Temp/637024200918571845-FormatoAlmacen (8).xlsx
-/Temp/637024199786848948-FormatoAlmacen (8).xlsx
-/Temp/637024188637374314-FormatoAlmacen (8).xlsx
-/Temp/637024170730017118-FormatoAlmacen(1).xlsx
-/Temp/637024164939543846-FormatoAlmacen(1).xlsx
-/Temp/637024164072145623-FormatoAlmacen(1).xlsx
-/Temp/637024156159485931-FormatoAlmacen(1).xlsx
-/Temp/637024153420640718-FormatoAlmacen(1).xlsx
-/Temp/637024148711869965-FormatoAlmacen(1).xlsx
-/Temp/637022414752610497-FormatoAlmacen (4).xlsx
-/Temp/637021629396074854-FormatoAlmacen (3).xlsx
-/Temp/637021627402424201-FormatoAlmacen (3).xlsx
-/Temp/637021547606916146-FormatoAlmacen (3).xlsx
-/Temp/637021529455078900-FormatoAlmacen (3).xlsx
+## Ignore Visual Studio temporary files, build results, and
+## files generated by popular Visual Studio add-ons.
+web.config
+*.txt
+[Mm]enu/
+[Tt]emp/
+[Ee]mpresas/
+# User-specific files
+*.suo
+*.user
+*.userosscache
+*.sln.docstates
+
+# User-specific files (MonoDevelop/Xamarin Studio)
+*.userprefs
+
+# Build results
+[Dd]ebug/
+[Dd]ebugPublic/
+[Rr]elease/
+[Rr]eleases/
+x64/
+x86/
+bld/
+[Bb]in/
+[Oo]bj/
+[Ll]og/
+
+# Visual Studio 2015 cache/options directory
+.vs/
+# Uncomment if you have tasks that create the project's static files in wwwroot
+#wwwroot/
+
+# MSTest test Results
+[Tt]est[Rr]esult*/
+[Bb]uild[Ll]og.*
+
+# NUNIT
+*.VisualState.xml
+TestResult.xml
+
+# Build Results of an ATL Project
+[Dd]ebugPS/
+[Rr]eleasePS/
+dlldata.c
+
+# DNX
+project.lock.json
+project.fragment.lock.json
+artifacts/
+
+*_i.c
+*_p.c
+*_i.h
+*.ilk
+*.meta
+*.obj
+*.pch
+*.pdb
+*.pgc
+*.pgd
+*.rsp
+*.sbr
+*.tlb
+*.tli
+*.tlh
+*.tmp
+*.tmp_proj
+*.log
+*.vspscc
+*.vssscc
+.builds
+*.pidb
+*.svclog
+*.scc
+
+# Chutzpah Test files
+_Chutzpah*
+
+# Visual C++ cache files
+ipch/
+*.aps
+*.ncb
+*.opendb
+*.opensdf
+*.sdf
+*.cachefile
+*.VC.db
+*.VC.VC.opendb
+
+# Visual Studio profiler
+*.psess
+*.vsp
+*.vspx
+*.sap
+
+# TFS 2012 Local Workspace
+$tf/
+
+# Guidance Automation Toolkit
+*.gpState
+
+# ReSharper is a .NET coding add-in
+_ReSharper*/
+*.[Rr]e[Ss]harper
+*.DotSettings.user
+
+# JustCode is a .NET coding add-in
+.JustCode
+
+# TeamCity is a build add-in
+_TeamCity*
+
+# DotCover is a Code Coverage Tool
+*.dotCover
+
+# NCrunch
+_NCrunch_*
+.*crunch*.local.xml
+nCrunchTemp_*
+
+# MightyMoose
+*.mm.*
+AutoTest.Net/
+
+# Web workbench (sass)
+.sass-cache/
+
+# Installshield output folder
+[Ee]xpress/
+
+# DocProject is a documentation generator add-in
+DocProject/buildhelp/
+DocProject/Help/*.HxT
+DocProject/Help/*.HxC
+DocProject/Help/*.hhc
+DocProject/Help/*.hhk
+DocProject/Help/*.hhp
+DocProject/Help/Html2
+DocProject/Help/html
+
+# Click-Once directory
+publish/
+
+# Publish Web Output
+*.[Pp]ublish.xml
+*.azurePubxml
+# TODO: Comment the next line if you want to checkin your web deploy settings
+# but database connection strings (with potential passwords) will be unencrypted
+#*.pubxml
+*.publishproj
+
+# Microsoft Azure Web App publish settings. Comment the next line if you want to
+# checkin your Azure Web App publish settings, but sensitive information contained
+# in these scripts will be unencrypted
+PublishScripts/
+
+# NuGet Packages
+*.nupkg
+# The packages folder can be ignored because of Package Restore
+**/packages/*
+# except build/, which is used as an MSBuild target.
+!**/packages/build/
+# Uncomment if necessary however generally it will be regenerated when needed
+#!**/packages/repositories.config
+# NuGet v3's project.json files produces more ignoreable files
+*.nuget.props
+*.nuget.targets
+
+# Microsoft Azure Build Output
+csx/
+*.build.csdef
+
+# Microsoft Azure Emulator
+ecf/
+rcf/
+
+# Windows Store app package directories and files
+AppPackages/
+BundleArtifacts/
+Package.StoreAssociation.xml
+_pkginfo.txt
+
+# Visual Studio cache files
+# files ending in .cache can be ignored
+*.[Cc]ache
+# but keep track of directories ending in .cache
+!*.[Cc]ache/
+
+# Others
+ClientBin/
+~$*
+*~
+*.dbmdl
+*.dbproj.schemaview
+*.jfm
+*.pfx
+*.publishsettings
+node_modules/
+orleans.codegen.cs
+
+# Since there are multiple workflows, uncomment next line to ignore bower_components
+# (https://github.com/github/gitignore/pull/1529#issuecomment-104372622)
+#bower_components/
+
+# RIA/Silverlight projects
+Generated_Code/
+
+# Backup & report files from converting an old project file
+# to a newer Visual Studio version. Backup files are not needed,
+# because we have git ;-)
+_UpgradeReport_Files/
+Backup*/
+UpgradeLog*.XML
+UpgradeLog*.htm
+
+# SQL Server files
+*.mdf
+*.ldf
+
+# Business Intelligence projects
+*.rdl.data
+*.bim.layout
+*.bim_*.settings
+
+# Microsoft Fakes
+FakesAssemblies/
+
+# GhostDoc plugin setting file
+*.GhostDoc.xml
+
+# Node.js Tools for Visual Studio
+.ntvs_analysis.dat
+
+# Visual Studio 6 build log
+*.plg
+
+# Visual Studio 6 workspace options file
+*.opt
+
+# Visual Studio LightSwitch build output
+**/*.HTMLClient/GeneratedArtifacts
+**/*.DesktopClient/GeneratedArtifacts
+**/*.DesktopClient/ModelManifest.xml
+**/*.Server/GeneratedArtifacts
+**/*.Server/ModelManifest.xml
+_Pvt_Extensions
+
+# Paket dependency manager
+.paket/paket.exe
+paket-files/
+
+# FAKE - F# Make
+.fake/
+
+# JetBrains Rider
+.idea/
+*.sln.iml
+*.sln
+
+# CodeRush
+.cr/
+
+# Python Tools for Visual Studio (PTVS)
+__pycache__/
+*.pyc
+/Utilerias
diff --git a/App_Code/ClsContPAQi.vb b/App_Code/ClsContPAQi.vb
index e892de2b1..557c15266 100644
--- a/App_Code/ClsContPAQi.vb
+++ b/App_Code/ClsContPAQi.vb
@@ -2005,7 +2005,7 @@ Public Class ClsContPAQi
     ''' <remarks></remarks>
     ''' 
     Public Function AddPoliza(TipoPol As Integer, Concepto As String, Cargos As Double, Abonos As Double, CveUsuario As Integer, FechaPoliza As Date, Optional pFolio As String = "-1",
-                              Optional pTipo As String = "", Optional Guid As String = "-1") As Integer
+                              Optional pTipo As String = "", Optional Guid As String = "-1", Optional CvePlantillaPoliza As Integer = -1) As Integer
         'Tipo As String, pFolioPoliza As Integer) As Boolean
         Dim Retorno As Integer = 0
         If Guid = "-1" Then Guid = System.Guid.NewGuid().ToString()
@@ -2078,11 +2078,11 @@ Public Class ClsContPAQi
 
         StrSQL.AppendLine("                    INSERT INTO Polizas (Id, RowVersion, Ejercicio, Periodo, TipoPol, Folio, Clase, Impresa, ")
         StrSQL.AppendLine("                                                Concepto, Fecha, Cargos, Abonos, IdDiario, SistOrig, Ajuste, IdUsuario, ")
-        StrSQL.AppendLine("                                                ConFlujo, ConCuadre, TimeStamp,Guid)")
+        StrSQL.AppendLine("                                                ConFlujo, ConCuadre, TimeStamp,Guid,CvePlantillaPoliza)")
         StrSQL.AppendLine("     ")
         StrSQL.AppendLine("                     VALUES (@IdPoliza, @RowVersion, @Ejercicio, @Periodo, @TipoPol, @Folio, @Clase, @Impresa, ")
         StrSQL.AppendLine("                                   @Concepto, @Fecha, ROUND(@Cargos,2), ROUND(@Abonos,2), @IdDiario, @SistOrig, @Ajuste, @IdUsuario, ")
-        StrSQL.AppendLine("                                   @ConFlujo, @ConCuadre, @TimeStamp,@Guid)")
+        StrSQL.AppendLine("                                   @ConFlujo, @ConCuadre, @TimeStamp,@Guid,@CvePlantillaPoliza)")
         StrSQL.AppendLine("    ")
         StrSQL.AppendLine("                    EXEC PA_UpdateId 'Id_Poliza';")
         StrSQL.AppendLine("       ")
@@ -2123,6 +2123,7 @@ Public Class ClsContPAQi
             .Add("@FechaPoliza", SqlDbType.DateTime).Value = FechaPoliza
             .Add("@pFolio", SqlDbType.VarChar).Value = pFolio
             .Add("@Guid", SqlDbType.VarChar).Value = Guid
+            .Add("@CvePlantillaPoliza", SqlDbType.Int).Value = CvePlantillaPoliza
             .Add("@IdPoliza", SqlDbType.Int).Direction = ParameterDirection.Output
         End With
 
@@ -7308,7 +7309,7 @@ Public Class ClsContPAQi
         Return Retorno
     End Function
 
-    Public Function GetPolizasMasivo(Inicio As Date, Fin As Date, FolioI As Integer, FolioF As Integer, TipoPol As Integer, CveUsuario As Integer, CveSubProyecto As Integer, CveCuenta As Integer) As Boolean
+    Public Function GetPolizasMasivo(Inicio As Date, Fin As Date, FolioI As Integer, FolioF As Integer, TipoPol As Integer, CveUsuario As Integer, CveSubProyecto As Integer, CveCuenta As Integer, CveGrupoPlantillaPoliza As Integer) As Boolean
         Dim Retorno As Boolean = False
 
         StrSQL.Clear()
@@ -7338,6 +7339,12 @@ Public Class ClsContPAQi
         StrSQL.Append("     AND (@CveSubProyecto = -1 OR  ( MP.IdPoliza IN (SELECT IdPoliza FROM @DtSeg)) OR (@CveSubProyecto = -2 AND MP.IdSegNeg = 0) )  ")
         StrSQL.Append("     AND (@CveUsuario = -1 OR  P.IdUsuario = @CveUsuario)  ")
         StrSQL.Append("     AND (@Cvecuenta = -1 OR  C.Id = @Cvecuenta)  ")
+        StrSQL.Append("     AND (@CveGrupoPlantillaPoliza = -1 
+                            OR ( @CveGrupoPlantillaPoliza = 1 AND ISNULL(P.CvePlantillaPoliza,0) IN (1,22,43, 53, 60, 69, 74, 58, 59, 58, 59, 61, 62, 70,78, 89,94,95,96, 97,99,
+				                 64,65,68,72,75,79,80,81,82,83,84,90,91,93,40,41,42,48,54,55,14,24,32,34,37) ) 
+                            OR ( @CveGrupoPlantillaPoliza = 2 AND ISNULL(P.CvePlantillaPoliza,0) IN (4,7,47,10,12,74) )  
+                            OR ( @CveGrupoPlantillaPoliza = 3 And ISNULL(P.CvePlantillaPoliza,0) IN (2, 3, 5, 8, 9, 13,15,17,19,21, 36,44, 45, 49, 50, 51, 52,  56, 57, 67, 71,73,77,85,86,87,88, 92,98,76,23,38) )  
+                            OR ( @CveGrupoPlantillaPoliza = 4 AND ISNULL(P.CvePlantillaPoliza,0) IN (6, 11,16,  63,46,47,39,100)  ) )")
         StrSQL.Append("   ORDER BY P.Folio, MP.NumMovto ")
         StrSQL.Append("  END; ")
 
@@ -7353,6 +7360,8 @@ Public Class ClsContPAQi
             .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
             .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
             .Add("@cvecuenta", SqlDbType.Int).Value = CveCuenta
+            .Add("@CveGrupoPlantillaPoliza", SqlDbType.Int).Value = CveGrupoPlantillaPoliza
+
         End With
         Try
             SqlAdapter.Fill(Data)
diff --git a/App_Code/ClsContabilidad.vb b/App_Code/ClsContabilidad.vb
index 2b556565a..c972e54df 100644
--- a/App_Code/ClsContabilidad.vb
+++ b/App_Code/ClsContabilidad.vb
@@ -1050,7 +1050,7 @@ Public Class ClsContabilidad
 
 
             Dim tIdPoliza As Integer
-            Dim CveTipoPoliza, FolioFijo As Integer
+            Dim CveTipoPoliza, FolioFijo, CvePlantillaPoliza As Integer
             Dim Cargos As Decimal
             Dim Abonos As Decimal
             Dim NumPoliza As String = ""
@@ -1087,6 +1087,7 @@ Public Class ClsContabilidad
                     FolioFijo = Data.Rows(0)("FolioFijo").ToString.ToEntero
                     TipoPoliza = Data.Rows(0)("TipoPoliza").ToString
                     CodigoNumeroPoliza = Data.Rows(0)("CodigoNumeroPoliza").ToString
+                    CvePlantillaPoliza = Data.Rows(0)("CvePlantillaPoliza").ToString.ToEntero
 
                     'FolioFiscal = Data.Rows(0)("FolioFiscal").ToString
                     'MetodoPagoSAT = Data.Rows(0)("ClaveSAT").ToString
@@ -1106,7 +1107,7 @@ Public Class ClsContabilidad
                         ObjConta.RemoveCausacionesIVA(-1, tIdPoliza)
                         ObjConta.RemoveDevolucionesIVA(-1, tIdPoliza)
                     Else
-                        tIdPoliza = ObjConta.AddPoliza(CveTipoPoliza, Concepto, Cargos, Abonos, CveUsuario, Fecha, FolioFijo.ToString, CodigoNumeroPoliza)
+                        tIdPoliza = ObjConta.AddPoliza(CveTipoPoliza, Concepto, Cargos, Abonos, CveUsuario, Fecha, FolioFijo.ToString, CodigoNumeroPoliza, CvePlantillaPoliza:=CvePlantillaPoliza)
                         ContaFolio = ObjConta.Folio.ToString
                     End If
 
diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb
index 653c048d5..e498feb95 100644
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -4124,7 +4124,7 @@ Public Class ClsPaginas
             PaginaDict.Add("/Nomina/CatSatRegimenContratacion.aspx".ToUpper(), 257)
             PaginaDict.Add("/Nomina/CatSatTipoIncapacidad.aspx".ToUpper(), 258)
             PaginaDict.Add("/Nomina/CatSatRiesgoPuesto.aspx".ToUpper(), 259)
-            PaginaDict.Add("/Nomina/Utilidades.aspx".ToUpper(), 870)
+            PaginaDict.Add("/Nomina/ReportePTU.aspx".ToUpper(), 870)
 #End Region
             'Ordenes de Servicios
 #Region "OS"
diff --git a/App_Code/ClsRH.vb b/App_Code/ClsRH.vb
index 8c4f29e7c..228bd9b3f 100644
--- a/App_Code/ClsRH.vb
+++ b/App_Code/ClsRH.vb
@@ -2024,6 +2024,28 @@ Public Class ClsRH
         Return Retorno
     End Function
 
+    Public Function UpPersonalAltas(CvePersonal As Integer, fechaInicio As String, fechaFin As String, CvePeriodoFiniquito As Integer, CveMotivoBaja As Integer, esLiquidacion As Boolean) As Boolean
+        Dim Retorno As Boolean = False
+        SqlDataAdapter("PA_RH_PersonalAltasUp")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CvePersonal", SqlDbType.Int).Value = CvePersonal
+            .Add("@fechaInicio", SqlDbType.VarChar).Value = fechaInicio
+            .Add("@fechaFin", SqlDbType.VarChar).Value = fechaFin
+            .Add("@CvePeriodoFiniquito", SqlDbType.Int).Value = CvePeriodoFiniquito
+            .Add("@CveMotivoBaja", SqlDbType.Int).Value = CveMotivoBaja
+            .Add("@esLiquidacion", SqlDbType.Int).Value = If(esLiquidacion, 1, 0)
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener el reporte de Altas.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+    End Function
+
     Public Function GetPersonalAltas(CvePersonal As Integer) As Boolean
         Dim Retorno As Boolean = False
         SqlDataAdapter("PA_RH_PersonalAltasGet")
diff --git a/App_Code/Modelos.vb b/App_Code/Modelos.vb
index 954c278f3..f64bb2cfd 100644
--- a/App_Code/Modelos.vb
+++ b/App_Code/Modelos.vb
@@ -2780,23 +2780,17 @@ Namespace Modelos
 
                     Next
 
-                End If
-
-                If DtRemisionesRelacionadas Is Nothing Then
-                    If ObjVentas.GetRemisionesRelacionadas(ObjFactura.CveVenta, ObjFactura.TipoDocto) AndAlso ObjVentas.DtResultados.Rows.Count > 0 Then
-                        DtRemisionesRelacionadas = ObjVentas.DtResultados.Copy()
-                    End If
+                End If
+
+                If ObjFactura.RemisionesLista.Count = 0 AndAlso (DtRemisionesRelacionadas IsNot Nothing AndAlso DtRemisionesRelacionadas.Rows.Count > 0) Then
+                    For Each Row As DataRow In DtRemisionesRelacionadas.Rows
+                        ObjFactura.RemisionesLista.Add(Row("CveVenta").ToString().ToEntero())
+                    Next
                 End If
 
                 'Si es Facturacion de una remision cancelamos, traspasamos saldos y agregamos evento a la bitacora
                 If (DtRemisionesRelacionadas IsNot Nothing AndAlso DtRemisionesRelacionadas.Rows.Count > 0) OrElse ObjFactura.RemisionesLista.Count > 0 Then
 
-                    If ObjFactura.RemisionesLista.Count = 0 AndAlso (DtRemisionesRelacionadas IsNot Nothing AndAlso DtRemisionesRelacionadas.Rows.Count > 0) Then
-                        For Each Row As DataRow In DtRemisionesRelacionadas.Rows
-                            ObjFactura.RemisionesLista.Add(Row("CveVenta").ToString().ToEntero())
-                        Next
-                    End If
-
                     If ObjFactura.RemisionesLista.Count > 0 Then
                         For Each CveRemision As Integer In RemisionesLista
                             If Not ObjConta.TraspasarSaldosRemision(CveRemision, ObjFactura.CvePrePoliza, ObjFactura.CveVenta) Then
@@ -2817,25 +2811,30 @@ Namespace Modelos
                                 Exit For
                             End If
                         Next
-                    End If
-
-                    'REGRESA SALDO A LAS REMISIONES QUE SE FACTURARON EN EL INGRESO QUE SE ESTA CANCELANDO
-                    If ObjFactura.TipoDocto = "Ing" And ValorMultiplicador = -1 AndAlso NuevaFactura <> 1 AndAlso Not SeCancelaRemisionProceso Then ' se debe de excluir cuando es refacturación
-                        For Each Dr As DataRow In DtRemisionesRelacionadas.Rows
-
-                            Dim DebeCancelar As Boolean = CancelarRemisiones AndAlso ListaRemisionesCancelar.Any(Function(CveRemision) CveRemision = Dr("CveVenta").ToString.ToEntero())
-
-                            If Not DebeCancelar Then
-                                If Not ObjConta.TraspasarSaldosRemision(Dr("CveVenta").ToString.ToEntero, ObjFactura.CvePrePoliza, ObjFactura.CveVenta, 1) Then
-                                    ErrorPrepoliza = True
-                                End If
-                                If Not ObjEventos.AddEventoBitacora($"Facturación cancelada en: <a href='/Ventas/Ventas.aspx?CveVenta={ObjFactura.CveVenta}' target='_blank' class='Texto'>{ObjFactura.Folio}</a>", "-1", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveVenta:=Dr("CveVenta").ToString.ToEntero) Then
-                                    ErrorPrepoliza = True
-                                End If
-                            End If
-                        Next
                     End If
-
+                End If
+
+                If DtRemisionesRelacionadas Is Nothing Then
+                    If ObjVentas.GetRemisionesRelacionadas(ObjFactura.CveVenta, ObjFactura.TipoDocto) AndAlso ObjVentas.DtResultados.Rows.Count > 0 Then
+                        DtRemisionesRelacionadas = ObjVentas.DtResultados.Copy()
+                    End If
+                End If
+
+                'REGRESA SALDO A LAS REMISIONES QUE SE FACTURARON EN EL INGRESO QUE SE ESTA CANCELANDO
+                If ObjFactura.TipoDocto = "Ing" And ValorMultiplicador = -1 AndAlso NuevaFactura <> 1 AndAlso Not SeCancelaRemisionProceso AndAlso DtRemisionesRelacionadas IsNot Nothing Then ' se debe de excluir cuando es refacturación
+                    For Each Dr As DataRow In DtRemisionesRelacionadas.Rows
+
+                        Dim DebeCancelar As Boolean = CancelarRemisiones AndAlso ListaRemisionesCancelar.Any(Function(CveRemision) CveRemision = Dr("CveVenta").ToString.ToEntero())
+
+                        If Not DebeCancelar Then
+                            If Not ObjConta.TraspasarSaldosRemision(Dr("CveVenta").ToString.ToEntero, ObjFactura.CvePrePoliza, ObjFactura.CveVenta, 1) Then
+                                ErrorPrepoliza = True
+                            End If
+                            If Not ObjEventos.AddEventoBitacora($"Facturación cancelada en: <a href='/Ventas/Ventas.aspx?CveVenta={ObjFactura.CveVenta}' target='_blank' class='Texto'>{ObjFactura.Folio}</a>", "-1", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveVenta:=Dr("CveVenta").ToString.ToEntero) Then
+                                ErrorPrepoliza = True
+                            End If
+                        End If
+                    Next
                 End If
 
 
@@ -3583,6 +3582,13 @@ Namespace Modelos
 
             Dim TieneAlmacen As Boolean = False
 
+            If ObjFactura.SaldoAlmacen <> 0 Then
+                Retorno.Mensaje = "El pedido no se puede cancelar ya que tiene movimientos de almacén.<br/>Nota: Primero hay que hacer la devolución al almacén."
+                Retorno.TipoMensaje = TipoMensaje.MsgAdvertencia
+
+                Return Retorno
+            End If
+
             'VALIDA QUE LA FACTURA NO TENGA PAGOS
             If ObjFactura.TipoDocto.Contiene("Ing", "Rem") AndAlso ObjFactura.Pagado > 0 Then
                 Retorno.Mensaje = "La factura no se puede cancelar debido a que tiene pagos vinculados."
@@ -3608,7 +3614,7 @@ Namespace Modelos
             End If
 
             'LA VALIDACION DE SALDOS CUANDO ES REFACTURACION SE HACE ANTES ASI QUE SI ES REFACTURACION IGNORAMOS ESTA CONDICION, SI ES ANTICIPO VERIFICA QUE NO ESTÉ APLICADO
-            If ObjFactura.TipoDocto = "Ant" AndAlso ObjFactura.Pagado > 0 AndAlso DTDocumentosRelacionados.Rows.Count > 0 Then
+            If ObjFactura.TipoDocto.Contiene("Ing", "Ant", "Rem") AndAlso ObjFactura.Pagado > 0 AndAlso DTDocumentosRelacionados.Rows.Count > 0 Then
                 Retorno.Mensaje = "La factura no se puede cancelar debido a que tiene pagos vinculados."
                 Retorno.TipoMensaje = TipoMensaje.MsgAdvertencia
 
@@ -3670,7 +3676,7 @@ Namespace Modelos
             Dim RevivirRemisiones = Not EsRefacturacion AndAlso ((TieneRemisionesRelacionadas AndAlso ListaRemisionesCancelar Is Nothing) OrElse (DtRemisionesRelacionadas.Rows.Count > ListaRemisionesCancelar.Count))
 
             'REMISION YA SE DEBE HACER POR EL PROCESO DE DEVOLUCION DE ALMACEN
-            If Not EsRefacturacion AndAlso (ObjFactura.SaldoAlmacen > 0 AndAlso ObjFactura.EsDevolucionVenta.Contiene(0, 1)) AndAlso Not RealizarDevolucionAlmacen And RevivirRemisiones = False Then
+            If Not EsRefacturacion AndAlso (ObjFactura.SaldoAlmacen <> 0 AndAlso ObjFactura.EsDevolucionVenta.Contiene(0, 1)) AndAlso Not RealizarDevolucionAlmacen And RevivirRemisiones = False Then
 
                 Retorno.Mensaje = "La factura no se puede cancelar debido a que tiene movimientos de inventario."
                 Retorno.TipoMensaje = TipoMensaje.MsgAdvertencia
@@ -4190,7 +4196,8 @@ Namespace Modelos
 
                 End If
 
-                Dim CveEstatusRefacturacion As Integer = 0
+                Dim CveEstatusRefacturacion As Integer = If(ObjFactura.CveEstatusRefacturacion <= 0, 0, ObjFactura.CveEstatusRefacturacion)
+
                 'ACTUALIZA ESTATUS 
                 If Not ErrorCancelar Then
                     Select Case ObjFactura.TipoDocto
@@ -4208,11 +4215,17 @@ Namespace Modelos
                         End If
                     End If
 
-
-                    If Not ObjVentas.UpdateEstatusFactura(CveEstatus, FolioFiscal, CancelacionAcuse, CancelacionFecha, CveVenta, IDPoliza, CvePAC:=CvePACCancelacion, CveEstatusRefacturacion:=CveEstatusRefacturacion,
-                                                      CveUsuarioCambiaEstatus:=UsuarioActual.CveUsuario, FechaCambioEstatus:=Now.ToString("yyyy-MM-dd hh:mm:ss.mmm")) Then
-                        ErrorCancelar = True
-                        MensajeError = "Ocurrió un error al guardar el estatus de cancelación."
+                    If CveEstatus.Contiene(4, 5) Then
+                        If Not ObjVentas.UpdateCancelaVenta(CveVenta, CancelacionFecha, CancelacionAcuse, UsuarioActual.CveEmpresa, CvePACCancelacion) Then
+                            ErrorCancelar = True
+                            MensajeError = "Ocurrió un error al guardar el estatus de cancelación."
+                        End If
+                    Else
+                        If Not ObjVentas.UpdateEstatusFactura(CveEstatus, FolioFiscal, CancelacionAcuse, CancelacionFecha, CveVenta, IDPoliza, CvePAC:=CvePACCancelacion, CveEstatusRefacturacion:=CveEstatusRefacturacion,
+                                  CveUsuarioCambiaEstatus:=UsuarioActual.CveUsuario, FechaCambioEstatus:=Now.ToString("yyyy-MM-dd hh:mm:ss.mmm")) Then
+                            ErrorCancelar = True
+                            MensajeError = "Ocurrió un error al guardar el estatus de cancelación."
+                        End If
                     End If
 
                     If CancelarRemisiones Then
@@ -4701,8 +4714,8 @@ Namespace Modelos
 #End Region
 
 
-#Region "P R O P I E D A D E S"
-
+#Region "P R O P I E D A D E S"
+        Public Property CveEstatusRefacturacion As Integer = 0
         Public Property NuevaFactura As Integer
         Public Property EnviarCorreo As Boolean = False
         Public Property ErrorList As List(Of String)
diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb
index ef77aa206..9ccf49d07 100644
--- a/App_Code/Timbrado.vb
+++ b/App_Code/Timbrado.vb
@@ -634,7 +634,7 @@ Public Class Timbrado
                     'Retorno = TimbrarFacturaProFact(UsuarioActual, Ventas, TmpDTConceptos, TmpDTImpuestos, TmpDTComplementos, Ruta, LstFordASN, FordGSDBM, ObjV)
             Case 4
 
-                Dim Ret As String = TimbrarFacturaGoCFDIv33(Ventas, UsuarioActual)
+                Dim Ret As String = TimbrarFacturaGoCFDIv33(Ventas, UsuarioActual, CvePACEspecial)
                 Retorno = If(Ret = "", True, False)
 
         End Select
@@ -1571,7 +1571,10 @@ Public Class Timbrado
         'GC.Collect()
         Return Retorno
     End Function
-    Public Function TimbrarFacturaGoCFDIv33(Ventas As Modelos.Factura, UsuarioActual As Usuario) As String
+    Public Function TimbrarFacturaGoCFDIv33(Ventas As Modelos.Factura, UsuarioActual As Usuario, Optional CvePACEspecial As Integer = -1) As String
+        If CvePACEspecial = -1 Then
+            CvePACEspecial = UsuarioActual.Empresa.CvePAC
+        End If
         Dim sw As New Diagnostics.Stopwatch
         Dim swmili As Long = 0
         Dim swTiempo As New StringBuilder
@@ -1581,8 +1584,8 @@ Public Class Timbrado
         '        'Sucursal matriz de la empresa
         Dim ArchivoLLave As String = String.Format("{0}Certificados\{1}", UsuarioActual.Empresa.Ruta, UsuarioActual.Empresa.ArchivoKey)
         Dim ArchivoCertificado As String = String.Format("{0}Certificados\{1}", UsuarioActual.Empresa.Ruta, UsuarioActual.Empresa.ArchivoCer)
-        Dim UsuarioServicio As String = If(UsuarioActual.Empresa.CvePAC = 2, UsuarioActual.Empresa.RFC, "rene.molina@adsistemas.mx")
-        Dim ClaveServicio As String = If(UsuarioActual.Empresa.CvePAC = 2, UsuarioActual.Empresa.RFC.ToLower, "rene2018")
+        Dim UsuarioServicio As String = If(CvePACEspecial = 2, UsuarioActual.Empresa.RFC, "rene.molina@adsistemas.mx")
+        Dim ClaveServicio As String = If(CvePACEspecial = 2, UsuarioActual.Empresa.RFC.ToLower, "rene2018")
         Dim Clave As String = UsuarioActual.Empresa.ContraseñaKey
         Dim EmisorRFC As String = UsuarioActual.Empresa.RFC
         Dim UrlServicio As String = "" ' Produccion
@@ -1591,8 +1594,7 @@ Public Class Timbrado
         Dim SubTotal As Decimal = 0
         Dim TimbraProduccion As Boolean = True
         If Not Directory.Exists(RutaArchivo) Then Directory.CreateDirectory(RutaArchivo)
-
-        Select Case UsuarioActual.Empresa.CvePAC
+        Select Case CvePACEspecial
             Case 2
                 UrlServicio = "http://generacfdi.com.mx/rvltimbrado/service1.asmx?WSDL"
             Case 4
@@ -1606,7 +1608,7 @@ Public Class Timbrado
             ArchivoCertificado = $"{UsuarioActual.Empresa.Ruta}Certificados\CSD01_AAA010101AAA.cer"
             Clave = "12345678a"
             TimbraProduccion = False
-            Select Case UsuarioActual.Empresa.CvePAC
+            Select Case CvePACEspecial
                 Case 2
                     UsuarioServicio = "fgomez"
                     ClaveServicio = "12121212"
@@ -2090,7 +2092,7 @@ Public Class Timbrado
 
                             Using ObjVentas As New ClsVentas()
 
-                                If ObjVentas.UpdateEstatusFactura(3, FolioFiscal, "", ObjCFDITimbre.Comprobante.Fecha, Ventas.CveVenta, CvePAC:=UsuarioActual.Empresa.CvePAC) Then
+                                If ObjVentas.UpdateEstatusFactura(3, FolioFiscal, "", ObjCFDITimbre.Comprobante.Fecha, Ventas.CveVenta, CvePAC:=CvePACEspecial) Then
                                     Retorno = ""
                                 Else
                                     Retorno = "Error"
@@ -2113,7 +2115,7 @@ Public Class Timbrado
                         If ObjCFDITimbre.Comprobante.TipoComprobante = "N" Then
                             Using ObjNomina2 As New ClsNominas()
 
-                                If ObjNomina2.UpdateEstatusNomNominas(3, UsuarioActual.Empresa.CvePAC, FolioFiscal, "", ("01/01/2000").ToDate, ObjCFDITimbre.Nomina.CveNomina, 0, 0, 0, 0, 0) Then
+                                If ObjNomina2.UpdateEstatusNomNominas(3, CvePACEspecial, FolioFiscal, "", ("01/01/2000").ToDate, ObjCFDITimbre.Nomina.CveNomina, 0, 0, 0, 0, 0) Then
                                     Retorno = ""
                                 Else
                                     Retorno = "Error"
@@ -2159,7 +2161,7 @@ Public Class Timbrado
         End If
 
 #End Region
-        GuardaLogTimbrado(swTiempo.ToString, UsuarioActual.Empresa.CvePAC)
+        GuardaLogTimbrado(swTiempo.ToString, CvePACEspecial)
         Return Retorno
     End Function
     Public Sub GuardaLogTimbrado(Str As String, CvePAC As Integer)
diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb
index 57d76e13f..014263330 100644
--- a/Bancos/IE.aspx.vb
+++ b/Bancos/IE.aspx.vb
@@ -3939,7 +3939,7 @@ Partial Class Bancos_IE
                     End If
 
                 Else
-                    Alert("Se presento un error al cancelar el complemento.")
+                    Alert("Se presento un error al cancelar el complemento.", TipoMensaje.MsgAdvertencia)
                 End If
             Else
                 ErrorCancelarComplemento = False
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 02bb186f9..01188dd7f 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -6207,7 +6207,6 @@ Partial Class Compras_Compras
 
                                                                 Concepto = $"{NombreProveedor} {TxtSerie.Text} - {TxtFolio.Text}"
 
-                                                                If importeMovimiento <> 0 Then
                                                                     'Conta ContPAQ
                                                                     If IdCtaContable = 0 Then
                                                                         CuentasContablesInvalidas.Append("<br>" & GlobalDTContaConceptosContables(-1).FiltroPrimero(String.Format("CveConceptoContable = {0}", 68))("ConceptoContable").ToString)
@@ -6224,9 +6223,8 @@ Partial Class Compras_Compras
                                                                     End If
 
 
-                                                                End If
 
-                                                                Dim ContienePSNeteoBonif As Boolean = False
+                                                                    Dim ContienePSNeteoBonif As Boolean = False
                                                                 For Each Dr As DataRow In TmpDT.Rows
                                                                     If Dr("CveClasificacion").ToString.ToEntero.Contiene(20319) Then 'clasificación de Bonificación, no se incluirá en el neteo
                                                                         ContienePSNeteoBonif = True
diff --git a/Contabilidad/PolizasImpresion.aspx b/Contabilidad/PolizasImpresion.aspx
index d41f0984d..e2a9da75d 100644
--- a/Contabilidad/PolizasImpresion.aspx
+++ b/Contabilidad/PolizasImpresion.aspx
@@ -84,6 +84,16 @@
                     <div class="col-md-2 ">
                         <asp:DropDownList ID="DdlCuenta" DataTextField="CodigoNombre" DataValueField="Id" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
                     </div>
+                    <label class="col-md-1 truncate" data-toggle="tooltip" data-placement="top" title="Grupo Plantilla">Grupo Plantilla:</label>
+                    <div class="col-md-2 ">
+                        <asp:DropDownList ID="DdlGrupoPlantilla" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true">
+                            <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
+                            <asp:ListItem Text="Compras" Value="1"></asp:ListItem>
+                            <asp:ListItem Text="Ventas" Value="2"></asp:ListItem>
+                            <asp:ListItem Text="Pago Compra" Value="3"></asp:ListItem>
+                            <asp:ListItem Text="Pago Venta" Value="4"></asp:ListItem>
+                        </asp:DropDownList>
+                    </div>
                 </div>
 
             </div>
diff --git a/Contabilidad/PolizasImpresion.aspx.vb b/Contabilidad/PolizasImpresion.aspx.vb
index 071311406..03f594d38 100644
--- a/Contabilidad/PolizasImpresion.aspx.vb
+++ b/Contabilidad/PolizasImpresion.aspx.vb
@@ -40,7 +40,7 @@ Partial Class Contabilidad_PolizasImpresion
 
 
         Dim objcont As New ClsContPAQi(UsuarioActual.Empresa)
-        If objcont.GetPolizasMasivo(TxtFechaInicio.Text.ToDate, TxtFechaFin.Text.ToDate, foli, folf, ddlTipoPoliza.SelectedValue.ToEntero, DdlUsuarioRegistro.SelectedValue.ToEntero, DdlSegmentoNeg.SelectedValue.ToEntero, DdlCuenta.SelectedValue.ToEntero) Then
+        If objcont.GetPolizasMasivo(TxtFechaInicio.Text.ToDate, TxtFechaFin.Text.ToDate, foli, folf, ddlTipoPoliza.SelectedValue.ToEntero, DdlUsuarioRegistro.SelectedValue.ToEntero, DdlSegmentoNeg.SelectedValue.ToEntero, DdlCuenta.SelectedValue.ToEntero, DdlGrupoPlantilla.SelectedValue.ToEntero) Then
             If objcont.DtResultados.Rows.Count < 10000 Then
 
                 If objcont.DtResultados.Rows.Count > 0 Then
diff --git a/LogTimbrado.txt b/LogTimbrado.txt
new file mode 100644
index 000000000..670c753f4
--- /dev/null
+++ b/LogTimbrado.txt
@@ -0,0 +1,4 @@
+
+ .. PAC: 4 - Verificado : (5) 5 Certificado : (501) 506 Armado: (25) 531 Genera: (494) 1025 Timbrado: (748) 1773  ..20/08/2019:03:33 p. m.
+
+ .. PAC: 4 - Verificado : (2) 2 Certificado : (388) 390 Armado: (4) 394 Genera: (440) 834 Timbrado: (1030) 1864 Guardado: (361) 2225 Actualizado: (99) 2324  ..20/08/2019:03:39 p. m.
diff --git a/Nomina/Finiquito.aspx b/Nomina/Finiquito.aspx
index 599e4f46c..44af81510 100644
--- a/Nomina/Finiquito.aspx
+++ b/Nomina/Finiquito.aspx
@@ -188,6 +188,10 @@
                                         </asp:DropDownList>
                                         <asp:Label runat="server" Text="Concepto:" AssociatedControlID="DdlConcepto"></asp:Label>
                                     </div>
+                                    <div class="form-group form-md-line-input input-iconright">
+                                        <asp:TextBox ID="TxtImporte" CssClass="form-control" runat="server"></asp:TextBox>
+                                        <asp:Label runat="server" Text="Concepto:" AssociatedControlID="DdlConcepto"></asp:Label>
+                                    </div>
                                 </div>
                                 <div class="modal-footer">
                                     <asp:UpdatePanel runat="server" UpdateMode="Conditional">
@@ -228,6 +232,10 @@
                                             </asp:DropDownList>
                                             <asp:Label runat="server" Text="Motivo de Baja: " AssociatedControlID="DdlMotivoBaja"></asp:Label>
                                         </div>
+                                        <div class="">
+                                            ¿es Liquidación?
+                                            <asp:CheckBox ID="ChkesLiquidacion" CssClass="chksino" Text=" " runat="server" />
+                                        </div>
                                         <div class="row">
                                             <div class="col-md-6" style="padding-right: 0px">
                                                 <div class="form-group form-md-line-input input-iconright">
@@ -285,6 +293,22 @@
 <asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
     <%--"<tr class=\"thTituloConcepto\"> <th scope=\"col\" colspan=\"2\">Percepciones</th><th scope=\"col\" colspan=\"2\">Deducciones</th> </tr>"--%>
     <script>
+        function insertParam(key, value) {
+            key = encodeURIComponent(key); value = encodeURIComponent(value);
+
+            var s = document.location.search;
+            var kvp = key + "=" + value;
+
+            var r = new RegExp("(&|\\?)" + key + "=[^\&]*");
+
+            s = s.replace(r, "$1" + kvp);
+
+            if (!RegExp.$1) { s += (s.length > 0 ? '&' : '?') + kvp; };
+
+            //again, do what you will here
+            document.location.search = s;
+        }
+
         function ADSBegin() {
             if ($('.thTituloConcepto').length == 0) {
                 $('.GvConceptos').prepend("<tr class=\"thTituloConcepto\"> <th scope=\"col\" colspan=\"2\">Percepciones</th><th scope=\"col\" colspan=\"2\">Deducciones</th> </tr>");
diff --git a/Nomina/Finiquito.aspx.vb b/Nomina/Finiquito.aspx.vb
index 5421dccce..9f3345614 100644
--- a/Nomina/Finiquito.aspx.vb
+++ b/Nomina/Finiquito.aspx.vb
@@ -130,7 +130,7 @@ Partial Class Nomina_Finiquito
                         obj.EstatusD = dtD.Rows(index)("Estatus").ToString().ToEntero()
                     ElseIf index = noD Then
                         obj.EstatusD = -1
-                        obj.ConceptoD  = "Agregar"
+                        obj.ConceptoD = "Agregar"
                     End If
                     listaconceptos.Add(obj)
                 Next
@@ -155,7 +155,7 @@ Partial Class Nomina_Finiquito
             objT.CveConcepto = 0
             objT.Concepto = ""
             objT.Estatus = -3
-            objT.ImporteD = objST.Importe - objT.Importe
+            objT.ImporteD = objST.Importe + objST.ImporteD
             objT.CveConceptoD = 0
             objT.ConceptoD = "Total"
             objT.EstatusD = -3
@@ -188,6 +188,20 @@ Partial Class Nomina_Finiquito
             ViewState("DTConceptos") = Value
         End Set
     End Property
+
+
+    Private Property esLiquidacion As Boolean
+        Get
+            If Not IsNothing(ViewState("esLiquidacion")) Then
+                Return CBool(ViewState("esLiquidacion"))
+            Else
+                Return False
+            End If
+        End Get
+        Set
+            ViewState("esLiquidacion") = Value
+        End Set
+    End Property
 #End Region
     Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
         If Not Page.IsPostBack Then
@@ -217,7 +231,7 @@ Partial Class Nomina_Finiquito
     End Sub
     Private Sub CargaDdlPersonal()
         Dim ObjPersonal As New ClsRH
-        If ObjPersonal.GetPersonal(-1, "-1", "-1", "-1", "-1", -1, -1, -1, -1, -1, -1, -1, 2, -1, -1, "-1", -1, -1, -1, -1, -1, -1, "-1", "-1", "-1", "-1", UsuarioActual.CveEmpresa) Then
+        If ObjPersonal.GetPersonal(-1, UsuarioActual.CveEmpresa) Then
             DdlPersonal.DataSource = ObjPersonal.DtResultados
             DdlPersonal.DataBind()
         End If
@@ -227,29 +241,40 @@ Partial Class Nomina_Finiquito
     Private Function CargaDatosFiniquito() As Boolean
         Dim retorno As Boolean = True
         If CvePersonal > 0 Then
+
             DdlPersonal.SelectedValueExist(CvePersonal.ToString())
             Dim Nombre As String = ""
             Dim FechaBaja As String = ""
-            Dim MotivoBaja As String = ""
             Dim EstatusPersonal As String = ""
             CvePeriodoFiniquito = 0
             CveTipoPeriodo = 0
+            esLiquidacion = False
             pnlupValoresFiniquito.Visible = False
-            Dim ObjPersonal As New ClsRH
-            If ObjPersonal.GetPersonal(CvePersonal, "-1", "-1", "-1", "-1", -1, -1, -1, -1, -1, -1, -1, 2, -1, -1, "-1", -1, -1, -1, -1, -1, -1, "-1", "-1", "-1", "-1", UsuarioActual.CveEmpresa) AndAlso ObjPersonal.DtResultados.Rows.Count > 0 Then
-                Nombre = ObjPersonal.DtResultados.Rows(0)("Nombre").ToString()
-                FechaBaja = String.Format("{0:dd/MM/yyyy}", ObjPersonal.FechaBaja)
-                MotivoBaja = String.Format("{0}", ObjPersonal.DtResultados.Rows(0)("MotivoBaja"))
-                EstatusPersonal = String.Format("{0}", ObjPersonal.DtResultados.Rows(0)("EstatusPersonal"))
-                CvePeriodoFiniquito = ObjPersonal.DtResultados.Rows(0)("CvePeriodoFiniquito").ToString().ToEntero()
-                CveTipoPeriodo = ObjPersonal.DtResultados.Rows(0)("CveTipoPeriodo").ToString().ToEntero()
-            End If
-            ObjPersonal.Dispose()
+            DdlMotivoBaja.SelectedValue = "-1"
+            Using ObjPersonal As New ClsRH()
+                If ObjPersonal.GetPersonal(CvePersonal, UsuarioActual.CveEmpresa) AndAlso ObjPersonal.DtResultados.Rows.Count > 0 Then
+                    Nombre = ObjPersonal.DtResultados.Rows(0)("Nombre").ToString()
+                    FechaBaja = String.Format("{0:dd/MM/yyyy}", ObjPersonal.FechaBaja)
+                    EstatusPersonal = String.Format("{0}", ObjPersonal.DtResultados.Rows(0)("EstatusPersonal"))
+                    CveTipoPeriodo = ObjPersonal.DtResultados.Rows(0)("CveTipoPeriodo").ToString().ToEntero()
+                End If
+                If ObjPersonal.GetPersonalAltas(CvePersonal) AndAlso ObjPersonal.DtResultados.Rows.Count > 0 Then
+                    CvePeriodoFiniquito = ObjPersonal.DtResultados.Rows(0)("CvePeriodoFiniquito").ToString().ToEntero()
+                    FechaBaja = String.Format("{0:dd/MM/yyyy}", ObjPersonal.DtResultados.Rows(0)("FechaFin"))
+                    DdlMotivoBaja.SelectedValueExist(ObjPersonal.DtResultados.Rows(0)("CveMotivoBaja").ToString().ToEntero())
+                    Dim stringesliquidacion = ObjPersonal.DtResultados.Rows(0)("esLiquidacion").ToString()
+                    esLiquidacion = (stringesliquidacion = "True" OrElse stringesliquidacion = "1")
 
+                End If
+            End Using
+            If DdlMotivoBaja.SelectedValue.ToEntero() > 0 Then
+                LblMotivoBaja.Text = DdlMotivoBaja.SelectedItem.Text
+            Else
+                LblMotivoBaja.Text = ""
+            End If
             HypEmpleado.Text = Nombre
             HypEmpleado.NavigateUrl = String.Format("/RH/Personal.aspx?CvePersonal={0}", CvePersonal)
             LblFechaBaja.Text = FechaBaja
-            LblMotivoBaja.Text = MotivoBaja
             LblEstatus.Text = EstatusPersonal
             TxtFechaBaja.Text = FechaBaja
             If CvePeriodoFiniquito <= 0 Then
@@ -257,11 +282,11 @@ Partial Class Nomina_Finiquito
                 retorno = False
                 pnlupValoresFiniquito.Visible = True
             End If
-            Dim ObjNom As New ClsNominas
-            If ObjNom.GetFiniquitosPersonal(CvePersonal, UsuarioActual.CveEmpresa) Then
-                DTConceptosPersonal = ObjNom.DtResultados
-            End If
-            ObjNom.Dispose()
+            Using ObjNom As New ClsNominas()
+                If ObjNom.GetFiniquitosPersonal(CvePersonal, UsuarioActual.CveEmpresa) Then
+                    DTConceptosPersonal = ObjNom.DtResultados
+                End If
+            End Using
             GvConceptos.DataSource = ConceptsPersonas
             GvConceptos.DataBind()
         Else
@@ -273,6 +298,13 @@ Partial Class Nomina_Finiquito
 
     Protected Sub LnkCampiarEmpleado_Click(sender As Object, e As EventArgs)
         CvePersonal = DdlPersonal.SelectedValue.ToEntero()
+
+
+        Using ObjPersonal As New ClsRH()
+            If ObjPersonal.UpPersonalAltas(CvePersonal, "", TxtFechaBaja.Text.ToDateTime().ToString("yyyy/MM/dd"), DdlPeriodo.SelectedValue.ToEntero(), DdlMotivoBaja.SelectedValue.ToEntero(), ChkesLiquidacion.Checked) AndAlso ObjPersonal.DtResultados.Rows.Count > 0 Then
+
+            End If
+        End Using
         If pnlupValoresFiniquito.Visible Then
 
         End If
@@ -295,7 +327,9 @@ Partial Class Nomina_Finiquito
 
     End Sub
     Protected Sub DdlPersonal_SelectedIndexChanged(sender As Object, e As EventArgs)
-
+        Response.Redirect($"/Nomina/Finiquito.aspx?CvePersonal={DdlPersonal.SelectedValue}")
+        'Alert($"insertParam('CvePersonal','{DdlPersonal.SelectedValue}')")
+        'RegistraScript($"insertParam('CvePersonal','{DdlPersonal.SelectedValue}')")
     End Sub
     Protected Sub DdlTipoPeriodo_SelectedIndexChanged(sender As Object, e As EventArgs)
         Dim CveTipoPeriodoactual As Integer = If(DdlTipoPeriodo.SelectedValue.ToEntero() > 0, DdlTipoPeriodo.SelectedValue.ToEntero(), CveTipoPeriodo)
@@ -354,24 +388,24 @@ Partial Class Nomina_Finiquito
             End If
 
             If Estatus = -1 Then
-                    LtlConcepto.Visible = False
-                ElseIf Estatus > 0 Then
-                    LtlImporte.Visible = False
-                End If
-
-                If EstatusD = -1 Then
-                    LtlConceptoD.Visible = False
-                ElseIf EstatusD > 0 Then
-                    LtlImporteD.Visible = False
-                End If
-
-
-                LnkConcepto.Visible = Not LtlConcepto.Visible
-                LnkConceptoD.Visible = Not LtlConceptoD.Visible
-                LnkImporte.Visible = Not LtlImporte.Visible
-                LnkImporteD.Visible = Not LtlImporteD.Visible
-
+                LtlConcepto.Visible = False
+            ElseIf Estatus > 0 Then
+                LtlImporte.Visible = False
             End If
+
+            If EstatusD = -1 Then
+                LtlConceptoD.Visible = False
+            ElseIf EstatusD > 0 Then
+                LtlImporteD.Visible = False
+            End If
+
+
+            LnkConcepto.Visible = Not LtlConcepto.Visible
+            LnkConceptoD.Visible = Not LtlConceptoD.Visible
+            LnkImporte.Visible = Not LtlImporte.Visible
+            LnkImporteD.Visible = Not LtlImporteD.Visible
+
+        End If
     End Sub
 
     Protected Sub LnkConcepto_Click(sender As Object, e As EventArgs)
diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 82547c945..1bfa9e03d 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -17455,7 +17455,11 @@ Partial Class Ventas
             If resp.CveEstatus = 5 Then
                 Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnEnviarMailCancelacion();", TextoConfirmacion:="&nbsp;&nbsp;&nbsp;&nbsp;Si&nbsp;&nbsp;&nbsp;&nbsp;", TextoCancelacion:="&nbsp;&nbsp;&nbsp;&nbsp;<a onclick='Recargar()'>No</>&nbsp;&nbsp;&nbsp;&nbsp;")
             Else
-                Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
+                If Not EsRefacturacion Then
+                    Alert(resp.Mensaje, resp.TipoMensaje, JSBtnAceptar:="BtnRefrescarPagina();")
+                Else
+                    Response.Redirect($"/Ventas/RepCancelacionesPorRespuesta.aspx?CveVenta={Me.CveVenta}")
+                End If
             End If
 
             ObjFactura.CveAlmacen = -1
diff --git a/localhost.sln b/localhost.sln
deleted file mode 100644
index 888c06549..000000000
--- a/localhost.sln
+++ /dev/null
@@ -1,45 +0,0 @@
-
-Microsoft Visual Studio Solution File, Format Version 12.00
-# Visual Studio 15
-VisualStudioVersion = 15.0.27703.2035
-MinimumVisualStudioVersion = 10.0.40219.1
-Project("{E24C65DC-7377-472B-9ABA-BC803B73C61A}") = "http://localhost", "http://localhost", "{82D0C8D1-3CF5-471D-92AF-71A9AE4B4335}"
-	ProjectSection(WebsiteProperties) = preProject
-		SccProjectName = ""$/localhost", CAAAAAAA"
-		SccAuxPath = ""
-		SccLocalPath = "."
-		SccProvider = "MSSCCI:Microsoft Visual SourceSafe"
-		UseIISExpress = "false"
-		TargetFrameworkMoniker = ".NETFramework,Version%3Dv4.6"
-		Debug.AspNetCompiler.VirtualPath = "/localhost"
-		Debug.AspNetCompiler.PhysicalPath = "..\..\..\..\..\inetpub\SIGIT\"
-		Debug.AspNetCompiler.TargetPath = "PrecompiledWeb\localhost\"
-		Debug.AspNetCompiler.Updateable = "true"
-		Debug.AspNetCompiler.ForceOverwrite = "true"
-		Debug.AspNetCompiler.FixedNames = "false"
-		Debug.AspNetCompiler.Debug = "True"
-		Release.AspNetCompiler.VirtualPath = "/localhost"
-		Release.AspNetCompiler.PhysicalPath = "..\..\..\..\..\inetpub\SIGIT\"
-		Release.AspNetCompiler.TargetPath = "PrecompiledWeb\localhost\"
-		Release.AspNetCompiler.Updateable = "true"
-		Release.AspNetCompiler.ForceOverwrite = "true"
-		Release.AspNetCompiler.FixedNames = "false"
-		Release.AspNetCompiler.Debug = "False"
-		SlnRelativePath = "..\..\..\..\..\inetpub\SIGIT\"
-	EndProjectSection
-EndProject
-Global
-	GlobalSection(SolutionConfigurationPlatforms) = preSolution
-		Debug|Any CPU = Debug|Any CPU
-	EndGlobalSection
-	GlobalSection(ProjectConfigurationPlatforms) = postSolution
-		{82D0C8D1-3CF5-471D-92AF-71A9AE4B4335}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
-		{82D0C8D1-3CF5-471D-92AF-71A9AE4B4335}.Debug|Any CPU.Build.0 = Debug|Any CPU
-	EndGlobalSection
-	GlobalSection(SolutionProperties) = preSolution
-		HideSolutionNode = FALSE
-	EndGlobalSection
-	GlobalSection(ExtensibilityGlobals) = postSolution
-		SolutionGuid = {B4590109-7BF9-411C-A1AE-792C02707CE6}
-	EndGlobalSection
-EndGlobal