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);