-- cambio en las formas de pago, se permite PUE con forma 99, ya que es permitido timbrarlo
This commit is contained in:
@@ -6639,7 +6639,8 @@ Partial Class Ventas
|
|||||||
Private Sub CargaFormaPago(CveMetodoPago As Integer)
|
Private Sub CargaFormaPago(CveMetodoPago As Integer)
|
||||||
Dim dtt As DataTable = Nothing
|
Dim dtt As DataTable = Nothing
|
||||||
If CveMetodoPago > 0 Then
|
If CveMetodoPago > 0 Then
|
||||||
dtt = GlobalDTVtaFormaPago.FiltraParametros(If(CveMetodoPago = 1, " CveFormaPago <> 20 ", "CveFormaPago = 20"))
|
'si es PPD, siempre tiene que ser "99", pero si es PUE, si puede seleccionar hasta el "99"
|
||||||
|
dtt = GlobalDTVtaFormaPago.FiltraParametros(If(CveMetodoPago = 1, "", "CveFormaPago = 20"))
|
||||||
Else
|
Else
|
||||||
dtt = GlobalDTVtaFormaPago
|
dtt = GlobalDTVtaFormaPago
|
||||||
End If
|
End If
|
||||||
|
|||||||
Reference in New Issue
Block a user