Guardian Procedure Calls (G)
Guardian Procedure Calls Reference Manual—522629-013
6-39
GROUP_GETNEXT_ Procedure
Example
! obtain all group names
i := 0;
curlen := 0;
DO
error := GROUP_GETNEXT_ ( name:MAXLEN, curlen);
group^list[i] ’:=’ name for curlen BYTES;
i := i + 1;
UNTIL (error <> 0);