'.&mt('No matches found in resources.').'
'); + } + +# Check discussions if requested + if ($discuss) { + my $totaldiscussions = 0; + $r->print(''.&mt('No matches found in postings.').'
'); + } + } else { + $r->print('+$lt{'note'}. +
+
+ENDCOURSESEARCH
+ $scrout.=' '.
+ &Apache::lonhtmlcommon::textbox('courseexp',
+ $env{'form.courseexp'},40);
+ my $crscheckbox =
+ &Apache::lonhtmlcommon::checkbox('crsfulltext',
+ $env{'form.crsfulltext'});
+ my $relcheckbox =
+ &Apache::lonhtmlcommon::checkbox('crsrelated',
+ $env{'form.crsrelated'});
+ my $discheckbox =
+ &Apache::lonhtmlcommon::checkbox('crsdiscuss',
+ $env{'form.crsrelated'});
+ $scrout.=(< | |
+ +
++ + +$closebutton +
+END + my $srchtype = 'Catalog'; + my $jscript; + if ($env{'form.area'} eq 'portfolio') { + $srchtype = 'Portfolio'; + $jscript = ''; } - elsif ($ENV{'form.advancedsubmit'} eq 'SEARCH') { - untie %hash; return &advancedsearch($r,\%ENV); + my $scrout= &Apache::loncommon::start_page("Advanced $srchtype Search", + $jscript); + $scrout .= $bread_crumb; + + $scrout .= ''; + + $scrout .= &Apache::loncommon::end_page(); + $r->print($scrout); + return; +} -# ----------------------------- Else, begin building search interface to output - $scrout=''; # building a part of screen output - $scrout.=&searchphrasefield('Limit by title','title', - $ENV{'form.title'}); +###################################################################### +###################################################################### - $scrout.=&searchphrasefield('Limit by author','author', - $ENV{'form.author'}); +=pod - $scrout.=&searchphrasefield('Limit by subject','subject', - $ENV{'form.subject'}); +=item &titlefield() - $scrout.=&searchphrasefield('Limit by keywords','keywords', - $ENV{'form.keywords'}); +Inputs: title text - $scrout.=&searchphrasefield('Limit by URL','url', - $ENV{'form.url'}); +Outputs: titletext with font wrapper -# $scrout.=&searchphrasefield('Limit by version','version', -# $ENV{'form.version'}); +=cut - $scrout.=&searchphrasefield('Limit by notes','notes', - $ENV{'form.notes'}); +###################################################################### +###################################################################### +sub titlefield { + my $title=shift; + return $title; +} - $scrout.=&searchphrasefield('Limit by abstract','abstract', - $ENV{'form.abstract'}); +###################################################################### +###################################################################### - $ENV{'form.mime'}='notxxx' unless length($ENV{'form.mime'}); - $scrout.=&selectbox('Limit by MIME type','mime', - $ENV{'form.mime'},%mimetag); +=pod - $ENV{'form.language'}='any' unless length($ENV{'form.language'}); +=item viewoptiontext() - $scrout.=&selectbox('Limit by language','language', - $ENV{'form.language'},%language); - +Inputs: codename for view option -# ------------------------------------------------ Compute date selection boxes - $scrout.=<