CALL BPX1GEG, Get the effective group ID + (RETVAL), Return value: effective group ID + VL,MF=(E,PLIST) ----------------------------------