|
Sorry about that. I had 42 degrees this morning. I could see my breath. Didn't have to scrape though. Not yet. Gets warm next week. In the 80s a couple of days. Mark Walter Senior Programmer/Analyst Hainey Business Systems (717) 718-9601 x7148 mwalter@xxxxxxxxxxx http://www.hbs-inc.com -----Original Message----- From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Wilt, Charles Sent: Friday, September 30, 2005 4:39 PM To: RPG programming on the AS400 / iSeries Subject: RE: Why is RESET not allowed for a DS that is based? Well, I can understand INZ not being allowed. Since there's no memory space for a based structure, it'd be kind of hard for it to be initialized. Granted, you could have the based-on pointer assigned at compile time, so in that instance there is space assigned. But more likely, no space is addressed until run-time. How could the compiler code to initialize the DS? As I think about it, perhaps RESET has a similar limitation. Since RESET resets a available to it's INITIAL state and a based variable doesn't really have a initial state...RESET doesn't work. CLEAR should work though as it sets the variable to blanks/zeros. That being said, I have often wished for a way to use INZ and RESET with a based structure. Perhaps a DEFAULT keyword along with CLEAR resetting to DEFAULT. That would allow me to define a template like structure with fixed fields. HTH, Charles Wilt -- iSeries Systems Administrator / Developer Mitsubishi Electric Automotive America ph: 513-573-4343 fax: 513-398-1121 > -----Original Message----- > From: rpg400-l-bounces@xxxxxxxxxxxx > [mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of rob@xxxxxxxxx > Sent: Friday, September 30, 2005 4:21 PM > To: RPG programming on the AS400 / iSeries > Subject: Re: Why is RESET not allowed for a DS that is based? > > > Which also begs the question: Why is inz not allowed in a based data > structure? > RNF3724: Keyword is not allowed for subfield in based data structure; > keyword is ignored. > > Rob Berendt > -- > Group Dekko Services, LLC > Dept 01.073 > PO Box 2000 > Dock 108 > 6928N 400E > Kendallville, IN 46755 > http://www.dekko.com > > > > > > rob@xxxxxxxxx > Sent by: rpg400-l-bounces@xxxxxxxxxxxx > 09/30/2005 03:05 PM > Please respond to > RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx> > > > To > rpg400-l@xxxxxxxxxxxx > cc > > Fax to > > Subject > Why is RESET not allowed for a DS that is based? > > > > > > > Why is RESET not allowed for a DS that is based? > > ... > D pQsylusraHd s * > D qsylusraHd DS qualified > based(pQsylusraHd) > D Object 10a inz(*blanks) > Object name > D Library 10a inz(*blanks) > Library name > specifd > ... > reset qsylusrahd; > RNF5348: RESET is not allowed for a result field that is based or > imported. > > Rob Berendt > -- > Group Dekko Services, LLC > Dept 01.073 > PO Box 2000 > Dock 108 > 6928N 400E > Kendallville, IN 46755 > http://www.dekko.com > > -- > This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing > list To post a message email: RPG400-L@xxxxxxxxxxxx To subscribe, > unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l > or email: RPG400-L-request@xxxxxxxxxxxx Before posting, please take a > moment to review the archives at http://archive.midrange.com/rpg400-l. > > > -- > This is the RPG programming on the AS400 / iSeries (RPG400-L) > mailing list > To post a message email: RPG400-L@xxxxxxxxxxxx > To subscribe, unsubscribe, or change list options, > visit: http://lists.midrange.com/mailman/listinfo/rpg400-l > or email: RPG400-L-request@xxxxxxxxxxxx > Before posting, please take a moment to review the archives > at http://archive.midrange.com/rpg400-l. > >
As an Amazon Associate we earn from qualifying purchases.
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.