<% if (!$TRAVEL{open} && $SE{app} eq "hindelang.net") { require SE::Travel::Merkmale; $VERMIETER{merkmaleByGet} = [getMerkmale( betrieb => $VERMIETER{gid}, verwendung => "betrieb", online => 1, )]; } $TEMP{travelMatchShowLink} = ($TRAVEL{open} && $SE{app} ne "grainau.de" && ($SE{app} ne "bad-woerishofen.de" || ($VERMIETER{mitglied_stadt} eq "1" || $VERMIETER{mitglied_120} eq "1"))) ? 1 : 0; $TEMP{travelMatchShowLink} = 0 if $SE{app} eq "bodenseeferien.dreamway.net" && $VERMIETER{optional} !~ /H/; return qq($VERMIETER{tarif} - $VERMIETER{sondertarif} )if $in{debugmode}; return ""; %>
  • <% return "highlight" if ($VERMIETER{best_of} || $VERMIETER{merkmale_byid}[6225] ) && $SE{app} eq "allgaeu-gastgebermitherz.de" %>">

    <% ########################## Besonderheiten Burgberg ###################################################### if ($SE{app} eq "burgberg.de") { my $out; $out .= qq( fahrradfreundlicher Betrieb ) if $VERMIETER{fahrrad}; $out .= qq( Service XPert ) if $VERMIETER{xpert}; $out .= qq( ) if $VERMIETER{bestof}; $out .= qq( ) if $VERMIETER{urlaubprivat}; $out .= qq( ) if $VERMIETER{kinderland3}; $out .= qq( ) if $VERMIETER{kinderland4}; $out .= qq( ) if $VERMIETER{kinderland5}; return $out; } %> <% ########################## Besonderheiten urlaub-bauernhof.info ########################################### return qq(DLG Gütezeichen) if ($VERMIETER{dlg} eq "1" && $SE{app} eq "urlaub-bauernhof.de") %> <% return qq(Kinder sicher und gesund) if ($VERMIETER{ksug} eq "1" && $SE{app} eq "urlaub-bauernhof.de") %> <% return qq(Service Qualität Baden-Württemberg) if ($VERMIETER{sqbw} eq "1" && $SE{app} eq "urlaub-bauernhof.de") %> <% return qq(Familienferien) if ($VERMIETER{familienferien} eq "1" && $SE{app} eq "urlaub-bauernhof.de") %> <% return qq(Landvielfalt) if ($VERMIETER{wohlfuehlhoefe} eq "1" && $SE{app} eq "urlaub-bauernhof.de") %> <% ########################## Besonderheiten allgaeu.info ########################################### return qq(LandHotel) if ($VERMIETER{alh} eq "1" || $VERMIETER{merkmale} =~ /\bAllgäuLandHotels\b/) %> <% return qq(TopHotel) if ($VERMIETER{ath} eq "1" || $VERMIETER{merkmale} =~ /\bAllgäuTopHotels\b/) %> <% return qq(Urlaub auf dem Bauernhof) if (($VERMIETER{bauernhofurlaub} eq "1" || $VERMIETER{merkmale} =~ /\bUrlaub auf dem Bauernhof\b/) && $SE{app} eq "allgaeu.info" ) %> <% return qq(Musical-Hotels) if ($VERMIETER{musicalhotel} eq "1" || $VERMIETER{merkmale} =~ /\bMusical-Hotels\b/) %> <% ########################## Besonderheiten Oberstdorf ###################################################### return qq() if ($boxen{vevo} = $VERMIETER{vevo}) %> <% return qq() if ($boxen{dbs} = $VERMIETER{dbs}) %> <% ########################## Besonderheiten Grainau ###################################################### if ($SE{app} eq "grainau.de") { my $out; $out .= qq() if ($VERMIETER{alpinegastgeber} eq "1"); $out .= qq(Bett & Bike) if ($VERMIETER{bett_bike} eq "1"); $out .= qq(fahrradfreundlicher Betrieb) if ($VERMIETER{fahrradreundlich} eq "1"); $out .= qq() if ($VERMIETER{kinderland} eq "1") ; $out .= qq() if ($VERMIETER{kinderland_2} eq "1") ; $out .= qq() if ($VERMIETER{wanderbaresdeutschland} eq "1"); $out .= qq(Wellvital Partnerbetrieb) if ($VERMIETER{wellvital_partner} eq "1"); $out .= qq(Wellvital Hotel ) if ($VERMIETER{wellvital} eq "1"); return $out; } %> <% ########################## Besonderheiten Bad Hindelang ###################################################### $VERMIETER{alwa_card} ? qq( $LANG{awc_partner} ) : "" %> <% $VERMIETER{xpert} ? qq( $LANG{xpert} ) : ""; %> <% $VERMIETER{natuerlich_hindelang} ? qq( Natürlich Hindelang - Die besonderen Gastgeber ) : ""; %> <% $VERMIETER{bestof} ? qq(): ""; %> <% $VERMIETER{urlaubprivat} ? qq(): ""; %> <% ########################## Besonderheiten UADB ###################################################### if ($SE{app} eq "urlaub-bauernhof.de") { my $out; $out .= qq( ) if ($VERMIETER{landurlaub} eq "1"); $out .= qq( ) if ($VERMIETER{bauernhof} eq "1"); $out .= qq( ) if ($VERMIETER{fischerhof} eq "1"); $out .= qq( ) if ($VERMIETER{reiterhof} eq "1"); $out .= qq( ) if ($VERMIETER{winzerhof} eq "1"); $out .= qq( ) if ($VERMIETER{urlaubsobsthof} eq "1"); return $out; } %>
    <% $TEMP{travelMatchShowLink} ? qq() : "" %> <% $VERMIETER{betriebsname} %> <% $TEMP{travelMatchShowLink} ? qq() : "" %> <% viewSterne( sterne => $VERMIETER{sterne}, xhtml => 1 ); %>

    <% $VERMIETER{firma} ? qq(
    $VERMIETER{firma}
    ) : "" %> <% my $anrede = $LANG{"$VERMIETER{anrede}"} || $VERMIETER{anrede}; $VERMIETER{nachname} ? qq(
    $anrede $VERMIETER{vorname} $VERMIETER{nachname}
    ) : "" %> <% $VERMIETER{strasse} || $VERMIETER{hausnummer} ? qq(
    $VERMIETER{strasse} $VERMIETER{hausnummer}
    ) : "" %> <% my $a = $VERMIETER{land} =~ "^A" ? "A-" : ""; my $ort = $VERMIETER{plz} || $VERMIETER{ort} ? qq($a$VERMIETER{plz} $VERMIETER{ort}) : ""; if ($SE{app} =~ /^urlaub-bauernhof\.de$/) { # Ortsteil per Bindestrich getrennt $ort .= " - $VERMIETER{ortsteil}" if $VERMIETER{ortsteil}; return qq(
    $ort
    ); } else { # Ortsteil darunter my $ortsteil = $VERMIETER{ortsteil} ? qq(
    $VERMIETER{ortsteil}
    ) : ""; return qq(
    $ort
    $ortsteil ); } %> <% $VERMIETER{geolink} %>
    <% my $out; if ($SE{app} ne "allgaeu-suedbest.de") { $out .= qq(
    $LANG{Telefon} $VERMIETER{telefonvorwahl}/$VERMIETER{telefon}
    ) if $VERMIETER{telefon}; $out .= qq(
    $LANG{Telefax} $VERMIETER{faxvorwahl}/$VERMIETER{fax}
    ) if $VERMIETER{fax}; } else { $out .= qq(
    Info & Buchung
    0 83 21 - 800 45 45
    Anfrage
    Rückruf ) if $in{gid}; } return $out; %>
    <% (!$TRAVEL{open} || $SE{app} eq "bodenseeferien.dreamway.net") && $VERMIETER{www} && (( !$VERMIETER{tarif} && ($VERMIETER{optional} =~ /O|H/ || $VERMIETER{optional2} =~ /O|H/) ) || $VERMIETER{tarif} > 1 || $VERMIETER{sondertarif}) && $SE{app} ne "allgaeu-suedbest.de" ? qq(

    ) : ""; %> <% (!$TRAVEL{open} && $VERMIETER{email} && $SE{app} ne "allgaeu-suedbest.de") ? qq(

    ) : ""; %> <% $onlineBooking = $TRAVEL{open} ? qq($TRAVEL{open}&do=buchung2) : qq($ENV{DOCUMENT_NAME}?$PAGE{id}&gid=$in{gid}&do=buchung2); ($TRAVEL{open} && $VERMIETER{buchung}) ? qq( $LANG{Online_Buchung_moeglich} ) : ""; %>
    <% (my $preis = $VERMIETER{preis}) =~ s/\./\x2C/g; $preis = qq(
    $LANG{ab} $preis €/$LANG{Nacht}
    ); my $personen = $VERMIETER{fuer_personen} >= 1 ? qq(
    ) . getLANG("fuer_x_Personen", [$VERMIETER{fuer_personen}]) . qq(
    ) : ""; my $inkl = $VERMIETER{inklusive_verpflegung} eq "uf" ? $LANG{inkl_Fruehstueck} : $VERMIETER{inklusive_verpflegung} eq "hp" ? $LANG{inkl_Halbpension} : $VERMIETER{inklusive_verpflegung} eq "vp" ? $LANG{inkl_Vollpension} : ""; $inkl = qq(
    $inkl
    ) if ($inkl ne ""); my $kurbeitrag = getKurbeitrag(); return $VERMIETER{preis} > 0 ? qq($preis$personen$inkl
    $kurbeitrag
    ) : qq(); %>