Dbcs (Double-Byte Character Set Functions); Delstr (Delete String); Delword (Delete Word); Digits - IBM SC34-5764-01 Manual

Cics transaction server for vse/esa
Table of Contents

Advertisement

DBCS (Double-Byte Character Set Functions)

The following are all part of DBCS processing functions.
DBADJUST
DBBRACKET
DBCENTER
DBCJUSTIFY
DBLEFT

DELSTR (Delete String)

DELSTR(string,n
,length
returns string after deleting the substring that begins at the nth character and is of length characters. If you
omit length, or if length is greater than the number of characters from n to the end of string, the function
deletes the rest of string (including the nth character). The length must be a positive whole number or
zero. The n must be a positive whole number. If n is greater than the length of string, the function returns
string unchanged.
Here are some examples:
DELSTR('abcd',3)
->
DELSTR('abcde',3,2)
->
DELSTR('abcde',6)
->

DELWORD (Delete Word)

DELWORD(string,n
returns string after deleting the substring that starts at the nth word and is of length blank-delimited words.
If you omit length, or if length is greater than the number of words from n to the end of string, the function
deletes the remaining words in string (including the nth word). The length must be a positive whole
number or zero. The n must be a positive whole number. If n is greater than the number of words in string,
the function returns string unchanged. The string deleted includes any blanks following the final word
involved but none of the blanks preceding the first word involved.
Here are some examples:
DELWORD('Now is the time',2,2) -> 'Now time'
DELWORD('Now is the time ',3)
DELWORD('Now is the time',5)
DELWORD('Now is
the time',3,1) -> 'Now is

DIGITS

DIGITS()
returns the current setting of NUMERIC DIGITS. See the NUMERIC instruction on page "Purpose" on
page 150 for more information.
Here is an example:
DIGITS()
->
9

D2C (Decimal to Character)

D2C(wholenumber
,n
returns a string, in character format, that represents wholenumber, a decimal number, converted to binary.
DBRIGHT
DBRLEFT
DBRRIGHT
DBTODBCS
DBTOSBCS
)
'ab'
'abe'
'abcde'
)
,length
-> 'Now is '
-> 'Now is the time'
time'
/* by default */
)
Functions
DBUNBRACKET
DBVALIDATE
DBWIDTH
Chapter 14. Functions
183

Hide quick links:

Advertisement

Table of Contents
loading

This manual is also suitable for:

Rexx

Table of Contents