Version =196611
ColumnsShown =3
Begin
    MacroName ="Mkr_status_einfuege_1"
    Condition ="[Status] Like \"Termin*\""
    Action ="MsgBox"
    Argument ="Bitte Straße abgleichen!"
    Argument ="-1"
    Argument ="3"
End
Begin
    Action ="Echo"
    Argument ="0"
    Argument ="Anforderung wird ausgeführt"
End
Begin
    Action ="Hourglass"
    Argument ="-1"
End
Begin
    Action ="RunCommand"
    Argument ="109"
End
Begin
    Action ="RunCommand"
    Argument ="190"
End
Begin
    Action ="OpenQuery"
    Argument ="qry_Statustabelle_Terminierung"
    Argument ="0"
    Argument ="0"
End
Begin
    Action ="RunCommand"
    Argument ="109"
End
Begin
    Action ="RunCommand"
    Argument ="191"
End
Begin
    Action ="Requery"
End
Begin
    Action ="Close"
    Argument ="1"
    Argument ="qry_Statustabelle_Terminierung"
    Argument ="2"
End
Begin
    Action ="Close"
    Argument ="2"
    Argument ="frm_terminierung_ungebunden_neu"
    Argument ="2"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_HauptTerminierungWV"
    Argument ="1"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_HauptTerminierungWV"
    Argument ="0"
End
Begin
    Action ="Echo"
    Argument ="-1"
    Argument ="Anforderung ist ausgeführt"
End
Begin
    Action ="Hourglass"
    Argument ="0"
End
Begin
    Action ="MsgBox"
    Argument ="Status gespeichert"
    Argument ="0"
    Argument ="4"
End
Begin
    Condition ="[Forms]![frm_HauptTerminierungWV]![StatusWV]=\"WV\""
    Action ="RunMacro"
    Argument ="mgrp_statustabelle_einfuegen_neuNEU.Mkr_status_einfuege_2"
End
Begin
    Condition ="[Status] Is Null"
    Action ="MsgBox"
    Argument ="Achtung es wurde kein Status gesetzt!!!!"
    Argument ="0"
    Argument ="1"
    Argument ="Achtung!"
End
Begin
    Condition ="[Status] Not Like \"Termi*\" And [Termindatum]>0"
    Action ="MsgBox"
    Argument ="Achtung! Bei Termin Status \"Termin\" eintragen!"
    Argument ="0"
    Argument ="1"
    Argument ="Achtung!"
End
Begin
    Condition ="[Forms]![frm_HauptTerminierungWV]![StatusWV]<>\"WV\" And [Forms]![frm_Haupt]![PL"
        "Z]<>[Forms]![frm_HauptTerminierungWV]![PLZ]"
    Action ="MsgBox"
    Argument ="Achtung!!! Neue Postleitzahl!!! Bitte zur Hauptmaske wechseln!!!"
    Argument ="-1"
    Argument ="1"
    Argument ="Wichtige Information!"
End
Begin
End
Begin
    MacroName ="Mkr_status_einfuege_2"
    Condition ="[Forms]![frm_HauptTerminierungWV]![KD_NR]=[qry_TerminierungWVNEU]![KD_NR]"
    Action ="OpenQuery"
    Argument ="qry_TerminierungWVNEU"
    Argument ="0"
    Argument ="1"
End
Begin
    Action ="GoToRecord"
    Argument ="-1"
    Argument =""
    Argument ="3"
End
Begin
    Action ="GoToRecord"
    Argument ="-1"
    Argument =""
    Argument ="0"
End
Begin
    Action ="GoToControl"
    Argument ="WV Datum"
End
Begin
    Action ="RunCommand"
    Argument ="337"
End
Begin
    Action ="Requery"
End
