FAQ
body<=
{'dmid'} AND l.dmid=$mld->{'dmid'} AND i.dmid=$mld->{'dmid'} AND ".
"l.lnid=$mll->{'lnid'} AND l.itid=i.itid AND i.itcode=CONCAT('cat.', fc.faqcat) ".
"AND l.txtid=t.txtid AND fc.faqcat<>'int-abuse'";
$sth = $dbr->prepare($sql);
} else {
$sth = $dbr->prepare("SELECT faqcat, faqcatname, catorder FROM faqcat ".
"WHERE faqcat<>'int-abuse'");
}
$sth->execute;
while ($_ = $sth->fetchrow_hashref) {
$faqcat{$_->{'faqcat'}} = $_;
}
if ($altlang) {
my $sql = "SELECT f.faqid, t.text AS 'question', f.sortorder, ".
"f.faqcat, f.lastmodtime FROM faq f, ".
"ml_text t, ml_latest l, ml_items i WHERE ".
"t.dmid=$mld->{'dmid'} AND l.dmid=$mld->{'dmid'} AND i.dmid=$mld->{'dmid'} AND ".
"l.lnid=$mll->{'lnid'} AND l.itid=i.itid AND i.itcode=CONCAT(f.faqid, '.1question') ".
"AND l.txtid=t.txtid AND f.faqcat<>'int-abuse'";
$sth = $dbr->prepare($sql);
} else {
$sth = $dbr->prepare("SELECT faqid, question, sortorder, faqcat, lastmodtime ".
"FROM faq WHERE faqcat<>'int-abuse'");
}
$sth->execute;
while ($_ = $sth->fetchrow_hashref) {
$faqq{$_->{'faqid'}} = $_;
}
foreach my $faqcat (sort { $faqcat{$a}->{'catorder'} <=>
$faqcat{$b}->{'catorder'} } keys %faqcat)
{
next if $GET{'cat'} && $GET{'cat'} ne $faqcat;
$ret .= "{'faqcatname'});
$ret .= " (";
$ret .= "view all";
$ret .= ") h2?>\n";
$ret .= "\n";
foreach my $faqid (sort { $faqq{$a}->{'sortorder'} <=> $faqq{$b}->{'sortorder'} } grep { $faqq{$_}->{'faqcat'} eq $faqcat } keys %faqq)
{
next unless ($faqq{$faqid}->{'question'});
BML::note_mod_time($faqq{$faqid}->{'lastmodtime'});
my $q = LJ::ehtml($faqq{$faqid}->{'question'});
$q =~ s/^\s+//; $q =~ s/\s+$//;
$q =~ s!\n!
!g;
$ret .= "- $q
\n";
}
$ret .= "
\n";
}
return $ret;
_code?>
Back to the support area.
<=body
page?>
link: htdocs/support/faqbrowse.bml, htdocs/support/index.bml
_c?>