Local
This commit is contained in:
@@ -2041,7 +2041,7 @@ Partial Class PopUpVerFactura
|
||||
If Vta.Timbre.Comprobante.TipoComprobante = "I" Then 'AndAlso (dtVentas(0)("Total").ToString.ToDouble = dtVentas(0)("TotalPadre").ToString.ToDouble) Then
|
||||
Vta.Timbre.CFDIRelacionados.TipoRelacion = "04"
|
||||
Vta.Timbre.CFDIRelacionados.UUID.Add(dtVentas(0)("FolioFiscalPadre").ToString)
|
||||
Vta.Timbre.CFDIRelacionados.TipoRelacionTexto = "Refacturación de Ingreso"
|
||||
Vta.Timbre.CFDIRelacionados.TipoRelacionTexto = "Sustitución de los CFDI Previos"
|
||||
End If
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(592) = "1" Then
|
||||
@@ -3119,6 +3119,9 @@ Partial Class PopUpVerFactura
|
||||
|
||||
Dim params As New List(Of ReportParameter)
|
||||
Dim RutaFormato As String = "{0}Formatos\Traslado.rdlc"
|
||||
If CveTipoAlmacen = 22 Then
|
||||
RutaFormato = "{0}Formatos\TrasladoUsado.rdlc"
|
||||
End If
|
||||
|
||||
params.Add(New ReportParameter("CveConcepto", "8")) 'FolioTraspaso.ToString
|
||||
'params.Add(New ReportParameter("TipoTraslado", "AVISO")) 'FolioTraspaso.ToString
|
||||
|
||||
Reference in New Issue
Block a user