--Obs en factura global
This commit is contained in:
@@ -228,6 +228,16 @@ Partial Class Ventas_FacturacionGlobal
|
||||
CveProyecto:=Dr("CveProyecto").ToString().ToEntero(), CveSubProyecto:=Dr("CveSubProyecto").ToString().ToEntero(), CveVentaDetallePadre:=Dr("CveVentaDetalle").ToString().ToEntero(), CveVentaDetalleRemision:=Dr("CveVentaDetalle").ToString().ToEntero())
|
||||
Next
|
||||
|
||||
Dim SbObs As New StringBuilder
|
||||
|
||||
If txtFechaI.Text.Trim() <> txtFechaF.Text.Trim() Then
|
||||
SbObs.AppendFormat("Periodo: {0} al {1}", txtFechaI.Text, txtFechaF.Text)
|
||||
ElseIf txtFechaI.Text.Trim() = txtFechaF.Text.Trim() Then
|
||||
SbObs.AppendFormat("Periodo: {0}", txtFechaI.Text)
|
||||
End If
|
||||
|
||||
ObjFactura.Observaciones = SbObs.ToString()
|
||||
|
||||
ObjFactura.CalculaTotales()
|
||||
|
||||
ObjFactura.PreparaTimbre()
|
||||
|
||||
Reference in New Issue
Block a user