LPG_CATCREAT

Create a new catalogue via the parameter system

Description:

This routine should be called in place of CAT_CREAT within applications that process lists of catalogues.

On the first invocation of the application, a group of names for some new catalogues will be obtained from the environment using the specified parameter. The first name will be used to create an catalogue with the requested attributes, and an identifier for the new catalogue will be returned. If more than one name was supplied for the parameter then the application may be invoked again (see LPG_AGAIN), in which case this routine will return an identifier for a new catalogue with the next name in the group supplied on the first invocation.

If a modification element is included in the group expression supplied for the parameter on the first invocation of the application, the new catalogue names are based on the names of the first group of existing data files (catalogues or NDFs) to be accessed by the application.

If an application attempts to get a new catalogue by cancelling the parameter (PAR_CANCL), the name used to create the returned catalogue is NOT the next one in the group, but is obtained by prompting the user for a single new catalogue.

The monolith routine should arrange to invoke the application repeatedly until one or more of its catalogue parameters have been exhausted (i.e. all its values used). See LPG_AGAIN.

Invocation

CALL LPG_CATCREAT( PARAM, CI, STATUS )

Arguments

PARAM = CHARACTER ( ) (Given)
Name of the parameter.
CI = INTEGER (Returned)
The catalogue identifier.
STATUS = INTEGER (Given and Returned)
The global status.