SELECT
  DISTINCT(Product.typeCode)
INTO
  :typeCode 
FROM
  Product,
  ProductConcernRole 
WHERE Product.statusCode = :statusCode 
  AND Product.startDate <= :searchDate 
  AND 
  (
    Product.endDate >= :searchDate 
    OR Product.endDate IS NULL 
  ) 
  AND ProductConcernRole.productID = Product.productID 
  AND ProductConcernRole.concernRoleType = :concernRoleType