diff --git a/App_Code/ClsContPAQi.vb b/App_Code/ClsContPAQi.vb index 6660b2f77..cbbcfb90e 100644 --- a/App_Code/ClsContPAQi.vb +++ b/App_Code/ClsContPAQi.vb @@ -6743,6 +6743,7 @@ Public Class ClsContPAQi StrSQL.Append(" LEFT JOIN MovimientosPoliza MP ON T.ID = MP.IdCuenta AND MP.Fecha < CAST('0001-01-01' AS DATE)") StrSQL.Append(" LEFT JOIN TiposPolizas TP ON MP.TipoPol = TP.Codigo") StrSQL.Append(" LEFT JOIN Polizas P ON MP.IdPoliza = P.Id") + StrSQL.Append(" WHERE (MP.IdSegNeg = @IdSegNeg OR ( @IdSegNeg =-1 OR MP.IdSegNeg IS NULL)) ") StrSQL.Append(" UNION") @@ -6751,6 +6752,7 @@ Public Class ClsContPAQi StrSQL.Append(" LEFT JOIN MovimientosPoliza MP ON T.ID = MP.IdCuenta AND CAST(MP.Fecha AS DATE) BETWEEN @FechaI AND @FechaF") StrSQL.Append(" LEFT JOIN TiposPolizas TP ON MP.TipoPol = TP.Codigo") StrSQL.Append(" LEFT JOIN Polizas P ON MP.IdPoliza = P.Id") + StrSQL.Append(" WHERE (MP.IdSegNeg = @IdSegNeg OR ( @IdSegNeg =-1 OR MP.IdSegNeg IS NULL)) ") StrSQL.Append(" ) AS T") diff --git a/App_Code/Timbrado.vb b/App_Code/Timbrado.vb index 0bcf64bbb..e5b7003f2 100644 --- a/App_Code/Timbrado.vb +++ b/App_Code/Timbrado.vb @@ -3425,10 +3425,11 @@ Public Class Timbrado swmili = sw.ElapsedMilliseconds sw.Start() + Me.UUID = FolioFiscal If ObjCFDITimbre.Comprobante.TipoComprobante <> "P" Then 'Actualiza Estatus Factura - If Ventas.CveVenta > 0 Then + If Ventas.CveVenta > 0 Then Using ObjVentas As New ClsVentas() diff --git a/Documentacion/140/AMERICA.pdf b/Documentacion/140/AMERICA.pdf new file mode 100644 index 000000000..fd43b3696 Binary files /dev/null and b/Documentacion/140/AMERICA.pdf differ diff --git a/Documentacion/140/CRONOS.pdf b/Documentacion/140/CRONOS.pdf new file mode 100644 index 000000000..d97ffe789 Binary files /dev/null and b/Documentacion/140/CRONOS.pdf differ diff --git a/Documentacion/140/DIENER.pdf b/Documentacion/140/DIENER.pdf new file mode 100644 index 000000000..a3209f924 Binary files /dev/null and b/Documentacion/140/DIENER.pdf differ diff --git a/Documentacion/140/FULLPOWER.pdf b/Documentacion/140/FULLPOWER.pdf new file mode 100644 index 000000000..5dcfc215c Binary files /dev/null and b/Documentacion/140/FULLPOWER.pdf differ diff --git a/Documentacion/140/LTH.pdf b/Documentacion/140/LTH.pdf new file mode 100644 index 000000000..407672e33 Binary files /dev/null and b/Documentacion/140/LTH.pdf differ diff --git a/Documentacion/140/LTHAGM.pdf b/Documentacion/140/LTHAGM.pdf new file mode 100644 index 000000000..9738ec723 Binary files /dev/null and b/Documentacion/140/LTHAGM.pdf differ diff --git a/Documentacion/140/LTHESPECIALES.pdf b/Documentacion/140/LTHESPECIALES.pdf new file mode 100644 index 000000000..1fc905bcf Binary files /dev/null and b/Documentacion/140/LTHESPECIALES.pdf differ diff --git a/Documentacion/140/LTHHEAVYDUTY.pdf b/Documentacion/140/LTHHEAVYDUTY.pdf new file mode 100644 index 000000000..848db14c3 Binary files /dev/null and b/Documentacion/140/LTHHEAVYDUTY.pdf differ diff --git a/Documentacion/140/LTHHI-TEC.pdf b/Documentacion/140/LTHHI-TEC.pdf new file mode 100644 index 000000000..9e0248d11 Binary files /dev/null and b/Documentacion/140/LTHHI-TEC.pdf differ diff --git a/Documentacion/140/LTHSUV-VAN-MINIVAN.pdf b/Documentacion/140/LTHSUV-VAN-MINIVAN.pdf new file mode 100644 index 000000000..b7f657762 Binary files /dev/null and b/Documentacion/140/LTHSUV-VAN-MINIVAN.pdf differ diff --git a/Documentacion/140/LTHTAXI.pdf b/Documentacion/140/LTHTAXI.pdf new file mode 100644 index 000000000..54dcd8f98 Binary files /dev/null and b/Documentacion/140/LTHTAXI.pdf differ diff --git a/Documentacion/140/OPTIMA.pdf b/Documentacion/140/OPTIMA.pdf new file mode 100644 index 000000000..000f1e014 Binary files /dev/null and b/Documentacion/140/OPTIMA.pdf differ diff --git a/Inicio.aspx b/Inicio.aspx index cb04ab6a4..75c1944f3 100644 --- a/Inicio.aspx +++ b/Inicio.aspx @@ -120,6 +120,8 @@ } + + @@ -275,6 +277,8 @@
+ +
@@ -484,6 +488,152 @@
+
+
+ + +
+ + + +
+
+
+ + Documentos +
+
+ + + + +
+
+
+ + + + + + +
+
+
+ <%-- AMERICA.pdf--%> + AMERICA.pdf +
+
+
+
+ <%-- CRONOS.pdf--%> + CRONOS.pdf +
+
+
+ +
+
+
+ <%-- DIENER.pdf--%> + DIENER.pdf +
+
+
+
+ <%-- FULL POWER.pdf--%> + FULL POWER.pdf +
+
+
+ + +
+
+
+ <%-- LTH AGM.pdf--%> + LTH AGM.pdf +
+
+
+
+ <%-- LTH ESPECIALES.pdf--%> + LTH ESPECIALES.pdf +
+
+
+ +
+
+
+ <%-- LTH HEAVY DUTY.pdf--%> + LTH HEAVY DUTY.pdf +
+
+
+
+ <%-- LTH HI-TEC.pdf--%> + LTH HI-TEC.pdf +
+
+
+ + +
+
+
+ <%-- LTH SUV-VAN-MINIVAN.pdf--%> + LTH SUV-VAN-MINIVAN.pdf +
+
+
+
+ <%-- LTH TAXI.pdf--%> + LTH TAXI.pdf +
+
+
+ +
+
+
+ <%-- LTH.pdf--%> + LTH.pdf +
+
+
+
+ <%-- LTHAGM.pdf--%> + LTHAGM.pdf +
+
+
+ + + + + <%-- + + + + + + + + + + + --%> + + + + + + + + + + +
diff --git a/Inicio.aspx.vb b/Inicio.aspx.vb index 243cb6959..c81970688 100644 --- a/Inicio.aspx.vb +++ b/Inicio.aspx.vb @@ -231,6 +231,11 @@ Partial Class Inicio 'Evaluacion del proveedor CargaEvaluacionProveedor() + + If UsuarioActual.CveEmpresa = 140 Then + DVDescargasBDH.Visible = True + End If + End If End Sub @@ -1245,4 +1250,38 @@ Partial Class Inicio End If RegistraScript("$('#DvUnoaUno').modal('hide')") End Sub + + 'Protected Sub LnkDecargaDoc_Click(sender As Object, e As EventArgs) + + ' Dim NombreArchivo As String = DirectCast(sender, LinkButton).Attributes("NombreArchivo") + ' Dim filePath As String = $"{Server.MapPath("~")}\Documentacion\140\{DirectCast(sender, LinkButton).Attributes("NombreArchivo")}" + + + ' Dim Archivo As New System.IO.FileInfo(filePath) + + + ' Dim mimeType As String = Nothing + + ' If Archivo.Exists Then + + ' HttpContext.Current.Response.Buffer = True + ' HttpContext.Current.Response.Clear() + ' HttpContext.Current.Response.ClearContent() + ' HttpContext.Current.Response.ContentType = mimeType + ' HttpContext.Current.Response.AppendHeader("Content-disposition", "inline; filename=" & NombreArchivo) + ' HttpContext.Current.Response.AddHeader("Content-Length", Archivo.Length.ToString()) + ' HttpContext.Current.Response.TransmitFile(filePath) + ' HttpContext.Current.Response.Flush() + ' HttpContext.Current.Response.SuppressContent = True + ' HttpContext.Current.ApplicationInstance.CompleteRequest() + ' HttpContext.Current.Response.End() + + ' Archivo = Nothing + ' End If + + + + + 'End Sub + End Class diff --git a/Inventarios/ResguardoMaterial.aspx b/Inventarios/ResguardoMaterial.aspx index 968ab3772..8230a66f5 100644 --- a/Inventarios/ResguardoMaterial.aspx +++ b/Inventarios/ResguardoMaterial.aspx @@ -494,7 +494,7 @@ - +