--Cambios RepCortes E197
This commit is contained in:
@@ -1563,7 +1563,7 @@ Partial Class PopUpVerFactura
|
|||||||
|
|
||||||
Dim Fecha As String = "", Nombre As String = ""
|
Dim Fecha As String = "", Nombre As String = ""
|
||||||
Dim OpcionDetallado As Integer = 1
|
Dim OpcionDetallado As Integer = 1
|
||||||
If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then OpcionDetallado = 2
|
If UsuarioActual.Empresa.Funcionalidad(109) = "1" OrElse UsuarioActual.CveEmpresa = 197 Then OpcionDetallado = 2
|
||||||
|
|
||||||
Dim ObjVenta As New ClsVentas
|
Dim ObjVenta As New ClsVentas
|
||||||
Dim ObjPuntoVenta As New ClsPuntoVenta
|
Dim ObjPuntoVenta As New ClsPuntoVenta
|
||||||
@@ -1662,9 +1662,13 @@ Partial Class PopUpVerFactura
|
|||||||
Orden = 5
|
Orden = 5
|
||||||
TipoTabla = 1
|
TipoTabla = 1
|
||||||
Case "VentaTotalRemision"
|
Case "VentaTotalRemision"
|
||||||
rowData("Columna") = "Ventas Remisiones"
|
If UsuarioActual.CveEmpresa.Contiene(190, 192) Then
|
||||||
Orden = 6
|
rowData("Columna") = "Ventas Remisiones"
|
||||||
TipoTabla = 1
|
Orden = 6
|
||||||
|
TipoTabla = 1
|
||||||
|
Else
|
||||||
|
Orden = 0
|
||||||
|
End If
|
||||||
Case "TotalEfectivo"
|
Case "TotalEfectivo"
|
||||||
rowData("Columna") = "Total Efectivo"
|
rowData("Columna") = "Total Efectivo"
|
||||||
Orden = 7
|
Orden = 7
|
||||||
@@ -1727,13 +1731,13 @@ Partial Class PopUpVerFactura
|
|||||||
DtDatosCajas.Rows.Add(rowData.ItemArray)
|
DtDatosCajas.Rows.Add(rowData.ItemArray)
|
||||||
End If
|
End If
|
||||||
|
|
||||||
If row(0).ToString() = "SaldoAnteriorAplicado" Then
|
'If row(0).ToString() = "SaldoAnteriorAplicado" Then
|
||||||
Dim RowMP As DataRow = DtMetodosPago.NewRow
|
' Dim RowMP As DataRow = DtMetodosPago.NewRow
|
||||||
RowMP("MetodoPago") = "Saldo Aplicado"
|
' RowMP("MetodoPago") = "Saldo Aplicado"
|
||||||
RowMP("Importe") = Total.ToDecimal()
|
' RowMP("Importe") = Total.ToDecimal()
|
||||||
|
|
||||||
DtMetodosPago.Rows.Add(RowMP)
|
' DtMetodosPago.Rows.Add(RowMP)
|
||||||
End If
|
'End If
|
||||||
|
|
||||||
End If
|
End If
|
||||||
Next
|
Next
|
||||||
|
|||||||
Reference in New Issue
Block a user