HLASM Language Reference

SETA Instruction
| The result of C2A is the same as would be obtained from
| &value SETA C'charstring'
| except that C2A gives a zero result for null strings, and does not pair
| apostrophes or ampersands before conversion.
| Example
| C2A('') has value
| C2A('+') has value 78
| C2A('1') has value 241
| C2A('') has value -252645136
| D2A
| Format: Function-invocation
| Operands: Character
| Output: D2A('decstring') converts a character string argument containing an
| optional leading plus or minus sign followed by decimal digits to an arithmetic
| value. Error conditions are detected if
| the argument contains invalid characters
| no digits are present following a sign
| the argument length exceeds 11 characters
| the resulting value is too large
| the argument string is null.
| The result of the D2A function is the same as
| &value SETA decstring
| except that SETA does not allow leading plus or minus signs.
| Examples
| D2A('') indicates an error condition
| D2A('') has value
| D2A('1') has value 1
| D2A('+1') has value 1
| D2A('-5') has value -5
| DCLEN
| Format: Function-invocation
| Operands: Character
| Output: DCLEN('cexpr') returns the length of its argument string after pairs of
| apostrophes and ampersands have been internally replaced by single
| occurrences. No change is made to the argument. Such pairing occurs only
| once; that is, three successive occurrences of an apostrophe or ampersand
| will result in two occurrences, not one.
| Examples
| DCLEN('') has value (null string)
| DCLEN('''') has value 1 (argument is a single apostrophe)
| DCLEN('''''') has value 2 (argument is two apostrophes)
| DCLEN('&&') has value 1 (argument is two ampersands)
| DCLEN('a''''b') has value 3 (DCVAL string would be "a'b")
| DCLEN('a''''b&&c') has value 5 (DCVAL string would be "a'b&c")
| DCLEN('&&&''''''') has value 4 (DCVAL string would be "&&''")
| Note: DCLEN is similar to DCVAL, except that DCLEN returns only the length
| of the result, not the paired string.
354 HLASM V1R5 Language Reference