Maximum date

Does anyone know how to get the maximum date for a quote?
I am looking to export a csv file but only want the last quoted record
for each part quoted.
thanks a bunch!

DEFINE NEW SHARED VARIABLE i AS INTEGER.
i = 0.
OUTPUT TO c:\temp\QuoteHis.txt.
EXPORT DELIMITER ",".
for each QuoteHed Where QuoteHed.Company = 'abc' AND
QuoteHed.DateQuoted > TODAY - 365 no-lock,
each QuoteDtl Where QuoteDtl.Company = QuoteHed.Company
and QuoteDtl.QuoteNum = QuoteHed.QuoteNum
AND QuoteDtl.PartNum BEGINS 'p'
AND QuoteDtl.PartNum <> 'P-NO-QUOTE' no-lock,
each QuoteQty Where QuoteQty.Company = QuoteHed.Company
and QuoteQty.QuoteNum = QuoteHed.QuoteNum no-lock
BY QuoteHed.QuoteNum:

EXPORT DELIMITER ","
QuoteHed.QuoteNum
QuoteHed.Character01
QuoteHed.DateQuoted
QuoteDtl.PartNum
QuoteQty.QtyNum
QuoteQty.PricePerCode
QuoteQty.UnitPrice
QuoteQty.OurQuantity.

i = i + 1.
PROCESS EVENTS.

END.
OUTPUT CLOSE.
MESSAGE i " records exported for QuoteHist Table.".




[Non-text portions of this message have been removed]