<?xml version="1.0" encoding="utf-8" standalone="no"?>
<TfrxReport Version="2026.1.6" DotMatrixReport="False" IniFile="\Software\Fast Reports" PreviewOptions.Buttons="4095" PreviewOptions.Maximized="False" PreviewOptions.Zoom="1" PrintOptions.Printer="Vorgabe" PrintOptions.PrintOnSheet="0" ReportOptions.CreateDate="39414,0369373843" ReportOptions.Description.Text="" ReportOptions.LastChange="46278,6894503125" ScriptLanguage="PascalScript" ScriptText.Text="var&#13;&#10;  ortdr: integer;&#13;&#10;  memSchülerName_StandardFontSize: Integer;&#13;&#10;  memSubRepSchülerAdresse_StandardFontSize: Integer;&#13;&#10;  memSchülerStraße_StandardFontSize: Integer;&#13;&#10;  memSchülerAdresse_StandardFontSize: Integer;&#13;&#10;&#13;&#10;procedure GroupHeader1OnBeforePrint(Sender: TfrxComponent);&#13;&#10;//bestimmt die Zeilen- und Schriftenhöhe so, dass eine Gruppe auf eine Seite üasst&#13;&#10;var&#13;&#10;  nz,anzahl,zh,tt,sh:Integer;&#13;&#10;  st:real;&#13;&#10;  gruppe: string;&#13;&#10;begin&#13;&#10;  //ermittelt die Anzahl der Schüler in jeder Gruppe&#13;&#10;  gruppe:=&#60;d.&#34;GruppeId&#34;&#62;;&#13;&#10;    anz.SQL.Text:=&#39;select count(SchuelerId) anz from danis where GruppeId=&#39;+gruppe;&#13;&#10;    anz.open;&#13;&#10;      anzahl:=anz.FieldByName(&#39;anz&#39;).asInteger;&#13;&#10;    anz.Close;&#13;&#10;    nz:=29;&#13;&#10;    // Wenn Anzahl größer als nz dann wird alles kleiner gemacht&#13;&#10;    If (anzahl&#62;nz) and (anzahl&#60;=35) then&#13;&#10;    begin&#13;&#10;     zh:=30-(1*(anzahl-nz));&#13;&#10;     sh:=8; // Dieser Font-Size ist nur eine geschätzte Voreinstellung und kann in den OnAfterData-Eriegnissen noch verändert werden!&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;     zh:=30;&#13;&#10;     sh:=9; // Dieser Font-Size ist nur eine geschätzte Voreinstellung und kann in den OnAfterData-Eriegnissen noch verändert werden!&#13;&#10;    end;&#13;&#10;&#13;&#10;    MasterData.Height:=zh;&#13;&#10;    MasterData1.Height:=zh/2;&#13;&#10;    trlinie.top:=tt;&#13;&#10;    memSubRepSchülerAdresse.Height:=zh/2;&#13;&#10;    Subreport1.Height:=zh;&#13;&#10;    memSchülerStraße.Height:=zh;&#13;&#10;    memSchülerAdresse.Height:=zh;&#13;&#10;    memSchülerName.Height:=zh;&#13;&#10;    memSchülerAdresse.Font.size:=sh;&#13;&#10;    memSubRepSchülerAdresse.Font.size:=sh;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;procedure weiterOnEnter(Sender: TfrxComponent);&#13;&#10;var&#13;&#10;  brstufe,aa,a1,a2: string;&#13;&#10;  i: Integer;&#13;&#10;&#13;&#10;begin&#13;&#10;  if OTdr.checked then&#13;&#10;  begin&#13;&#10;    //Memo6.Font.Size:=8;&#13;&#10;    ortdr:=1;&#13;&#10;  end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;    //Memo6.Font.Size:=8;&#13;&#10;    ortdr:=0;&#13;&#10;  end;&#13;&#10;&#13;&#10;  //eingebene Berichtsstufen pruefen und formatieren&#13;&#10; brstufe:=trim(Edit1.Text);&#13;&#10; if brstufe=&#39;&#39; then brstufe:=&#39;0&#39;;&#13;&#10; aa:=&#39;&#39;;&#13;&#10;&#13;&#10; for i:=1 to length(brstufe) do&#13;&#10; begin&#13;&#10;  if (Copy(brstufe,i,1)&#62;=&#39;0&#39;) and (Copy(brstufe,i,1)&#60;=&#39;9&#39;) then aa:=aa+&#39;,&#39;+Copy(brstufe,i,1);&#13;&#10; end;&#13;&#10; if Copy(aa,1,1)=&#39;,&#39; then&#13;&#10;   brstufe:=Copy(aa,2,length(aa)-1)&#13;&#10; else&#13;&#10;   brstufe:=aa;&#13;&#10;&#13;&#10; // Kontaktdaten ermitteln&#13;&#10;   qk.sql.text:=&#39;select * from&#39;+&#13;&#10;   &#39; (select PersonId Person,k.*,-1 PArt from kontakt k&#39;+&#13;&#10;   &#39; union&#39;+&#13;&#10;   &#39; select sv.SchuelerId Person,k.*,sv.Art PArt from kontakt k&#39;+&#13;&#10;   &#39; inner join schuelerverantwortlicher sv on (k.PersonId=sv.VerantwortlicherId)&#39;+&#13;&#10;    &#39; inner join verantwortlicher v on sv.VerantwortlicherId=v.ID&#39;+&#13;&#10;   &#39;) aa&#39;+&#13;&#10;   &#39; where Art&#60;=1 and Berichtsstufe in (&#39;+brstufe+&#39;) and NurIntern=0 order by Part,Adresse limit 2&#39;;&#13;&#10;  //showmessage(qk.sql.text);&#13;&#10;&#13;&#10;  weiter.ModalResult:= mrOk;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Edit1OnChange(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;   weiter.Default:=true;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure memSchülerNameOnAfterData(Sender: TfrxComponent);&#13;&#10;// Um den Namen VOLLSTÄNDIG SICHTBAR in das Textfeld zu bekommen, muss die Font-Größe unter Umständen reduziert werden!&#13;&#10;// Ausgangspunkt ist dabei die Font-Size, so wie sie im Designer eingestellt ist und im OnStartReport-Ereignis übernommen wird!&#13;&#10;// Das heißt, der im OnBeforePrint-Eriegnis eingestellt Font-Size spielt keine Rolle mehr! (Nur die dort eingestellte Zeilenhöhe!)&#13;&#10;//&#13;&#10;const&#13;&#10;  MindestGroesse  = 6;&#13;&#10;var&#13;&#10;  M: TfrxMemoView;&#13;&#10;  NutzbareBreite: Extended;&#13;&#10;  FontSizeTmp: double;&#13;&#10;begin&#13;&#10;  M := TfrxMemoView(Sender);&#13;&#10;  { Bei jedem Datensatz wieder mit der normalen Größe beginnen }&#13;&#10;  M.Font.Size := memSchülerName_StandardFontSize;&#13;&#10;&#13;&#10;  NutzbareBreite := M.Width - M.GapX * 2;&#13;&#10;&#13;&#10;  if M.CalcWidth &#62; NutzbareBreite then&#13;&#10;  begin&#13;&#10;    FontSizeTmp := M.Font.Size * NutzbareBreite / M.CalcWidth;&#13;&#10;    M.Font.Size := round(FontSizeTmp);&#13;&#10;&#13;&#10;    if M.Font.Size &#60; MindestGroesse then&#13;&#10;      M.Font.Size := MindestGroesse;&#13;&#10;&#13;&#10;    { Wegen Rundungsdifferenzen notfalls noch weiter reduzieren }&#13;&#10;    // Brauchen wir hier nicht, weil eine 2-zeilige Darstellung in diesem Fall möglich ist!&#13;&#10;        while (M.CalcWidth &#62; NutzbareBreite) and&#13;&#10;              (M.Font.Size &#62; MindestGroesse) do&#13;&#10;          M.Font.Size := M.Font.Size - 1;&#13;&#10;  end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure frxReportOnStartReport(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;    memSchülerName_StandardFontSize := memSchülerName.Font.Size;&#13;&#10;    memSubRepSchülerAdresse_StandardFontSize := memSubRepSchülerAdresse.Font.Size;&#13;&#10;    memSchülerStraße_StandardFontSize := memSchülerStraße.Font.Size;&#13;&#10;    memSchülerAdresse_StandardFontSize := memSchülerAdresse.Font.Size;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure memSubRepSchülerAdresseOnAfterData(Sender: TfrxComponent);&#13;&#10;// Um den Namen VOLLSTÄNDIG SICHTBAR in das Textfeld zu bekommen, muss die Font-Größe unter Umständen reduziert werden!&#13;&#10;// Ausgangspunkt ist dabei die Font-Size, so wie sie im Designer eingestellt ist und im OnStartReport-Ereignis übernommen wird!&#13;&#10;// Das heißt, der im OnBeforePrint-Eriegnis eingestellt Font-Size spielt keine Rolle mehr! (Nur die dort eingestellte Zeilenhöhe!)&#13;&#10;//&#13;&#10;const&#13;&#10;  MindestGroesse  = 6;&#13;&#10;var&#13;&#10;  M: TfrxMemoView;&#13;&#10;  NutzbareBreite: Extended;&#13;&#10;  FontSizeTmp: double;&#13;&#10;begin&#13;&#10;  M := TfrxMemoView(Sender);&#13;&#10;  { Bei jedem Datensatz wieder mit der normalen Größe beginnen }&#13;&#10;  M.Font.Size := memSubRepSchülerAdresse_StandardFontSize;&#13;&#10;&#13;&#10;  NutzbareBreite := M.Width - M.GapX * 2;&#13;&#10;&#13;&#10;  if M.CalcWidth &#62; NutzbareBreite then&#13;&#10;  begin&#13;&#10;    FontSizeTmp := M.Font.Size * NutzbareBreite / M.CalcWidth;&#13;&#10;    M.Font.Size := Round(FontSizeTmp);&#13;&#10;&#13;&#10;    if M.Font.Size &#60; MindestGroesse then&#13;&#10;      M.Font.Size := MindestGroesse;&#13;&#10;&#13;&#10;    { Wegen Rundungsdifferenzen notfalls noch weiter reduzieren }&#13;&#10;    // Brauchen wir hier nicht, weil eine 2-zeilige Darstellung in diesem Fall möglich ist!&#13;&#10;        while (M.CalcWidth &#62; NutzbareBreite) and&#13;&#10;              (M.Font.Size &#62; MindestGroesse) do&#13;&#10;          M.Font.Size := M.Font.Size - 1;&#13;&#10;  end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure memSchülerStraßeOnAfterData(Sender: TfrxComponent);&#13;&#10;// Um den Namen VOLLSTÄNDIG SICHTBAR in das Textfeld zu bekommen, muss die Font-Größe unter Umständen reduziert werden!&#13;&#10;// Ausgangspunkt ist dabei die Font-Size, so wie sie im Designer eingestellt ist und im OnStartReport-Ereignis übernommen wird!&#13;&#10;// Das heißt, der im OnBeforePrint-Eriegnis eingestellt Font-Size spielt keine Rolle mehr! (Nur die dort eingestellte Zeilenhöhe!)&#13;&#10;//&#13;&#10;&#13;&#10;const&#13;&#10;  MindestGroesse  = 6;&#13;&#10;var&#13;&#10;  M: TfrxMemoView;&#13;&#10;  NutzbareBreite: Extended;&#13;&#10;  FontSizeTmp: double;&#13;&#10;begin&#13;&#10;  M := TfrxMemoView(Sender);&#13;&#10;  { Bei jedem Datensatz wieder mit der normalen Größe beginnen }&#13;&#10;  M.Font.Size := memSchülerStraße_StandardFontSize;&#13;&#10;&#13;&#10;  NutzbareBreite := M.Width - M.GapX * 2;&#13;&#10;&#13;&#10;  if M.CalcWidth &#62; NutzbareBreite then&#13;&#10;  begin&#13;&#10;    FontSizeTmp := M.Font.Size * NutzbareBreite / M.CalcWidth;&#13;&#10;    M.Font.Size := Round(FontSizeTmp);&#13;&#10;&#13;&#10;    if M.Font.Size &#60; MindestGroesse then&#13;&#10;      M.Font.Size := MindestGroesse;&#13;&#10;&#13;&#10;    { Wegen Rundungsdifferenzen notfalls noch weiter reduzieren }&#13;&#10;    // Brauchen wir hier nicht, weil eine 2-zeilige Darstellung in diesem Fall möglich ist!&#13;&#10;        while (M.CalcWidth &#62; NutzbareBreite) and&#13;&#10;              (M.Font.Size &#62; MindestGroesse) do&#13;&#10;          M.Font.Size := M.Font.Size - 1;&#13;&#10;  end;&#13;&#10;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure memSchülerAdresseOnAfterData(Sender: TfrxComponent);&#13;&#10;// Um den Namen VOLLSTÄNDIG SICHTBAR in das Textfeld zu bekommen, muss die Font-Größe unter Umständen reduziert werden!&#13;&#10;// Ausgangspunkt ist dabei die Font-Size, so wie sie im Designer eingestellt ist und im OnStartReport-Ereignis übernommen wird!&#13;&#10;// Das heißt, der im OnBeforePrint-Eriegnis eingestellt Font-Size spielt keine Rolle mehr! (Nur die dort eingestellte Zeilenhöhe!)&#13;&#10;//&#13;&#10;const&#13;&#10;  MindestGroesse  = 6;&#13;&#10;var&#13;&#10;  M: TfrxMemoView;&#13;&#10;  NutzbareBreite: Extended;&#13;&#10;  FontSizeTmp: double;&#13;&#10;begin&#13;&#10;  M := TfrxMemoView(Sender);&#13;&#10;  { Bei jedem Datensatz wieder mit der normalen Größe beginnen }&#13;&#10;  M.Font.Size := memSchülerAdresse_StandardFontSize;&#13;&#10;&#13;&#10;  NutzbareBreite := M.Width - M.GapX * 2;&#13;&#10;&#13;&#10;  if M.CalcWidth &#62; NutzbareBreite then&#13;&#10;  begin&#13;&#10;    FontSizeTmp := M.Font.Size * NutzbareBreite / M.CalcWidth;&#13;&#10;    M.Font.Size := Round(FontSizeTmp);&#13;&#10;&#13;&#10;    if M.Font.Size &#60; MindestGroesse then&#13;&#10;      M.Font.Size := MindestGroesse;&#13;&#10;&#13;&#10;    { Wegen Rundungsdifferenzen notfalls noch weiter reduzieren }&#13;&#10;    // Brauchen wir hier nicht, weil eine 2-zeilige Darstellung in diesem Fall möglich ist!&#13;&#10;        while (M.CalcWidth &#62; NutzbareBreite) and&#13;&#10;              (M.Font.Size &#62; MindestGroesse) do&#13;&#10;          M.Font.Size := M.Font.Size - 1;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." StoreInDFM="False" OnStartReport="frxReportOnStartReport">
  <Datasets>
    <item DataSet="d" DataSetName="d"/>
    <item DataSet="anz" DataSetName="anz"/>
    <item DataSet="qk" DataSetName="qk"/>
  </Datasets>
  <TfrxDataPage Name="Data" HGuides.Text="" VGuides.Text="" Height="1000" Left="0" Top="0" Width="1000">
    <TfrxMYDACQuery Name="d" UserName="d" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="324" Top="112" IgnoreDupParams="False" SQL.Text="select d.*&#13;&#10;,p1.Geschlecht G1,p1.akadTitel aT1&#13;&#10;,p2.Geschlecht G2,p2.akadTitel aT2      &#13;&#10;from danis d&#13;&#10;left join gruppe g on d.GruppeId=g.Id&#13;&#10;left join person p1 on g.LehrerId1=p1.Id&#13;&#10;left join person p2 on g.LehrerId2=p2.Id    &#13;&#10;                                                                                       " LocalMasterDetail="False">
      <FieldDefs>
        <item FieldName="EigenschaftElternIServ" FieldType="fftBoolean"/>
        <item FieldName="Eigenschaftfaest" FieldType="fftBoolean"/>
        <item FieldName="EigenschaftFotoerlaubnis" FieldType="fftBoolean"/>
        <item FieldName="EigenschaftGTMo" FieldType="fftBoolean"/>
        <item FieldName="EigenschaftHomepage" FieldType="fftBoolean"/>
        <item FieldName="EigenschaftISerVEB2" FieldType="fftBoolean"/>
        <item FieldName="EigenschaftPseudonym_Schachmeisterschaft" FieldType="fftString" Size="64"/>
        <item FieldName="GruppeBezeichnung" FieldType="fftString" Size="56"/>
        <item FieldName="GruppeGanztagsunterricht" FieldType="fftBoolean"/>
        <item FieldName="GruppeId"/>
        <item FieldName="GruppeJahrgangsstufe"/>
        <item FieldName="GruppeRaum" FieldType="fftString"/>
        <item FieldName="GruppeZeugnisstatus"/>
        <item FieldName="GruppeStandort" FieldType="fftString" Size="256"/>
        <item FieldName="JahrgangsdatenEndDatum" FieldType="fftDateTime"/>
        <item FieldName="JahrgangsdatenId"/>
        <item FieldName="JahrgangsdatenKlassensprecher"/>
        <item FieldName="JahrgangsdatenKreisschuelerrat"/>
        <item FieldName="JahrgangsdatenSchuelersprecher"/>
        <item FieldName="JahrgangsdatenStadtschuelerrat"/>
        <item FieldName="JahrgangsdatenLandesschuelerrat" FieldType="fftBoolean"/>
        <item FieldName="JahrgangsdatenProfil" FieldType="fftString" Size="64"/>
        <item FieldName="JahrgangsdatenProfil2" FieldType="fftString" Size="64"/>
        <item FieldName="JahrgangsdatenStatus"/>
        <item FieldName="KombiJahrgangsstufe"/>
        <item FieldName="InfektionsschutzNachweis"/>
        <item FieldName="InfektionsschutzNachweisForm"/>
        <item FieldName="InfektionsschutzNachweisDatum" FieldType="fftDateTime"/>
        <item FieldName="InfektionsschutzKontraindikationBis" FieldType="fftDateTime"/>
        <item FieldName="InfektionsschutzMeldungGesundheitsamt" FieldType="fftDateTime"/>
        <item FieldName="InfektionsschutzRueckmeldungGesundheitsamt" FieldType="fftDateTime"/>
        <item FieldName="LehrerID1"/>
        <item FieldName="Lehrervorname1" FieldType="fftString" Size="256"/>
        <item FieldName="Lehrernachname1" FieldType="fftString" Size="256"/>
        <item FieldName="LehrerID2"/>
        <item FieldName="Lehrervorname2" FieldType="fftString" Size="256"/>
        <item FieldName="Lehrernachname2" FieldType="fftString" Size="256"/>
        <item FieldName="LernmittelausleiheBezeichnung" FieldType="fftString" Size="64"/>
        <item FieldName="LernmittelausleiheDatum" FieldType="fftDateTime"/>
        <item FieldName="LernmittelausleiheGezahlterBetrag"/>
        <item FieldName="LernmittelausleiheLernmittelBezahlt" FieldType="fftBoolean"/>
        <item FieldName="LernmittelausleiheLeihtAus" FieldType="fftBoolean"/>
        <item FieldName="LernmittelausleiheProzent"/>
        <item FieldName="NachSchulformBezeichnung" FieldType="fftString" Size="64"/>
        <item FieldName="NachSchulformKennzahl"/>
        <item FieldName="NachSchulformKuerzel" FieldType="fftString" Size="64"/>
        <item FieldName="PersonSanisSync"/>
        <item FieldName="SchuelerAbgangsdatum" FieldType="fftDateTime"/>
        <item FieldName="SchuelerAbschlussBezeichnung" FieldType="fftString" Size="67"/>
        <item FieldName="SchuelerAbschlussId"/>
        <item FieldName="SchuelerAbschlussKennzahl" FieldType="fftString" Size="16"/>
        <item FieldName="SchuelerAufnahmedatum" FieldType="fftDateTime"/>
        <item FieldName="SchuelerBankverbindung" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerBeginnDerSchulpflicht"/>
        <item FieldName="SchuelerBemerkungen" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerBerufswunsch" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerBild"/>
        <item FieldName="SchuelerBildVorhanden" FieldType="fftBoolean"/>
        <item FieldName="SchuelerElternEntscheidungId"/>
        <item FieldName="SchuelerElternWunschId"/>
        <item FieldName="SchuelerElternEntscheidung" FieldType="fftString" Size="50"/>
        <item FieldName="SchuelerElternWunsch" FieldType="fftString" Size="50"/>
        <item FieldName="SchuelerEMail" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerEmpfehlung"/>
        <item FieldName="SchuelerErstEinschulJahr"/>
        <item FieldName="SchuelerFahrschueler" FieldType="fftBoolean"/>
        <item FieldName="SchuelerFax" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerFlexiKind" FieldType="fftBoolean"/>
        <item FieldName="SchuelerFoerderDeutschaZAb" FieldType="fftDateTime"/>
        <item FieldName="SchuelerFoerderung" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerFoerderungAb" FieldType="fftDateTime"/>
        <item FieldName="SchuelerGeburtsdatum" FieldType="fftDateTime"/>
        <item FieldName="SchuelerGeburtslandbezeichnung" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerGeburtslandkennzahl" FieldType="fftString" Size="16"/>
        <item FieldName="SchuelerGeburtslandbezeichnungIso" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerGeburtslandCodeIso" FieldType="fftString"/>
        <item FieldName="SchuelerGeburtsort" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerGeschlecht" FieldType="fftString"/>
        <item FieldName="SchuelerHerkunftBezeichnung" FieldType="fftString" Size="128"/>
        <item FieldName="SchuelerHerkunftKennzahl" FieldType="fftString" Size="16"/>
        <item FieldName="SchuelerId"/>
        <item FieldName="SchuelerIdentNummer" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerKonfession" FieldType="fftString" Size="128"/>
        <item FieldName="SchuelerKonfessionKennzahl" FieldType="fftString" Size="16"/>
        <item FieldName="SchuelerKrankenkasse" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerLandkreis" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerNachname" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerNachSchule" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerNamenszusatz" FieldType="fftString" Size="32"/>
        <item FieldName="SchuelerNotfall" FieldType="fftString" Size="255"/>
        <item FieldName="SchuelerOPNV" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerOrtsname" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerOrtsname2" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerOrtsteil" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerPLZ" FieldType="fftString" Size="32"/>
        <item FieldName="SchuelerPLZ2" FieldType="fftString" Size="32"/>
        <item FieldName="SchuelerRufname" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerSchulbesuchsjahr"/>
        <item FieldName="SchuelerSonderpaedBedarf"/>
        <item FieldName="SchuelerStaatsangehoerigkeit" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerStaatsangehoerigkeitKennzahl" FieldType="fftString" Size="16"/>
        <item FieldName="SchuelerStaatsangehoerigkeit2" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerStaatsangehoerigkeitKennzahl2" FieldType="fftString" Size="16"/>
        <item FieldName="SchuelerStaatsangehoerigkeitIso" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerStaatsangehoerigkeitCodeIso" FieldType="fftString"/>
        <item FieldName="SchuelerStaatsangehoerigkeitIso2" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerStaatsangehoerigkeitCodeIso2" FieldType="fftString"/>
        <item FieldName="SchuelerStrasse" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerStrasse2" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerTelefon1" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerTelefon2" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerTitel" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerTrendEmpfehlung"/>
        <item FieldName="SchuelerUnterordner" FieldType="fftString" Size="50"/>
        <item FieldName="SchuelerVerkehrsspracheId"/>
        <item FieldName="SchuelerVerkehrsSprache" FieldType="fftString" Size="64"/>
        <item FieldName="SchuelerVonSchule" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerVornamen" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerWiederholt" FieldType="fftString" Size="15"/>
        <item FieldName="SchuelerWohnsitz"/>
        <item FieldName="SchuelerZurueckgestellt" FieldType="fftBoolean"/>
        <item FieldName="SchuelerZuzugsjahr"/>
        <item FieldName="SchuleAdresse" FieldType="fftString" Size="64"/>
        <item FieldName="SchuleIdentNummer" FieldType="fftString" Size="64"/>
        <item FieldName="SchuleLand" FieldType="fftString" Size="64"/>
        <item FieldName="SchuleName" FieldType="fftString" Size="256"/>
        <item FieldName="SchuleOrt" FieldType="fftString" Size="64"/>
        <item FieldName="SchulePLZ"/>
        <item FieldName="SchulformBezeichnung" FieldType="fftString" Size="64"/>
        <item FieldName="SchulformKennzahl"/>
        <item FieldName="SchulformKuerzel" FieldType="fftString" Size="64"/>
        <item FieldName="SchulgliederungId"/>
        <item FieldName="SchuljahrBezeichnung" FieldType="fftString" Size="64"/>
        <item FieldName="SchuljahrId"/>
        <item FieldName="UnterordnerId"/>
        <item FieldName="Verantw1Id"/>
        <item FieldName="Verantw1Erziehungsberechtigt" FieldType="fftBoolean"/>
        <item FieldName="Verantw1Umgangsberechtigt" FieldType="fftBoolean"/>
        <item FieldName="Verantw1Art"/>
        <item FieldName="Verantw1Vorname" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw1Nachname" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw1Titel" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw1AkadTitel" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw1Geburtsdatum" FieldType="fftDateTime"/>
        <item FieldName="Verantw1Geschlecht" FieldType="fftString"/>
        <item FieldName="Verantw1Namenszusatz" FieldType="fftString" Size="32"/>
        <item FieldName="Verantw1Strasse" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw1Ortsname" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw1PLZ" FieldType="fftString" Size="32"/>
        <item FieldName="Verantw1EMail" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw1Telefon1" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw1Telefon2" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw1Bankverbindung" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw1Fax" FieldType="fftString" Size="64"/>
        <item FieldName="SerienBriefAnredeErz1" FieldType="fftString" Size="374"/>
        <item FieldName="SerienbriefFrauHerrn" FieldType="fftString" Size="15"/>
        <item FieldName="SerienbriefAnredeNamen"/>
        <item FieldName="Verantw2Id"/>
        <item FieldName="Verantw2Erziehungsberechtigt" FieldType="fftBoolean"/>
        <item FieldName="Verantw2Umgangsberechtigt" FieldType="fftBoolean"/>
        <item FieldName="Verantw2Art"/>
        <item FieldName="Verantw2Vorname" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw2Nachname" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw2Titel" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw2AkadTitel" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw2Geburtsdatum" FieldType="fftDateTime"/>
        <item FieldName="Verantw2Geschlecht" FieldType="fftString"/>
        <item FieldName="Verantw2Namenszusatz" FieldType="fftString" Size="32"/>
        <item FieldName="Verantw2Strasse" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw2Ortsname" FieldType="fftString" Size="256"/>
        <item FieldName="Verantw2PLZ" FieldType="fftString" Size="32"/>
        <item FieldName="Verantw2EMail" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw2Telefon1" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw2Telefon2" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw2Bankverbindung" FieldType="fftString" Size="64"/>
        <item FieldName="Verantw2Fax" FieldType="fftString" Size="64"/>
        <item FieldName="SerienBriefAnredeErz2"/>
        <item FieldName="G1" FieldType="fftString"/>
        <item FieldName="aT1" FieldType="fftString" Size="64"/>
        <item FieldName="G2" FieldType="fftString"/>
        <item FieldName="aT2" FieldType="fftString" Size="64"/>
      </FieldDefs>
    </TfrxMYDACQuery>
    <TfrxMYDACQuery Name="anz" UserName="anz" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="232" Top="112" IgnoreDupParams="False" SQL.Text="" LocalMasterDetail="False"/>
    <TfrxMYDACQuery Name="qk" UserName="qk" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Master="d" Left="420" Top="112" IgnoreDupParams="False" SQL.Text="###      &#13;&#10;### wird zur Laufzeit geaendert&#13;&#10;###&#13;&#10;select * from&#13;&#10;(select PersonId Person,k.*,-1 PArt from kontakt k&#13;&#10;union&#13;&#10;select sv.SchuelerId Person,k.*,sv.Art PArt from kontakt k &#13;&#10;inner join schuelerverantwortlicher sv on (k.PersonId=sv.VerantwortlicherId)&#13;&#10;inner join verantwortlicher v on sv.VerantwortlicherId=v.ID&#13;&#10;) aa&#13;&#10;where sv.Art=0 and Berichtsstufe=0 and NurIntern=0&#13;&#10;order by Part,Adresse&#13;&#10;limit 2                 " MasterFields="Person=SchuelerId" LocalMasterDetail="False"/>
  </TfrxDataPage>
  <TfrxReportPage Name="Page1" HGuides.Text="" VGuides.Text="" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="20" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" Frame.Typ="0" MirrorMode="0">
    <TfrxMasterData Name="MasterData" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="30" Left="0" Top="207,87415" Width="680,3154" ColumnWidth="0" ColumnGap="0" DataSet="d" DataSetName="d" RowCount="0">
      <TfrxMemoView Name="memSchülerName" AllowVectorExport="True" Left="0" Top="0" Width="210" Height="30" Editable="3" OnAfterData="memSchülerNameOnAfterData" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" GapX="0" GapY="0" ParentFont="False" VAlign="vaCenter" Text="[IIF(&#60;d.&#34;SchuelerNamenszusatz&#34;&#62;&#60;&#62;&#39;&#39;,&#60;d.&#34;SchuelerNamenszusatz&#34;&#62;+&#39; &#39;,&#39;&#39;)][d.&#34;SchuelerNachname&#34;], [d.&#34;SchuelerRufname&#34;] ([d.&#34;SchuelerGeschlecht&#34;])">
        <Formats>
          <item/>
          <item/>
          <item/>
          <item/>
        </Formats>
      </TfrxMemoView>
      <TfrxLineView Name="trlinie" AllowVectorExport="True" Left="0" Top="30" Width="680" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="memSchülerAdresse" AllowVectorExport="True" Left="213" Top="0" Width="150" Height="28" Editable="3" OnAfterData="memSchülerAdresseOnAfterData" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Arial" Font.Style="0" Frame.Typ="0" GapX="0" ParentFont="False" WordWrap="False" VAlign="vaCenter" Text="[d.&#34;SchuelerPLZ&#34;] [d.&#34;SchuelerOrtsname&#34;]&#13;&#10;[IIF((&#60;Ortdr&#62;=1) and (&#60;d.&#34;SchuelerOrtsteil&#34;&#62;&#62;&#39;&#39;),&#39; (&#39;+&#60;d.&#34;SchuelerOrtsteil&#34;&#62;+&#39;)&#39;,&#39;&#39;)]"/>
      <TfrxSubreport Name="Subreport1" AllowVectorExport="True" Left="505" Top="0" Width="176" Height="30" Page="Page2"/>
      <TfrxMemoView Name="memSchülerStraße" AllowVectorExport="True" Left="364" Top="0" Width="142" Height="30" Editable="3" OnAfterData="memSchülerStraßeOnAfterData" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Arial" Font.Style="0" Frame.Typ="0" GapX="0" ParentFont="False" VAlign="vaCenter" Text="[d.&#34;SchuelerStrasse&#34;]"/>
    </TfrxMasterData>
    <TfrxGroupFooter Name="GroupFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="62,42517" Left="0" Top="260,78757" Width="680,3154" KeepWithData="False" HideIfSingleDataRecord="True">
      <TfrxMemoView Name="Memo8" AllowVectorExport="True" Left="0" Top="10,92919" Width="313,70099" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="weiblich: [SUM(IIF(&#60;d.&#34;SchuelerGeschlecht&#34;&#62;=&#39;w&#39;,1,0),)] / männlich: [SUM(IIF(&#60;d.&#34;SchuelerGeschlecht&#34;&#62;=&#39;m&#39;,1,0),)] / divers: [SUM(IIF(&#60;d.&#34;SchuelerGeschlecht&#34;&#62;=&#39;d&#39;,1,0),)]">
        <Formats>
          <item/>
          <item/>
          <item/>
        </Formats>
      </TfrxMemoView>
      <TfrxMemoView Name="Memo33" AllowVectorExport="True" Left="0" Top="43,35436" Width="517,79561" Height="18,89765" Editable="3" StretchMode="smActualHeight" Font.Charset="1" Font.Color="-16777208" Font.Height="-11" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[IIF(AktuellerFilter&#60;&#62;&#39;&#39;,&#39;Filter: &#39;+AktuellerFilter,&#39;&#39;)"/>
      <TfrxMemoView Name="Memo1" Align="baRight" AllowVectorExport="True" Left="600,3154296875" Top="44" Width="80" Height="16" Editable="3" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Adressen-Kontakt-e;  [Page#] / [TotalPages#]"/>
    </TfrxGroupFooter>
    <TfrxGroupHeader Name="GroupHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="0" Left="0" Top="185,19697" Width="680,3154" OnBeforePrint="GroupHeader1OnBeforePrint" KeepWithData="False" Condition="d.&#34;GruppeBezeichnung&#34;" StartNewPage="True"/>
    <TfrxPageHeader Name="PageHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Font.Charset="1" Font.Color="0" Font.Height="-13" Font.Name="Arial" Font.Style="1" Height="105,82684" Left="0" ParentFont="False" Top="18,89765" Width="680,3154">
      <TfrxMemoView Name="Memo2" AllowVectorExport="True" Left="-3,77953" Top="1,33859" Width="302,3624" Height="22,67718" Editable="3" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[d.&#34;SchuleName&#34;]"/>
      <TfrxMemoView Name="Memo9" Align="baRight" AllowVectorExport="True" Left="585,8271796875" Top="2,77953" Width="94,48825" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[Date]"/>
      <TfrxMemoView Name="Memo10" Align="baRight" AllowVectorExport="True" Left="585,8271796875" Top="25,45671" Width="94,48825" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="[d.&#34;SchuljahrBezeichnung&#34;]"/>
      <TfrxMemoView Name="Memo11" AllowVectorExport="True" Left="209,913575" Top="44,35436" Width="94,48825" Height="18,89765" Editable="3" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-15" Font.Name="Arial" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" Text="Schülerliste [d.&#34;GruppeBezeichnung&#34;]"/>
      <TfrxMemoView Name="Memo12" AllowVectorExport="True" Left="340,7483" Top="45,35436" Width="196,53556" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="([IIF(&#60;d.&#34;Lehrernachname1&#34;&#62;&#62;&#39;&#39;,IIF(&#60;d.&#34;G1&#34;&#62;=&#39;m&#39;,&#39;Herr &#39;,&#39;Frau &#39;)+IIF(&#60;d.&#34;aT1&#34;&#62;&#62;&#39;&#39;,&#60;d.&#34;aT1&#34;&#62;+&#39; &#39;,&#39;&#39;)+&#60;d.&#34;Lehrernachname1&#34;&#62;,&#39;&#39;)][IIF(&#60;d.&#34;Lehrernachname2&#34;&#62;&#62;&#39;&#39;,IIF(&#60;d.&#34;G2&#34;&#62;=&#39;m&#39;,&#39; / Herr &#39;,&#39; / Frau &#39;)+IIF(&#60;d.&#34;aT2&#34;&#62;&#62;&#39;&#39;,&#60;d.&#34;aT2&#34;&#62;+&#39; &#39;,&#39;&#39;)+&#60;d.&#34;Lehrernachname2&#34;&#62;,&#39;&#39;)])"/>
      <TfrxMemoView Name="Memo13" AllowVectorExport="True" Left="0" Top="80,48825" Width="210" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="Name"/>
      <TfrxMemoView Name="Memo15" AllowVectorExport="True" Left="211,90551181" Top="80,48825" Width="170" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="PLZ Ort"/>
      <TfrxMemoView Name="Memo16" AllowVectorExport="True" Left="386" Top="80,48825" Width="142" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="Straße"/>
      <TfrxMemoView Name="Memo17" AllowVectorExport="True" Left="530" Top="80,48825" Width="150" Height="18,89765" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="Kontakt"/>
      <TfrxLineView Name="Line1" AllowVectorExport="True" Left="0" Top="103,16543" Width="676,53587" Height="0" Color="0" Frame.Typ="4"/>
    </TfrxPageHeader>
  </TfrxReportPage>
  <TfrxDialogPage Name="DialogPage1" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" HGuides.Text="" VGuides.Text="" BorderStyle="bsDialog" Caption="Optionen" DoubleBuffered="False" Height="245" ClientHeight="206" Left="699" Top="231" Width="244" Scaled="True" ClientWidth="228">
    <TfrxLabelControl Name="Label1" Left="23" Top="26" Width="185" Height="54" ShowHint="True" AutoSize="False" Caption="Geben Sie eine oder zwei gewünschte Berichtststufe(n) durch Komma getrennt ein:" Color="-16777201" WordWrap="True"/>
    <TfrxEditControl Name="Edit1" Left="24" Top="97" Width="35" Height="21" ShowHint="True" Color="-16777211" MaxLength="0" PasswordChar="0" Text="0" OnChange="Edit1OnChange"/>
    <TfrxButtonControl Name="weiter" Tag="2" Left="125" Top="168" Width="83" Height="25" ShowHint="True" Caption="weiter" OnEnter="weiterOnEnter"/>
    <TfrxCheckBoxControl Name="OTdr" Left="21" Top="132" Width="137" Height="17" ShowHint="True" Caption="Ortsteile drucken" Checked="True" State="cbChecked" Color="-16777201"/>
  </TfrxDialogPage>
  <TfrxReportPage Name="Page2" HGuides.Text="" VGuides.Text="" PaperWidth="210" PaperHeight="297" PaperSize="9" LeftMargin="10" RightMargin="10" TopMargin="10" BottomMargin="10" ColumnWidth="0" ColumnPositions.Text="" Frame.Typ="0" MirrorMode="0">
    <TfrxMasterData Name="MasterData1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="14" Left="0" Top="18,89765" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="qk" DataSetName="qk" RowCount="0" Stretched="True">
      <TfrxMemoView Name="memSubRepSchülerAdresse" AllowVectorExport="True" Left="0" Top="0" Width="178" Height="15" Editable="3" OnAfterData="memSubRepSchülerAdresseOnAfterData" StretchMode="smActualHeight" ContentScaleOptions.Constraints.MaxIterationValue="0" ContentScaleOptions.Constraints.MinIterationValue="0" Font.Charset="1" Font.Color="-16777208" Font.Height="-12" Font.Name="Arial" Font.Style="0" Frame.Typ="0" GapX="0" GapY="0" LineSpacing="1" ParentFont="False" VAlign="vaCenter" Text="[qk.&#34;Adresse&#34;][IIF(&#60;qk.&#34;PArt&#34;&#62;&#62;=0,&#39;, &#39;+d_Verantwortlichenart(&#60;qk.&#34;PArt&#34;&#62;),&#39;&#39;)]"/>
    </TfrxMasterData>
  </TfrxReportPage>
</TfrxReport>
