!!! Error !!! In eval Can't use an undefined value as a HASH reference at (eval 4852) line 1.
:: if (grep { $_ eq $App->Data->Var('current')->{'class_name'} } qw/service_cat equipment_cat action_cat/) { $hash->{'cond'} = qq{rel = :cur}; $hash->{'params'} = { attrs => ['picture','node','link','rel'], condition => $hash->{'cond'}, use_arrays => ['rel'] } } else { $hash->{'params'} = { attrs => ['picture','node','link'] } } print '================================================'; if (my $row = $DB->CAT_MEGAGET(class_name => 'offer', parent_id => $hash->{'object_id'}, attrs => ['node','link','rel'], condition => ($hash->{'cond'} ? $hash->{'cond'}.qq{ AND } : '').qq{(node = :nid OR link = :url)}, cur => $App->Param('current'), nid => $App->Param('node_id'), url => ConstructUrlString('', { node_id => $App->Param('node_id') }), use_arrays => ['rel'], use_publ_pos => 1)->fetchrow_hashref() ) { $hash->{'slide_id'} = $row->{'object_id'}; }
Лазерное оборудование и технологии
Профессиональная промышленная маркировка