/[health_html]/inc/pgKnjiznica-lijekovi.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/pgKnjiznica-lijekovi.php

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

revision 1.1 by ravilov, Thu Aug 30 16:35:36 2001 UTC revision 1.4 by ravilov, Tue Sep 25 15:38:04 2001 UTC
# Line 1  Line 1 
1  <?php  <?php
2          include_once("inc/conn.php");          include("inc/conn.php");
3          include_once("inc/search.php");          include_once("inc/search.php");
4          $fields = array(          $fields = array(
5                  "atk" => array("dbname" => "lijekovi.sif_atk || lijekovi.sif_atk_ostalo", "caption" => "ATK"),                  "atk" => array("dbname" => "lijekovi.sif_atk || lijekovi.sif_atk_ostalo", "caption" => "ATK"),
# Line 15  Line 15 
15          $tpl->assign("index", $index);          $tpl->assign("index", $index);
16          $tpl->assign("srch", ($qry_1 || $qry_2) ? true : false);          $tpl->assign("srch", ($qry_1 || $qry_2) ? true : false);
17          $tpl->assign("SEARCH", $srch);          $tpl->assign("SEARCH", $srch);
18            $recepti = array();
19            $sql = "SELECT oznaka, opis FROM recept";
20            $sth = $dbh->prepare($sql);
21            if (!$sth) error("Cannot prepare query: \"$sql\"");
22            if (!$sth->execute()) error("Cannot execute query: \"$sql\"");
23            while ($row = $sth->fetchrow_array()) $recepti[$row[0]] = MyEscape($row[1]);
24            $sth->finish();
25          $letters = Slova();          $letters = Slova();
26          if ($index || ($qry_1 || $qry_2)) {          if ($index || ($qry_1 || $qry_2)) {
27                  $prvo_slovo = "UPPER(SUBSTRING(lijekovi.naziv FROM 1 FOR 1))";                  $prvo_slovo = "UPPER(SUBSTRING(lijekovi.naziv FROM 1 FOR 1))";
28                  $sql = "SELECT DISTINCT lijekovi.sif_inn, $prvo_slovo AS prvo_slovo, lijekovi.naziv, proizvodjaci.naziv, generici.naziv, lijekovi.sif_atk, atc.opis FROM lijekovi, generici, proizvodjaci, atc WHERE (lijekovi.sif_proizvodjac = proizvodjaci.proiz_id) AND (lijekovi.sif_inn = generici.generik_id) AND (lijekovi.sif_atk = atc.atc_id)";                  $sql = "SELECT DISTINCT lijekovi.sif_inn, $prvo_slovo AS prvo_slovo, lijekovi.naziv, proizvodjaci.naziv, generici.naziv, lijekovi.sif_atk, atc.opis FROM lijekovi, generici, proizvodjaci, atc WHERE (lijekovi.sif_proizvodjac = proizvodjaci.proiz_id) AND (lijekovi.sif_inn = generici.generik_id) AND (lijekovi.sif_atk = atc.atc_id)";
29                  if ($index && $index != 1) {                  if ($index && $index != 1) {
30                          if ($index == '@') for ($i = 0; $i < count($letters); $i++) $sql .= " AND ($prvo_slovo <> '".$letters[$i]."')";                          if ($index == '@') for ($i = 0; $i < count($letters); $i++) $sql .= " AND ($prvo_slovo <> '".$letters[$i]."')";
31                                  else $sql .= " AND ($prvo_slovo = '".strtoupper($index)."')";                                  else $sql .= " AND ($prvo_slovo = '".MyUpper($index)."')";
32                  }                  }
33                  if ($qry_1) $sql .= " AND ($qry_1)";                  if ($qry_1) $sql .= " AND ($qry_1)";
34                  $sql .= " ORDER BY prvo_slovo, lijekovi.naziv";                  $sql .= " ORDER BY prvo_slovo, lijekovi.naziv";
# Line 33  Line 40 
40                  unset($staro_slovo);                  unset($staro_slovo);
41                  while ($row = $sth->fetchrow_array()) {                  while ($row = $sth->fetchrow_array()) {
42                          list($inn, $fl, $naziv, $proizv, $generik, $atk, $grupa) = $row;                          list($inn, $fl, $naziv, $proizv, $generik, $atk, $grupa) = $row;
43                          $proizv = strtoupper($proizv); $proizv = strtr($proizv, "¹ðèæ¾", "©ÐÈÆ®");                          $proizv = MyUpper($proizv);
44                          if (!isset($staro_slovo)) $staro_slovo = $fl;                          if (!isset($staro_slovo)) $staro_slovo = $fl;
45                          if (!($qry_1 || $qry_2) && $staro_slovo != $fl) {                          if (!($qry_1 || $qry_2) && $staro_slovo != $fl) {
46                                  array_push($slova, array("l" => $staro_slovo, "lijekovi" => $lijekovi));                                  array_push($slova, array("l" => $staro_slovo, "lijekovi" => $lijekovi));
# Line 51  Line 58 
58                                  list($recept, $pakovanje, $atc, $atc2, $cijena) = $row2;                                  list($recept, $pakovanje, $atc, $atc2, $cijena) = $row2;
59                                  array_push($oblici, array(                                  array_push($oblici, array(
60                                          "hzzo" => $recept,                                          "hzzo" => $recept,
61                                            "hzzo2" => $recepti[$recept],
62                                          "pakovanje" => MyEscape($pakovanje),                                          "pakovanje" => MyEscape($pakovanje),
63                                          "atk" => $atc.$atc2,                                          "atk" => $atc.$atc2,
64                                          "cijena" => $cijena                                          "cijena" => $cijena
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.4
  ViewVC Help
Powered by ViewVC 1.1.26