Version =196611
ColumnsShown =2
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Null"
    Action ="MsgBox"
    Argument ="Es muss ein neues Termindatum gesetzt werden"
    Argument ="0"
    Argument ="3"
    Argument ="Achtung!"
End
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Null"
    Action ="StopAllMacros"
End
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Not Null"
    Action ="SetValue"
    Argument ="[Forms]![frmQMFSTW]![qry_TWSPNeu5].[Form]![DatumAnTW]"
    Argument ="Date()"
End
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Not Null"
    Action ="SetValue"
    Argument ="[Forms]![frmQMFSTW]![qry_TWSPNeu5].[Form]![Status]"
    Argument ="\"TW Prüfung\""
End
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Not Null"
    Action ="RunCommand"
    Argument ="28"
End
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Not Null"
    Action ="RunCommand"
    Argument ="66"
End
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Not Null And 9=0"
    Action ="SetValue"
    Argument ="[Forms]![frmQMFSTW]![Neue ID_SB]"
    Argument ="[Forms]![frmQMFSTW]![qry_TWSPNeu5].[Form]![ID_SB]"
End
Begin
    Condition ="[Forms]![frmQMFSTW]![TermindatumNeu] Is Not Null"
    Action ="MsgBox"
    Argument ="Dann die einzelnen Karten die verschoben werden sollen\015\012mit doppel Klick a"
        "uf idspb_oc mit dem neuen SPTW DS verknüpfen (DK 1)"
    Argument ="-1"
    Argument ="3"
    Argument ="Achtung Wichtig!!!!!!"
End
