Re: Updating a program described file

[Alan Shore <AlanShore@xxxxxxxx>]

Tim
any reason why you are doing it this way?
Why not just do
RMVM FILE(library/QCLSRC) MBR(filename)
either through a CL program - or - if you HAVE to use RPG
use the system() API



Alan Shore

NBTY, Inc
(631) 244-2000 ext. 5019
AShore@xxxxxxxx
"If you're going through Hell, keep going" - Winston Churchill

midrange-l-bounces@xxxxxxxxxxxx wrote on 02/26/2008 10:36:12 AM:

> I have an FTP script source member that I need to update dynamically.
> Basically I am attempting to update a source physical file member from
> within RPGLE.  I can read the file (qclsrc) member without issue, but
can't
> get it to compile with update logic.  I've tried a bunch of different
> things, too much to put in this text.  Here is an example of my code.
Does
> anyone have an example?  Thanks, Tim
>
> FQCLSRC    UF   F   92        DISK
> IQCLSRC    AA  01
> I                                  1   92  SrcDta
>  *
> C     *entry        plist
> C                   parm                    filename         24
>  *
> C                   read      QCLSRC
>  *
> C                   eval      SrcDta = 'delete ' + filename
> C                   update    qclsrc
>  *
> C                   eval      *inlr = *on
>  *
>
>
> --
> 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.