This commit is contained in:
@@ -22595,7 +22595,9 @@ 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 GvPagos IsNot Nothing Then
|
If GvPagos.Rows.Count = 0 And UsuarioActual.Empresa.Funcionalidad(558).ToEntero = 1 Then
|
||||||
|
Alert("No se puede facturar hasta que se haya especificado detalladamente la forma de pago", TipoMensaje.MsgAdvertencia)
|
||||||
|
Else
|
||||||
Dim FolioFijo As Integer = 0
|
Dim FolioFijo As Integer = 0
|
||||||
|
|
||||||
'CARGA LO PENDIENTE POR FACTURAR DE COTIZACION
|
'CARGA LO PENDIENTE POR FACTURAR DE COTIZACION
|
||||||
@@ -22640,8 +22642,6 @@ Partial Class Ventas
|
|||||||
|
|
||||||
If FolioFijo = 0 Then CargaFolios() 'RECARGA FOLIOS CON EL NUEVO TIPO DOCTO
|
If FolioFijo = 0 Then CargaFolios() 'RECARGA FOLIOS CON EL NUEVO TIPO DOCTO
|
||||||
EmitirImprimir() 'MANDA A EMITIR - PROCESO VIEJO
|
EmitirImprimir() 'MANDA A EMITIR - PROCESO VIEJO
|
||||||
Else
|
|
||||||
Alert("No se puede facturar hasta que se haya especificado detalladamente la forma de pago", TipoMensaje.MsgAdvertencia)
|
|
||||||
End If
|
End If
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|||||||
Reference in New Issue
Block a user