-- cambios de serie,lote

This commit is contained in:
rrene
2020-05-29 00:02:18 -07:00
parent 310740e2b1
commit 9e01a2067f
7 changed files with 21 additions and 19 deletions

View File

@@ -1316,10 +1316,7 @@ Partial Class Compras_ReembolsosComprobaciones
If UsuarioActual.Empresa.UsaContabilidadSIG AndAlso CveCuentaProveedor > 0 Then
If UsuarioActual.Empresa.UsaContabilidadSIG AndAlso CveCuentaIVAxAcreditar > 0 Then
If UsuarioActual.Empresa.UsaContabilidadSIG AndAlso CveCuentaIVAAcreditable > 0 Then
If ObjMov.ContabilizarPrePolizaSIG(CvePrePolizaIERegistrado, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
Else
MsgError = "Ocurrio un Error al contabilizar en SIG, pongase en contacto con Soporte Técnico"
End If
Else
MsgError = "No tiene cuenta contable SIG IVA Acreditable"
End If
@@ -1341,10 +1338,7 @@ Partial Class Compras_ReembolsosComprobaciones
If UsuarioActual.Empresa.UsaContabilidadSIG AndAlso CveCuentaIVAAcreditable > 0 Then
If UsuarioActual.Empresa.UsaContabilidadSIG AndAlso CveCuentaRetIVA > 0 Then
If UsuarioActual.Empresa.UsaContabilidadSIG AndAlso CveCuentaRetISR > 0 Then
If ObjMov.ContabilizarPrePolizaSIG(CvePrePolizaExcedente, UsuarioActual.CveUsuario, UsuarioActual.Empresa) Then
Else
MsgError = "Ocurrio un Error al contabilizar en SIG, pongase en contacto con Soporte Técnico"
End If
Else
MsgError = "No tiene cuenta contable SIG Ret ISR"
End If