This commit is contained in:
2024-06-30 23:20:36 -07:00
parent aa158b198c
commit 89f9bf8781

View File

@@ -141,9 +141,7 @@ Partial Class RepNotasSinAlmacen
Dim Reporte As New ClsInventarios Dim Reporte As New ClsInventarios
If Reporte.RepNotasSinAlmacen(Opcion, CveClienteProveedor, FechaInicial, FechaFinal, TipoDocumento, DdlSubProyecto.SelectedValue.ToEntero, UsuarioActual.Empresa.CveEmpresa) Then If Reporte.RepNotasSinAlmacen(Opcion, CveClienteProveedor, FechaInicial, FechaFinal, TipoDocumento, DdlSubProyecto.SelectedValue.ToEntero, UsuarioActual.Empresa.CveEmpresa) Then
Dim dtt As DataTable = Reporte.DtResultados Dim dtt As DataTable = Reporte.DtResultados
If UsuarioActual.Empresa.Funcionalidad(578) = "1" Then ' es empresa hospitalaria
dtt = dtt.fit
End If
GvVentas.DataSource = Reporte.DtResultados GvVentas.DataSource = Reporte.DtResultados
DtNotasSinAlmacenVentas = Reporte.DtResultados DtNotasSinAlmacenVentas = Reporte.DtResultados
Else Else