FOR-EACH-OBJECT @products WHEN NONEMPTY@CODE WHEN@TEMPLATE