• Subject: Re: RPG400 SDA query?
  • From: Hans Boldt <boldt@xxxxxxxxxx>
  • Date: Thu, 23 Oct 1997 10:16:58 -0400

John Carr wrote:
>In RPGIV  we would.... LIKE TO DO THIS!!!!!!!!!.

>D STRUC     DS
>D                   QN001
>D                   QN002
>D                   QN003
>D                3  ARRAY        DIM(3) OVERLAY(STRUC)
>
>But they have not given us the ability to overlay at the D/S level yet.
>sooooo, in this example you would have to define the array like this;
>
>D          1    9    ARRAY       DIM(3)
>
>Hard coding(Jon, Hans, George)  the from & To of the array definition.

Hi John!  How soon do you want this?  How about the next release of ILE RPG?
(Just one hint:  when you get the next RPG release, be sure to load the first
PTF.  The enhancement won't work without it.)

BTW, for the benefit of those who didn't see this the first time, here's
the list of other enhancements coming (hopefully soon) in the next
release of RPG:

- New D-Spec keyword VARYING to define varying length character and
  graphic fields.  Of course, this means we also recognize varying
  length fields defined in externally described files.
- Indicator data type (type N)
- New built-in functions:
  -- %REPLACE for string manipulation
  -- %CHAR to convert date/time/timestamp/graphic types to character
  -- %STATUS
  -- %ERROR
  -- %EOF
  -- %FOUND
  -- %OPEN
- New opcode extender (E) to eliminate need for error indicator (used
  with new bif %ERROR)
- New H-Spec keywords to specify compiler options in the RPG source
  (rather than on the CRT command)
- additional date formats used with MOVE opcode
- Keywords IMPORT and EXPORT can take parameters to specify a mixed-case
  external name.
- New F-spec keyword INDDS to specify a 99 byte data structure which
  holds conditioning and response indicators for the file.  So each
  display and printer file can have its own separate indicator area.

Of course, this is all still very unofficial since the release hasn't been
officially announced yet.

Hans Boldt, ILE RPG Development, IBM Toronto Lab, boldt@ca.ibm.com
(note: new internet id)

PS. We have one more surprise in the works, so stay tuned.
+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to "MIDRANGE-L@midrange.com".
| To unsubscribe from this list send email to MAJORDOMO@midrange.com
|    and specify 'unsubscribe MIDRANGE-L' in the body of your message.
| Questions should be directed to the list owner/operator: david@midrange.com
+---


This thread ...

Follow-Ups:

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

This mailing list archive is Copyright 1997-2019 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].