Version =196611
ColumnsShown =3
Begin
    MacroName ="Mkr_status_einfuege_1"
End
Begin
    Condition ="[Status] Is Null"
    Action ="StopMacro"
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_Retention"
    Argument ="2"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_HauptRetention"
    Argument ="1"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_HauptRetention"
    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
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 ="[Status] Like \"Termin*\""
    Action ="MsgBox"
    Argument ="Bitte Kunden nach Email Adresse wegen Termin-Bestätigung-Email fragen und Email "
        "versenden! Falls Kunde keine Email hat bitte Faxnummer erfragen und Kunden Termi"
        "n-Bestätigung faxen!"
    Argument ="-1"
    Argument ="1"
    Argument ="Wichtig!"
End
Begin
    Condition ="[Status] Like \"Termin*\""
    Action ="GoToControl"
    Argument ="Email"
End
Begin
    Condition ="[Status] Not Like \"Termi*\""
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_HauptRetention"
    Argument ="1"
End
Begin
    Condition ="[Status] Not Like \"Termi*\""
    Action ="GoToControl"
    Argument ="Rufnummer"
End
