<html>
<head>
<? $mandant=$_COOKIE["mandant"];
$username=$_COOKIE["username"];
?>
<title>Anlage und Verwaltung von Sachkonten für Mandant <? echo$mandant; ?></title>
<link rel="stylesheet" type="text/css" href="styles.css">
<?
require"kopf.php";
include"funktionen.php";
?>
</head>
<body>
<form type="POST" action="sachkonten.php">
<a href="stammdaten.php">Zurück zum Stammdatenmenü</a>
<table>
<tr><td>Kontenliste aufrufen</td><td><a href="sachkonten.php?liste=1">Go!</a>
</td></tr>
<tr><td>Kontonummer eingeben</td><td><input type="TEXT" name="konto" value="<? echo$konto; ?>" <? if($konto<>"") echo("readonly"); ?>></td>
</tr>
</table>
<hr>
<?
#Kontenliste
if($liste==1)
{
require"connect.php";
$q_liste="SELECT * FROM konten WHERE kt_manr =" . $mandant . " and kt_art <>'P' order by kt_konto;";
$r_q_liste=mysql_query($q_liste);
#echo$q_liste;
$anz_konten=mysql_num_rows($r_q_liste);
echo("<table border=\"1\">");
echo("<tr><td>Kto-Nr.</td>");
echo(" <td>Bezeichnung</td>");
echo(" <td>KtoArt</td>");
echo(" <td>UStKz</td>");
echo(" <td>UStKt</td>");
echo(" <td>UstPr</td>");
echo(" <td>UStZeile</td>");
echo(" <td>Vortrag</td>");
echo(" <td></td></tr>");
for($i;$i<$anz_konten;$i++)
{
$k_ds=mysql_fetch_row($r_q_liste);
echo("<tr><td>" . $k_ds[1] . "</td>");
echo(" <td>" . $k_ds[2] . "</td>");
echo(" <td>" . $k_ds[3] . "</td>");
echo(" <td>" . $k_ds[4] . "</td>");
echo(" <td>" . $k_ds[5] . "</td>");
echo(" <td align=\"right\">" . number_format($k_ds[6],2,",",".") . "</td>");
echo(" <td>" . $k_ds[7] . "</td>");
echo(" <td align=\"right\">" . number_format($k_ds[8],2,",",".") . "</td>");
echo(" <td><a href=\"sachkonten.php?konto=" . $k_ds[1] . "\">Ändern</a></td></tr>");
}
die("</table>Ende der Liste");
}
# Rausfinden, ob Neuanlage
if($konto<>"")
{
require"connect.php";
$q_ktoda="SELECT * FROM konten where kt_manr = " . $mandant . " and kt_konto = " . $konto . ";";
$r_q_ktoda=mysql_query($q_ktoda);
#echo$q_ktoda;
$neuanlage=mysql_num_rows($r_q_ktoda);
#echo$neuanlage;
}
if($neuanlage==1)
{
# Kontnänderung
require"connect.php";
$q_kontolesen="SELECT * FROM konten where kt_manr = " . $mandant . " and kt_konto = " . $konto . ";";
$r_q_kontolesen=mysql_query($q_kontolesen);
$ds=mysql_fetch_row($r_q_kontolesen);
$hilf=$ds;
if($bez<>"" and $ktoart<>"" and ($hilf[2]<>$bez or $hilf[3]<>$ktoart or $hilf[4]<>$ustkz or $hilf[5]<>$ustktoart or number_format($hilf[6],2,",",".")<>$ustpr or $hilf[7]<>$ustzeile or number_format($hilf[8],2,",",".")<>$vortrag)) $update="1";
#echo$update;
if($update<>"1")
{
$bez=$ds[2];
$ktoart=$ds[3];
$ustkz=$ds[4];
$ustktoart=$ds[5];
$ustpr=$ds[6];
$ustzeile=$ds[7];
$vortrag=$ds[8];
echo("<table>");
echo("<tr><td>Bezeichnung</td><td><input type=\"TEXT\" name=\"bez\" value=\"" . $bez . "\"></td></tr>");
echo("<tr><td>Konto Art</td><td><input type=\"TEXT\" name=\"ktoart\" value=\"" . $ktoart . "\"></td></tr>");
echo("<tr><td>Umsatzsteuer-Kennzeichen</td><td><input type=\"TEXT\" name=\"ustkz\" value=\"" . $ustkz . "\"></td></tr>");
echo("<tr><td>Umsatzsteuer-Kontoart</td><td><input type=\"TEXT\" name=\"ustktoart\" value=\"" . $ustktoart . "\"></td></tr>");
echo("<tr><td>Umsatzsteuer-Satz</td><td><input type=\"TEXT\" name=\"ustpr\" value=\"" . number_format($ustpr,2,",",".") . "\" size=\"5\" align=\"right\"></td></tr>");
echo("<tr><td>Umsatzsteuer-Zeile VA</td><td><input type=\"TEXT\" name=\"ustzeile\" value=\"" . $ustzeile . "\"></td></tr>");
echo("<tr><td>Vortrag vor 1. Gesch.jahr</td><td><input type=\"TEXT\" name=\"vortrag\" value=\"" . number_format($vortrag,2,",",".") . "\" align=\"right\"></td></tr>");
echo("</table>");
echo("<input type=\"SUBMIT\" value=\"Speichern\">");
}
else
{
if($bez=="") $bezfehler="Pflichtfeld";
if($ktoart<>"B" and $ktoart<>"G") $artfehler="Nur B oder G für Bilanz- oder GuV-Konto";
if($ustkz<>"" and $ustkz<>"V" and $ustkz<>"U") $ustkzfehler="Ein Konto ist für VSt oder USt-Rechnung oder ohne Steuer (U,V,leer)";
if($ustpr=="") $ustpr=0;
if($ustpr<>0 and $ustkz=="" and $ustktoart=="") $ustprfehler="Ein Prozentsatz bedingt ein steuerrelevantes Konto";
if($ustktoart<>"" and $ustktoart <>"U" and $ustktoart <>"V") $ustktoartfehler="Ein Steuerkonto kann nur ein U msatzsteuer- oder V orsteuerkonto sein";
if($ustktoart<>"" and $ustktoart <>"U" and $ustktoart <>"V" and $ustkz<>"") $ustktoartfehler="Entweder ein steuerrelevantes oder ein Steuerkonto, nicht beides!";
if($ustzeile<>"" and $ustktoart=="" and $ustkz=="") $ustzeilefehler="Eine Ust-Schemazeile ohne Steuerrelevanzeinstellungen ist unsinnig";
if(number_format($hilf[6],2,",",".")<>$ustpr and $ustktoart<>"") $ustprfehler="Der USt-Prozentsatz darf nicht geändert werden";
if(number_format($hilf[6],2,",",".")<>$ustpr and $ustzeile<>"") $ustprfehler="Der USt-Prozentsatz darf nicht geändert werden";
#echo$hilf[6] . $ustpr;
if($hilf[5]<>$ustktoart) $ustktoartfehler="Ein Steuerkonto darf nicht geändert werden";
echo("<table>");
echo("<tr><td>Bezeichnung</td><td><input type=\"TEXT\" name=\"bez\" value=\"" . $bez . "\"></td>");
echo("<td>" . $bezfehler . "</td></tr>");
echo("<tr><td>Konto Art</td><td><input type=\"TEXT\" name=\"ktoart\" value=\"" . $ktoart . "\"></td>");
echo("<td>" . $artfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Kennzeichen</td><td><input type=\"TEXT\" name=\"ustkz\" value=\"" . $ustkz . "\"></td>");
echo("<td>" . $ustkzfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Kontoart</td><td><input type=\"TEXT\" name=\"ustktoart\" value=\"" . $ustktoart . "\"></td>");
echo("<td>" . $ustktoartfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Satz</td><td><input type=\"TEXT\" name=\"ustpr\" value=\"" . number_format($ustpr,2,",",".") . "\" size=\"5\" align=\"right\"></td>");
echo("<td>" . $ustprfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Zeile VA</td><td><input type=\"TEXT\" name=\"ustzeile\" value=\"" . $ustzeile . "\"></td>");
echo("<td>" . $ustzeilefehler . "</td></tr>");
echo("<tr><td>Vortrag vor 1. Gesch.jahr</td><td><input type=\"TEXT\" name=\"vortrag\" value=\"" . number_format($vortrag,2,",",".") . "\" align=\"right\"></td>");
echo("</table>");
echo("<input type=\"SUBMIT\" value=\"Speichern\">");
if($bezfehler=="" and $artfehler=="" and $ustkzfehler=="" and $ustprfehler=="" and $ustktoartfehler=="" and $ustzeilefehler=="")
{
if($ustzeile=="") $ustzeile="NULL";
$q_update="UPDATE konten set kt_bezeichnung='" . $bez . "', kt_art = '" . $ktoart . "', kt_ustzeile = " . $ustzeile . ", kt_vortrag = " . number_format($vortrag,2,".",",");
$q_update=$q_update . ", kt_ustkz = '" . $ustkz . "', kt_ustpr = " . number_format($ustpr,2,".",",") . " WHERE kt_manr = " . $mandant . " and kt_konto = " . $konto . ";";
#echo$q_update;
$r_q_update=mysql_query($q_update);
echo("<br>Konto geändert");
}
}
}
if($neuanlage==0)
{
#Neuanlage
if($bez=="") $bezfehler="Pflichtfeld";
if($ktoart<>"B" and $ktoart<>"G") $artfehler="Nur B oder G für Bilanz- oder GuV-Konto";
if($ustkz<>"" and $ustkz<>"V" and $ustkz<>"U") $ustkzfehler="Ein Konto ist für VSt oder USt-Rechnung oder ohne Steuer (U,V,leer)";
if($ustpr=="") $ustpr=0;
if($ustpr<>0 and $ustkz=="" and $ustktoart=="") $ustprfehler="Ein Prozentsatz bedingt ein steuerrelevantes Konto";
if($ustktoart<>"" and $ustktoart <>"U" and $ustktoart <>"V") $ustktoartfehler="Ein Steuerkonto kann nur ein U msatzsteuer- oder V orsteuerkonto sein";
if($ustktoart<>"" and $ustktoart <>"U" and $ustktoart <>"V" and $ustkz<>"") $ustktoartfehler="Entweder ein steuerrelevantes oder ein Steuerkonto, nicht beides!";
if($ustzeile<>"" and $ustktoart=="" and $ustkz=="") $ustzeilefehler="Eine Ust-Schemazeile ohne Steuerrelevanzeinstellungen ist unsinnig";
if($ustzeile=="" and $ustktoart<>"" and $ustpr<>0) $ustzeilefehler="Ein Steuerkonto benötigt auch eine Umsatzsteuer-Schemazeile";
echo("<table>");
echo("<tr><td>Bezeichnung</td><td><input type=\"TEXT\" name=\"bez\" value=\"" . $bez . "\"></td>");
echo("<td>" . $bezfehler . "</td></tr>");
echo("<tr><td>Konto Art</td><td><input type=\"TEXT\" name=\"ktoart\" value=\"" . $ktoart . "\"></td>");
echo("<td>" . $artfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Kennzeichen</td><td><input type=\"TEXT\" name=\"ustkz\" value=\"" . $ustkz . "\"></td>");
echo("<td>" . $ustkzfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Kontoart</td><td><input type=\"TEXT\" name=\"ustktoart\" value=\"" . $ustktoart . "\"></td>");
echo("<td>" . $ustktoartfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Satz</td><td><input type=\"TEXT\" name=\"ustpr\" value=\"" . number_format($ustpr,2,",",".") . "\" size=\"5\" align=\"right\"></td>");
echo("<td>" . $ustprfehler . "</td></tr>");
echo("<tr><td>Umsatzsteuer-Zeile VA</td><td><input type=\"TEXT\" name=\"ustzeile\" value=\"" . $ustzeile . "\"></td>");
echo("<td>" . $ustzeilefehler . "</td></tr>");
echo("<tr><td>Vortrag vor 1. Gesch.jahr</td><td><input type=\"TEXT\" name=\"vortrag\" value=\"" . number_format($vortrag,2,",",".") . "\" align=\"right\"></td>");
echo("</table>");
echo("<input type=\"SUBMIT\" value=\"Speichern\">");
if($bezfehler=="" and $artfehler=="" and $ustkzfehler=="" and $ustprfehler=="" and $ustktoartfehler=="" and $ustzeilefehler=="")
{
#Insert des neuen Kontos
if($ustzeile=="") $ustzeile="NULL";
require"connect.php";
$q_insert="INSERT into konten (kt_manr, kt_konto, kt_bezeichnung, kt_art, kt_ustkz, kt_ustktoart, kt_ustpr, kt_vortrag, kt_ustzeile)";
$q_insert=$q_insert . " values( " . $mandant . ", " . $konto . ", '" . $bez . "', '" . $ktoart . "', '" . $ustkz . "', ";
$q_insert=$q_insert . "'" . $ustktoart . "', " . number_format($ustpr,2,".",",") . ", " . number_format($vortrag,2,".",",") . "," . $ustzeile ." );";
#echo$q_insert;
$r_q_insert=mysql_query($q_insert);
echo("<br>Konto gespeichert");
}
}
?>
</body>
</html>