KPG1_SATKD

Substitutes alphabetic (TRANSFORM) numeric tokens into a string

Description:

This routine parses the expression in EXPRES looking for tokens of the name PREFIX//[A-Z]. If one is located an attempt to access a value for this tokens if made using the ADAM parameter PREFIX//[A-Z]. If a value is obtained then it is substituted into the string EXPRES.

Invocation

CALL KPG1_SATKD( PREFIX, EXPRES, STATUS )

Arguments

PREFIX = CHARACTER ( ) (Given)
The prefix of the tokens. Valid tokens are ones with any trailing single alphabetic character.
EXPRES = CHARACTER ( ) (Given and Returned)
On entry this contains a TRANSFORM algebraic-like expression which may contain tokens which need to be substituted either for values (constants).
STATUS = INTEGER (Given and Returned)
The global status.