GRP_PURGE - Purge duplicate entries from a group

Description:

This routine creates a new group based on a given existing group. The contents of the existing group are copied to the new group, but any duplicated names are only included once. The check for duplication is case sensitive unless the group has been declared case insensitive by a call to GRP_SETCS. The new group inherits the type, control characters case sensitivity flag of the old group, but does not inherit any owner/slave relationships (see routine GRP_SOWN).

Note, indices determined from the old group will in general not point to the same name in the new group. The old group should be deleted using GRP_DELET if it is no longer required.

Invocation:

CALL GRP_PURGE( IGRP1, IGRP2, STATUS )

Arguments:

IGRP1 = INTEGER (Given)

The GRP identifier for an existing group.

IGRP2 = INTEGER (Returned)

A GRP identifier for the created group. This group is a purged form of the group identified by IGRP1. A value of GRP__NOID is returned if an error occurs.

STATUS = INTEGER (Given and Returned)

The global status.