RE: DFTACTGRP(*NO) ACTGRP(*CALLER) was RE: More ILE 101

    Eval    fileToOpen = FmtText('%s/%s' : %trimR(MyLib) : %TrimR(MyLib))

Not Rockescience at all.
-Bob


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
On Behalf Of Joep Beckeringh
Sent: Wednesday, April 14, 2004 9:28 AM
To: RPG programming on the AS400 / iSeries
Subject: Re: DFTACTGRP(*NO) ACTGRP(*CALLER) was RE: More ILE 101

Bob Cozzi wrote:

> Joep,
> You can supply the file name and library as variables, just declare a
> variable as a data structure and break it apart; it's RPG IV, not Rocket
> Science.
> On another note, if you use EXTFILE and/or EXTMBR remember that THESE ARE
> NOT OVERRIDES. They are direct opens of the specific file/member. So you
> don't get the same side-effects as issuing an OVRDBF command. That is,
> there's no SHARE(*YES) or SEQONLY(*YES) capability. Those options still
need
> to be issued via an OVRDBF command.
> -Bob Cozzi

Hm. You would have have to have a 21 bytes data structure with a '/' in the 
middle. The file would have to be USROPN because you can't have entry
parameters 
in a data structure. If you just need to point to a different library you
would 
have to fill the filename part of the data structure. There is more than a
fine 
line between rocket science and elegance :-)

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