- &edit_form;
- $lxdebug->leave_sub();
-}
-
-sub show_fa_daten {
- $lxdebug->enter_sub();
- my $readonly = $_;
- my $oeffnungszeiten = $form->{FA_Oeffnungszeiten};
- $oeffnungszeiten =~ s/\\\\n/\n/g;
- print qq| <br>
- <fieldset>
- <legend>
- <font size="+1">|
- . $locale->text('Finanzamt') . qq| $form->{FA_Name}</font>
- </legend>
- |;
-
- #print qq|\n<h4>$form->{FA_Ergaenzung_Name} </h4>
- # | if ( $form->{FA_Ergaenzung_Name} );
- print qq|
- <table width="100%" valign="top">
- <tr>
- <td valign="top">
- <br>
- <fieldset>
- <legend>
- <b>| . $locale->text('Address') . qq|</b>
- </legend>
-
- <table width="100%">
- <tr>
- <td>
- | . $locale->text('Finanzamt') . qq|
- </td>
- </tr>
- <tr>
- <td colspan="2">
- <input name="FA_Name" size="40" title="FA_Name" value="$form->{FA_Name}" $readonly>
- <td>
- </tr>
- <tr>
- <td colspan="2">
- <input name="FA_Strasse" size="40" title="FA_Strasse" value="$form->{FA_Strasse}" $readonly>
- </td width="100%">
- </tr>
- <tr>
- <td width="116px">
- <input name="FA_PLZ" size="10" title="FA_PLZ" value="$form->{FA_PLZ}" $readonly>
- </td>
- <td>
- <input name="FA_Ort" size="20" title="FA_Ort" value="$form->{FA_Ort}" $readonly>
- </td>
- </tr>
- </table>
- </fieldset>
- <br>
- <fieldset>
- <legend>
- <b>| . $locale->text('Kontakt') . qq|</b>
- </legend>
- | . $locale->text('Telefon') . qq|<br>
- <input name="FA_Telefon" size="40" title="FA_Telefon" value="$form->{FA_Telefon}" $readonly>
- <br>
- <br>
- | . $locale->text('Fax') . qq|<br>
- <input name="FA_Fax" size="40" title="FA_Fax" value="$form->{FA_Fax}" $readonly>
- <br>
- <br>
- | . $locale->text('Internet') . qq|<br>
- <input name="FA_Email" size="40" title="FA_Email" value="$form->{FA_Email}" $readonly>
- <br>
- <br>
- <input name="FA_Internet" size="40" title="" title="FA_Internet" value="$form->{FA_Internet}" $readonly>
- <br>
- </fieldset>
- </td>
- <td valign="top">
- <br>
- <fieldset>
- <legend>
- <b>| . $locale->text('Öffnungszeiten') . qq|</b>
- </legend>
- <textarea name="FA_Oeffnungszeiten" rows="4" cols="40" $readonly>$oeffnungszeiten</textarea>
- </fieldset>
- <br>
- |;
- my $FA_1 =
- ( $form->{FA_BLZ_1} ne ''
- && $form->{FA_Kontonummer_1} ne ''
- && $form->{FA_Bankbezeichnung_1} ne '');
- my $FA_2 =
- ( $form->{FA_BLZ_2} ne ''
- && $form->{FA_Kontonummer_2} ne ''
- && $form->{FA_Bankbezeichnung_oertlich} ne '');
-
- if ($FA_1 && $FA_2) {
- print qq|
- <fieldset>
- <legend>
- <b>|
- . $locale->text('Bankverbindungen des Finanzamts') . qq|</b>
- <legend>
- <table>
- <tr>
- <td>
- | . $locale->text('Kreditinstitut') . qq|
- <br>
- <input name="FA_Bankbezeichnung_1" size="30" value="$form->{FA_Bankbezeichnung_1}" $readonly>
- <br>
- <br>
- | . $locale->text('Kontonummer') . qq|
- <br>
- <input name="FA_Kontonummer_1" size="15" value="$form->{FA_Kontonummer_1}" $readonly>
- <br>
- <br>
- | . $locale->text('Bankleitzahl') . qq|
- <br>
- <input name="FA_BLZ_1" size="15" value="$form->{FA_BLZ_1}" $readonly>
- </td>
- <td>
- | . $locale->text('Kreditinstitut') . qq|
- <br>
- <input name="FA_Bankbezeichnung_oertlich" size="30" value="$form->{FA_Bankbezeichnung_oertlich}" $readonly>
- <br>
- <br>
- | . $locale->text('Kontonummer') . qq|
- <br>
- <input name="FA_Kontonummer_2" size="15" value="$form->{FA_Kontonummer_2}" $readonly>
- <br>
- <br>
- | . $locale->text('Bankleitzahl') . qq|
- <br>
- <input name="FA_BLZ_2" size="15" value="$form->{FA_BLZ_2}" $readonly>
- </td>
- </tr>
- </table>
- </fieldset>
- |;
- } elsif ($FA_1) {
- print qq|
- <fieldset>
- <legend>
- <b>|
- . $locale->text('Bankverbindung des Finanzamts') . qq|</b>
- <legend>
- | . $locale->text('Kontonummer') . qq|
- <br>
- <input name="FA_Kontonummer_1" size="30" value="$form->{FA_Kontonummer_1}" $readonly>
- <br>
- <br>
- | . $locale->text('Bankleitzahl (BLZ)') . qq|
- <br>
- <input name="FA_BLZ_1" size="15" value="$form->{FA_BLZ_1}" $readonly>
- <br>
- <br>
- | . $locale->text('Kreditinstitut') . qq|
- <br>
- <input name="FA_Bankbezeichnung_1" size="15" value="$form->{FA_Bankbezeichnung_1}" $readonly>
- <br>
- </fieldset>
- |;
- } else {
- print qq|
- <fieldset>
- <legend>
- <b>|
- . $locale->text('Bankverbindung des Finanzamts') . qq|</b>
- <legend>
- | . $locale->text('Kontonummer') . qq|
- <br>
- <input name="FA_Kontonummer_2" size="30" value="$form->{FA_Kontonummer_2}" $readonly>
- <br>
- <br>
- | . $locale->text('Bankleitzahl (BLZ)') . qq|
- <br>
- <input name="FA_BLZ_2" size="15" value="$form->{FA_BLZ_2}" $readonly>
- <br>
- <br>
- | . $locale->text('Kreditinstitut') . qq|
- <br>
- <input name="FA_Bankbezeichnung_oertlich" size="15" value="$form->{FA_Bankbezeichnung_oertlich}" $readonly>
- </fieldset>
- |;
- }
- print qq|
- </td>
- </tr>
- </table>
- </fieldset>
- |;
- $lxdebug->leave_sub();