here it is
PARAMETERS [Enter SaleID] Long, [Enter ProductID] Long, [Enter Qty] Long;
INSERT INTO tblSaleData ( SaleID, ProductID, Qty )
SELECT tblSale.SaleID, [Enter ProductID] AS ProductID, [Enter Qty] AS Qty
FROM tblSale, tblPriceAndPack
WHERE (((tblSale.SaleID)=[Enter SaleID]) AND (([Enter...