From b04241187fda7b337630f35910aa8f2c81b72b38 Mon Sep 17 00:00:00 2001 From: Jonathan Alexis Perez Morales Date: Sat, 24 May 2025 00:46:35 -0700 Subject: [PATCH] --Obs en factura global --- Ventas/FacturacionGlobal.aspx.vb | 10 ++++++++++ 1 file changed, 10 insertions(+) diff --git a/Ventas/FacturacionGlobal.aspx.vb b/Ventas/FacturacionGlobal.aspx.vb index 4673a443c..efd517756 100644 --- a/Ventas/FacturacionGlobal.aspx.vb +++ b/Ventas/FacturacionGlobal.aspx.vb @@ -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()