Define New Length for Symbols

By default only the first 8 characters of a Symbol Name are significant. This Subprogram allows this default to be modified up to the maximum of 32 characters.

Short Name Calling Sequence

STATUS = UIDFSL(NEWLEN[,OLDLEN])

Long Name Calling Sequence

STATUS = UI_DEFINE_SYMBOL_LENGTH(...)

Input Arguments

NEWLEN (Integer) New Length

Output Arguments

OLDLEN (Integer) Old Length (Optional)

Function Value

UI__SUCCESS ) Success UISUCC )

UI__NOT_INITIALIZED ) Package not Initialized UININI )

Note:

1. The NEWLEN Argument specifies the new significant name length. If NEWLEN is zero or negative, the original default of 8 is restored. IF NEWLEN is greater than 32 then 32 is assumed.
2. The OLDLEN Argument is optional and, if present, will be set to the old value of the significant length prior to this call.
3. It is recommended that an Application Program only calls this Subprogram once during its initialisation since UIPACK does not check whether any already existing Symbol name becomes ambiguous as a result of this call.