Version =20
VersionRequired =20
Checksum =-621600365
Begin Form
    PopUp = NotDefault
    AutoCenter = NotDefault
    AllowDeletions = NotDefault
    AllowAdditions = NotDefault
    AllowEdits = NotDefault
    AllowDesignChanges = NotDefault
    DefaultView =2
    TabularFamily =48
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =6294
    DatasheetFontHeight =10
    ItemSuffix =18
    Left =6045
    Top =5025
    Right =14040
    Bottom =10605
    DatasheetGridlinesColor =12632256
    Filter ="(((tbl_statustabelle.KD_NR=6920711))) AND ((tbl_statustabelle.Status=\"Termin En"
        "ergie VK\"))"
    OrderBy ="tbl_statustabelle.Termindatum"
    RecSrcDt = Begin
        0x139c70031717e540
    End
    RecordSource ="qry_ErgebnisEditierenOC_adbo"
    Caption ="qry_ErgebnisEditierenOC"
    OnOpen ="Mkr_Max"
    DatasheetFontName ="Arial"
    Begin
        Begin Label
            BackStyle =0
            BackColor =-2147483633
            ForeColor =-2147483630
        End
        Begin Rectangle
            SpecialEffect =3
            BackStyle =0
            Width =850
            Height =850
        End
        Begin Line
            Width =1701
        End
        Begin Image
            BackStyle =0
            OldBorderStyle =0
            PictureAlignment =2
            Width =1701
            Height =1701
        End
        Begin CommandButton
            Width =1701
            Height =283
            FontSize =8
            FontWeight =400
            FontName ="MS Sans Serif"
        End
        Begin OptionButton
            SpecialEffect =2
            LabelX =230
            LabelY =-30
        End
        Begin CheckBox
            SpecialEffect =2
            LabelX =230
            LabelY =-30
        End
        Begin OptionGroup
            SpecialEffect =3
            Width =1701
            Height =1701
        End
        Begin BoundObjectFrame
            SpecialEffect =2
            OldBorderStyle =0
            BackStyle =0
            Width =4536
            Height =2835
            LabelX =-1701
        End
        Begin TextBox
            FELineBreak = NotDefault
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
            AsianLineBreak =255
        End
        Begin ListBox
            SpecialEffect =2
            Width =1701
            Height =1417
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
        End
        Begin ComboBox
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            BackColor =-2147483643
            ForeColor =-2147483640
        End
        Begin Subform
            SpecialEffect =2
            Width =1701
            Height =1701
        End
        Begin UnboundObjectFrame
            SpecialEffect =2
            OldBorderStyle =1
            Width =4536
            Height =2835
        End
        Begin ToggleButton
            Width =283
            Height =283
            FontSize =8
            FontWeight =400
            FontName ="MS Sans Serif"
        End
        Begin Tab
            BackStyle =0
            Width =5103
            Height =3402
        End
        Begin FormHeader
            Height =0
            BackColor =-2147483633
            Name ="Formularkopf"
            GUID = Begin
                0x6f1fcad7d02af345b9b567da5a4e3467
            End
        End
        Begin Section
            Height =4138
            BackColor =-2147483633
            Name ="Detailbereich"
            GUID = Begin
                0xfe85e965b24c0740a0294cde99e43c88
            End
            Begin
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =114
                    Width =900
                    Height =255
                    ColumnWidth =2265
                    Name ="KD_NR"
                    ControlSource ="KD_NR"
                    OnDblClick ="[Event Procedure]"
                    GUID = Begin
                        0x0e953737415db741964063d5e40e4560
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =114
                            Width =1560
                            Height =255
                            Name ="KD_NR_Bezeichnungsfeld"
                            Caption ="KD_NR"
                            GUID = Begin
                                0x1379bd02faca354f94f31be449d1ea6e
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =456
                    Width =900
                    Height =255
                    ColumnWidth =1755
                    TabIndex =1
                    Name ="Status_NR"
                    ControlSource ="Status_NR"
                    GUID = Begin
                        0xbe62d53b08142d47ab2ace7d295f13bd
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =456
                            Width =1560
                            Height =255
                            Name ="Status_NR_Bezeichnungsfeld"
                            Caption ="Status_NR"
                            GUID = Begin
                                0x98b80254196d974980d025d64ca154cf
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =798
                    Width =2310
                    Height =255
                    ColumnWidth =2415
                    TabIndex =2
                    Name ="Status"
                    ControlSource ="Status"
                    GUID = Begin
                        0xa8dfe0e2424f7c4eb2c348c0ac15900d
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =798
                            Width =1560
                            Height =255
                            Name ="Status_Bezeichnungsfeld"
                            Caption ="Status"
                            GUID = Begin
                                0xb1cea329e005bc499e0e8b7b9b295567
                            End
                        End
                    End
                End
                Begin TextBox
                    EnterKeyBehavior = NotDefault
                    ScrollBars =2
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =1140
                    Width =4560
                    Height =450
                    ColumnWidth =2160
                    TabIndex =3
                    Name ="AD"
                    ControlSource ="AD"
                    GUID = Begin
                        0x374b3fa01c41d648a436ba3f3f8620c2
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =1140
                            Width =1560
                            Height =255
                            Name ="AD_Bezeichnungsfeld"
                            Caption ="AD"
                            GUID = Begin
                                0x2b34356edd349246b5dfdade0dffe1cf
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1677
                    Top =1653
                    Width =1035
                    Height =255
                    ColumnWidth =1305
                    TabIndex =4
                    Name ="Termindatum"
                    ControlSource ="Termindatum"
                    GUID = Begin
                        0xe3ad24d9f952404eb807ff858739d952
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =57
                            Top =1653
                            Width =1560
                            Height =255
                            Name ="Termindatum_Bezeichnungsfeld"
                            Caption ="Termindatum"
                            GUID = Begin
                                0x663376dfcc340c44acfa00a379e84930
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1680
                    Top =2490
                    Width =2310
                    Height =255
                    ColumnWidth =2760
                    TabIndex =6
                    Name ="Ergebnis"
                    ControlSource ="Ergebnis"
                    GUID = Begin
                        0xfa5591267c86684eb99d6dfb4d431425
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =60
                            Top =2490
                            Width =1560
                            Height =255
                            Name ="Ergebnis_Bezeichnungsfeld"
                            Caption ="Ergebnis"
                            GUID = Begin
                                0x5254f44edfa7e0429c3db977f73158cd
                            End
                        End
                    End
                End
                Begin TextBox
                    Visible = NotDefault
                    Enabled = NotDefault
                    ColumnHidden = NotDefault
                    TabStop = NotDefault
                    DisplayWhen =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1680
                    Top =3225
                    Width =2310
                    Height =255
                    ColumnWidth =0
                    TabIndex =9
                    Name ="Link"
                    ControlSource ="Link"
                    OnDblClick ="[Event Procedure]"
                    GUID = Begin
                        0x64a468fc578dde49bf7a7431cdc281e6
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =60
                            Top =3225
                            Width =1560
                            Height =255
                            Name ="Link_Bezeichnungsfeld"
                            Caption ="Link"
                            GUID = Begin
                                0xcf175d9491d3f94682b3acb6354068ed
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =2381
                    Top =2097
                    TabIndex =5
                    Name ="Terminzeit"
                    ControlSource ="Terminzeit"
                    GUID = Begin
                        0x185052c8fb54aa43abf7d65273437392
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =680
                            Top =2097
                            Width =840
                            Height =240
                            Name ="Bezeichnungsfeld14"
                            Caption ="Terminzeit:"
                            GUID = Begin
                                0x578d7d1b999e764682510070b315f543
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1814
                    Top =2891
                    ColumnWidth =4350
                    TabIndex =7
                    Name ="Ergebnis_unter"
                    ControlSource ="Ergebnis_unter"
                    GUID = Begin
                        0xcca6c1920745fc40a4332e6ded13ebb4
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =113
                            Top =2891
                            Width =1185
                            Height =240
                            Name ="Bezeichnungsfeld15"
                            Caption ="Ergebnis_unter:"
                            GUID = Begin
                                0x2b4ee95007a2c349aac0cc7a4b758f8b
                            End
                        End
                    End
                End
                Begin TextBox
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =1821
                    Top =3525
                    ColumnWidth =4545
                    TabIndex =8
                    Name ="Bemerkung"
                    ControlSource ="Bemerkung"
                    GUID = Begin
                        0xf795463a43d6984993a64d574ac2fafc
                    End
                    Begin
                        Begin Label
                            OverlapFlags =85
                            Left =120
                            Top =3525
                            Width =1185
                            Height =240
                            Name ="Bezeichnungsfeld17"
                            Caption ="Bemerkung:"
                            GUID = Begin
                                0x315f6ef93e9b1a4c8312590f31856f4d
                            End
                        End
                    End
                End
            End
        End
        Begin FormFooter
            Height =0
            BackColor =-2147483633
            Name ="Formularfuß"
            GUID = Begin
                0xff26c67583e0f04094f8f6334b8e801d
            End
        End
    End
End
CodeBehindForm
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = True
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Compare Database

Private Sub KD_NR_DblClick(Cancel As Integer)
CreateObject("Shell.Application").ShellExecute Me.Link
End Sub

Private Sub Link_DblClick(Cancel As Integer)
CreateObject("Shell.Application").ShellExecute Me.Link
End Sub