• 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 }