This commit is contained in:
janeth arvizu
2019-09-25 14:55:21 -07:00
parent d8d3f6890d
commit 4b1c4142d2

View File

@@ -22595,7 +22595,7 @@ Partial Class Ventas
#Region " EMITIR DOCUMENTO NUEVO " #Region " EMITIR DOCUMENTO NUEVO "
Private Sub EmitirDocumentoNuevo(TipoDoctoNuevo As String) Private Sub EmitirDocumentoNuevo(TipoDoctoNuevo As String)
If GvPagos.Rows.Count = 0 And UsuarioActual.Empresa.Funcionalidad(558).ToEntero = 1 Then If GvPagos.Rows.Count = 0 And UsuarioActual.Empresa.Funcionalidad(558).ToEntero = 1 And RBLPago.SelectedValue.ToEntero = 2 Then
Alert("No se puede facturar hasta que se haya especificado detalladamente la forma de pago", TipoMensaje.MsgAdvertencia) Alert("No se puede facturar hasta que se haya especificado detalladamente la forma de pago", TipoMensaje.MsgAdvertencia)
Else Else
Dim FolioFijo As Integer = 0 Dim FolioFijo As Integer = 0