Use new object-oriented backend

[infodrom.org/service.infodrom.org] / src / InfoCon / account / account.inc

diff --git a/src/InfoCon/account/account.inc b/src/InfoCon/account/account.inc
index f69d473..f449955 100644 (file)
--- a/src/InfoCon/account/account.inc
+++ b/src/InfoCon/account/account.inc
@@ -1,20 +1,9 @@
+<future>
 <?
-  $dbh = pg_pconnect ("<dbhost>", "<dbport>", "<dbname>")
-        or die("Unable to connect to SQL server");
-
   $ktoname = '';
-  if (isset($_REQUEST[blzkto])) {
-    $query = sprintf ("SELECT name FROM account_names WHERE blz_kto = '%s'",
-                     $_REQUEST[blzkto]);
-    $sth = pg_exec ($dbh, $query);
-
-    $both = explode (":", $_REQUEST[blzkto]);
-    if (pg_NumRows ($sth) > 0) {
-      $row = pg_fetch_array ($sth, 0);
-      $ktoname = sprintf ("%s (BLZ %s, Konto %s)", $row['name'], $both[0], $both[1]);
-    } else {
-      $ktoname = sprintf ("BLZ %s, Konto %s", $both[0], $both[1]);
-    }
+  if (isset($_REQUEST['blzkto'])) {
+    $account = new AccountName($_REQUEST['blzkto']);
+    $ktoname = $account->name();
   }
 ?>
 
@@ -23,49 +12,3 @@
 <h3 class=bar><?=$ktoname?></font></h3>
 
 </define-tag>
-
-<define-tag account_overview>
-<?
-  function account_names ($dbh, $display, $currency)
-  {
-    if ($currency == "eur")
-      $table = "account";
-    else
-      $table = "account_dm";
-
-    $query = "SELECT DISTINCT $table.blz_kto,name "
-            ."FROM $table,account_names "
-            ."WHERE $table.blz_kto = account_names.blz_kto "
-           ."$display "
-           ."ORDER BY name";
-    $sth = pg_exec ($dbh, $query) or die("Datenbank-Abfrage!");
-
-    $ret = array();
-    for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
-      $row = pg_fetch_array ($sth, $nr);
-      $ret[$row['blz_kto']] = $row['name'];
-    }
-    return $ret;
-  }
-
-  function stand ($dbh,$blzkto,$currency)
-  {
-    if ($currency == "dm") {
-      $query = "SELECT value_dm FROM account_dm WHERE blz_kto='$blzkto'";
-    } elseif ($currency == "eur") {
-      $query = "SELECT value_eur FROM account WHERE blz_kto='$blzkto'";
-    } else {
-      # Alert: unknown currency
-      $query = '';
-    }
-    $sth = pg_exec ($dbh, $query) or die("Datenbank-Abfrage!");
-
-    $sum = 0.0;
-    for ($nr=0; $nr < pg_NumRows ($sth); $nr++) {
-      $row = pg_fetch_array ($sth, $nr);
-      $sum += $row[0];
-    }
-    return $sum;
-  }
-?>
-</define-tag>