/[health_html]/inc/pgLibrary.php
This is repository of my old source code which isn't updated any more. Go to git.rot13.org for current projects!
ViewVC logotype

Diff of /inc/pgLibrary.php

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.4 by ravilov, Fri Aug 10 13:59:06 2001 UTC revision 1.5 by ravilov, Fri Aug 17 07:16:58 2001 UTC
# Line 10  Line 10 
10          );          );
11          list($srch, $qry, $qry_2) = Search($fields,          list($srch, $qry, $qry_2) = Search($fields,
12                  array("inn", "proizvodjac", "name"), array("atk", "hzzo"));                  array("inn", "proizvodjac", "name"), array("atk", "hzzo"));
13          $tpl->assign("index", $index ? true : false);          $tpl->assign("index", $index);
14          $tpl->assign("srch", ($qry || $qry_2) ? true : false);          $tpl->assign("srch", ($qry || $qry_2) ? true : false);
15          $tpl->assign("SEARCH", $srch);          $tpl->assign("SEARCH", $srch);
16          if ($index || ($qry || $qry_2)) {          if ($index || ($qry || $qry_2)) {
17                  $sql = "SELECT DISTINCT lijekovi.sif_inn, UPPER(SUBSTRING(lijekovi.naziv FROM 1 FOR 1)) AS prvo_slovo, lijekovi.naziv, proizvodjaci.naziv, generici.naziv FROM lijekovi, generici, proizvodjaci WHERE (lijekovi.sif_proizvodjac = proizvodjaci.proiz_id) AND (lijekovi.sif_inn = generici.generik_id)";                  $prvo_slovo = "UPPER(SUBSTRING(lijekovi.naziv FROM 1 FOR 1))";
18                    $sql = "SELECT DISTINCT lijekovi.sif_inn, $prvo_slovo AS prvo_slovo, lijekovi.naziv, proizvodjaci.naziv, generici.naziv FROM lijekovi, generici, proizvodjaci WHERE (lijekovi.sif_proizvodjac = proizvodjaci.proiz_id) AND (lijekovi.sif_inn = generici.generik_id)";
19                    if ($index != 1) $sql .= " AND ($prvo_slovo = '".strtoupper($index)."')";
20                  if ($qry) $sql .= " AND ($qry)";                  if ($qry) $sql .= " AND ($qry)";
21                  $sql .= " ORDER BY prvo_slovo, lijekovi.naziv";                  $sql .= " ORDER BY prvo_slovo, lijekovi.naziv";
 #echo "<TT><B>[SQL]</B> $sql</TT><BR>\n";  
22                  $sth = $dbh->prepare($sql);                  $sth = $dbh->prepare($sql);
23                  if (!$sth) error("Cannot prepare query: \"$sql\"");                  if (!$sth) error("Cannot prepare query: \"$sql\"");
24                  if (!$sth->execute()) error("Cannot execute query: \"$sql\"");                  if (!$sth->execute()) error("Cannot execute query: \"$sql\"");
# Line 38  Line 39 
39                          $sql = "SELECT nacin_izdavanja, pakovanje, lijekovi.sif_atk || lijekovi.sif_atk_ostalo, cijena_orig FROM lijekovi WHERE (lijekovi.sif_inn = $inn) AND (atc.atc_id = lijekovi.sif_atk) AND (lijekovi.naziv = '$naziv')";                          $sql = "SELECT nacin_izdavanja, pakovanje, lijekovi.sif_atk || lijekovi.sif_atk_ostalo, cijena_orig FROM lijekovi WHERE (lijekovi.sif_inn = $inn) AND (atc.atc_id = lijekovi.sif_atk) AND (lijekovi.naziv = '$naziv')";
40                          if ($qry_2) $sql .= " AND ($qry_2)";                          if ($qry_2) $sql .= " AND ($qry_2)";
41                          $sql .= " ORDER BY pakovanje";                          $sql .= " ORDER BY pakovanje";
 #echo "<TT><B>[SQL]</B> $sql</TT><BR>\n";  
42                          $sth2 = $dbh->prepare($sql);                          $sth2 = $dbh->prepare($sql);
43                          if (!$sth2) error("Cannot prepare query: \"$sql\"");                          if (!$sth2) error("Cannot prepare query: \"$sql\"");
44                          if (!$sth2->execute()) error("Cannot execute query: \"$sql\"");                          if (!$sth2->execute()) error("Cannot execute query: \"$sql\"");
# Line 71  Line 71 
71                  $tpl->assign("records", $records);                  $tpl->assign("records", $records);
72                  $tpl->assign("slova", $slova);                  $tpl->assign("slova", $slova);
73          }          }
74            $tpl->assign("letters", array("A", "B", "C", "D", "E", "F", "G",
75                    "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S",
76                    "T", "U", "V", "W", "X", "Y", "Z"));
77          $tpl->assign("isedit", isEdit());          $tpl->assign("isedit", isEdit());
78          $dbh->disconnect();          $dbh->disconnect();
79  ?>  ?>
Legend:
Removed from v.1.4  
changed lines
  Added in v.1.5
  ViewVC Help
Powered by ViewVC 1.1.26