>SELECT * FROM csrInvoice ; >GROUP BY InvDate, INo ; >HAVING THIS.Include(Qty, StockQty, @lnCount, @lnSum) ; >ORDER BY InvDate, INo desc; >INTO CURSOR csrInvoiceThis will order by InvDate Ascending then Ino Descending
>SELECT * FROM csrInvoice ; >GROUP BY InvDate, INo ; >HAVING THIS.Include(Qty, StockQty, @lnCount, @lnSum) ; >ORDER BY InvDate Desc, INo desc; >INTO CURSOR csrInvoiceIs this what you mean?
>LOCAL lnCount, lnSum > >STORE 0 TO lnCount, lnSum > >SELECT d.InvDate, d.InvNo, d.INo, d.CPU, d.Qty, d.LocCode ; >FROM tblP_InvDetails d ; >ORDER BY InvDate DESC ; >INTO CURSOR csrInvoice >BROW > >SELECT * FROM CSRINVOICE > >SELECT p.InvNo, p.InvDate, p.INo, p.CPU, p.Qty, v.Qty AS StockQty ; >FROM csrValuation v, csrInvoice p ; >WHERE v.INo == p.INo AND v.LocCode == p.LocCode ; >ORDER BY InvDate DESC ; >INTO CURSOR csrInvoice > >SELECT * FROM csrInvoice ; >GROUP BY InvDate, INo ; >HAVING THIS.Include(Qty, StockQty, @lnCount, @lnSum) ; >ORDER BY InvDate, INo desc; >INTO CURSOR csrInvoice > > >PROCEDURE Include >LPARAMETER tnPQty, tnQty, tnCount, tnSum > >tnSum = tnSum + tnPQty > >IF tnSum > tnQty > tnCount = tnCount + 1 > IF tnCount > 1 > RETURN .F. > ENDIF >ENDIF > >RETURN .T. > >ENDPROC > >