SELECT *, (receipt.receipt_qty * receipt.receipt_cost), RECNO('receipt') ;
FROM receipt <b>JOIN purchase_head </b> ;
<b>ON purchase_head.order_numb = receipt.order_numb </b>;
<b>WHERE</b> BETWEEN(receipt.receipt_date, pd_start, pd_end) AND ;
purchase_head.cc_name = lc_name ;
AND &l_str ;
ORDER BY purchase_head.vendor_id, ;
purchase_head.ven_invoice, ;
receipt.pack_slip ;
INTO TABLE (gcOld_Dir)+'recon.DBF'