sub edit_product_disptacher {
   # uses magic goto to fool caller()
   my ($query)=@_;
   if ( $query->param( 'officeID' ) ) { 
        goto &edit_office_product 
   } else {
        goto &edit_product
   }
}