while (($optionname, $optionvalue) = each %qual_options) {
if ( $optionname =~ /^ikano_Network_(\d+)_ProductGroup_(\d+)_Product_(\d+)_ProductCustomId$/
&& $optionvalue eq $ProductCustomId ) {
while (($optionname, $optionvalue) = each %qual_options) {
if ( $optionname =~ /^ikano_Network_(\d+)_ProductGroup_(\d+)_Product_(\d+)_ProductCustomId$/
&& $optionvalue eq $ProductCustomId ) {