LPG_REPLA

Indicate if input NDFs can be replaced

Description:

Sets a flag indicating if LPG applications can use a single NDF as both input and output. If so, a temporary NDF is used to store the output. This NDF is then used to replace the existing input NDF once the application has completed. If REPLAC is .FALSE. (the default), an error is reported if an attempt is made to use a single NDF as both input and output.

Invocation

CALL LPG_REPLA( REPLAC, STATUS )

Arguments

REPLAC = LOGICAL (Given)
If .TRUE., a single NDF can be used as both input and output from an application. If .FALSE., an error will be reported if this is attempted.
STATUS = INTEGER (Given and Returned)
The global status.