2. Januar 2012 12:12
g_Puffertabelle.RESET;
g_Puffertabelle.INIT;
g_Puffertabelle."Journal Template Name" := g_FiBuBuchBlattName."Journal Template Name";
g_Puffertabelle."Journal Batch Name" := g_FiBuBuchBlattName.Name;
IF g_Puffertabelle.FINDLAST THEN BEGIN
g_Puffertabelle."Line No." += 10000
END ELSE BEGIN
g_Puffertabelle."Line No." += 10000;
END;
g_Puffertabelle.INSERT();
// hier sollen jetzt die ganzen FiBu Daten überprüft werden
// wenn das Buchungsdatum leer ist, soll mir der Datensatz als Falsch (In der Form) angezeigt werden
// und der Fehlertext "Buchungsdatum nicht vorhanden" lauten
g_Puffertabelle."Posting Date" := "Posting Date";
IF g_Puffertabelle."Posting Date" = 0D THEN BEGIN
g_Puffertabelle.Status := g_Puffertabelle.Status::Falsch;
g_Puffertabelle.Fehlertext := "Buchungsdatum nicht vorhanden";
END;
// weitere Datenüberprüfung...
2. Januar 2012 12:35
g_Puffertabelle."Journal Template Name" := g_FiBuBuchBlattName."Journal Template Name";
g_Puffertabelle."Journal Batch Name" := g_FiBuBuchBlattName.Name;
IF g_Puffertabelle.FINDLAST THEN BEGIN
2. Januar 2012 12:46