Location: PHPKode > projects > Web(b)h FiBu fuer deutsches Steuerrecht > webh/sachkonten.php
<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>
Return current item: Web(b)h FiBu fuer deutsches Steuerrecht