RE: CPYF CLP Question

I do not see any red on this email.
 

-----Original Message-----
From: midrange-l-bounces+jim.rubino=fike.com@xxxxxxxxxxxx
[mailto:midrange-l-bounces+jim.rubino=fike.com@xxxxxxxxxxxx] On Behalf
Of fbocch2595@xxxxxxx
Sent: Thursday, March 09, 2006 3:29 PM
To: midrange-l@xxxxxxxxxxxx
Subject: CPYF CLP Question

Hi, does anyone have copies of a pgm that I could use that would allow
me to pass the INCHAR variable so that I could run the cpyf command in a
certain way?  
 
An example of the command is;
 
CPYF FROMFILE(fromlib/file1) TOFILE(tolib/file1) MBROPT(*REPLACE)
INCCHAR(*RCD 1 *EQ 'CC01')
 
The item in red is the only thing that will change.  I want a command to
prompt and allow a change to just the part of INCCHAR which contains the
VALUE.
 
Does anyone have some code examples that I can use?  
 
Thanks, Frank
--
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.