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



No, Tom.  it does not compile on v4r5 because of "qualified". It is 5-1 code
that does not compile on 5-2.   I have no problem with upgrading, it is just
that v5r2, from an rpg standpoint, is not as rock solid as some on this list
have said.

-Steve

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Tom Liotta
Sent: Monday, June 30, 2003 4:40 PM
To: midrange-l@xxxxxxxxxxxx
Subject: RE: 730 to 825 migration


Steve:

Ummm... are you saying that you successfully compiled this on a V4R5 system
but it now fails on V5R2? Is this example an issue for an upgrade from V4R5?

Tom Liotta

midrange-l-request@xxxxxxxxxxxx wrote:

>   4. RE: 730 to 825 migration (Steve Richter)
>
>Here is the rpg code that does not compile as of 6/30/03.  It causes the
>compiler job to abend.
>
>** a data struct with a ptr subfld.
>dds1              ds                  qualified
>d pData                           *
>
>d BugProc         pr
>p BugProc         b
>d BugProc         pi
>
>d FsEnt           ds                  likeds(ds1)
>d FsData          s          32000a   based( FsEnt.pData )
>
>d LsEnt           ds                  likeds(ds1)
>d LsData          s          32000a   based( LsEnt.pData )
> /free
>      if          %subst(FsData:5:3) > %subst(LsData:5:1) ;
>      endif ;

--
Tom Liotta
The PowerTech Group, Inc.
19426 68th Avenue South
Kent, WA 98032
Phone  253-872-7788 x313
Fax    253-872-7904
http://www.powertechgroup.com


__________________________________________________________________
McAfee VirusScan Online from the Netscape Network.
Comprehensive protection for your entire computer. Get your free trial
today!
http://channels.netscape.com/ns/computing/mcafee/index.jsp?promo=393397

Get AOL Instant Messenger 5.1 free of charge.  Download Now!
http://aim.aol.com/aimnew/Aim/register.adp?promo=380455
_______________________________________________
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.



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