Ergabfrage Einz.rTPF0 TDataSource DataSource1TagDataSet qrystarterTPF0 TQRDWQuery qrystarterTagActive ConnectionDMWK.ADOConnection1CursorLocation clUseServer ParametersNameSTARTNR Attributes paNullableDataType ftFixedChar NumericScale PrecisionSizeValueNameSTARTNR Attributes paNullableDataType ftFixedChar NumericScale PrecisionSizeValue SQL.StringsSELECT Starter.Startnr, Starter.Passnr, Starter.Nachname, Starter.Vorname, wettk.bezeichnung, wettk.teilermessung, verein.kurzname, scheiben.*:from starter, wettk, verein, ergebnis, zuordnung, scheibenTwhere (( starter.startnr > 0 and :STARTNR = 0 ) or ( starter.startnr = :STARTNR ))&and ergebnis.startnr = starter.startnr and wettk.dp_id = ergebnis.dp_id&and zuordnung.erg_id = ergebnis.erg_id+and scheiben.sch_id = zuordnung.scheiben_id(and starter.vereinsnr = verein.vereinsnrKorder by starter.startnr, wettk.bezeichnung, ergebnis.erg_id, zuordnung.pos RequestLiveOriginalSQL.StringsSELECT Starter.Startnr, Starter.Passnr, Starter.Nachname, Starter.Vorname, wettk.bezeichnung, wettk.teilermessung, verein.kurzname, scheiben.*:from starter, wettk, verein, ergebnis, zuordnung, scheibenTwhere (( starter.startnr > 0 and :STARTNR = 0 ) or ( starter.startnr = :STARTNR ))&and ergebnis.startnr = starter.startnr and wettk.dp_id = ergebnis.dp_id&and zuordnung.erg_id = ergebnis.erg_id+and scheiben.sch_id = zuordnung.scheiben_id(and starter.vereinsnr = verein.vereinsnrKorder by starter.startnr, wettk.bezeichnung, ergebnis.erg_id, zuordnung.pos TIntegerField FieldNameStartnrTWideStringField FieldNamePassnrSizeTWideStringField FieldNameNachnameSizeTWideStringField FieldNameVornameTWideStringField FieldName bezeichnungSizeTWideStringField FieldName teilermessungTWideStringField FieldNamekurznameSize( TAutoIncField FieldNameSch_id TFloatField FieldNameSummeTDateTimeField FieldNameAE_datum TIntegerField FieldName Scheibennr TWordField FieldNameinnZ TWordField FieldNameR1 TWordField FieldNameR2 TWordField FieldNameR3 TWordField FieldNameR4 TWordField FieldNameR5 TWordField FieldNameR6 TWordField FieldNameR7 TWordField FieldNameR8 TWordField FieldNameR9 TWordField FieldNameR10 TWordField FieldNameR11 TWordField FieldNameR12 TWordField FieldNameR13 TWordField FieldNameR14 TWordField FieldNameR15 TIntegerField FieldNameT1 TIntegerField FieldNameT2 TIntegerField FieldNameT3 TIntegerField FieldNameT4 TIntegerField FieldNameT5 TIntegerField FieldNameT6 TIntegerField FieldNameT7 TIntegerField FieldNameT8 TIntegerField FieldNameT9 TIntegerField FieldNameT10 TIntegerField FieldNameT11 TIntegerField FieldNameT12 TIntegerField FieldNameT13 TIntegerField FieldNameT14 TIntegerField FieldNameT15TSmallintField FieldNameW1TSmallintField FieldNameW2TSmallintField FieldNameW3TSmallintField FieldNameW4TSmallintField FieldNameW5TSmallintField FieldNameW6TSmallintField FieldNameW7TSmallintField FieldNameW8TSmallintField FieldNameW9TSmallintField FieldNameW10TSmallintField FieldNameW11TSmallintField FieldNameW12TSmallintField FieldNameW13TSmallintField FieldNameW14TSmallintField FieldNameW15 TWordField FieldNameF1 TWordField FieldNameF2 TWordField FieldNameF3 TWordField FieldNameF4 TWordField FieldNameF5 TWordField FieldNameF6 TWordField FieldNameF7 TWordField FieldNameF8 TWordField FieldNameF9 TWordField FieldNameF10 TWordField FieldNameF11 TWordField FieldNameF12 TWordField FieldNameF13 TWordField FieldNameF14 TWordField FieldNameF15TPF0 TADOCommand CommandText 8SELECT Starter.Startnr, Starter.Passnr, Starter.Nachname, Starter.Vorname, wettk.bezeichnung, wettk.teilermessung, verein.kurzname, scheiben.* from starter, wettk, verein, ergebnis, zuordnung, scheiben where (( starter.startnr > 0 and :STARTNR = 0 ) or ( starter.startnr = :STARTNR )) and ergebnis.startnr = starter.startnr and wettk.dp_id = ergebnis.dp_id and zuordnung.erg_id = ergebnis.erg_id and scheiben.sch_id = zuordnung.scheiben_id and starter.vereinsnr = verein.vereinsnr order by starter.startnr, wettk.bezeichnung, ergebnis.erg_id, zuordnung.pos ConnectionDMWK.ADOConnection1 ParametersNameSTARTNR Attributes paNullableDataType ftFixedChar NumericScale PrecisionSizeValueNameSTARTNR Attributes paNullableDataType ftFixedChar NumericScale PrecisionSizeValuel@@@ @@@Ergabfrage Einz.dGruppe=Ergebnisabfrage Arial QuickReport}[Detailband.BeforePrint] setvar('KT0', 10000) setvar('KT1', 10000) IF ((Qrystarter.T1/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T1/100) endif IF ((Qrystarter.T2/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T2/100) endif IF ((Qrystarter.T3/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T3/100) endif IF ((Qrystarter.T4/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T4/100) endif IF ((Qrystarter.T5/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T5/100) endif IF ((Qrystarter.T6/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T6/100) endif IF ((Qrystarter.T7/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T7/100) endif IF ((Qrystarter.T8/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T8/100) endif IF ((Qrystarter.T9/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T9/100) endif IF ((Qrystarter.T10/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T10/100) endif IF ((Qrystarter.T11/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T11/100) endif IF ((Qrystarter.T12/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T12/100) endif IF ((Qrystarter.T13/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T13/100) endif IF ((Qrystarter.T14/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T14/100) endif IF ((Qrystarter.T15/100 0)) SETVAR('KT1', GETVAR('KT0')) SETVAR('KT0', Qrystarter.T15/100) endif TPF0 TQRDesignBand DetailbandLeft&TopWidthHeight Frame.Color Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight AlignToBottomColorclWhiteForceNewColumn ForceNewPage Size.Values@v @BandTyperbDetail EditorEnabled QRDesigner QRepDesigner1BandNumTQRDesignDBTextLeftwTopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@UUUUUUm@UUUUUUU@Z@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchColorclWhiteDataSet qrystarter DataField bezeichnung TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignDBTextLeft TopWidthHHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@UUUUUUU@@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchColorclWhiteDataSet qrystarter DataFieldStartnr TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignExprLeft,TopWidth4Height Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@ @UUUUUU@ AlignmenttaRightJustify AlignToBandAutoSize AutoStretchColorclWhiteResetAfterPrint TransparentWordWrap ExpressioncIF(Upper(qrystarter.teilermessung)<>'RINGE', if(GETVAR('KT0')>9999,'--',GETVAR('KT0') + ' T') ,' ') QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignExprLeftTopWidth<Height Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@UUUUUUu @@ AlignmenttaRightJustify AlignToBandAutoSize AutoStretchColorclWhiteResetAfterPrint TransparentWordWrap ExpressionOIF(Upper(qrystarter.teilermessung)<>'BLATTL', str(qrystarter.Summe) + ' R',' ') QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignExprLeftTopWidth,Height Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@ @VUUUUU@ AlignmenttaRightJustify AlignToBandAutoSize AutoStretchColorclWhiteResetAfterPrint TransparentWordWrap ExpressioncIF(Upper(qrystarter.teilermessung)<>'RINGE', if(GETVAR('KT1')>9999,'--',GETVAR('KT1') + ' T') ,' ') QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TPF0 TQRDesignBand ColumnheaderLeft&TopJWidthHeight0 Frame.ColorclBlack Frame.DrawTopFrame.DrawBottom Frame.DrawLeftFrame.DrawRight Frame.Width AlignToBottomColorclWhiteForceNewColumn ForceNewPage Size.Values@v @BandTyperbColumnHeader EditorEnabled QRDesigner QRepDesigner1BandNumTQRDesignLabelLeft TopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@UUUUUUU@@*@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchCaptionStartnrColorclWhite Font.CharsetDEFAULT_CHARSET Font.Color clWindowText Font.Height Font.NameArial Font.Style fsBold ParentFont TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignLabelLeft)TopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@UUUUUU@UUUUUUU@@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchCaptionNachname, VornameColorclWhite Font.CharsetDEFAULT_CHARSET Font.Color clWindowText Font.Height Font.NameArial Font.Style fsBold ParentFont TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignLabelLeft|TopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@ @@Z@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchCaption WettbewerbColorclWhite Font.CharsetDEFAULT_CHARSET Font.Color clWindowText Font.Height Font.NameArial Font.Style fsBold ParentFont TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignLabelLeftTopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@Ț @@TUUUUU@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchCaptionRinge / Blattl / DeckblattlColorclWhite Font.CharsetDEFAULT_CHARSET Font.Color clWindowText Font.Height Font.NameArial Font.Style fsBold ParentFont TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TPF0 TQRDesignBand TitlebandLeft&Top&WidthHeight$ Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight AlignToBottomColorclWhiteForceNewColumn ForceNewPage Size.Values@v @BandTyperbTitle EditorEnabled QRDesigner QRepDesigner1BandNumTQRDesignLabelLeftTopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@XUUUUU@XUUUUU@UUUUUU@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchCaption ErgebnislisteColorclWhite Font.CharsetDEFAULT_CHARSET Font.Color clWindowText Font.Height Font.NameArial Font.Style fsBold ParentFont TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSizeTQRDesignSysdataLeft`TopWidthlHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@UUUUUU @UUUUUUU@@ Alignment taLeftJustify AlignToBandAutoSizeColorclWhiteData qrsDateTime Transparent QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TPF0TQRDesignGroupBAND2Left&TopzWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight AlignToBottomColorclWhiteForceNewColumn ForceNewPage Size.Values*@v @ Expressionqrystarter.PassnrMaster QuickReportReprintOnNewPage EditorEnabled BandNum QRDesigner QRepDesigner1 TQRDesignExprLeftTopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@UUUUUUU@UUUUUUU@ @ Alignment taLeftJustify AlignToBandAutoSize AutoStretchColorclWhiteResetAfterPrint TransparentWordWrap Expression+Qrystarter.Nachname+', '+Qrystarter.Vorname QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize TQRDesignDBTextLeftTopWidthHeight Frame.ColorclBlack Frame.DrawTopFrame.DrawBottomFrame.DrawLeftFrame.DrawRight Size.Values@ֽ@@@ Alignment taLeftJustify AlignToBandAutoSize AutoStretchColorclWhiteDataSet qrystarter DataFieldkurzname Font.CharsetDEFAULT_CHARSET Font.Color clWindowText Font.Height Font.NameArial Font.Style ParentFont TransparentWordWrap QRDesigner QRepDesigner1FixBottomPositionStretchHeightWithBandFontSize