AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

--nombre de promocion en tag de promocion

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2025-01-20 20:20:47 -07:00
parent 30a493fc0a
commit b5849aa87e
1 changed files with 14 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
Ventas/Ventas.aspx.vb
View File

@@ -9020,6 +9020,14 @@ Partial Class Ventas
If e.Row.DBCampo("TipoDocto").Contiene("Cot", "Rem") AndAlso (CveVenta > 0 AndAlso Not EsCreaApartirDe) Then If e.Row.DBCampo("TipoDocto").Contiene("Cot", "Rem") AndAlso (CveVenta > 0 AndAlso Not EsCreaApartirDe) Then
e.Row.FCLinkButton("imgClone").Visible = False e.Row.FCLinkButton("imgClone").Visible = False
End If End If
If e.Row.DBCampo("CvePromocionDetalle").ToEntero() > 0 Then
If DtPromociones IsNot Nothing Then
Dim NombrePromo As String = DtPromociones.FiltroPrimeroValor("NombrePromocion", $"CvePromocionDetalle={e.Row.DBCampo("CvePromocionDetalle")}")
e.Row.FCHtmlGenericControl("TagPromocion").Attributes.Add("title", NombrePromo)
End If
End If
End If End If
If CveVenta <= 0 Then If CveVenta <= 0 Then
@@ -18570,6 +18578,12 @@ Partial Class Ventas
If ObjDescuentoGral.CvePromocionDetalle > 0 Then If ObjDescuentoGral.CvePromocionDetalle > 0 Then
TagPromocion.Visible = True TagPromocion.Visible = True
If UsuarioActual.CveEmpresa = 189 Then
If DtPromociones IsNot Nothing Then
Dim NombrePromo As String = DtPromociones.FiltroPrimeroValor("NombrePromocion", $"CvePromocionDetalle={ObjDescuentoGral.CvePromocionDetalle}")
TagPromocion.Attributes.Add("title", NombrePromo)
End If
End If
End If End If
If Me.ObjDescuentoGral.EsPUModificado Then If Me.ObjDescuentoGral.EsPUModificado Then