
29/05/2013, 11:37
|
| | Fecha de Ingreso: diciembre-2001 Ubicación: Peru
Mensajes: 376
Antigüedad: 23 años, 3 meses Puntos: 0 | |
LinQ y Distinct hola que tal, tengo una lista (lstFinal]) como resultado de una consulta en linq.
El problema es que quiero filtrar por el numero de Ticket, no quiero que salga repetido.
Pero no se como utilizar el Distinct.
Espero me puedan ayudar dejo el código:
Código:
Dim resultadofinal = From c In ResTicket _
Group Join d In ResFiesta On c.TICKET Equals d.TICKET And c.CAJA Equals d.CAJA _
And c.FECOPE Equals d.FECOPE Into Group From d In Group.DefaultIfEmpty() _
Select New With {
.TICKET = c.TICKET, _
.IDCADENA = c.IDCADENA, _
.ADDR_POSTAL_CODE = c.ADDR_POSTAL_CODE, _
.CAJA = c.CAJA, _
.FECOPE = c.FECOPE, _
.RVC = c.RVC, _
.CANAL = c.CANAL, _
.TURNO = c.TURNO, _
.CODCAJERO = c.CODCAJERO, _
.TIPDOC = c.TIPDOC, _
.REFANUL = c.REFANUL, _
.RUC = c.RUC, _
.VLRVENTA = c.VLRVENTA, _
.PEDIDO = c.PEDIDO, _
.SERV = c.SERV, _
.PORCDSCTO = c.PORCDSCTO, _
.CODAUTORIZ = c.CODAUTORIZ, _
.HORA = c.HORA, _
.IGV = c.IGV, _
.MONTBRUTO = c.MONTBRUTO, _
.BONUS = c.BONUS, _
.CODDESCUENTO = c.CODDESCUENTO, _
.CODFIESTA = c.CODFIESTA, _
.CODPOD = c.CODPOD, _
.CODDRIVER = c.CODDRIVER, _
.HORASALIDA = c.HORASALIDA, _
.HORALLEGADA = c.HORALLEGADA, _
.PORCIGV = c.PORCIGV, _
.PROCRC = c.PROCRC, _
.NROSERIE = c.NROSERIE, _
.FECACTIVACION = c.FECACTIVACION, _
.FECDESACTIVACION = c.FECDESACTIVACION, _
.NETO = c.NETO, _
.FIESTA = If(d Is Nothing, "0", "1")}
Dim lstFinal As New List(Of BaseComponent.EntTickets)
Dim oEntFinal As BaseComponent.EntTickets
For Each p In resultadofinal
oEntFinal = New BaseComponent.EntTickets
oEntFinal.IDCADENA = p.IDCADENA
oEntFinal.ADDR_POSTAL_CODE = p.ADDR_POSTAL_CODE
oEntFinal.CAJA = p.CAJA
oEntFinal.TICKET = p.TICKET
oEntFinal.FECOPE = p.FECOPE
oEntFinal.RVC = p.RVC
oEntFinal.CANAL = p.CANAL
oEntFinal.TURNO = p.TURNO
oEntFinal.CODCAJERO = p.CODCAJERO
oEntFinal.TIPDOC = p.TIPDOC
oEntFinal.REFANUL = p.REFANUL
oEntFinal.RUC = p.RUC
oEntFinal.VLRVENTA = p.VLRVENTA
oEntFinal.PEDIDO = p.PEDIDO
oEntFinal.SERV = p.SERV
oEntFinal.PORCDSCTO = p.PORCDSCTO
oEntFinal.CODAUTORIZ = p.CODAUTORIZ
oEntFinal.HORA = p.HORA
oEntFinal.IGV = p.IGV
oEntFinal.MONTBRUTO = p.MONTBRUTO
oEntFinal.BONUS = p.BONUS
oEntFinal.CODDESCUENTO = p.CODDESCUENTO
oEntFinal.CODFIESTA = p.CODFIESTA
oEntFinal.CODPOD = p.CODPOD
oEntFinal.CODDRIVER = p.CODDRIVER
oEntFinal.HORASALIDA = p.HORASALIDA
oEntFinal.HORALLEGADA = p.HORALLEGADA
oEntFinal.PORCIGV = p.PORCIGV
oEntFinal.PROCRC = p.PROCRC
oEntFinal.NROSERIE = p.NROSERIE
oEntFinal.FECACTIVACION = p.FECACTIVACION
oEntFinal.FECDESACTIVACION = p.FECDESACTIVACION
oEntFinal.NETO = p.NETO
oEntFinal.FIESTA = p.FIESTA
lstFinal.Add(oEntFinal)
Next
ObtenerTickets = lstFinal
|