RE:Como Ordenar un Report
En Process Field Template (punto de embebido del report)
CASE LOC:lpor
OF 1 ! Por RP Numérico
ThisReport.AddSortOrder()
ThisReport.AppendOrder('EXI:RPNU')
ThisReport.SetFilter('EXI:RPNU>=LOC:drpn AND EXI:RPNU<=LOC:hrpn','rpnu')
ThisReport.ApplyFilter
OF 2 ! Por RP de la Cria
ThisReport.AddSortOrder()
ThisReport.AppendOrder('EXI:RPEX')
ThisReport.SetFilter('EXI:RPEX>=LOC:drpe AND EXI:RPEX<=LOC:hrpe','rpex')
ThisReport.ApplyFilter
OF 3 ! Por Caravana
ThisReport.AddSortOrder()
ThisReport.AppendOrder('EXI:cara')
ThisReport.SetFilter('EXI:cara>=LOC:dcar AND EXI:cara<=LOC:hcar','cara')
ThisReport.ApplyFilter
OF 4 ! Por Fecha Nacimiento
ThisReport.AddSortOrder(EXI:k_fnac)
ThisReport.AddRange(EXI:FNAC,LOC:dfec,LOC:hfec)
OF 5 ! Por Madre
ThisReport.AddSortOrder()
ThisReport.AppendOrder('EXI:RPMD')
ThisReport.SetFilter('EXI:RPMD>=LOC:drpm AND EXI:RPMD<=LOC:hrpm','rpmd')
ThisReport.ApplyFilter
END!CASE
SI QUIERES MANEJAR RANGOS PUEDES HACER ESTO TAMBIEN:
CASE LOC:lpor
OF 1 ! Por RP Receptora
ThisReport.AddSortOrder(NOV:k_proc_rpex_fmov)
ThisReport.AddRange(NOV:rpex,LOC:drpe,LOC:hrpe)
OF 2 ! Por Nº de Madre
NOV:asom = 0
ThisReport.AddSortOrder(NOV:k_proc_asom_hbam_rgsm_frec_fser)
ThisReport.AddRange(NOV:hbam,LOC:dhba,LOC:hhba)
OF 3 ! Por Fecha de Implante
ThisReport.AddSortOrder(NOV:k_proc_fmov_rpex)
ThisReport.AddRange(NOV:fmov,LOC:dfec,LOC:hfec)
END!CASE
ThisReport.SetFilter('NOV:fimp>0 AND NOV:PROP=USU:CRIA')
ThisReport.ApplyFilter
ESPERO TE SIRVA EN ALGO..
SALUDOS,
BASSI, RODRIGO.-