Envio Cotizacion CRM
This commit is contained in:
File diff suppressed because it is too large
Load Diff
@@ -10149,9 +10149,7 @@ Partial Class Ventas
|
||||
If pdfCRM IsNot Nothing Then
|
||||
Dim SerieFolioCRM As String = ObjFactura.SerieFolio
|
||||
Dim TipoDoctoCRM As String = ObjFactura.TipoDocto
|
||||
Dim Hilo As New System.Threading.Thread(Sub() GeneraPDFCotizacion(True, CorreoContactoCRM:=CorreoContactoCRM, pdfCRM:=pdfCRM, SerieFolioCRM:=SerieFolioCRM, TipoDoctoCRM:=TipoDoctoCRM))
|
||||
Hilo.Start()
|
||||
|
||||
GeneraPDFCotizacion(True, CorreoContactoCRM:=CorreoContactoCRM, pdfCRM:=pdfCRM, SerieFolioCRM:=SerieFolioCRM, TipoDoctoCRM:=TipoDoctoCRM)
|
||||
End If
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user