RE: Help with qcmdexc

Command's require the object and their library names to be qualified, just
like in CL. In addition you're missing the FROMFILE keyword.
You're command should look like this in debug:

       ....5...10...15...20...25...30...35...40...45...50...55...60      
  1   'CPYF FROMFILE(LIB1/FILE1) TOFILE(LIB1/FILE2)               '     
61   'MBROPT(*REPLACE) CRTFILE(*YES) FMTOPT(*NOCHK)               '     
121   '                                                            '     

-Bob Cozzi


-----Original Message-----
From: rpg400-l-bounces+cozzi=rpgiv.com@xxxxxxxxxxxx
[mailto:rpg400-l-bounces+cozzi=rpgiv.com@xxxxxxxxxxxx] On Behalf Of
as400tech@xxxxxxxxxxx
Sent: Monday, May 10, 2004 3:55 PM
To: rpg400-l@xxxxxxxxxxxx
Subject: Help with qcmdexc

 
List,
I have the following eval statement in my RPG program:

EVAL      CMD = 'CPYF(''' + %TRIMR(SOURCE) +       
                 ''') TOFILE(''' + %TRIMR(DEST) +  
                 ''') MBROPT(*REPLACE) +           
                      CRTFILE(*YES) FMTOPT(*NOCHK)'

When it executes, I get the following error:
                                                   
String beginning 'CPYF      ' not valid command name.

However, in debug the string looks like this:

       ....5...10...15...20...25...30...35...40...45...50...55...60      
  1   'CPYF('LIB1      FILE1     ') TOFILE('LIB1      FILE2     ') '     
61   'MBROPT(*REPLACE) CRTFILE(*YES) FMTOPT(*NOCHK)               '     
121   '                                                            '     

We are running V5R2. Any help in figuring out what I am doing wrong will
be greatly appreciated.

Thanks,
Terry 
 

-- 
http://www.fastmail.fm - And now for something completely different.

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