Środki Trwałe - Polecenia > Ulgi inwestycyjne > KolejnySrodekWUldze - polecenie | | Drukuj |
Polecenie wypełnia obiekt ulga danymi kolejnego środka z listy środków trwałych objętych ulgą inwestycyjną. Podstawą jest lista środków objętych ulgą dla podanej daty lub dla bieżącej daty operacji (gdy nie została podana data). Lista środków musi być wcześniej uaktywniona poleceniem UlgaInwestycyjna.
Składnia
Int KolejnySrodekWUldze ( InfoUlga ulga [, String dt])
Argumenty
Wartość zwracana
Jeden, gdy operacja przeprowadzona pomyślnie.
Zero, gdy wystąpił błąd.
Przykład
InfoUlga InU
Long IdUl=UlgaInwestycyjna ( InU)
Print "Identyfikator ulgi - ", IdUl, LF
PierwszySrodekWUldze ( InU)
Print "Pierwszym środkiem objętym ulgą jest ", InU.NazwaSrodka, LF
Long ISrd=IloscSrodkowWUldze ()
Print "Liczba środków objętych ulgą ", ISrd, LF
Long Licznik = 1
While Licznik < ISrd
KolejnySrodekWUldze ( InU)
Print "Kolejnym środkiem objętym ulgą jest ", InU.NazwaSrodka, LF
Licznik = Licznik + 1
Wend