I understand this pretty much, but not really this line.

if indexseek(InvLinesCursor.Product_ID, .t., 'product', product_id')

However, I tried it anyway and when I save the code it tells me "Function Name missing". I suspect I'm missing a delimiter of some sort.

Thanks for spending time on my problem.

>Kenneth (via Tom),
>
>Tom brings up a good point when asking about the cursor name. Each time through your SCAN/ENDSCAN, you do a seek for InvoiceHeader.Invoice_ID. Since you are SCANning through a cursor, invoiceHeader.invoice_id does not change.
>
>I've removed the buffering commands for this example:
>
>

>set deleted on
>Select * from InvoiceDetail Where Invoice_ID = InvoiceHeader.Invoice_ID ;
>    into cursor InvLinesCursor
>scan   && we are scanning invLinesCursor, not invoiceDetail table
>    if indexseek (InvLinesCursor.Product_ID, .t., 'product', product_id')
>        * product found
>        select product
>	Replace UseSeason with m.currentseason
>    else
>        * product not found...error processing here
>        * referential integrity is supposed to prevent this
>    endif
>endscan
>