AfAEroeffBil()
Eröffnungsbilanzwert (FiBu)
Funktion berechnet den Eröffnungsbilanzwert eines Anlagegutes
Hinweis
Funktion ist nur im Rahmen der FiBu einsetzbar.
Parameter | Beschreibung |
|---|---|
oDfInv:O | Tabellenobjekt Inventarverwaltung (DFINV) |
nVorJahr:N | 0 = aktuelles Geschäftsjahr (default) |
oDfAfA:O | Tabellenobjekt Abschreibungen (DFAFA) |
Rückgabewert
Numerisch
Beispiel
CODE
| oDfInv, cInvNr, nEBWert |
cInvNr:= '0000480-00012',
oDfInv:= BeOpen(waDAB075, 'ID'),
If !Empty(oDfInv) then
StartSeq
If DbSeek(cInvNr, oDfInv) then
nEBWert:= AfAEroeffBil(oDfInv),
WriteLn('Eröffnungsbilanzwert von ' + cInvNr + ' ist ' +
FormatFloat('#,##0.00', nEBWert)),
EndIf
Always
BeClose(oDfInv)
StopSeq
EndIf