Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 6fc9c2bb

Von Sven Schöling vor etwa 13 Jahren hinzugefügt

  • ID 6fc9c2bb4cef43404a86d3922295d2341e8c377c
  • Vorgänger e502a439
  • Nachfolger 07ff3cb3

datev -> template

Unterschiede anzeigen:

bin/mozilla/datev.pl
42 42
sub continue { call_sub($main::form->{"nextsub"}); }
43 43

  
44 44
sub export {
45
  $main::lxdebug->enter_sub();
45
  $::lxdebug->enter_sub;
46
  $::auth->assert('datev_export');
46 47

  
47
  my $form     = $main::form;
48
  my %myconfig = %main::myconfig;
49
  my $locale   = $main::locale;
48
  DATEV->get_datev_stamm(\%::myconfig, $::form);
49
  $::form->header;
50
  print $::form->parse_html_template('datev/export');
50 51

  
51
  $main::auth->assert('datev_export');
52

  
53
  $form->{title} = $locale->text("DATEX - Export Assistent");
54

  
55
  DATEV->get_datev_stamm(\%myconfig, \%$form);
56
  $form->header;
57

  
58
  print qq|
59
<body>
60

  
61
<form method=post action=$form->{script}>
62

  
63

  
64
<table width=100%>
65
  <tr>
66
    <th class=listtop>$form->{title}</th>
67
  </tr>
68
  <tr>
69
    <th align=left>| . $locale->text("DATEV Angaben") . qq|</th>
70
  </tr>
71
  <tr height="5"></tr>
72
  <tr valign=top>
73
    <td>
74
      <table>
75
        <tr>
76
          <td align=left nowrap>| . $locale->text("Beraternummer") . qq|</td>
77
          <td><input name=beraternr size=10 maxlength=7 value="$form->{beraternr}"></td>
78

  
79
          <td align=left nowrap>| . $locale->text("DFV-Kennzeichen") . qq|</td>
80
          <td><input name=dfvkz size=5 maxlength=2 value="$form->{dfvkz}"></td>
81
        </tr>
82
        <tr>
83
          <td align=left nowrap>| . $locale->text("Beratername") . qq|</td>
84
          <td><input name=beratername size=10 maxlength=9 value="$form->{beratername}"></td>
85

  
86
          <td align=left nowrap>| . $locale->text("Password") . qq|</td>
87
          <td><input name=passwort size=5 maxlength=4 value="$form->{passwort}"></td>
88
        </tr>
89
        <tr>
90
          <td align=left nowrap>| . $locale->text("Mandantennummer") . qq|</td>
91
          <td><input name=mandantennr size=10 maxlength=5 value="$form->{mandantennr}"></td>
92

  
93
          <td align=left nowrap>| . $locale->text("Medium Number") . qq|</td>
94
          <td><input name=datentraegernr size=5 maxlength=3 value="$form->{datentraegernr}"></td>
95
        </tr>
96
        <tr>
97
          | . # OBE-Export noch nicht implementiert! <td><input checked name=kne type=checkbox class=checkbox value=1> | . $locale->text("Kontonummernerweiterung (KNE)") . qq|</td>
98
    qq|<td><input type="hidden" name="kne" value="1"></td>
99
          <td></td>
100

  
101
          <td align=left nowrap>| . $locale->text("Abrechnungsnummer") . qq|</td>
102
          <td><input name=abrechnungsnr size=5 maxlength=3 value="$form->{abrechnungsnr}"></td>
103
        </tr>
104

  
105
        <tr>
106
          <td><input name=exporttype type=radio class=radio value=0 checked> |
107
    . $locale->text("Export Buchungsdaten") . qq|</td>
108
          <td></td>
109

  
110
          <td><input name=exporttype type=radio class=radio value=1> |
111
    . $locale->text("Export Stammdaten") . qq|</td>
112
          <td></td>
113
        </td>
114
      </table>
115
    </td>
116
  </tr>
117
  <tr>
118
    <td><hr size=3 noshade></td>
119
  </tr>
120
</table>
121

  
122
<input type=hidden name=nextsub value=export2>
123

  
124
<br>
125
<input type=submit class=submit name=action value="|
126
    . $locale->text('Continue') . qq|">
127
</form>
128

  
129
</body>
130
</html>
131
|;
132
  $main::lxdebug->leave_sub();
52
  $::lxdebug->leave_sub;
133 53
}
134 54

  
135 55
sub export2 {
136
  $main::lxdebug->enter_sub();
137

  
138
  my $form     = $main::form;
56
  $::lxdebug->enter_sub;
57
  $::auth->assert('datev_export');
139 58

  
140
  $main::auth->assert('datev_export');
141

  
142
  if ($form->{exporttype} == 0) {
143
    &export_bewegungsdaten();
59
  if ($::form->{exporttype} == 0) {
60
    export_bewegungsdaten();
144 61
  } else {
145
    &export_stammdaten();
62
    export_stammdaten();
146 63
  }
147
  $main::lxdebug->leave_sub();
64
  $::lxdebug->leave_sub;
148 65
}
149 66

  
150 67
sub export_bewegungsdaten {
151
  $main::lxdebug->enter_sub();
68
  $::lxdebug->enter_sub;
69
  $::auth->assert('datev_export');
152 70

  
153
  my $form     = $main::form;
154
  my %myconfig = %main::myconfig;
155
  my $locale   = $main::locale;
71
  $::form->header;
72
  print $::form->parse_html_template('datev/export_bewegungsdaten');
156 73

  
157
  $main::auth->assert('datev_export');
158

  
159
  $form->{title} = $locale->text("DATEX - Export Assistent");
160

  
161
  $form->{allemonate} =
162
      qq|<option value=1>|
163
    . $locale->text('January')
164
    . qq|</option>
165
                         <option value=2>|
166
    . $locale->text('February') . qq|</option>
167
                         <option value=3>|
168
    . $locale->text('March') . qq|</option>
169
                         <option value=4>|
170
    . $locale->text('April') . qq|</option>
171
                         <option value=5>|
172
    . $locale->text('May') . qq|</option>
173
                         <option value=6>|
174
    . $locale->text('June') . qq|</option>
175
                         <option value=7>|
176
    . $locale->text('July') . qq|</option>
177
                         <option value=8>|
178
    . $locale->text('August') . qq|</option>
179
                         <option value=9>|
180
    . $locale->text('September') . qq|</option>
181
                         <option value=10>|
182
    . $locale->text('October') . qq|</option>
183
                         <option value=11>|
184
    . $locale->text('November') . qq|</option>
185
                         <option value=12>|
186
    . $locale->text('December') . qq|</option>|;
187

  
188
  $form->{allequartale} =
189
      qq|<option selected value=1>|
190
    . $locale->text('I')
191
    . qq|</option>
192
                         <option value=2>| . $locale->text('II') . qq|</option>
193
                         <option value=3>|
194
    . $locale->text('III') . qq|</option>
195
                         <option value=4>|
196
    . $locale->text('IV') . qq|</option>|;
197
  $form->{"jsscript"} = 1;
198
  $form->header;
199

  
200
  print qq|
201
<body>
202

  
203
<form method=post action=$form->{script}>
204

  
205

  
206
<table width=100%>
207
  <tr>
208
    <th class=listtop>$form->{title}</th>
209
  </tr>
210
  <tr>
211
    <th align=left>| . $locale->text("Zeitraum") . qq|</th>
212
  </tr>
213
  <tr height="5"></tr>
214
  <tr valign=top>
215
    <td>
216
      <table>
217
        <tr>
218
          <td align=left><input checked name=zeitraum class=radio type=radio value=monat>&nbsp;</td><td align=left>|
219
    . $locale->text('Monat') . qq|</td>
220
          <td align=left></td>
221
          <td align=left></td>
222
          <td align=left><select name=monat>$form->{allemonate}</select></td>
223
        </tr>
224
        <tr>
225
          <td align=left><input name=zeitraum class=radio type=radio value=quartal>&nbsp;</td><td align=left>|
226
    . $locale->text('Quartal') . qq|</td>
227
          <td align=left></td>
228
          <td align=left></td>
229
          <td align=left><select name=quartal>$form->{allequartale}</select></td>
230
        </tr>
231
        <tr>
232
          <td align=left><input name=zeitraum class=radio type=radio value=zeit>&nbsp;</td><td align=left>|
233
    . $locale->text('Datum von') . qq|</td>
234
          <td align=left><input id=transdatefrom name=transdatefrom size=10>
235
            <input type="button" name="transdatefrom" id="trigger_transdatefrom" value="?"></td>
236
          <td align=left>| . $locale->text('bis') . qq|</td>
237
          <td align=left><input id=transdateto name=transdateto size=10>
238
            <input type="button" name="transdateto" id="trigger_transdateto" value="?"></td>
239
        </tr>
240
      </table>
241
    </td>
242
  </tr>
243
  <tr>
244
    <td><hr size=3 noshade></td>
245
  </tr>
246
</table>
247

  
248
| . $form->write_trigger(\%myconfig, 2,
249
                         "transdatefrom", "BL", "trigger_transdatefrom",
250
                         "transdateto", "BL", "trigger_transdateto") . qq|
251

  
252
<input type=hidden name=beraternr value="$form->{beraternr}">
253
<input type=hidden name=dfvkz value="$form->{dfvkz}">
254
<input type=hidden name=beratername value="$form->{beratername}">
255
<input type=hidden name=passwort value="$form->{passwort}">
256
<input type=hidden name=mandantennr value="$form->{mandantennr}">
257
<input type=hidden name=datentraegernr value="$form->{datentraegernr}">
258
<input type=hidden name=kne value="$form->{kne}">
259
<input type=hidden name=abrechnungsnr value="$form->{abrechnungsnr}">
260

  
261
<input type=hidden name=exporttype value="$form->{exporttype}">
262

  
263
<input type=hidden name=nextsub value=export3>
264

  
265
<br>
266
<input type=submit class=submit name=action value="|
267
    . $locale->text('Continue') . qq|">
268
</form>
269

  
270
</body>
271
</html>
272
|;
273

  
274
  $main::lxdebug->leave_sub();
74
  $::lxdebug->leave_sub;
275 75
}
276 76

  
277 77
sub export_stammdaten {
278
  $main::lxdebug->enter_sub();
78
  $::lxdebug->enter_sub;
79
  $::auth->assert('datev_export');
279 80

  
280
  my $form     = $main::form;
281
  my $locale   = $main::locale;
81
  $::form->header;
82
  print $::form->parse_html_template('datev/export_stammdaten');
282 83

  
283
  $main::auth->assert('datev_export');
284

  
285
  $form->{title} = $locale->text("DATEX - Export Assistent");
286

  
287
  $form->header;
288

  
289
  print qq|
290
<body>
291

  
292
<form method=post action=$form->{script}>
293
<table width=100%>
294
  <tr>
295
    <th class=listtop>$form->{title}</th>
296
  </tr>
297
  <tr>
298
    <th align=left>| . $locale->text("Konten") . qq|</th>
299
  </tr>
300
  <tr height="5"></tr>
301
  <tr valign=top>
302
    <td>
303
      <table>
304
        <tr>
305
          <td align=left>| . $locale->text('Von Konto: ') . qq|</td>
306
          <td align=left><input name=accnofrom size=8 maxlength=8></td>
307
        </tr>
308
        <tr>
309
          <td align=left>| . $locale->text('Bis Konto: ') . qq|</td>
310
          <td align=left><input name=accnoto size=8 maxlength=8></td>
311
        </tr>
312
      </table>
313
    </td>
314
  </tr>
315
  <tr>
316
    <td><hr size=3 noshade></td>
317
  </tr>
318
</table>
319
<input type=hidden name=beraternr value="$form->{beraternr}">
320
<input type=hidden name=dfvkz value="$form->{dfvkz}">
321
<input type=hidden name=beratername value="$form->{beratername}">
322
<input type=hidden name=passwort value="$form->{passwort}">
323
<input type=hidden name=mandantennr value="$form->{mandantennr}">
324
<input type=hidden name=datentraegernr value="$form->{datentraegernr}">
325
<input type=hidden name=kne value="$form->{kne}">
326
<input type=hidden name=abrechnungsnr value="$form->{abrechnungsnr}">
327

  
328
<input type=hidden name=exporttype value="$form->{exporttype}">
329

  
330
<input type=hidden name=nextsub value=export3>
331

  
332
<br>
333
<input type=submit class=submit name=action value="|
334
    . $locale->text('Continue') . qq|">
335
</form>
336

  
337
</body>
338
</html>
339
|;
340

  
341
  $main::lxdebug->leave_sub();
84
  $::lxdebug->leave_sub;
342 85
}
343 86

  
344 87
sub export3 {
templates/webpages/datev/export.html
1
[%- USE T8 %]
2
<body>
3

  
4
<form method=post action='[% script %]'>
5

  
6

  
7
<table width=100%>
8
  <tr>
9
    <th class=listtop>[% 'DATEX - Export Assistent' | $T8 %]</th>
10
  </tr>
11
  <tr>
12
    <th align=left>[% 'DATEV Angaben' | $T8 %]</th>
13
  </tr>
14
  <tr height="5"></tr>
15
  <tr valign=top>
16
    <td>
17
      <table>
18
        <tr>
19
          <td align=left nowrap>[% 'Beraternummer' | $T8 %]</td>
20
          <td><input name=beraternr size=10 maxlength=7 value="[% beraternr %]"></td>
21

  
22
          <td align=left nowrap>[% 'DFV-Kennzeichen' | $T8 %]</td>
23
          <td><input name=dfvkz size=5 maxlength=2 value="[% dfvkz %]"></td>
24
        </tr>
25
        <tr>
26
          <td align=left nowrap>[% 'Beratername' | $T8 %]</td>
27
          <td><input name=beratername size=10 maxlength=9 value="[% beratername %]"></td>
28

  
29
          <td align=left nowrap>[% 'Password' | $T8 %]</td>
30
          <td><input name=passwort size=5 maxlength=4 value="[% passwort %]"></td>
31
        </tr>
32
        <tr>
33
          <td align=left nowrap>[% 'Mandantennummer' | $T8 %]</td>
34
          <td><input name=mandantennr size=10 maxlength=5 value="[% mandantennr %]"></td>
35

  
36
          <td align=left nowrap>[% 'Medium Number' | $T8 %]</td>
37
          <td><input name=datentraegernr size=5 maxlength=3 value="[% datentraegernr %]"></td>
38
        </tr>
39
        <tr>
40
          <td><input type="hidden" name="kne" value="1"></td>
41
          <td></td>
42

  
43
          <td align=left nowrap>[% 'Abrechnungsnummer' | $T8 %]</td>
44
          <td><input name=abrechnungsnr size=5 maxlength=3 value="[% abrechnungsnr %]"></td>
45
        </tr>
46

  
47
        <tr>
48
          <td><input name=exporttype type=radio class=radio value=0 checked> [% 'Export Buchungsdaten' | $T8 %]</td>
49
          <td></td>
50

  
51
          <td><input name=exporttype type=radio class=radio value=1> [% 'Export Stammdaten' | $T8 %]</td>
52
          <td></td>
53
        </td>
54
      </table>
55
    </td>
56
  </tr>
57
  <tr>
58
    <td><hr size=3 noshade></td>
59
  </tr>
60
</table>
61

  
62
<input type=hidden name=nextsub value=export2>
63

  
64
<br>
65
<input type=submit class=submit name=action value="[% 'Continue' | $T8 %]">
66
</form>
67

  
68
</body>
69
</html>
templates/webpages/datev/export_bewegungsdaten.html
1
[%- USE T8 %]
2
[%- USE L %]
3
<body>
4

  
5
<form method=post action="[% script %]">
6

  
7

  
8
<table width=100%>
9
  <tr>
10
    <th class=listtop>[% 'DATEX - Export Assistent' | $T8 %]</th>
11
  </tr>
12
  <tr>
13
    <th align=left>[% 'Zeitraum' | $T8 %]</th>
14
  </tr>
15
  <tr height="5"></tr>
16
  <tr valign=top>
17
    <td>
18
      <table>
19
        <tr>
20
          <td align=left><input checked name=zeitraum class=radio type=radio value=monat>&nbsp;</td>
21
          <td align=left>[% 'Monat' | $T8 %]</td>
22
          <td align=left></td>
23
          <td align=left></td>
24
          <td align=left><select name=monat>
25
            <option value=1>[% 'January' | $T8 %]</option>
26
            <option value=2>[% 'February' | $T8 %]</option>
27
            <option value=3>[% 'March' | $T8 %]</option>
28
            <option value=4>[% 'April' | $T8 %]</option>
29
            <option value=5>[% 'May' | $T8 %]</option>
30
            <option value=6>[% 'June' | $T8 %]</option>
31
            <option value=7>[% 'July' | $T8 %]</option>
32
            <option value=8>[% 'August' | $T8 %]</option>
33
            <option value=9>[% 'September' | $T8 %]</option>
34
            <option value=10>[% 'October' | $T8 %]</option>
35
            <option value=11>[% 'November' | $T8 %]</option>
36
            <option value=12>[% 'December' | $T8 %]</option>
37
          </select></td>
38
        </tr>
39
        <tr>
40
          <td align=left><input name=zeitraum class=radio type=radio value=quartal>&nbsp;</td>
41
          <td align=left>[% 'Quartal' | $T8 %]</td>
42
          <td align=left></td>
43
          <td align=left></td>
44
          <td align=left><select name=quartal>
45
            <option selected value=1>[% 'I' | $T8 %]</option>
46
            <option value=2>[% 'II' | $T8 %]</option>
47
            <option value=3>[% 'III' | $T8 %]</option>
48
            <option value=4>[% 'IV' | $T8 %]</option>
49
          </select></td>
50
        </tr>
51
        <tr>
52
          <td align=left><input name=zeitraum class=radio type=radio value=zeit>&nbsp;</td>
53
          <td align=left>[% 'Datum von' | $T8 %]</td>
54
          <td align=left>[% L.date_tag('transdatefrom') %]</td>
55
          <td align=left>[% 'bis' | $T8 %]</td>
56
          <td align=left>[% L.date_tag('transdateto') %]</td>
57
        </tr>
58
      </table>
59
    </td>
60
  </tr>
61
  <tr>
62
    <td><hr size=3 noshade></td>
63
  </tr>
64
</table>
65

  
66
<input type=hidden name=beraternr value="[% beraternr %]">
67
<input type=hidden name=dfvkz value="[% dfvkz %]">
68
<input type=hidden name=beratername value="[% beratername %]">
69
<input type=hidden name=passwort value="[% passwort %]">
70
<input type=hidden name=mandantennr value="[% mandantennr %]">
71
<input type=hidden name=datentraegernr value="[% datentraegernr %]">
72
<input type=hidden name=kne value="[% kne %]">
73
<input type=hidden name=abrechnungsnr value="[% abrechnungsnr %]">
74

  
75
<input type=hidden name=exporttype value="[% exporttype %]">
76

  
77
<input type=hidden name=nextsub value=export3>
78

  
79
<br>
80
<input type=submit class=submit name=action value="[% 'Continue' | $T8 %]">
81
</form>
82

  
83
</body>
84
</html>
templates/webpages/datev/export_stammdaten.html
1
[%- USE T8 %]
2
<body>
3

  
4
<form method=post action="[% script %]">
5
<table width=100%>
6
  <tr>
7
    <th class=listtop>[% 'DATEX - Export Assistent' | $T8 %]</th>
8
  </tr>
9
  <tr>
10
    <th align=left>[% 'Konten' | $T8 %]</th>
11
  </tr>
12
  <tr height="5"></tr>
13
  <tr valign=top>
14
    <td>
15
      <table>
16
        <tr>
17
          <td align=left>[% 'Von Konto: ' | $T8 %]</td>
18
          <td align=left><input name=accnofrom size=8 maxlength=8></td>
19
        </tr>
20
        <tr>
21
          <td align=left>[% 'Bis Konto: ' | $T8 %]</td>
22
          <td align=left><input name=accnoto size=8 maxlength=8></td>
23
        </tr>
24
      </table>
25
    </td>
26
  </tr>
27
  <tr>
28
    <td><hr size=3 noshade></td>
29
  </tr>
30
</table>
31
<input type=hidden name=beraternr value="[% beraternr %]">
32
<input type=hidden name=dfvkz value="[% dfvkz %]">
33
<input type=hidden name=beratername value="[% beratername %]">
34
<input type=hidden name=passwort value="[% passwort %]">
35
<input type=hidden name=mandantennr value="[% mandantennr %]">
36
<input type=hidden name=datentraegernr value="[% datentraegernr %]">
37
<input type=hidden name=kne value="[% kne %]">
38
<input type=hidden name=abrechnungsnr value="[% abrechnungsnr %]">
39

  
40
<input type=hidden name=exporttype value="[% exporttype %]">
41

  
42
<input type=hidden name=nextsub value=export3>
43

  
44
<br>
45
<input type=submit class=submit name=action value="[% 'Continue' | $T8 %]">
46
</form>
47

  
48
</body>
49
</html>

Auch abrufbar als: Unified diff