IdPierwszejGrupySrodka - polecenie

Polecenie umożliwia określenie identyfikatora pierwszej grupy, zawierającej środek o podanym identyfikatorze.

 

Składnia

Long IdPierwszejGrupySrodka (Long  idSrd)

 

Argumenty

 

Wartość zwracana

Identyfikator pierwszej grupy, zawierającej środek o podanym identyfikatorze.

Zero, gdy środek nie należy do żadnej grupy.

 

Przykład

//Raportowi należy nadać typ - środki
//Raport należy wykonywać z otwartego okna Środki trwałe
Long idGr = IdPierwszejGrupySrodka (1)
String NGr=NazwaGrupySrodka (idGr)
Print "Pierwsza grupa pierwszego środka to: "; NGr, LF
Int nrGr = WybierzSrodki (idGr, 3, 0)
Long idSrd=GetFirst ()
InfoSrodek srd
Srodek (srd, idSrd)
String NazwaSrodka=srd.Nazwa
Print "Pierwszy środek w tej grupie to: ", NazwaSrodka, LF
idSrd=GetNext ()
Srodek (srd, idSrd)
NazwaSrodka=srd.Nazwa
Print "Kolejny środek w tej grupie to: ", NazwaSrodka, LF
ZamknijZbior (nrGr)
idGr = IdKolejnejGrupySrodka (1)
NGr=NazwaGrupySrodka (idGr)
Print "Kolejna grupa pierwszego środka to: "; NGr, LF