MVSFORUMS.com

arvibala · Beginner Joined: 12 Feb 2008 Posts: 142 Topics: 67

Hi,

I want to combine multiple fields delimited by "`". But some of the fields are numeric ( like amount Totals). I want function like STRING but should work for Numeric values too.

Can some one help?

Cheers,
_________________
Arvind
"You can make a difference with your smile. Have that with you always"

CraigG · Posted: Thu Aug 28, 2008 3:34 pm Post subject:

Move the numeric fields to a numeric editted field then do the string.

CZerfas · Intermediate Joined: 31 Jan 2003 Posts: 211 Topics: 8

To handle that within a SELECT you can transform the numeric columns to character values with the CHAR or the CAST function:

SELECT CHAR(numeric-filed-1) !! "-" !! CAST(numeric-field-2) as CHAR(10)
FROM ...

regards
Christian

arvibala · Beginner Joined: 12 Feb 2008 Posts: 142 Topics: 67

I am reading this from a Flat File using COBOL program and writing into a Flat file again.
_________________
Arvind
"You can make a difference with your smile. Have that with you always"

Santlou · Posted: Sun Aug 31, 2008 12:59 pm Post subject:

If the fields are not signed or packed, you can use reference modification to reference them as Alphanumeric fields:

Example:

arvibala · Beginner Joined: 12 Feb 2008 Posts: 142 Topics: 67

Thanks Santlou,

Its working. But Iam looking for Robust logic so that the number gets appended without leading zeros. Like if I want to append

kolusu · Posted: Thu Sep 25, 2008 3:56 pm Post subject:

arvibala,

untested code