Description:
A new group is
created by copying a section of an existing group specified by the range of indices supplied in
INDXLO and INDXHI. The whole group is used if INDXLO and INDXHI are both zero. The output
group can be formed in one of two ways:
1) All names from the input group are copied to the output group except for those with indices in the
given range.
2) Only those names from the input group which have indices within the given range are copied to the
output group.
The method used is determined by the argument REJECT. Note, a name with a given index in the
input group will have a different index in the output group if INDXLO is not 1 (or zero). The new
group inherits the type, control characters and case sensitivity flag of the old group, but does not
inherit any owner/slave relationships (see routine GRP_SOWN). If the input group is no longer
required, it should be deleted using GRP_DELET.
Invocation
CALL GRP_COPY( IGRP, INDXLO,
INDXHI, REJECT, IGRP2, STATUS )
Arguments
IGRP1 = INTEGER (Given)
A GRP identifier for
the input group.
INDXLO = INTEGER (Given)
The lowest index to reject or to copy.
INDXHI =
INTEGER (Given)
The highest index to reject or to copy.
REJECT = LOGICAL ( Given)
If reject is
.TRUE., then names in the given range are rejected. Otherwise, names in the given range are copied.
IGRP2 = INTEGER (Returned)
A GRP identifier for the created group. Returned equal to
GRP__NOID if an error occurs.
STATUS = INTEGER (Given and Returned)
The global status.