-
pickup.msn
35 36 88 88 $doc = $keeper->get_document_by_id ( $check, %{$prop->{lookup_opts}} ); 89 89 } 90 90 $lookup_string = '/contenido/find_document.html?nf='.$name.'_docname&vf='.$name.'_value'; 91 $lookup_string .= '&class='.$prop->{lookup_opts}->{class} if exists $prop->{lookup_opts}->{class}; 92 $lookup_string .= '&s='.$prop->{lookup_opts}->{s} if exists $prop->{lookup_opts}->{s}; 93 $lookup_string .= '&search_by='.$prop->{lookup_opts}->{search_by} if exists $prop->{lookup_opts}->{search_by}; 91 if ( exists $prop->{lookup_opts} && ref $prop->{lookup_opts} eq 'HASH' ) { 92 while ( my ($param, $value) = each %{ $prop->{lookup_opts} } ) { 93 $lookup_string .= '&'.$param.'='.$value; 94 } 95 } 94 96 } else { 95 97 $error = 'Похоже неверное описание lookup_opts в документе'; 96 98 }