fix en Generacion de PDF's

Contabilidad/RegPrePoliza.aspx.vb

@@ -1984,6 +1984,7 @@ Partial Class ContabilidadC_RegPrePoliza
                     Response.Flush() ' send it to the client to download
                     HttpContext.Current.Response.SuppressContent = True
                     HttpContext.Current.ApplicationInstance.CompleteRequest()
+                    Response.End()
 
                 End If
                 result = True

Contabilidad/RegPrePolizaS.aspx

@@ -67,8 +67,7 @@
     <asp:Label ID="LblEncabezado" runat="server" Text=" Registro de Póliza"></asp:Label>
 </asp:Content>
 <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
-     <asp:UpdatePanel runat="server">
-        <ContentTemplate>
+
             <li>
                 <asp:LinkButton ID="LnkExcel" runat="server" Visible="true" data-target="#DivCargaExcel"><i class="far fa-file-excel" style="font-weight:bold;"></i> Cargar Excel</asp:LinkButton>
             </li>
@@ -79,12 +78,7 @@
                 <asp:LinkButton ID="LnkImprimirPDF" runat="server" Visible="false" OnClick="LnkImprimirPDF_Click" Style="color: #686868;"><i class="fa fa-file-pdf-o" style="color:#686868;"></i> Imprimir Poliza</asp:LinkButton>
             </li>
 
-        </ContentTemplate>
-        <Triggers>
-            <asp:PostBackTrigger ControlID="LnkComprobante" />
-        </Triggers>
-    </asp:UpdatePanel>
-   
+
     <asp:UpdatePanel runat="server">
         <ContentTemplate>
             <li>

Contabilidad/RegPrePolizaS.aspx.vb

@@ -201,6 +201,8 @@ Partial Class ContabilidadC_RegPrePolizaS
     Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
 
         If Not Page.IsPostBack Then
+            Tick = DateTime.Now.Ticks.ToString
+
             CveMoneda = 1
             ViewState("CvePrePoliza") = 0
             ViewState("CvePeriodo") = "0"
@@ -439,6 +441,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                     If dr("IdPoliza").ToString.ToEntero > 0 Then
                         HplContabilizada.NavigateUrl = String.Format("RegPoliza.aspx?IdPoliza={0}", dr("IdPoliza"))
                         divContabilizada.Visible = True
+                        IdPoliza = dr("IdPoliza").ToString.ToEntero
                     ElseIf TxtTotalCargos.Text.ToDouble = TxtTotalAbonos.Text.ToDouble Then
                         'sino está contabilizada, se activa el botón
                         BtnContabilizar.Visible = True
@@ -515,7 +518,6 @@ Partial Class ContabilidadC_RegPrePolizaS
 
             If CveConceptoContable.Contiene(30) Then
                 LnkImprimirPDF.Visible = True
-                LnkComprobante.Visible = True
                 CveIE = e.Row.DBCampo("CveIE").ToString.ToEntero
             End If
 
@@ -2131,6 +2133,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                     Response.Flush() ' send it to the client to download
                     HttpContext.Current.Response.SuppressContent = True
                     HttpContext.Current.ApplicationInstance.CompleteRequest()
+                    Response.End()
 
                 End If
                 result = True