AF Documentos, AF fecha iamgen, Correciones eFacturas solicitudes pdf sobre escritura

This commit is contained in:
rakcsle
2025-05-22 11:06:18 -07:00
parent 5ae6f45095
commit 423d8fd60d
9 changed files with 655 additions and 40 deletions

View File

@@ -1758,14 +1758,16 @@ Partial Class Compras_eFacturas
If RutaPDF = "" Then
Dim Hilo As New System.Threading.Thread(Sub() ProcesarPDF(UsuarioActual, a, FF))
'no valida nada solo lo crea y lo pone en la carpeta, no importa si ya existe
If SobreEscribirPDFSiExiste Then
Dim Hilo As New System.Threading.Thread(Sub() ProcesarPDF(UsuarioActual, a, FF))
Hilo.Start()
Else
'si no existe el pdf, lo procesa
If Not File.Exists(RutaPDF) Then
If Not File.Exists(PDfDestino) Then
Dim Hilo As New System.Threading.Thread(Sub() ProcesarPDF(UsuarioActual, a, FF))
Hilo.Start()
End If
End If
@@ -3050,7 +3052,7 @@ Partial Class Compras_eFacturas
End If
If SeVerifico Then
SubirFacturas(ListComprimidos, ListXML, ListPDF, Validada:=1, SobreEscribirPDFSiExiste:=False)
SubirFacturas(ListComprimidos, ListXML, ListPDF, Validada:=1,SobreEscribirPDFSiExiste:=False)
End If
'If UsuarioActual.CveRol = 1 Then