12. Februar 2009 21:14
Hallo Yvilein,
etwas wirr, aber klar.
Definier die zunächst eine Globale Variable,
sagen wir BalAccountName Text 50,
Definier dir ncoh Variablen für den Debitor BalCust,den Kredito BalVend und das Sachkonto BalGlAcc (falls du noch keine hast)
In OnAfterGetRecord des GLEntry ergänzt du bitte folgendes:
- Code:
BalAccName := '';
Case "G/L Entry"."Bal. Account Type" OF
"Bal. Account Type"::"G/L Account":BEGIN
IF NOT BalGLAcc.GET("G/L Account No.") THEN
BalGLAcc.INIT;
BalAccName := BalGLAcc.Name;
END;
"Bal. Account Type"::Customer:BEGIN
IF NOT BalCust.GET("G/L Account No.") THEN
BalCust.INIT;
BalAccName := BalCust.Name;
END;
"Bal. Account Type"::Vendor:BEGIN
IF NOT Balvend.GET("G/L Account No.") THEN
BalVend.INIT;
BalAccName := BalVend.Name;
END;
END;
Damit reagierst du auf den jeweiligen Gegenkontentyp, der ja im Feld "Bal. account Type" hinterlegt ist.
Grundsätzlich inialisiest du die Variable mit '' vor der Case abfrage.
Die Variable selbst kanns du beliebig in einer Textbox plazieren.
Alternativ kannst du auch in der Tabelle G/L Entry auch ein Flowfield bauen und dieses anzeigen.
Gruß
Micha