Version =20
VersionRequired =20
Checksum =1335920181
Begin Form
    PopUp = NotDefault
    MaxButton = NotDefault
    MinButton = NotDefault
    ControlBox = NotDefault
    AutoCenter = NotDefault
    NavigationButtons = NotDefault
    AllowDeletions = NotDefault
    CloseButton = NotDefault
    DividingLines = NotDefault
    AllowDesignChanges = NotDefault
    DefaultView =0
    ScrollBars =0
    ViewsAllowed =1
    TabularFamily =0
    BorderStyle =3
    PictureAlignment =2
    DatasheetGridlinesBehavior =3
    GridY =10
    Width =6179
    DatasheetFontHeight =10
    ItemSuffix =44
    Left =10485
    Top =3465
    Right =16725
    Bottom =9195
    DatasheetGridlinesColor =12632256
    RecSrcDt = Begin
        0x611731a4f0b8e340
    End
    RecordSource ="qry_Punktesystem"
    Caption ="bcs group Punktesystem"
    DatasheetFontName ="Arial"
    AllowDatasheetView =0
    AllowPivotTableView =0
    AllowPivotChartView =0
    AllowPivotChartView =0
    Begin
        Begin Label
            BackStyle =0
            FontName ="Tahoma"
        End
        Begin CommandButton
            Width =1701
            Height =283
            FontSize =8
            FontWeight =400
            ForeColor =-2147483630
            FontName ="Tahoma"
        End
        Begin TextBox
            FELineBreak = NotDefault
            SpecialEffect =2
            OldBorderStyle =0
            Width =1701
            LabelX =-1701
            FontName ="Tahoma"
            AsianLineBreak =255
        End
        Begin ComboBox
            SpecialEffect =2
            Width =1701
            LabelX =-1701
            FontName ="Tahoma"
        End
        Begin FormHeader
            Height =566
            BackColor =16777164
            Name ="Formularkopf"
            GUID = Begin
                0x8b6d53b538aa2741aafb66a14b8f6b97
            End
        End
        Begin Section
            Height =3458
            Name ="Detailbereich"
            GUID = Begin
                0x7f9ecf3ea5384a45938392a45194d43c
            End
            Begin
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =692
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Status_NR_Bezeichnungsfeld"
                    Caption ="Kundennummer"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0x1cafdff6ec0a314f8ccdef1928d042f3
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    TabStop = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3059
                    Top =692
                    Width =2271
                    ColumnWidth =1110
                    TabIndex =4
                    Name ="KDNR"
                    ControlSource ="KDNR"
                    DefaultValue ="=[Forms]![frm_HauptTerminierungWV]![KD_NR]"
                    FontName ="Arial"
                    GUID = Begin
                        0xcf8739bb7231f54cbb4845edc2937e3e
                    End
                End
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =1105
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Bezeichnungsfeld10"
                    Caption ="Sachbearbeiter"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0x68489fa1bba8c844bd4005e2bcd391b5
                    End
                End
                Begin ComboBox
                    LimitToList = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3059
                    Top =1819
                    Width =2271
                    ColumnWidth =2070
                    ColumnInfo ="\"\";\"\";\"10\";\"100\""
                    GUID = Begin
                        0x4a4a3e09d022b74b8deb88eda377d7c6
                    End
                    Name ="Agent"
                    ControlSource ="Agent"
                    RowSourceType ="Table/Query"
                    RowSource ="qry_AgentenRetention"
                    FontName ="Arial"
                End
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =1838
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Bezeichnungsfeld19"
                    Caption ="Agent"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0xa523d296e4665748bb0ecb2982c25a29
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    TabStop = NotDefault
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3060
                    Top =1090
                    Width =2256
                    ColumnWidth =975
                    TabIndex =5
                    Name ="Sachbearbeiter"
                    ControlSource ="Sachbearbeiter"
                    DefaultValue ="=[Forms]![frm_Anmeldung]![Benutzername]"
                    FontName ="Arial"
                    GUID = Begin
                        0x034ea7fd25800c4ea8ff99755a74f246
                    End
                End
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =1480
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Bezeichnungsfeld25"
                    Caption ="Datum"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0xd9c8cbcd87ab2c40a6e3701fcd81de07
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    TabStop = NotDefault
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3060
                    Top =1465
                    Width =2256
                    TabIndex =6
                    Name ="Datum"
                    ControlSource ="Datum"
                    DefaultValue ="=Date()"
                    FontName ="Arial"
                    GUID = Begin
                        0x7c1bc1e284132f4fb6eef1c352fa23d9
                    End
                End
                Begin ComboBox
                    LimitToList = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3059
                    Top =2224
                    Width =2271
                    TabIndex =1
                    ColumnInfo ="\"\";\"\";\"10\";\"200\""
                    GUID = Begin
                        0x4c4d94a0e1545a4fa12e9b4ad3930bab
                    End
                    Name ="Vertriebsleistung"
                    ControlSource ="Vertriebsleistung"
                    RowSourceType ="Table/Query"
                    RowSource ="qry_Vertriebsleistung"
                    OnExit ="Mkr_SetzePunkteVertriebsleistung"
                    FontName ="Arial"
                End
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =2217
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Bezeichnungsfeld30"
                    Caption ="Vertriebsleistung"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0xbb686634e47ef94aa909ec14ce766588
                    End
                End
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =2596
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Bezeichnungsfeld32"
                    Caption ="Punkte"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0x05bbd7ece7f9e74ea4b2571aa0ef3e67
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3059
                    Top =2577
                    Width =2271
                    TabIndex =2
                    Name ="Punkte"
                    ControlSource ="Punkte"
                    OnExit ="GehezuFormularschließen"
                    FontName ="Arial"
                    GUID = Begin
                        0xb83e0a84dff5e944a7cf02e09329f51a
                    End
                End
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =304
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Bezeichnungsfeld33"
                    Caption ="ID"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0xa9a3035aabd4b04e952a77e0ef5d92da
                    End
                End
                Begin TextBox
                    Locked = NotDefault
                    TabStop = NotDefault
                    OldBorderStyle =1
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3059
                    Top =285
                    Width =2271
                    TabIndex =7
                    Name ="ID"
                    ControlSource ="ID"
                    FontName ="Arial"
                    GUID = Begin
                        0x1411228a211a434d81ee35dfaddc9971
                    End
                End
                Begin ComboBox
                    LimitToList = NotDefault
                    OverlapFlags =85
                    IMESentenceMode =3
                    Left =3059
                    Top =2963
                    Width =2271
                    TabIndex =3
                    ColumnInfo ="\"\";\"\";\"10\";\"300\""
                    GUID = Begin
                        0xbd5d0052bc8e7d43995eb38f462d27f7
                    End
                    Name ="Option"
                    ControlSource ="Option"
                    RowSourceType ="Table/Query"
                    RowSource ="qry_Option"
                    OnExit ="GehezuFormularschließen2"
                    FontName ="Arial"
                End
                Begin Label
                    BackStyle =1
                    OverlapFlags =85
                    TextAlign =1
                    Left =225
                    Top =2956
                    Width =2211
                    Height =240
                    FontWeight =700
                    ForeColor =16711680
                    Name ="Bezeichnungsfeld43"
                    Caption ="Option"
                    FontName ="Arial"
                    Tag ="DetachedLabel"
                    GUID = Begin
                        0x28e21768ab5f3843951e520d6727958d
                    End
                End
            End
        End
        Begin FormFooter
            Height =566
            BackColor =16777164
            Name ="Formularfuß"
            GUID = Begin
                0x862efe28cc8b2b4cb60fc3f1a4df7052
            End
            Begin
                Begin CommandButton
                    OverlapFlags =85
                    Left =4815
                    Top =45
                    Width =501
                    Height =516
                    Name ="Formularschließen"
                    Caption ="Befehl41"
                    OnClick ="[Event Procedure]"
                    PictureData = Begin
                        0x2800000010000000100000000100040000000000800000000000000000000000 ,
                        0x0000000000000000000000000000800000800000008080008000000080008000 ,
                        0x8080000080808000c0c0c0000000ff00c0c0c00000ffff00ff000000c0c0c000 ,
                        0xffff0000ffffff00dadad0dadadadadaadad00adadadadaddad030dadadadada ,
                        0xad0330adadadadad0033300000000adaa03330ff0dadadadd03300ff0adad4da ,
                        0xa03330ff0dad44add03330ff0ad44444a03330ff0d444444d03330ff0ad44444 ,
                        0xa0330fff0dad44add030ffff0adad4daa00fffff0dadadadd00000000adadada ,
                        0xadadadadadadadad000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000000000000000000000000000000000000000000000000000 ,
                        0x0000000000000000
                    End
                    ObjectPalette = Begin
                        0x0003100000000000800000000080000080800000000080008000800000808000 ,
                        0x80808000c0c0c000ff000000c0c0c000ffff00000000ff00c0c0c00000ffff00 ,
                        0xffffff0000000000
                    End
                    ControlTipText ="Formular schließen"
                    GUID = Begin
                        0xa7c09ace8cba37488744aaa1129fe27e
                    End
                End
            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 Befehl3_Click()
