Re: Overlay an External DS

[rob@xxxxxxxxx]

I hear rumors that this gap will be tightened up as time goes on.

Rob Berendt
-- 
"They that can give up essential liberty to obtain a little temporary 
safety deserve neither liberty nor safety." 
Benjamin Franklin 





Joel Cochran <jrc@xxxxxxxxxx>
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
08/06/2003 03:55 PM
Please respond to RPG programming on the AS400 / iSeries
 
        To:     RPG programming on the AS400 / iSeries 
<rpg400-l@xxxxxxxxxxxx>
        cc: 
        Fax to: 
        Subject:        Re: Overlay an External DS


Yeah, I notice that some of the mails are coming out of order (and
slow).

BTW, your solution *did* work, I had a non-related error in my program,
but fixing that didn't help the overlay situation.  Do I understand that
this might be caused because we have 2 compiler teams?  If so, then I'm
not so comfortable using SQLRPGLE, which is a shame cause I really like
it (usually).

Thanks!

Joel
http://www.rpgnext.com


On Wed, 2003-08-06 at 16:39, cozzi@xxxxxxxxx wrote:
> I was referring to the example I provided that solved your program.
> In my example the field needed to be a stand-alone field. I wasn't
> talking about your original example.
> 
> -Bob
> 
> 
> > 
> > I don't think so, SEU (yeah yeah, I know...) won't permit the
> overlay
> > keyword on the field if I mark it as stand alone.  Besides,
> whenever
> > I've used overlay before it has been inside a DS, I just never did
> it
> > with an External DS before. 
> > 
> > Is it maybe because the External DS fields already have names?  I
> > wouldn't think that matters, but at this point I'd believe almost
> > anything.
> > 
> > Joel
> > http://www.rpgnext.com
> > 
> > 
> > On Wed, 2003-08-06 at 16:02, cozzi@xxxxxxxxx wrote:
> > > The EXTDSOVR field should be a stand-alone field "S". Sorry.
> > > 
> > > -Bob
> > > 
> > > 
> > > > 
> > > > I'm trying to overlay an external DS that gets populated by an
> > SQL
> > > > statement.  When I do NOT include the data, the DS is populated
> > > > correctly: if I add the overlay, the DS is blank even though
> the
> > > SQL
> > > > statement has no trouble finding the record.
> > > > 
> > > > <psuedo-code>
> > > > 
> > > > // this way extDS gets populated
> > > > d extDS        e ds                            extname(EXTDS)
> > > > ...
> > > > c/exec SQL
> > > > c+   Fetch next 
> > > > c+    from myCursor 
> > > > c+    into :extDS
> > > > c/end-exec
> > > > 
> > > > // this way extDS (and hence extDSovr) does NOT get populated
> > > > // elem is the correct number of fields in EXTDS
> > > > // All fields in EXTDS are defined the same: 100a
> > > > d extDS        e ds                            extname(EXTDS)
> > > > d extDSovr                             100a    overlay(extDS)
> > > > %dim(elem)
> > > > ...
> > > > c/exec SQL
> > > > c+   Fetch next 
> > > > c+    from myCursor 
> > > > c+    into :extDS
> > > > c/end-exec
> > > > 
> > > > </psuedo-code>
> > > > 
> > > > Any idea why this is happening or even better how to fix it?
> > > > 
> > > > Thanks!
> > > > 
> > > > Joel
> > > > http://www.rpgnext.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.
> > 
> > _______________________________________________
> > 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.

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