× The internal search function is temporarily non-functional. The current search engine is no longer viable and we are researching alternatives.
As a stop gap measure, we are using Google's custom search engine service.
If you know of an easy to use, open source, search engine ... please contact support@midrange.com.


  1.  Home
  2. RPG400-L
  3. December 2005

Re: RPG-III to -IV conversion rehash worries - Part II

On 12/16/05, Fisher, Don <dfisher@xxxxxxxxxxxxx> wrote:
>
> After you place *BLANKS into those numeric fields, what happens if you try
> to use the numeric field in another operation like ADD or IF?  "ABCDE" is
> translated into "12345" by EBCDIC.  Try letters like "PQRS".


You ready?  I wasn't!  Using 'PQRST':
RPG-III:
  C                     MOVE 'PQRST'   NUMBER  50
  C                     MOVE NUMBER    NUMBE@  5
  C                     DUMP
gives:
  NUMBE@   009329  CHAR(5)       '78923'
  NUMBER   009326  PACKED(5,0)   78923

RPG-IV:
      MOVE      'PQRST'       NUMBER            5 0
      MOVE      number        NUMBER@           5
      DUMP
gives:
  NUMBER             PACKED(5,0)       78923.        '78923F'X
  NUMBER@            CHAR(5)           '78923'       'F7F8F9F2F3'X

Hmmm.
- Dan

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-2025 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.