SQL/MP Programming Manual for COBOL

Character Processing Rules (CPRL) Procedures
HP NonStop SQL/MP Programming Manual for COBOL529758-003
11-18
CPRL_GETSPECIALTABLE_
array pic X(256) output
is a 256-byte array specified by the user. If the call is successful,
CPRL_GETNUMTABLE_ sets each byte in array as follows:
If the call is unsuccessful, array is not modified.
cprladdr pic S9(9) input
is a pointer to the SQL collation or collation object.
CPRL_GETSPECIALTABLE_
The CPRL_GETSPECIALTABLE_ procedure extracts SPECIALS character class
information from an SQL collation or collation object, if the SPECIALS character class
exists.
If the SPECIALS character class does not exist, CPRL_GETSPECIALTABLE_ creates
it. In this case, characters are considered SPECIALS if they are not ALPHAS or
NUMERICS. (The ALPHAS and NUMERICS character classes exist in all SQL
collations or collation objects.)
The CPRL_GETSPECIALTABLE_ procedure returns these error codes:
array pic X(256) output
is a 256-byte array specified by the user. If the call is successful,
CPRL_GETSPECIALTABLE_ sets each byte in array as follows:
If the call is unsuccessful, array is not modified.
1 The corresponding character code in the SQL collation or collation object
is numeric.
0 The corresponding character code in the SQL collation or collation object
is not numeric.
ENTER TAL "CPRL_GETSPECIALTABLE_" USING
array,
cprladdr
GIVING errorcode.
Code Description
0 The operation was successful.
–2 The SQL collation or collation object is invalid.
–4 The version of the SQL collation or collation object is not supported.
1 The corresponding character code in the SQL collation or collation object
is in the SPECIALS character class.
0 The corresponding character code in the SQL collation or collation object
is not in the SPECIALS character class.