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'
Make solutions, not programs!