Re: Open with USROPN Files

Hi Bill,

As of V5R1 you can use EXTFILE(varFileName) EXTMBR(varMbrName) on a file's
F-spec along with USROPN.  Populate varFileName and varMbrName then OPEN the
file using the RPG filename.

fFile1     if   e           k disk    extfile(varFileName)
extmbr(varMbrName) usropn

d varFileName        s            21a
d varMbrName       s            10a

c                        eval        varFileName = 'LIB1/XYZ'
c                        eval        varMbrName = 'ABC'
c                        open       File1

hth,
Peter Dow
Dow Software Services, Inc.
909 793-9050 voice
909 793-4480 fax
909 522-3214 cell

From: "Bill Hopkins"
> Thanks was pretty sure that was true for OPEN and I'm pretty sure I can
> build it into SQL statements but for client thats a no-no. :(
>
> Thanks I'll just create another up front pgm to do clear and then call the
> other with regular file opens and my QCMDEXC cmds.



---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.512 / Virus Database: 309 - Release Date: 8/19/2003