-- ruta de certificado para timbrado demo
This commit is contained in:
@@ -1256,26 +1256,16 @@ Public Class Timbrado
|
||||
' Retorno = If(Ret = "", True, False)
|
||||
|
||||
Case 3
|
||||
|
||||
Retorno = TimbrarFacturaProFactV40(UsuarioActual, Ventas)
|
||||
|
||||
'Retorno = TimbrarFacturaProFact(UsuarioActual, Ventas, TmpDTConceptos, TmpDTImpuestos, TmpDTComplementos, Ruta, LstFordASN, FordGSDBM, ObjV)
|
||||
Case 4
|
||||
|
||||
Dim Ret As String = TimbrarFacturaGoCFDIv40(Ventas, UsuarioActual, CvePACEspecial)
|
||||
If Ret <> "" Then MensajeErrorCFDI = Ret
|
||||
Retorno = If(Ret = "", True, False)
|
||||
|
||||
Case 5
|
||||
|
||||
Dim Ret As String = TimbrarFacturaPADEv40(Ventas, UsuarioActual, CvePACEspecial)
|
||||
If Ret <> "" Then MensajeErrorCFDI = Ret
|
||||
Retorno = If(Ret = "", True, False)
|
||||
|
||||
|
||||
End Select
|
||||
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
|
||||
@@ -1333,8 +1323,8 @@ Public Class Timbrado
|
||||
Clave = "12345678a"
|
||||
EmisorRFC = "EKU9003173C9"
|
||||
EmisorNombre = "ESCUELA KEMPER URGATE"
|
||||
ArchivoLLave = $"{UsuarioActual.Empresa.Ruta}Certificados\EKU9003173C9.key"
|
||||
ArchivoCertificado = $"{UsuarioActual.Empresa.Ruta}Certificados\EKU9003173C9.cer"
|
||||
ArchivoLLave = $"{Extensiones.ModExtensiones.DirectorioEmpresas}\1\Certificados\EKU9003173C9.key"
|
||||
ArchivoCertificado = $"{Extensiones.ModExtensiones.DirectorioEmpresas}\1\Certificados\EKU9003173C9.cer"
|
||||
UsuarioActual.Empresa.CodigoRegimenFiscal = "601"
|
||||
End If
|
||||
|
||||
@@ -3095,8 +3085,8 @@ Public Class Timbrado
|
||||
|
||||
EmisorRFC = "EKU9003173C9"
|
||||
UsuarioActual.Empresa.Empresa = "ESCUELA KEMPER URGATE"
|
||||
ArchivoLLave = $"{Extensiones.ModExtensiones.DirectorioEmpresas}1\Certificados\EKU9003173C9.key"
|
||||
ArchivoCertificado = $"{Extensiones.ModExtensiones.DirectorioEmpresas}1\Certificados\EKU9003173C9.cer"
|
||||
ArchivoLLave = $"{Extensiones.ModExtensiones.DirectorioEmpresas}\1\Certificados\EKU9003173C9.key"
|
||||
ArchivoCertificado = $"{Extensiones.ModExtensiones.DirectorioEmpresas}\1\Certificados\EKU9003173C9.cer"
|
||||
|
||||
Clave = "12345678a"
|
||||
TimbraProduccion = False
|
||||
@@ -3318,8 +3308,8 @@ Public Class Timbrado
|
||||
|
||||
EmisorRFC = "EKU9003173C9"
|
||||
UsuarioActual.Empresa.Empresa = "ESCUELA KEMPER URGATE"
|
||||
ArchivoLLave = $"{Extensiones.ModExtensiones.DirectorioEmpresas}1\Certificados\EKU9003173C9.key"
|
||||
ArchivoCertificado = $"{Extensiones.ModExtensiones.DirectorioEmpresas}1\Certificados\EKU9003173C9.cer"
|
||||
ArchivoLLave = $"{Extensiones.ModExtensiones.DirectorioEmpresas}\1\Certificados\EKU9003173C9.key"
|
||||
ArchivoCertificado = $"{Extensiones.ModExtensiones.DirectorioEmpresas}\1\Certificados\EKU9003173C9.cer"
|
||||
|
||||
Clave = "12345678a"
|
||||
TimbraProduccion = False
|
||||
|
||||
Reference in New Issue
Block a user