<?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="39766,9067881944" ReportOptions.Description.Text="" ReportOptions.LastChange="46209,5514296528" ScriptLanguage="PascalScript" ScriptText.Text="var&#13;&#10;  kurs,agkurs,order,aa,kurs1,beleg,hj,laenge : string;&#13;&#10;  rows : array[0..50] of string;&#13;&#10;  kursz,kurssel,i,monat,Halbj,diff :integer;&#13;&#10;const&#13;&#10;// Welche Kurse gibt es?&#13;&#10;   ags=&#39;select f.Kennzahl Kuerzel,k.Bezeichnung from danis d&#39;+&#13;&#10;   &#39; inner join kurs k on (d.SchulgliederungId=k.SchulgliederungId or OffenerKurs=1) left join Fach f on k.FachId=f.Id&#39; + &#39; where F.Kennzahl=&#34;RE&#34; or F.Kennzahl=&#34;RK&#34; or F.Kennzahl=&#34;IS&#34; or F.Kennzahl=&#34;WN&#34; or F.Kennzahl=&#34;KR&#34; or F.Kennzahl=&#34;RC&#34;&#39;;&#13;&#10;&#13;&#10;&#13;&#10;procedure kurswahlOnActivate(Sender: TfrxComponent);&#13;&#10;  var&#13;&#10;    j:integer;&#13;&#10;  begin&#13;&#10;  diff:=0;&#13;&#10;&#13;&#10;  // Laenge vorbelegen&#13;&#10;  laenge:=Edit1.Text;&#13;&#10;  if trim(laenge)=&#39;&#39; then laenge:=&#39;255&#39;;&#13;&#10;&#13;&#10;  // Halbjahr vorbelegen&#13;&#10;  DecodeDate(date,0,monat,0);&#13;&#10;  if (monat&#62;=2) and (monat &#60;8) then&#13;&#10;     hj2.checked:=true;&#13;&#10;  if (monat&#62;=8) or (monat &#60;2) then&#13;&#10;       hj1.checked:=true;&#13;&#10;&#13;&#10;  //showmessage(ags);&#13;&#10;  qag.SQL.Text:=ags+&#39; group by f.Kennzahl&#39;;&#13;&#10;  qag.Open;&#13;&#10;  CheckListBox1.clear;&#13;&#10;  j:=0;&#13;&#10;  if CheckListBox1.items.Count&#60;=0 then&#13;&#10;  begin&#13;&#10;  try&#13;&#10;    while not qag.Eof do&#13;&#10;    begin&#13;&#10;      j:=j+1;&#13;&#10;      agkurs:=qag.FieldByName(&#39;Kuerzel&#39;).AsString;&#13;&#10;      CheckListBox1.items.add(agkurs);&#13;&#10;      qag.Next;&#13;&#10;    end;&#13;&#10;  finally&#13;&#10;    qag.Close;&#13;&#10;  end;&#13;&#10;  end;&#13;&#10;  for j:=0 to CheckListBox1.items.Count-1 do&#13;&#10;  begin&#13;&#10;    CheckListBox1.checked[j]:=true;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Button2OnClick(Sender: TfrxComponent);&#13;&#10;      var&#13;&#10;     j:integer;&#13;&#10;begin&#13;&#10;  for j:=0 to CheckListBox1.items.Count-1 do&#13;&#10;  //for j:=0 to kursz do&#13;&#10;  begin&#13;&#10;    if CheckListBox1.checked[j]=true then&#13;&#10;    CheckListBox1.checked[j]:= false&#13;&#10;  else&#13;&#10;     CheckListBox1.checked[j]:= true;&#13;&#10;  end;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Hj1OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;   if Hj1.checked=true then&#13;&#10;   hj:= &#39;b.Von=1 and&#39;;&#13;&#10;   Halbj:=1;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure Hj2OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;   if Hj2.checked=true then&#13;&#10;   hj:= &#39;b.Bis=2 and&#39;;&#13;&#10;   Halbj:=2;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;procedure Button1OnEnter(Sender: TfrxComponent);&#13;&#10;    var&#13;&#10;     j:integer;&#13;&#10;     order:string;&#13;&#10;begin&#13;&#10;  i:=1;&#13;&#10;  kursz:=CheckListBox1.items.Count-1;&#13;&#10;  kurssel:=0;&#13;&#10;  //showmessage(laenge);&#13;&#10;  kurs:=ags;&#13;&#10;  kurs1:=&#39;&#39;;&#13;&#10;  beleg:=&#39;&#39;;&#13;&#10;  for j:=0 to kursz do&#13;&#10;  begin&#13;&#10;    if CheckListBox1.checked[j] = true then&#13;&#10;    begin&#13;&#10;       rows[i]:=CheckListBox1.Items[j];&#13;&#10;       //showmessage(ags);&#13;&#10;       if i=1 then&#13;&#10;          begin&#13;&#10;               beleg:=&#39;&#34;&#39;+CheckListBox1.Items[j]+&#39;&#34;&#39;;&#13;&#10;          end&#13;&#10;       else&#13;&#10;          begin&#13;&#10;               beleg:=beleg+&#39;,&#39;+&#39;&#34;&#39;+CheckListBox1.Items[j]+&#39;&#34;&#39;;&#13;&#10;          end;&#13;&#10;       i:=i+1;&#13;&#10;    end;&#13;&#10;  end;&#13;&#10;  kurssel:=i-1;&#13;&#10;  //showmessage(laenge);&#13;&#10;  if kurssel&#62;0 then&#13;&#10;  begin&#13;&#10;  end;&#13;&#10;  qag.SQL.Text:=kurs+kurs1;&#13;&#10;  //showmessage(kurs+kurs1);&#13;&#10;  if diff=0 then&#13;&#10;  begin&#13;&#10;  aa:=&#39;select d.JahrgangsdatenId,SchuelerNachname,SchuelerRufname,SchuelerNamenszusatz,SchuelerGeschlecht,GruppeBezeichnung,&#39;+&#13;&#10;    &#39; concat(&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 0,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 1,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 2,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 3,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 4,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 5,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 6,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 7,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 8,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 9,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 10,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 11,1),&#34;&#34;),&#34;  |  &#34;)),&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+Wochentag,&#34;&#34;,&#34; [Mo]&#34;,&#34; [Di]&#34;,&#34; [Mi]&#34;,&#34; [Do]&#34;,&#34; [Fr]&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 12,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;   &#39;) kurse&#39;;&#13;&#10;   end&#13;&#10;  else&#13;&#10;  begin&#13;&#10;  aa:=&#39;select d.JahrgangsdatenId,SchuelerNachname,SchuelerRufname,SchuelerNamenszusatz,SchuelerGeschlecht,GruppeBezeichnung,&#39;+&#13;&#10;    &#39; concat(&#39;+&#13;&#10;    &#39;(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 0,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 1,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 2,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 3,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 4,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 5,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 6,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 7,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 8,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 9,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 10,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 11,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;,(select concat(ifnull((select concat(left(k.Bezeichnung,&#39;+laenge+&#39;),ELT(1+b.Niveau,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (G)&#34;,&#34; (E)&#34;,&#34; (Z)&#34;)) from belegung b left join kurs k on b.KursId=k.Id left join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) order by k.Wochentag,k.Bezeichnung limit 12,1),&#34;&#34;),&#34;  |  &#34;))&#39;+&#13;&#10;    &#39;) kurse&#39;;&#13;&#10;  end;&#13;&#10;  aa:=aa+&#13;&#10;  &#39; from danis d&#39;;&#13;&#10;  //&#39; order by Schulformkuerzel,GruppeJahrgangsstufe, GruppeBezeichnung,SchuelerNachname,SchuelerRufname&#39;;&#13;&#10;&#13;&#10;  if nurBelegung.checked then&#13;&#10;    begin&#13;&#10;      order:= &#39;order by SchuelerNachname,SchuelerRufname&#39;;&#13;&#10;      aa:=aa+&#39; where (select k.Bezeichnung from belegung b inner join kurs k on b.KursId=k.Id inner join fach f on k.FachId=f.Id where &#39;+hj+&#39; d.JahrgangsdatenId=b.JahrgangsdatenId and f.Kennzahl in (&#39;+ beleg+&#39;) limit 1)&#62;&#34;&#34;&#39;;&#13;&#10;      aa:=aa+order;&#13;&#10;      GroupHeader1.visible:=false;&#13;&#10;      Memo9.visible:=true;&#13;&#10;    end&#13;&#10;    else&#13;&#10;    begin&#13;&#10;      order:= &#39; order by Schulformkuerzel,GruppeJahrgangsstufe, GruppeBezeichnung,SchuelerNachname,SchuelerRufname&#39;;&#13;&#10;      aa:=aa+order;&#13;&#10;    end;&#13;&#10;&#13;&#10;  qbel.SQL.Text:=aa;&#13;&#10;  //showmessage (qbel.SQL.Text);&#13;&#10;  if kurssel&#62;0 then kurswahl.ModalResult := mrOk;&#13;&#10;end;&#13;&#10;&#13;&#10;&#13;&#10;&#13;&#10;procedure Edit1OnChange(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  laenge:=trim(Edit1.Text);&#13;&#10;  if trim(laenge)=&#39;&#39; then laenge:=&#39;255&#39;;&#13;&#10;  if trim(laenge)=&#39;0&#39; then laenge:=&#39;255&#39;;&#13;&#10;end;&#13;&#10;&#13;&#10;procedure CheckBox1OnClick(Sender: TfrxComponent);&#13;&#10;begin&#13;&#10;  if diff=0 then&#13;&#10;    diff:=1&#13;&#10;  else&#13;&#10;    diff:=0;&#13;&#10;end;&#13;&#10;&#13;&#10;begin&#13;&#10;&#13;&#10;end." StoreInDFM="False">
  <Datasets>
    <item DataSet="qag" DataSetName="qag"/>
    <item DataSet="d" DataSetName="d"/>
    <item DataSet="qbel" DataSetName="qbel"/>
    <item DataSet="sh" DataSetName="sh"/>
  </Datasets>
  <TfrxDataPage Name="Data" HGuides.Text="" VGuides.Text="" Height="1000" Left="0" Top="0" Width="1000">
    <TfrxMYDACQuery Name="qag" UserName="qag" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="122" Top="88" IgnoreDupParams="False" SQL.Text="    " LocalMasterDetail="False"/>
    <TfrxMYDACQuery Name="d" UserName="d" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Master="qbel" Left="281" Top="92" IgnoreDupParams="False" SQL.Text="select JahrgangsdatenId,SchuelerId,SchuelerNachname,SchuelerRufname,SchuelerGeschlecht&#13;&#10;,SchuelerNamenszusatz,SchuelerKonfession,SchuljahrBezeichnung,GruppeBezeichnung,LehrerId1,LehrerId2                                                                                &#13;&#10;,(concat(if(p1.Geschlecht=&#39;m&#39;,&#39;Herr &#39;,&#39;Frau &#39;),if(p1.akadTitel&#62;&#39;&#39;,concat(p1.akadTitel,&#39; &#39;),&#39;&#39;),if(p1.Namenszusatz&#62;&#39;&#39;,concat(p1.Namenszusatz,&#39; &#39;),&#39;&#39;),d.LehrerNachname1,if(d.LehrerId2&#62;0,concat(&#39; &#38; &#39;,if(p2.Geschlecht=&#39;m&#39;,&#39;Herr &#39;,&#39;Frau &#39;),if(p2.akadTitel&#62;&#39;&#39;,concat(p2.akadTitel,&#39; &#39;),&#39;&#39;),if(p2.Namenszusatz&#62;&#39;&#39;,concat(p2.Namenszusatz,&#39; &#39;),&#39;&#39;),d.LehrerNachname2),&#39;&#39;))) GrLehrer    &#13;&#10;from danis d     &#13;&#10;left join person p1 on LehrerId1=p1.Id&#13;&#10;left join person p2 on LehrerId2=p2.Id    " MasterFields="JahrgangsdatenId=JahrgangsdatenId" LocalMasterDetail="False">
      <FieldDefs>
        <item FieldName="JahrgangsdatenId"/>
        <item FieldName="SchuelerId"/>
        <item FieldName="SchuelerNachname" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerRufname" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerGeschlecht" FieldType="fftString"/>
        <item FieldName="SchuelerNamenszusatz" FieldType="fftString" Size="32"/>
        <item FieldName="SchuelerKonfession" FieldType="fftString" Size="128"/>
        <item FieldName="SchuljahrBezeichnung" FieldType="fftString" Size="64"/>
        <item FieldName="GruppeBezeichnung" FieldType="fftString" Size="56"/>
        <item FieldName="LehrerId1"/>
        <item FieldName="LehrerId2"/>
        <item FieldName="GrLehrer" FieldType="fftString" Size="721"/>
      </FieldDefs>
    </TfrxMYDACQuery>
    <TfrxMYDACQuery Name="qbel" UserName="qbel" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="424" Top="92" IgnoreDupParams="False" SQL.Text="##    &#13;&#10;## wird zur laufzeit geandert&#13;&#10;##      &#13;&#10;select d.JahrgangsdatenId,f.Kennzahl,SchuelerNachname,SchuelerRufname,SchuelerNamenszusatz,SchuelerGeschlecht,GruppeBezeichnung,                              &#13;&#10;concat(&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 1,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 1,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 2,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 2,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 3,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 3,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 4,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 4,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 5,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 5,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 6,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 6,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 7,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 7,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 8,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 8,1),&#39;&#39;),&#39; | &#39;,&#13;&#10;if ((select KursId from belegung where j.Id=jahrgangsdatenId limit 9,1)&#62;0,(select k.Bezeichnung from belegung b left join kurs k on b.KursId=k.Id where j.Id=b.JahrgangsdatenId order by k.Bezeichnung limit 9,1),&#39;&#39;),&#39; | &#39;&#13;&#10;) kurse&#13;&#10;from danis d inner join jahrgangsdaten j on d.JahrgangsdatenId=j.Id                                                                       &#13;&#10;left join belegung b on j.Id=b.JahrgangsdatenId&#13;&#10;left join kurs k on b.KursId=k.Id&#13;&#10;left join fach f on k.FachId=f.Id&#13;&#10;left join gruppe g on j.GruppeId=g.Id&#13;&#10;left join person p on j.schuelerId=p.Id&#13;&#10;#where GruppeId=2743&#13;&#10;&#13;&#10;                                            " LocalMasterDetail="False">
      <FieldDefs>
        <item FieldName="JahrgangsdatenId"/>
        <item FieldName="Kennzahl" FieldType="fftString" Size="16"/>
        <item FieldName="SchuelerNachname" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerRufname" FieldType="fftString" Size="256"/>
        <item FieldName="SchuelerNamenszusatz" FieldType="fftString" Size="32"/>
        <item FieldName="SchuelerGeschlecht" FieldType="fftString"/>
        <item FieldName="GruppeBezeichnung" FieldType="fftString" Size="56"/>
        <item FieldName="kurse" FieldType="fftString" Size="1179"/>
      </FieldDefs>
    </TfrxMYDACQuery>
    <TfrxMYDACQuery Name="sh" UserName="sh" CloseDataSource="True" BCDToCurrency="False" DataSetOptions="0" Left="168" Top="212" IgnoreDupParams="False" SQL.Text="select * from schule                                             " LocalMasterDetail="False">
      <FieldDefs>
        <item FieldName="Id"/>
        <item FieldName="UpdateCount"/>
        <item FieldName="Name" FieldType="fftString" Size="256"/>
        <item FieldName="IdentNummer" FieldType="fftString" Size="64"/>
        <item FieldName="Land" FieldType="fftString" Size="64"/>
        <item FieldName="Adresse" FieldType="fftString" Size="64"/>
        <item FieldName="PLZ"/>
        <item FieldName="Ort" FieldType="fftString" Size="64"/>
        <item FieldName="Telefon" FieldType="fftString" Size="64"/>
        <item FieldName="Fax" FieldType="fftString" Size="64"/>
        <item FieldName="EMail" FieldType="fftString" Size="64"/>
        <item FieldName="Homepage" FieldType="fftString" Size="64"/>
        <item FieldName="Bank" FieldType="fftString" Size="64"/>
        <item FieldName="Logo"/>
        <item FieldName="AnzahlStandorte"/>
        <item FieldName="SchulleiterID"/>
        <item FieldName="Schultraeger" FieldType="fftString" Size="255"/>
        <item FieldName="StandardLehrmittelausleiheID"/>
        <item FieldName="Dienststelle" FieldType="fftString" Size="255"/>
        <item FieldName="DienststelleMail" FieldType="fftString" Size="255"/>
      </FieldDefs>
    </TfrxMYDACQuery>
  </TfrxDataPage>
  <TfrxReportPage Name="Page1" 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" PrintIfEmpty="False">
    <TfrxMasterData Name="MasterData2" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="28" Left="0" Top="204,09462" Width="718,1107" ColumnWidth="0" ColumnGap="0" DataSet="qbel" DataSetName="qbel" RowCount="0">
      <TfrxLineView Name="Line4" AllowVectorExport="True" Left="4" Top="27" Width="712" Height="0" Color="0" Frame.Typ="4"/>
      <TfrxMemoView Name="Memo2" Align="baLeft" AllowVectorExport="True" Left="42" Top="4,551175" Width="200" 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;qbel.&#34;SchuelerNamenszusatz&#34;&#62;&#60;&#62;&#39;&#39;,&#60;qbel.&#34;SchuelerNamenszusatz&#34;&#62; + &#39; &#39;,&#39;&#39;)][qbel.&#34;SchuelerNachname&#34;], [qbel.&#34;SchuelerRufname&#34;] ([qbel.&#34;SchuelerGeschlecht&#34;])"/>
      <TfrxMemoView Name="Memo3" AllowVectorExport="True" Left="443,71181272" Top="4,551175" Width="238,11039" Height="18,89765" Editable="3" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[iif(Pos(&#39;|    |&#39;,&#60;qbel.&#34;kurse&#34;&#62;)&#62;0,Copy(&#60;qbel.&#34;kurse&#34;&#62;,1,Pos(&#39;|    |&#39;,&#60;qbel.&#34;kurse&#34;&#62;)-1),IIF(Copy(&#60;qbel.&#34;kurse&#34;&#62;,Length(&#60;qbel.&#34;kurse&#34;&#62;)-1,1)=&#39;  |&#39;,Copy(&#60;qbel.&#34;kurse&#34;&#62;,1,Length(&#60;qbel.&#34;kurse&#34;&#62;)-2),&#60;qbel.&#34;kurse&#34;&#62;))]"/>
      <TfrxMemoView Name="Memo9" AllowVectorExport="True" Left="0" Top="4,55" Width="42" Height="18,9" Editable="3" Visible="False" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" VAlign="vaCenter" Text="[d.&#34;GruppeBezeichnung&#34;]"/>
      <TfrxMemoView Name="dSchuelerKonfession" AllowVectorExport="True" Left="264,5671" Top="3,77953" Width="158,74026" Height="18,89765" Editable="3" DataField="SchuelerKonfession" DataSet="d" DataSetName="d" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="[d.&#34;SchuelerKonfession&#34;]"/>
      <TfrxLineView Name="Line2" AllowVectorExport="True" Left="434,64595" Top="0" Width="0" Height="26,45671" Color="0" Frame.Typ="1"/>
      <TfrxLineView Name="Line3" AllowVectorExport="True" Left="253,22851" Top="0" Width="0" Height="26,45671" Color="0" Frame.Typ="1"/>
    </TfrxMasterData>
    <TfrxPageHeader Name="PageHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="52,9133858267717" Left="0" Top="18,89765" Width="718,1107">
      <TfrxMemoView Name="Memo5" AllowVectorExport="True" Left="0" Top="4" Width="278,3624" Height="19" 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="[sh.&#34;Name&#34;]"/>
      <TfrxMemoView Name="Memo14" AllowVectorExport="True" Left="567,60668" Top="4" Width="148,91342" Height="45,45671" Editable="3" DisplayFormat.DecimalSeparator="," Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Datum: [Date]"/>
      <TfrxMemoView Name="Memo6" Align="baCenter" AllowVectorExport="True" Left="131,338753886719" Top="29,67718" Width="455,43321" Height="19" Editable="3" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" HAlign="haCenter" ParentFont="False" Text="Religionszugehörigkeit und entsprechende Kursbelegungen"/>
    </TfrxPageHeader>
    <TfrxGroupHeader Name="GroupHeader1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="49,13387535" Left="0" Top="132,28355" Width="718,1107" KeepWithData="False" Condition="qbel.&#34;GruppeBezeichnung&#34;" StartNewPage="True">
      <TfrxMemoView Name="Memo8" Align="baRight" AllowVectorExport="True" Left="623,622467773438" Top="0" Width="94,48825" Height="18,89765" Editable="3" AutoWidth="True" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" HAlign="haRight" ParentFont="False" Text="Schulj.:[d.&#34;SchuljahrBezeichnung&#34;] / [IIF(&#60;Halbj&#62;=1,&#39;1.Hj.&#39;,&#39;2.Hj.&#39;)]"/>
      <TfrxMemoView Name="Memo10" AllowVectorExport="True" Left="-0,98596435" Top="0,16432739" Width="389,45591739" Height="19,22630478" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="1" Frame.Typ="0" ParentFont="False" Text="[d.&#34;GruppeBezeichnung&#34;][IIF(&#60;d.&#34;GrLehrer&#34;&#62;&#62;&#39;&#39;,&#39;; &#39;+&#60;d.&#34;GrLehrer&#34;&#62;,&#39;&#39;)]"/>
      <TfrxMemoView Name="Memo7" AllowVectorExport="True" Left="263,08815348" Top="25,47074565" Width="144,27944957" Height="23,00583478" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Religionszugehörigkeit"/>
      <TfrxMemoView Name="Memo11" AllowVectorExport="True" Left="444,5810287" Top="24,9092926" Width="160,5478613" Height="22,01987043" Editable="3" Font.Charset="1" Font.Color="-16777208" Font.Height="-13" Font.Name="Arial" Font.Style="0" Frame.Typ="0" ParentFont="False" Text="Belegung"/>
      <TfrxLineView Name="Line1" AllowVectorExport="True" Left="434,64595" Top="22,67718" Width="0" Height="26,45671" Color="0" Frame.Typ="1"/>
      <TfrxLineView Name="Line5" AllowVectorExport="True" Left="253,22851" Top="22,67718" Width="0" Height="26,45671" Color="0" Frame.Typ="1"/>
      <TfrxLineView Name="Line6" AllowVectorExport="True" Left="0" Top="49,13389" Width="718,1107" Height="0" Color="0" Frame.Typ="4"/>
    </TfrxGroupHeader>
    <TfrxPageFooter Name="PageFooter1" FillType="ftBrush" FillGap.Top="0" FillGap.Left="0" FillGap.Bottom="0" FillGap.Right="0" Frame.Typ="0" Height="34,01577" Left="0" Top="291,02381" Width="718,1107">
      <TfrxMemoView Name="Memo1" Align="baRight" AllowVectorExport="True" Left="623,622467773438" Top="3,77953" Width="94,48825" Height="18,89765" 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="Belegung-hor; [Page#] / [TotalPages#]"/>
      <TfrxMemoView Name="Memo4" AllowVectorExport="True" Left="0" Top="7,55906" Width="593,38621" Height="18,89765" Editable="3" 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;)"/>
    </TfrxPageFooter>
  </TfrxReportPage>
  <TfrxDialogPage Name="kurswahl" Font.Charset="1" Font.Color="0" Font.Height="-11" Font.Name="Tahoma" Font.Style="0" HGuides.Text="" VGuides.Text="" Caption="Auswahl Halbjahr" DoubleBuffered="False" Height="128" ClientHeight="89" Left="663" Top="236" Width="293" Scaled="True" ClientWidth="277" OnActivate="kurswahlOnActivate">
    <TfrxCheckListBoxControl Name="CheckListBox1" Left="36" Top="91" Width="1" Height="1" ShowHint="True" Color="-16777211" Items.Text="" OnEnter="CheckListBox1OnEnter"/>
    <TfrxButtonControl Name="Button1" Left="98" Top="55" Width="75" Height="25" ShowHint="True" Caption="weiter" OnClick="Button1OnClick" OnEnter="Button1OnEnter"/>
    <TfrxButtonControl Name="Button2" Left="204" Top="50" Width="203" Height="25" ShowHint="True" Visible="False" Caption="Auswahl umkehren" OnClick="Button2OnClick" OnEnter="Button2OnEnter"/>
    <TfrxGroupBoxControl Name="Halbjahr" Left="36" Top="8" Width="201" Height="37" ShowHint="True" Color="-16777201">
      <TfrxRadioButtonControl Name="Hj1" Left="8" Top="12" Width="57" Height="17" ShowHint="True" Caption="1.Hj." TabStop="False" Color="-16777201" OnClick="Hj1OnClick"/>
      <TfrxRadioButtonControl Name="Hj2" Left="144" Top="12" Width="57" Height="17" ShowHint="True" Caption="2. Hj." TabStop="False" Color="-16777201" OnClick="Hj2OnClick"/>
    </TfrxGroupBoxControl>
    <TfrxEditControl Name="Edit1" Left="228" Top="54" Width="21" Height="21" ShowHint="True" Visible="False" Color="-16777211" MaxLength="0" PasswordChar="0" OnChange="Edit1OnChange"/>
    <TfrxCheckBoxControl Name="CheckBox1" Left="204" Top="56" Width="97" Height="17" ShowHint="True" Visible="False" Caption="Differenzierung" Color="-16777201" OnClick="CheckBox1OnClick"/>
    <TfrxCheckBoxControl Name="nurBelegung" Left="200" Top="60" Width="203" Height="17" ShowHint="True" Visible="False" Caption="Nur die Schüler mit Belegung(en)" Color="-16777201"/>
  </TfrxDialogPage>
</TfrxReport>
