--Quitar agregar anticipos de publico general a otro cliente
This commit is contained in:
@@ -17494,7 +17494,7 @@ Partial Class Ventas
|
||||
End If
|
||||
|
||||
'AGREGAR LOS ANTICIPOS, DEV, IxC QUE ESTEN EN PUBLICO GENERAL
|
||||
If Me.TmpDTAnticiposNCIxCCliente IsNot Nothing AndAlso UsuarioActual.CveEmpresa.Contiene(189, 190, 192, 195, 197) Then
|
||||
If Me.TmpDTAnticiposNCIxCCliente IsNot Nothing AndAlso UsuarioActual.CveEmpresa.Contiene(190, 192, 195, 197) Then
|
||||
Dim CveClientePublicoGeneral = UsuarioActual.Empresa.Funcionalidad(714).ToEntero()
|
||||
If CveClientePublicoGeneral > 0 Then
|
||||
If CveCliente <> CveClientePublicoGeneral Then
|
||||
|
||||
Reference in New Issue
Block a user