OC Remision notra de credito
This commit is contained in:
@@ -7052,6 +7052,28 @@ Public Class ClsPaginas
|
||||
|
||||
RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
|
||||
RutaFormatoDefault = String.Format("Empresas\Grales\Formatos\{0}.rdlc", NombreArchivo)
|
||||
Case "RNC"
|
||||
|
||||
|
||||
NombreArchivo = "RemisionNC"
|
||||
NombreArchivoDescarga = "RemisionNC"
|
||||
TipoDocumento = "REMISION"
|
||||
|
||||
params.Add(New ReportParameter("TipoDocumento", NombreArchivoDescarga))
|
||||
params.Add(New ReportParameter("Tipo", TipoDocumento))
|
||||
params.Add(New ReportParameter("Ref", TipoDocumentoRef))
|
||||
params.Add(New ReportParameter("AplicaPagare", AplicaPagare))
|
||||
|
||||
'ALAN YEPIZ
|
||||
If UsuarioActual.CveEmpresa.Contiene(123) Then
|
||||
params.Add(New ReportParameter("DiaExpedicion", String.Format("{0}", Vta.Fecha.ToDate.Day)))
|
||||
params.Add(New ReportParameter("MesExpedicion", String.Format("{0}", Vta.Fecha.ToDate.Month)))
|
||||
params.Add(New ReportParameter("AñoExpedicion", String.Format("{0}", Vta.Fecha.ToDate.Year)))
|
||||
End If
|
||||
|
||||
RutaFormato = String.Format("{0}Formatos\{1}.rdlc", UsuarioActual.Empresa.Ruta, NombreArchivo)
|
||||
RutaFormatoDefault = String.Format("Empresas\Grales\Formatos\{0}.rdlc", NombreArchivo)
|
||||
|
||||
Case Else
|
||||
NombreArchivo = ""
|
||||
TipoDocumento = ""
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
Reference in New Issue
Block a user