Polecenie umożliwia wypełnienie obiektu InKoEks danymi operacji kolejnego przypisania kosztów eksploatacji we wskazanym okresie oraz obiektu KoEks danymi o sumie kosztów eksploatacji środka trwałego przypisanych we wskazanym okresie czasu. Obiekt jest wypełniany danymi w następujący sposób:
Kwota1 |
Suma kosztów eksploatacji bilansowych |
Kwota2 |
Suma kosztów eksploatacji podatkowych |
Składnia
Int KolejnyKosztEksploatacjiDlaSrodka (InfoKosztEkspl InKoEks, InfoWynik KoEks, Long IdSrd, String dtP, String dtK [, Int ulepsz [,Int aktyw]] )
Argumenty
Typ |
Nazwa |
Opis |
InKoEks |
Obiekt wypełniany danymi o kolejnej operacji przypisania kosztów. |
|
KoEks |
Obiekt wypełniany danymi o sumie kosztów. |
|
IdSrd |
Identyfikator środka trwałego. |
|
dtP |
Data początku okresu w formacie RRRR-MM-DD. |
|
dtK |
Data końca okresu w formacie RRRR-MM-DD. |
|
ulepsz |
Przełącznik określający wybór tylko tych kosztów eksploatacji, które zostały oznaczone jako ulepszenia: 1 - wybiera tylko ulepszone 0 - bez ograniczenia wyboru (domyślne ustawienie). |
|
aktyw |
Przełącznik określający wybór tylko tych kosztów eksploatacji, które nie zostały przeniesione na podwyższenie wartości środka (aktywne): 1 - wybiera tylko aktywne koszty 0 - bez ograniczenia wyboru (domyślne ustawienie). |
Wartość zwracana
Jeden, gdy operacja przeprowadzona pomyślnie.
Zero, gdy wystąpił błąd.
Przykład
Long IdSrd=1
InfoKosztEkspl InKoszEks
InfoKosztEkspl InKoszEks1
InfoWynik KoEks
PierwszyKosztEksploatacjiDlaSrodka(InKoszEks, KoEks, IdSrd, PoczatekRoku(), KoniecRoku(), 0, 0)
Print "Koszt eksploatacji bilansowy w okresie od "; PoczatekRoku(); " do "; KoniecRoku(); " wynosi: "; KoEks.Kwota1, LF
Print "Koszt eksploatacji podatkowy w okresie od "; PoczatekRoku(); " do "; KoniecRoku(); " wynosi: "; KoEks.Kwota2, LF
Print "Pierwszy koszt eksploatacji bilansowy wynosi: "; InKoszEks.KwotaBil, LF
Print "Pierwszy koszt eksploatacji podatkowy wynosi: "; InKoszEks.KwotaPod, LF
KolejnyKosztEksploatacjiDlaSrodka(InKoszEks1, KoEks, IdSrd, PoczatekRoku(), KoniecRoku(), 0, 0)
Print "Drugi koszt eksploatacji bilansowy wynosi: "; InKoszEks1.KwotaBil, LF
Print "Drugi koszt eksploatacji podatkowy wynosi: "; InKoszEks1.KwotaPod, LF