2.8.6 Templates für Übersetzungen

Mit der Template-Funktion <template match="..." external="..."/> kann der Inhalt einer anderen Vorlage abgefragt und genutzt werden.
Diese Funktion kann auch genutzt werden, um Textpassagen zu übersetzen, also in anderen Sprachen auszugeben.

Voraussetzungen

1. Die Funktion kann nur in RTF- und DOCX-Vorlagen verwendet werden. Eine Verwendung in CSV- oder XLSX-Vorlagen ist nicht möglich.
2. Die Verwendung von Grafiken ist in Textblock-Dateien nicht möglich.

Anleitung

1. Öffnen Sie die relevante Vorlage mit Microsoft Office Word. Eine Übersicht aller Vorlagen finden Sie hier.
   In diesem Beispiel wird die Honorarnotenvorlage "HN1-CZ.docx" (Honorarnote in Sprache "Tschechisch / CZ") unter "...\ADVOKAT\Daten\Vorlagen\OP" angepasst.
   
   

2. Beispiel: In der Zeile "<RaOrt/>, <Erstelldatum Fmt="dd.mmmm.yyyy"/>" wird das Erstelldatum ersetzt, damit der jeweilige Monat nicht in deutscher, sondern tschechischer Sprache ausgegeben wird.
   

   Beispiel (vorher)	Beispiel (nachher)
   <RaOrt/>, <Erstelldatum Fmt="dd.mmmm.yyyy"/>	<template match="Transformparameter/HonMgrEinst" variable="FormatDatumCZ"><RaOrt/>, <FormatDatumCZ/><template match="DatumCZ" external="Musterdatei.docx"/></template>

   Anmerkung: Wird bei External keine Dateiendung angeführt (Musterdatei.docx oder Musterdatei.rtf) so erwartet ADVOKAT die gleiche Dateiendung wie bei der Vorlage selbst.
   
   

3. Erstellen Sie im gleichen Ordner der Vorlage, also unter "...\ADVOKAT\Daten\Vorlagen\OP" eine Datei "Musterdatei.docx". Öffnen Sie diese Datei und geben folgenden Inhalt an:
   

   <template match="DatumCZ">
   <functions>
   <FormatDatumCZ Param="Erstelldatum">
   Dim dTag
   Dim dMonat 
   Dim dJahr
   Dim Ret
   	If Erstelldatum="" Then Erstelldatum=Date
   	dTag = Day(Erstelldatum)
   	dMonat = Month(Erstelldatum)
   	dJahr = Year(Erstelldatum)
   	Select Case dMonat
   		case 1:  Ret = dTag & ". Leden " & dJahr
   		case 2:  Ret = dTag & ". Únor " & dJahr
   		case 3:  Ret = dTag & ". Březen " & dJahr
   		case 4:  Ret = dTag & ". Duben " & dJahr
   		case 5:  Ret = dTag & ". Květen " & dJahr
   		case 6:  Ret = dTag & ". Červen " & dJahr
   		case 7:  Ret = dTag & ". Červenec " & dJahr
   		case 8:  Ret = dTag & ". Srpen " & dJahr
   		case 9:  Ret = dTag & ". Září " & dJahr
   		case 10: Ret = dTag & ". Říjen " & dJahr
   		case 11: Ret = dTag & ". Listopad " & dJahr
   		case 12: Ret = dTag & ". Prosinec " & dJahr
   	End Select
   	FormatDatumCZ = Ret
   </FormatDatumCZ>
   </functions>
   </template>

   Wichtig beim Einfügen der Funktion (<functions> bis </functions>) ist, dass alle Zeilen sich innerhalb eines "Nur-Text-Inhaltssteuerelementes" befinden.
   
   
   
   
   Die einzelnen Zeilen der Funktion müssen mit weicher Zeilenschaltung getrennt werden. Das Inhaltssteuerelement muss die Option "Wagenrücklauf zulassen" aktiviert haben.
    
   
   

4. Anhand der Übereinstimmung bei match erkennt ADVOKAT welcher Text verwendet werden soll. Die Datei "Musterdatei.docx" könnte auch mehrere Bereiche enthalten.
   Dadurch könnte man für alle in den Vorlagen verwendeten Sprachen eine gemeinsame Datei verwenden. Mehr Informationen dazu finden Sie im Kapitel Weitere Sprachen.

   <template match="DatumCZ">
   <functions>
   <FormatDatumCZ Param="Erstelldatum">
   Dim dTag
   Dim dMonat 
   Dim dJahr
   Dim Ret
   	If Erstelldatum="" Then Erstelldatum=Date
   	dTag = Day(Erstelldatum)
   	dMonat = Month(Erstelldatum)
   	dJahr = Year(Erstelldatum)
   	Select Case dMonat
   		case 1:  Ret = dTag & ". Leden " & dJahr
   		case 2:  Ret = dTag & ". Únor " & dJahr
   		case 3:  Ret = dTag & ". Březen " & dJahr
   		case 4:  Ret = dTag & ". Duben " & dJahr
   		case 5:  Ret = dTag & ". Květen " & dJahr
   		case 6:  Ret = dTag & ". Červen " & dJahr
   		case 7:  Ret = dTag & ". Červenec " & dJahr
   		case 8:  Ret = dTag & ". Srpen " & dJahr
   		case 9:  Ret = dTag & ". Září " & dJahr
   		case 10: Ret = dTag & ". Říjen " & dJahr
   		case 11: Ret = dTag & ". Listopad " & dJahr
   		case 12: Ret = dTag & ". Prosinec " & dJahr
   	End Select
   	FormatDatumCZ = Ret
   </FormatDatumCZ>
   </functions>
   </template>
   
   <template match="DatumPL">
   <functions>
   <FormatDatumPL Param="Erstelldatum">
   Dim dTag
   Dim dMonat 
   Dim dJahr
   Dim Ret
   	If Erstelldatum="" Then Erstelldatum=Date
   	dTag = Day(Erstelldatum)
   	dMonat = Month(Erstelldatum)
   	dJahr = Year(Erstelldatum)
   	Select Case dMonat
   		case 1:  Ret = dTag & ". Styczeń " & dJahr
   		case 2:  Ret = dTag & ". Luty " & dJahr
   		case 3:  Ret = dTag & ". Marzec " & dJahr
   		case 4:  Ret = dTag & ". Kwiecień " & dJahr
   		case 5:  Ret = dTag & ". Maj " & dJahr
   		case 6:  Ret = dTag & ". Czerwiec " & dJahr
   		case 7:  Ret = dTag & ". Lipiec " & dJahr
   		case 8:  Ret = dTag & ". Sierpień " & dJahr
   		case 9:  Ret = dTag & ". Wrzesień " & dJahr
   		case 10: Ret = dTag & ". Październik " & dJahr
   		case 11: Ret = dTag & ". Listopad " & dJahr
   		case 12: Ret = dTag & ". Grudzień" & dJahr
   	End Select
   	FormatDatumPL = Ret
   </FormatDatumPL>
   </functions>