AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Local

Browse Source
This commit is contained in:
rakcsle
2022-06-23 11:25:12 -07:00
parent 83fe34a94b 55792ebf75
commit ba778d5b36
20 changed files with 5336 additions and 4848 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
Compras/Compras.aspx.vb
View File

@@ -2205,7 +2205,7 @@ Partial Class Compras_Compras
If DIOTCveTipoOperacion.Contiene(0, 3) Then ' 85 - Otros
DdlRetIVAConcepto.Items.Insert(0, New ListItem("Honorarios/Serv. Prof.", "1"))
DdlRetIVAConcepto.Items.Add(New ListItem("Arrendamiento", "4"))
DdlRetIVAConcepto.Items.Insert(0, New ListItem("Fletes P.F.", "2"))
DdlRetIVAConcepto.Items.Insert(0, New ListItem("Fletes P.M.", "3"))
DdlRetIVAConcepto.Items.Add(New ListItem("General", "6"))
End If

22
Compras/PopUpVerFactura.aspx.vb
View File

@@ -1865,6 +1865,11 @@ Partial Class PopUpVerFactura
Dim SelloCFDi As String = ""
Dim SelloSAT As String = ""
Dim TipoDocto As String = ""
Dim PermisoSCTR1 As String = ""
Dim PermisoSCTR2 As String = ""
Dim ConfATR1 As String = ""
Dim ConfATR2 As String = ""
Dim ObjInv As New ClsGenerales
@@ -1875,6 +1880,14 @@ Partial Class PopUpVerFactura
SerieFolio = Dr("SerieFolio").ToString
Telefono = Dr("FiguraTelefono").ToString
TipoDocto = Dr("TipoDocto").ToString
If UsuarioActual.CveEmpresa = 13 Then
PermisoSCTR1 = Dr("PermisoSCTR1").ToString
PermisoSCTR2 = Dr("PermisoSCTR2").ToString
ConfATR1 = Dr("ConfATR1").ToString
ConfATR2 = Dr("ConfATR2").ToString
End If
End If
End If
End If
@@ -2244,9 +2257,18 @@ Partial Class PopUpVerFactura
params.Add(New ReportParameter("RemolquePlaca1", RemolquePlaca1))
params.Add(New ReportParameter("RemolqueSubtimo1", RemolqueSubtimo1))
params.Add(New ReportParameter("RemolquePlaca2", RemolquePlaca2))
params.Add(New ReportParameter("RemolqueSubtimo2", RemolqueSubtimo2))
If UsuarioActual.CveEmpresa = 13 Then
params.Add(New ReportParameter("PermisoSCTRemolque1", PermisoSCTR1))
params.Add(New ReportParameter("PermisoSCTRemolque2", PermisoSCTR2))
params.Add(New ReportParameter("ConfATR1", ConfATR1))
params.Add(New ReportParameter("ConfATR2", ConfATR2))
End If
' [@CertificadoContribuyente]
'[@CadenaOriginal]