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

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rrene
2023-06-27 15:30:56 -07:00
parent 33d41836dd 53f866cf4d
commit dc9b3e78ca
8 changed files with 35 additions and 22 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
Compras/PopUpVerFactura.aspx.vb
View File

@@ -3718,7 +3718,7 @@ Partial Class PopUpVerFactura
End If
Case 3, 16, 37, 40 ' S A L I D A S
Case 3, 16, 37, 40, 45 ' S A L I D A S
'Dim Archivo As New System.IO.FileInfo(String.Format("Empresas/{0}/Formatos/Salidas.rdlc", 72))
'Dim Imagen As New System.IO.FileInfo(String.Format("Empresas/{0}/Logo.png", 72))
Dim Archivo As New System.IO.FileInfo(String.Format("{0}Formatos/Salidas.rdlc", UsuarioActual.Empresa.Ruta))
@@ -3729,6 +3729,8 @@ Partial Class PopUpVerFactura
concepto = "SALIDA DE ALMACÉN"
ElseIf CveConcepto = 37 Then
concepto = "SALIDA VIRTUAL"
ElseIf CveConcepto = 45 Then
concepto = "SALIDA DE USADOS"
Else
concepto = "SALIDA DE ALMACÉN POR RECONSTRUCCIÓN"
End If

5
Compras/eFacturas.aspx.vb
View File

@@ -2964,10 +2964,11 @@ Partial Class Compras_eFacturas
End Sub
Private Sub MostrarSolcitudesSAT()
LnkShowSolicitudes.Visible = False
If UsuarioActual.Empresa.ArchivoPfx.Trim.Length > 0 Then
Dim ArchivoCertificado As String = $"{UsuarioActual.Empresa.Ruta}Certificados\{UsuarioActual.Empresa.ArchivoPfx}"
If UsuarioActual.Empresa.FielPFX.Trim.Length > 0 Then
Dim ArchivoCertificado As String = $"{UsuarioActual.Empresa.Ruta}Certificados\{UsuarioActual.Empresa.FielPFX}"
If File.Exists(ArchivoCertificado) Then
LnkShowSolicitudes.Visible = True
End If