On Error GoTo Err_Befehl3_Click


    DoCmd.Close

Exit_Befehl3_Click:
    Exit Sub

Err_Befehl3_Click:
    MsgBox Err.Description
    Resume Exit_Befehl3_Click
    
End Sub
Private Sub Terminabsage_senden_Click()
On Error GoTo Err_Terminabsage_senden_Click

    Dim stDocName As String

    stDocName = "Mkr_TerminabsageVorTermintagSenden"
    DoCmd.RunMacro stDocName

Exit_Terminabsage_senden_Click:
    Exit Sub

Err_Terminabsage_senden_Click:
    MsgBox Err.Description
    Resume Exit_Terminabsage_senden_Click
    
End Sub
Private Sub Befehl22_Click()
On Error GoTo Err_Befehl22_Click

    Dim stDocName As String

    stDocName = "Mkr_schliessen_termindatum_loeschen"
    DoCmd.RunMacro stDocName

Exit_Befehl22_Click:
    Exit Sub

Err_Befehl22_Click:
    MsgBox Err.Description
    Resume Exit_Befehl22_Click
    
End Sub
Private Sub Befehl37_Click()
On Error GoTo Err_Befehl37_Click


    DoCmd.Close

Exit_Befehl37_Click:
    Exit Sub

Err_Befehl37_Click:
    MsgBox Err.Description
    Resume Exit_Befehl37_Click
    
End Sub
Private Sub Befehl38_Click()
On Error GoTo Err_Befehl38_Click


    DoCmd.Close

Exit_Befehl38_Click:
    Exit Sub

Err_Befehl38_Click:
    MsgBox Err.Description
    Resume Exit_Befehl38_Click
    
End Sub
Private Sub Formular_schließen_Click()
On Error GoTo Err_Formular_schließen_Click


    DoCmd.Close

Exit_Formular_schließen_Click:
    Exit Sub

Err_Formular_schließen_Click:
    MsgBox Err.Description
    Resume Exit_Formular_schließen_Click
    
End Sub
Private Sub Formularschließen_Click()
On Error GoTo Err_Formularschließen_Click


    DoCmd.Close

Exit_Formularschließen_Click:
    Exit Sub

Err_Formularschließen_Click:
    MsgBox Err.Description
    Resume Exit_Formularschließen_Click
    
End Sub