Version =196611
ColumnsShown =2
Begin
    Condition ="[Forms]![frmErgebnisAdQuali]![Staus_qnt] Is Null"
    Action ="MsgBox"
    Argument ="Es muss ein Status gesetzt werden!"
    Argument ="0"
    Argument ="3"
    Argument ="Achtung!"
End
Begin
    Condition ="[Forms]![frmErgebnisAdQuali]![Staus_qnt] Is Null"
    Action ="StopAllMacros"
End
Begin
    Condition ="[Forms]![frmErgebnisAdQuali]![qry_eaq_bearbeiten1_unter].[Form]![Ergebnis]=[Form"
        "s]![frmErgebnisAdQuali]![Ergebnis_neu]"
    Action ="MsgBox"
    Argument ="Achtung das gleiche Ergebnis wurde bereits vom AD gewählt!"
    Argument ="0"
    Argument ="4"
    Argument ="Achtung!"
End
Begin
    Condition ="[Forms]![frmErgebnisAdQuali]![qry_eaq_bearbeiten1_unter].[Form]![Ergebnis]=[Form"
        "s]![frmErgebnisAdQuali]![Ergebnis_neu]"
    Action ="StopAllMacros"
End
Begin
    Condition ="[Forms]![frm_HauptTerminierungWV]![subfrm_Terminierung].[Form]![Ergebnis]=\"12 A"
        "bschluß\" And [Forms]![frmErgebnisAdQuali]![Ergebnis_neu] Is Not Null Or [Forms]"
        "![frmErgebnisAdQuali]![Ergebnis_neu]<>\"Keine Abweichung\""
    Action ="SetValue"
    Argument ="[Forms]![frmErgebnisAdQuali]![Falscher_abschluss]"
    Argument ="\"Ja\""
End
Begin
    Condition ="[Forms]![frm_HauptTerminierungWV]![subfrm_Terminierung].[Form]![Ergebnis]<>\"12 "
        "Abschluß\""
    Action ="SetValue"
    Argument ="[Forms]![frmErgebnisAdQuali]![Falscher_abschluss]"
    Argument ="\"Nein\""
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="[Formulare]![frmErgebnisAdQuali]![Ergebnis_neu] Ist Null Oder [Formulare]![frmEr"
        "gebnisAdQuali]![Ergebnis_neu]=\"Keine Abweichung\""
    Argument ="[Forms]![frmErgebnisAdQuali]![Staus_qnt]"
    Argument ="\"Ergebnis korrekt\""
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="[Formulare]![frmErgebnisAdQuali]![Ergebnis_neu] Ist Nicht Null Oder [Formulare]!"
        "[frmErgebnisAdQuali]![Ergebnis_neu]<>\"Keine Abweichung\" Oder 9=0"
    Argument ="[Forms]![frmErgebnisAdQuali]![Staus_qnt]"
    Argument ="\"Falsches Ergebnis\""
End
Begin
    Condition ="[Forms]![frmErgebnisAdQuali]![SB]<>[Forms]![frm_Anmeldung]![Benutzername]"
    Action ="SetValue"
    Argument ="[Forms]![frmErgebnisAdQuali]![SB]"
    Argument ="[Forms]![frm_Anmeldung]![Benutzername]"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frmErgebnisAdQuali]![Erstellt_am]"
    Argument ="Now()"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frmErgebnisAdQuali"
    Argument ="5"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frmErgebnisAdQuali"
    Argument ="0"
End
Begin
    Condition ="[Forms]![frmErgebnisAdQuali]![qry_eaq_bearbeiten1_unter].[Form]![Ergebnis]<>[For"
        "ms]![frmErgebnisAdQuali]![Ergebnis_neu] And [Forms]![frmErgebnisAdQuali]![Ergebn"
        "is_neu]<>\"Keine Abweichung\""
    Action ="SetValue"
    Argument ="[Forms]![frmErgebnisAdQuali]![qry_eaq_bearbeiten1_unter].[Form]![Ergebnis]"
    Argument ="[Forms]![frmErgebnisAdQuali]![Ergebnis_neu]"
End
Begin
    Condition ="9=0"
    Action ="OpenForm"
    Argument ="frm_fcn"
    Argument ="0"
    Argument =""
    Argument =""
    Argument ="1"
    Argument ="1"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frm_fcb]![Endstatus_fc]"
    Argument ="[Forms]![frmErgebnisAdQuali]![Staus_qnt]"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frm_fcb]![Ende_Bea]"
    Argument ="Now()"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frm_fcb]![ID_eaq]"
    Argument ="[Forms]![frmErgebnisAdQuali]![ID_qnt]"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_fcb"
    Argument ="5"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_fcb"
    Argument ="0"
End
Begin
    Action ="Close"
    Argument ="2"
    Argument ="frm_fcb"
    Argument ="2"
End
Begin
    Condition ="9=0"
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frmErgebnisAdQuali"
    Argument ="5"
End
Begin
    Condition ="9=0"
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frmErgebnisAdQuali"
    Argument ="0"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Argument ="[Forms]![frmErgebnisAdQuali]![ID_fcb]"
    Argument ="\"\""
End
Begin
    Action ="Close"
    Argument ="2"
    Argument ="frmErgebnisAdQuali"
    Argument ="2"
End
