Version =196611
ColumnsShown =2
Begin
    Condition ="[Forms]![frm_HauptTerminierungWV]![frm_Kundendaten2].[Form]![Steuernummer Feld] "
        "Is Null"
    Action ="MsgBox"
    Argument ="Achtung! Gutschrift ohne Steuernummer nicht möglich!!!! Bitte diese bei Kundenda"
        "ten und bei diesem Kundenguthaben eintragen und Vorgang wiederholen!"
    Argument ="0"
    Argument ="3"
    Argument ="Achtung!!!"
End
Begin
    Condition ="[Forms]![frmKundenguthabenAbrufen]![grund_abruf_kg] Is Null Or [Forms]![frmKunde"
        "nguthabenAbrufen]![bemerkung_abruf_kg] Is Null Or [Forms]![frmKundenguthabenAbru"
        "fen]![auftraggeber_auszahlung_kg] Is Null"
    Action ="MsgBox"
    Argument ="Auftraggeber, Grund und Bemerkung müssen angegeben werden!!"
    Argument ="0"
    Argument ="3"
    Argument ="Achtung!"
End
Begin
    Condition ="[Forms]![frmKundenguthabenAbrufen]![grund_abruf_kg] Is Null Or [Forms]![frmKunde"
        "nguthabenAbrufen]![bemerkung_abruf_kg] Is Null Or [Forms]![frmKundenguthabenAbru"
        "fen]![auftraggeber_auszahlung_kg] Is Null"
    Action ="StopAllMacros"
End
Begin
    Condition ="[Forms]![frm_HauptTerminierungWV]![frm_Kundendaten2].[Form]![Steuernummer Feld] "
        "Is Null"
    Action ="StopAllMacros"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![abgerufen_von_kg]"
    Argument ="[Forms]![frm_Anmeldung]![Benutzername]"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![abgerufen_am_kg]"
    Argument ="Date()"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![gs_erstellt_von_kg]"
    Argument ="[Forms]![frm_Anmeldung]![Benutzername]"
End
Begin
    Action ="SetValue"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![gs_erstellt_am_kg]"
    Argument ="Date()"
End
Begin
    Action ="SetValue"
    Comment ="auf 31 geändert"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![status_auszahlung_kg]"
    Argument ="31"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frmKundenguthabenAbrufen"
    Argument ="1"
End
Begin
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frmKundenguthabenAbrufen"
    Argument ="0"
End
Begin
    Condition ="9=0"
    Action ="MsgBox"
    Argument ="jetzt wird der GS AUto neu geöffnet"
    Argument ="-1"
    Argument ="0"
End
Begin
    Condition ="9=0"
    Action ="OpenForm"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="frm_GSAuto"
    Argument ="0"
    Argument =""
    Argument =""
    Argument ="-1"
    Argument ="1"
End
Begin
    Condition ="9=0 And 9=0"
    Action ="GoToRecord"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="2"
    Argument ="frm_GSAuto"
    Argument ="5"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![FirmaIntern]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![firma_intern_kg]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![Status_Nr]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![status_nr_st]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![Retention_ID]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![retention_id_kg]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![Sachbearbeiter]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![abgerufen_von_kg]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![Vertriebsweg]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![vertriebsweg_kg]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![Artikelbezeichnung1]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![grund_auswahl]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![Artikelbezeichnung2]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![gund_manuell_kg]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="diesen durch Anzahl Monate GGb teilen / Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![GSbrutto]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![betragbrutto_kg]/[Forms]![frmKundenguthabenA"
        "brufen]![GGB Monate]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![anteil_ad_kg]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![anteil_ad_kg]"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![Steuernummer_kg]"
    Argument ="[Forms]![frmKundenguthabenAbrufen]![steuernummer_Kg]"
End
Begin
    Condition ="9=0 And 9=0"
    Action ="MsgBox"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="Jetzt wird das steeerunummer frm geöffnet"
    Argument ="-1"
    Argument ="0"
End
Begin
    Condition ="9=0"
    Action ="OpenForm"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="frm_LetzteGutschriftNummerNeu"
    Argument ="0"
    Argument =""
    Argument =""
    Argument ="-1"
    Argument ="1"
End
Begin
    Condition ="9=0"
    Action ="SetValue"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="[Forms]![frm_GSAuto]![ArtNummer]"
    Argument ="[Forms]![frm_LetzteGutschriftNummerNeu]![NeueRechnungsNummer]"
End
Begin
    Condition ="9=0"
    Action ="Close"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="2"
    Argument ="frm_LetzteGutschriftNummerNeu"
    Argument ="2"
End
Begin
    Condition ="9=0"
    Action ="MsgBox"
    Argument ="Mkr GS Auto neu wird ausgeführt"
    Argument ="-1"
    Argument ="0"
End
Begin
    Action ="RunMacro"
    Comment ="Das Makro ist Neu und muss Wiederholgen haben wie GGB Monate"
    Argument ="Mkr_GSAutoNeu_teilGS"
    Argument ="=[Forms]![frmKundenguthabenAbrufen]![GGBmonate]"
End
Begin
    Condition ="9=0"
    Action ="Close"
    Comment ="Jetzt bei Mkr_GSAutoNeu_teilGS"
    Argument ="2"
    Argument ="frm_GSAuto"
    Argument ="2"
End
Begin
    Action ="Close"
    Argument ="2"
    Argument ="frmKundenguthabenAbrufen"
    Argument ="2"
End
Begin
    Action ="Close"
    Argument ="2"
    Argument ="frmKundenguthabenListe"
    Argument ="2"
End
Begin
    Condition ="9=0"
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_HauptTerminierungWV"
    Argument ="1"
End
Begin
    Condition ="9=0"
    Action ="GoToRecord"
    Argument ="2"
    Argument ="frm_HauptTerminierungWV"
    Argument ="0"
End
Begin
    Action ="MsgBox"
    Argument ="Gutschrift wurde erstellt, ausgedruckt und an die Buchhaltung übergeben!"
    Argument ="0"
    Argument ="4"
    Argument ="Info!"
End
