I am creating a report that displays data from a form. The form has a combo box that is storing product information. Well, that product information is used to display all the companies that carry the products selected in the combo box, on the form. The follow code is what I have in the click event of a command button that is located on the form.

SELECT company
SET RELATION OFF INTO product SET ORDER TO 1 SELECT product
SET RELATION TO product.compyID = Company.compyID INTO company;
ADDITIVE
REPORT FORMAT ProductList.frx FOR product.code = ;
SUBSTR(ALLTRIM (prod),1,4) AND product.compyID= company.compyID ;
ENVIRONMENT TO ;PRINTER NOCONSOLE

Table names are Company and Product
Prod is the field name for the product code on the report.
----------------------------------------------------------------------
The above code prints out a blank page.

Any suggestion?

Thanks!