• Subject: Re: Char to num
  • From: Jim Langston <jlangston@xxxxxxxxxxxxxxxx>
  • Date: Tue, 05 Oct 1999 09:48:57 -0700
  • Organization: Conex Global Logistics Services, Inc.

 PGM
              DCL        VAR(&NUMBER) TYPE(*DEC) LEN(10 0)
              DCL        VAR(&CHARACTER) TYPE(*CHAR) LEN(10) VALUE('50')

              CHGVAR     VAR(&NUMBER) VALUE(&CHARACTER)
              CHGVAR     VAR(&NUMBER) VALUE(&NUMBER + 1)
              CHGVAR     VAR(&CHARACTER) VALUE(&NUMBER)
              SNDMSG     MSG(&CHARACTER) TOUSR(*REQUESTER)
 ENDPGM

This program sends the message 0000000051

As you can see, it is simply a matter of moving the character to a numeric 
field,
or
the number to a character field.

Regards,

Jim Langston

Scott Swaim wrote:

> I have having a brain freeze this morning.  In CL how do I convert a
> Character to Number?
>
> Scott Swaim
> scott@qualitycorps.com

+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2022 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.