# Agenda require "/www/dbqdat/agenda/globals.inc"; $f=getForm(); if (!$f[noheader]) { print capDBQnetint($temesDiccNH[$f[idTema]]); for ($i=2; $i<=strlen($f[idTema]); $i+=2) { $ref = substr($f[idTema], 0, $i); $links[]="$temesDiccNH[$ref]"; }; if ($links) print join (" > ", $links); $tms=getRecordSet("SELECT idTema FROM temes WHERE idTema like '$f[idTema]%' and length(idTema) = (2 + length('$f[idTema]')) and idTema not like '%ZZ' "); if (mysql_num_rows($tms)) { print "
"; while ($tmsD=mysql_fetch_array($tms)) print "[".$temesDiccNH[$tmsD["idTema"]]."] "; print "
"; }; }; $avui = avui(); if (!$f[ordre]) $ordre = (substr($f[idTema], 0, 2) == "01"); if ($ordre) $ordreSql='a.datapres'; else $ordreSql='a.datainici DESC'; $sql = " SELECT DISTINCT titol, descripcio, URL, addfile, tipLink, datapres, datainici FROM agenda a, temesNoticies tn WHERE a.idNot=tn.idNot AND tn.idTema LIKE '$f[idTema]%' AND $avui BETWEEN a.datainici AND a.dataexp ORDER BY $ordreSql"; #print $sql; $rs = getRecordSet($sql); $numr=mysql_num_rows($rs); if (!$numr and !$f[noheader]) print "$dataref