summaryrefslogtreecommitdiff
path: root/templates/wagenreihung.html.ep
blob: 512c30c9f914c1a49cbd684d6da5ca93e3510a57 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
% if (not $wr or $wr->errstr) {
  <div class="container">
    <div class="error">
      <strong>Fehler bei der Abfrage der Wagenreihung:</strong>
      <%= $wr ? $wr->errstr : $wr_error %>
    </div>
  </div>
% }
% else {
  % my $has_multi_dest = 0;
  % if (scalar $wr->destinations > 1) {
    % $has_multi_dest = 1;
  % }
  <div class="container">
    <div style="text-align: center;">
%=    join( ' / ', $wr->origins )
      →
%=    join( ' / ', map { $_->{name} } $wr->destinations )
    </div>
    % if ($has_multi_dest) {
      <div style="text-align: center;">
        % for my $destination ($wr->destinations) {
          Nach <%= $destination->{name} %> in Abschnitt <%= join(q{}, sort @{$destination->{sections} // []}) %><br/>
       % }
      </div>
    % }
    <%= $wr->station_name %> Gleis <%= $wr->platform %><br/>
    % if ($wr->train_type =~ m{^IC|EC}) {
      Zugtyp: <%= $wr->train_subtype // 'IC?' %>
    % }
	 % elsif ($wr->train_powertype) {
      %= $wr->train_type
	 % }
	 % my %translation = (
	 %   90 => 'mit sonstigem Antrieb',
	 %   91 => 'mit elektrischer Lokomotive',
	 %   92 => 'mit Diesellokomotive',
	 %   93 => 'Hochgeschwindigkeitszug',
	 %   94 => 'Elektrischer Triebzug',
	 %   95 => 'Diesel-Triebzug',
	 %   96 => 'mit speziellen Beiwagen',
	 %   97 => 'mit elektrischer Rangierlok',
	 %   98 => 'mit Diesel-Rangierlok',
	 %   99 => 'Sonderfahrzeug',
	 % );
	 % if (not $wr->train_powertype) {
	 % }
	 % else {
      %= $translation{$wr->train_powertype};
	 % }
  </div>
  <div class="container">
    <div class="wagonorder">
%     if (not $wr->has_bad_wagons) {
%       for my $section ($wr->sections) {
          <div class="section" style="
          top: <%= $section->{start_percent} %>%; bottom: <%= 100 - $section->{end_percent} %>%;">
%=          $section->{name}
          </div>
%       }
%     }
%     for my $wagon ($wr->wagons) {
%=      include '_wagon', direction => $wr->direction, wagon => $wagon;
%     }
      </div>
<!--  <div>
      Legende: ♿ Behindertengerechte Ausstattung / 🍴 Bistro/Restaurant / 🚪 Abteile vorhanden
    </div>
-->
    <div style="margin-top: 1em;">
      Quelle: DB Wagenreihungs-API. Angaben ohne Gewähr.
    </div>

  </div>
% }