\n" . mysql_error());; while($row3=mysql_fetch_row($mysql_result3)) { $warunek .= "a.ID_CNTR = '$row3[0]' OR "; } $warunek = substr($warunek, 0, -4); if($start == null) $start = 0; if($litera == null) $litera = 'ALL'; if($skok== null) $skok = 30; $query="SELECT MAX(YEAR) as rok_IC from IC_YEAR"; $mysql_result = mysql_query($query, $mysql_link) or die ("$query
\n" . mysql_error());; while($row=mysql_fetch_row($mysql_result)) { $rokIC=$row[0]; } function checkICyear() { global $mysql_link; $query="Select MAX(YEAR) FRom IC_YEAR"; $res=mysql_query($query,$mysql_link); $row=mysql_fetch_row($res); return $row[0]; } $m_year=checkICyear(); function cialo_tabeli($litera, $start, $skok) { global $m_year,$currentlang; global $mysql_link; global $litera, $start, $skok, $ID_CONTR, $warunek; if ($litera == 'ALL') { $query3 = "SELECT d.TITLE, d.ID_TITL, a.ID_JOUR, a.PISSN, a.ID_CNTR, a.SINGLE_SOURCED, a.id_adrs, b.ISO, b.COUNTRY, a.ID_JOUR_BEFORE, a.ID_JOUR_NEXT, a.EISSN FROM JOUR a LEFT OUTER JOIN CNTR b ON (a.ID_CNTR = b.ID_CNTR) INNER JOIN JOUR_TITL c ON (a.ID_JOUR = c.ID_JOUR) INNER JOIN TITL d ON (c.ID_TITL = d.ID_TITL) WHERE (d.IS_VERNAC = 'Yes') AND ($warunek) GROUP BY a.ID_JOUR ORDER BY d.TITLE limit $start, $skok"; } else { $query3 = "SELECT d.TITLE, d.ID_TITL, a.ID_JOUR, a.PISSN, a.ID_CNTR, a.SINGLE_SOURCED, a.id_adrs, b.ISO, b.COUNTRY, a.ID_JOUR_BEFORE, a.ID_JOUR_NEXT, a.EISSN FROM JOUR a LEFT OUTER JOIN CNTR b ON (a.ID_CNTR = b.ID_CNTR) INNER JOIN JOUR_TITL c ON (a.ID_JOUR = c.ID_JOUR) INNER JOIN TITL d ON (c.ID_TITL = d.ID_TITL) WHERE (d.TITLE LIKE '$litera%') AND (d.IS_VERNAC = 'Yes') AND ($warunek) GROUP BY a.ID_JOUR ORDER BY d.TITLE limit $start, $skok"; } //echo "$query3\n"; $mysql_result3 = mysql_query($query3, $mysql_link); while($row3=mysql_fetch_row($mysql_result3)) { $id_journal=$row3[2]; $pISSN=$row3[3]; $eISSN=$row3[11]; $ID_JOUR_BEFORE = $row3[9]; $ID_JOUR_NEXT = $row3[10]; print(" ".display_titleJOUR($id_journal,'').""); if ($pISSN == '') { print ("$eISSN"); } else { print ("$pISSN"); } print ("".JourICValue($id_journal,$m_year).""); if ($ID_JOUR_BEFORE > 0) { $qqq1 = mysql_query("SELECT PISSN, ID_JOUR, EISSN FROM JOUR WHERE ID_JOUR = $ID_JOUR_BEFORE"); while($zap_wyn1 = mysql_fetch_row($qqq1)) { $issnbefore = $zap_wyn1[0]; if (!$issnbefore) { $issnbefore = $zap_wyn1[2]; } } echo"    Formerly: ".display_titleJOUR($ID_JOUR_BEFORE,'')."$issnbefore".JourICValue($ID_JOUR_BEFORE, $m_year).""; } if ($ID_JOUR_NEXT > 0) { $qqq1 = mysql_query("SELECT PISSN, ID_JOUR, EISSN FROM JOUR WHERE ID_JOUR = $ID_JOUR_NEXT"); while($zap_wyn1 = mysql_fetch_row($qqq1)) { $issnnext = $zap_wyn1[0]; if (!$issnnext) { $issnnext = $zap_wyn1[2]; } } echo"    Continued by: ".display_titleJOUR($ID_JOUR_NEXT,'')."$issnnext".JourICValue($ID_JOUR_NEXT, $m_year).""; } } } function naglowek_tabeli() { global $currentlang, $rokIC; echo " "._JOURTITL." ISSN INDEX COPERNICUS $rokIC "; } function show($litera, $skok) { global $litera, $start, $skok, $ID_CONTR, $warunek; echo"
"); echo "
"; echo""; echo _SHOW.":
"; } function next_prev($litera, $start, $skok) { global $mysql_link; global $litera, $start, $skok, $ID_CONTR, $warunek; if ($litera == 'ALL') { $q = "SELECT d.TITLE, d.ID_TITL, a.ID_JOUR, a.PISSN, a.ID_CNTR, a.SINGLE_SOURCED, a.id_adrs, b.ISO, b.COUNTRY FROM JOUR a LEFT OUTER JOIN CNTR b ON (a.ID_CNTR = b.ID_CNTR) INNER JOIN JOUR_TITL c ON (a.ID_JOUR = c.ID_JOUR) INNER JOIN TITL d ON (c.ID_TITL = d.ID_TITL) WHERE (d.IS_VERNAC = 'Yes') AND ($warunek) GROUP BY a.ID_JOUR"; } else { $q = "SELECT d.TITLE, d.ID_TITL, a.ID_JOUR, a.PISSN, a.ID_CNTR, a.SINGLE_SOURCED, a.id_adrs, b.ISO, b.COUNTRY FROM JOUR a LEFT OUTER JOIN CNTR b ON (a.ID_CNTR = b.ID_CNTR) INNER JOIN JOUR_TITL c ON (a.ID_JOUR = c.ID_JOUR) INNER JOIN TITL d ON (c.ID_TITL = d.ID_TITL) WHERE (d.TITLE LIKE '$litera%') AND (d.IS_VERNAC = 'Yes') AND ($warunek) GROUP BY a.ID_JOUR"; } $query_ilosc= mysql_query($q) or die ("$q
\n" . mysql_error());; $ilosc = mysql_num_rows($query_ilosc); $paczka = ceil($ilosc/$skok); $prev = $start - $skok; $next = $start + $skok; if($prev >= 0) echo ""._PREVIOUS." $skok"; if($prev >= 0 && $next <= $ilosc) print(" | "); if($next <= $ilosc) echo ""._NEXT." $skok"; } function lista_liter($litera, $skok) { global $litera, $start, $skok, $warunek; $q = "SELECT d.TITLE, d.ID_TITL, a.ID_JOUR, a.PISSN, a.ID_CNTR, a.SINGLE_SOURCED, a.id_adrs, b.ISO, b.COUNTRY FROM JOUR a LEFT OUTER JOIN CNTR b ON (a.ID_CNTR = b.ID_CNTR) INNER JOIN JOUR_TITL c ON (a.ID_JOUR = c.ID_JOUR) INNER JOIN TITL d ON (c.ID_TITL = d.ID_TITL) WHERE (d.IS_VERNAC = 'Yes') AND ($warunek) GROUP BY a.ID_JOUR"; //echo "
$q
\n"; $query_ilosc= mysql_query($q) or die ("$q
\n" . mysql_error()); $iloscjournals = mysql_num_rows($query_ilosc); print("
Total number of journals: $iloscjournals
"); $tab = array('A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'W', 'V', 'Z', 'Y'); reset ($tab); while (list ($key, $val) = each ($tab)) { $q = "SELECT d.TITLE, d.ID_TITL, a.ID_JOUR, a.PISSN, a.ID_CNTR, a.SINGLE_SOURCED, a.id_adrs, b.ISO, b.COUNTRY FROM JOUR a LEFT OUTER JOIN CNTR b ON (a.ID_CNTR = b.ID_CNTR) INNER JOIN JOUR_TITL c ON (a.ID_JOUR = c.ID_JOUR) INNER JOIN TITL d ON (c.ID_TITL = d.ID_TITL) WHERE (d.TITLE LIKE '$val%') AND (d.IS_VERNAC = 'Yes') AND ($warunek) GROUP BY a.ID_JOUR"; //echo "
$q
\n"; $query_ilosc= mysql_query($q) or die ("$q
\n" . mysql_error()); $ilosc = mysql_num_rows($query_ilosc); if ($ilosc == 0) { unset($tab[$key]); } } reset ($tab); $tab[] = 'ALL'; $liczba_el = count($tab); while (list ($key, $val) = each ($tab)) { if($tab[$key] == $litera) { print("$tab[$key]   "); } else { print("$tab[$key]   "); } } print("
"); } function title_modules() { echo ":: Journal List ::"; } include("header.php"); echo"
"; print("
"); print("
"); echo"
$nazwabiura - Journals List
"; print("
"); lista_liter($litera,$skok); print("
"); print("
"); echo"
"; next_prev($litera, $start, $skok); echo"
"; //print("
"); //show($litera, $skok); print("
"); echo"
"; print("
"); print("
"); naglowek_tabeli(); cialo_tabeli($litera, $start, $skok); print("
"); print("
"); print("
"); echo"
"; next_prev($litera, $start, $skok); echo"
"; //print("
"); //show($litera, $skok); print("
"); echo"
"; print("
"); include("stopka.php"); echo"
";