Re: TAB01/TAB02 to "D" spec.s -- RPG400-L

Subject: Re: TAB01/TAB02 to "D" spec.s
From: "Peter Dow (ML)" <maillist@xxxxxxxxxxxxxxx>
Date: Mon, 27 Aug 2007 09:15:02 -0700
List-archive: <http://archive.midrange.com/rpg400-l>
List-help: <mailto:rpg400-l-request@midrange.com?subject=help>
List-id: RPG programming on the AS400 / iSeries <rpg400-l.midrange.com>
List-post: <mailto:rpg400-l@midrange.com>
List-subscribe: <http://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@midrange.com?subject=subscribe>
List-unsubscribe: <http://lists.midrange.com/mailman/listinfo/rpg400-l>, <mailto:rpg400-l-request@midrange.com?subject=unsubscribe>

Hi Dick,

I see Randy has already answered this specific question, so I'll just note that you can find this out by using IBM's CVTRPGSRC command, which converts RPG III to RPG IV. Let it convert the TAB01/TAB02 (or whatever and see what it looks like.

*Peter Dow* /
Dow Software Services, Inc.
909 793-9050
pdow@xxxxxxxxxxxxxxx <mailto:pdow@xxxxxxxxxxxxxxx> /

dickjaz@xxxxxxx wrote:

I am helping a customer "modernize" their RPG II code. They use a lot of TAB01/TAB02 type look ups. I was trying to find some direction on how to move those to definition specifications. For the time being I converted them to parallel arrays and use a resulting subscript. This requires code changes and possible errors. Does anyone know where to look or have examples of using tables in "D" spec.s? I would like to get rid of the '**' loads.
TIA,
Dick J (AZ)

As an Amazon Associate we earn from qualifying purchases.

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.