Re: Copy from Import File

["Prevesh Kuni" <KuniP@xxxxxxxxxxxxx>]

Cool bananas!
Thanks Michael, Rick and Joep, much appreciated :)
 
Prevesh Kuni
RPG Developer
Smollan Group SA (Pty) Ltd
(011) 640 8154 
kunip@xxxxxxxxxxxxx 


> > > J.Beckeringh@xxxxxxxxxxxxxxxxxxxxxxxxxx 2007/11/13 02:00:38 PM >>>
And (just before David chimes in, because this has nothing to do with 
RPG): use forward slashes; backslashes are Windows only.

Joep Beckeringh


rpg400-l-bounces@xxxxxxxxxxxx wrote on 13-11-2007 12:41:25:

> or, try
>
> FROMSTMF('\kunip\' *cat &file)
>
> On Nov 13, 2007 6:28 AM, Michael Ryan < michaelrtr@xxxxxxxxx >
wrote:
> > The command interpreter isn't going to expand the variable file
name.
> > Try this instead:
> >
> > CHGVAR VAR(&FILE) VALUE('\kunip\MMF1010.dn')
> >
> > CPYFRMIMPF FROMSTMF(&FILE) +
> > TOFILE(BSMF610/METUPF) MBROPT(*ADD) +
> > RCDDLM(*ALL) STRDLM('"') FLDDLM(',') +
> > RPLNULLVAL(*FLDDFT)
> >
> > Quoting the FROMSTMF parm in your original attempt caused the
system
> > to look for a file named "\kunip\&FILE", which is incorrect.
> >
> >
> > On Nov 13, 2007 6:16 AM, Prevesh Kuni < KuniP@xxxxxxxxxxxxx >
wrote:
> > > Hi guys,
> > >
> > > I am doing a CPYFRMIMPF :
> > >
> > > CPYFRMIMPF FROMSTMF('\kunip\MMF1010.dn') +
> > > TOFILE(BSMF610/METUPF) MBROPT(*ADD) +
> > > RCDDLM(*ALL) STRDLM('"') FLDDLM(',') +
> > > RPLNULLVAL(*FLDDFT)
> > >
> > > which works, however if I try to pass a variable as a file name 
using
> > > CHGVAR VAR(&FILE) VALUE(MMF1010.dn)
> > >
> > > CPYFRMIMPF FROMSTMF('\kunip\&FILE') +
> > > TOFILE(BSMF610/METUPF) MBROPT(*ADD) +
> > > RCDDLM(*ALL) STRDLM('"') FLDDLM(',') +
> > > RPLNULLVAL(*FLDDFT)
> > >
> > > I end up with a blank TOFILE member - any help in where I could
be
> > > going wrong?
> > >
> > > Thanks in advance,
> > >
> > > Prevesh Kuni
> > > RPG Developer
> > > Smollan Group SA (Pty) Ltd
> > > (011) 640 8154
> > > kunip@xxxxxxxxxxxxx 
> > >
> > > --
> > > 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 .