Środki Trwałe - Polecenia > Centra kosztów > PierwszaZmianaUdzialu - polecenie

| Drukuj

PierwszaZmianaUdzialu - polecenie stp

Polecenie wypełnia obiekt OpOper danymi opisującymi pierwszą zmianę udziałów w innych centrach związanych z operacją zmiana centrum.

 

Obiekt OpOper musi być wcześniej wypełniony danymi opisującymi operację zmiana centrum kosztów.

 

Polecenie wypełnia dodatkowo w obiekcie OpOper następujące pola:

Kwota3

Nowy udział w centrum

Kwota4

Stary udział w centrum

Wartosc3

Identyfikator centrum

 

Składnia

Int PierwszaZmianaUdzialu (InfoWydarzenie  OpOper)

 

Argumenty

Typ

Nazwa

Opis

InfoWydarzenie

OpOper

Obiekt wypełniany danymi operacji

 

Wartość zwracana

Jeden, gdy operacja przeprowadzona pomyślnie.

Zero, gdy wystąpił błąd.

 

Przykład

String DtP="2008-10-02"
String DtK="2008-12-31"
InfoWydarzenie OpOper
PierwszeWydarzenie (OpOper, DtP, DtK)
Do
KolejneWydarzenie (OpOper, DtP, DtK)
Loop While OpOper.TypWydarzenia != 17
PierwszaZmianaUdzialu (OpOper)
Print "Opis pierwszej zmiany udziału"; LF
Print "Identyfikator centrum - "; OpOper.Wartosc3; LF
Print "Nowy udział procentowy - "; OpOper.Kwota3; LF
Print "Stary udział procentowy - "; OpOper.Kwota4; LF
KolejnaZmianaUdzialu (OpOper)
Print "Opis kolejnej zmiany udziału"; LF
Print "Identyfikator centrum - "; OpOper.Wartosc3; LF
Print "Nowy udział procentowy - "; OpOper.Kwota3; LF
Print "Stary udział procentowy - "; OpOper.Kwota4; LF