<page func=InfoCon title="Buchhaltung">
<?
+ function dig ($dbh, $table, $id)
+ {
+ $query = sprintf ("SELECT date,description,price FROM %s WHERE nr = %d",
+ $table, $id);
+ $sth = pg_exec ($dbh, $query);
+
+ if (pg_NumRows ($sth) > 0) {
+ $row = pg_fetch_array ($sth, 0);
+
+ $cur = "€";
+ if ($table == "sales_dm") {
+ $cur = "DM";
+ }
+ $date = substr ($row['date'],6,2) . "." . substr ($row['date'],4,2) . "." . substr ($row['date'],0,4);
+ return sprintf ("<br>#%d: %s %s (%.2f %s)",
+ $id, $date, $row['description'], $row['price'], $cur);
+ }
+ return '';
+ }
+
$dbh = pg_pconnect ("<dbhost>", "<dbport>", "<dbname>")
or die("Unable to connect to SQL server");
+ $query = "SELECT nr FROM sales_dm WHERE paid=0";
+ $sth = pg_exec ($dbh, $query);
+
+ # Collect all to be paid entries
+ #
+ <protect>for ($nr=0; $nr <pg_NumRows ($sth); $nr++) {</protect>
+ $row = pg_fetch_array ($sth, $nr);
+
+ $v = sprintf ("pay_dm_%d", $row['nr']);
+ if (${$v}) {
+ $paydm[] = $row['nr'];
+ }
+ }
+
$query = "SELECT nr FROM sales WHERE paid=0";
$sth = pg_exec ($dbh, $query);
# Collect all to be paid entries
#
- for ($nr=0; $nr <pg_NumRows ($sth); $nr++) {
+ <protect>for ($nr=0; $nr <pg_NumRows ($sth); $nr++) {</protect>
$row = pg_fetch_array ($sth, $nr);
$v = sprintf ("pay_%d", $row['nr']);
}
# Now pay them
- if (count ($pay)>0) {
+ if (count ($paydm)>0) {
echo ("Folgende Buchungen werden bezahlt:<p>");
+ for ($i=0; $i < count ($paydm); $i++) {
+ $query = sprintf ("UPDATE sales_dm SET paid=1 WHERE nr = %d", $paydm[$i]);
+
+ echo (dig ($dbh, "sales_dm", $paydm[$i]));
+ $sth = pg_exec ($dbh, $query);
+ }
+ }
+
+ if (count ($pay) > 0) {
+ if (count ($pay) == 0) {
+ echo ("Folgende Buchungen werden bezahlt:<p>");
+ }
for ($i=0; $i < count ($pay); $i++) {
$query = sprintf ("UPDATE sales SET paid=1 WHERE nr = %d", $pay[$i]);
- // printf ("%s<br>", $query);
+ echo (dig ($dbh, "sales", $pay[$i]));
$sth = pg_exec ($dbh, $query);
}
}
# Local variables:
# mode: text
# mode: auto-fill
-# mode: iso-accents
# end: