View previous topic :: View next topic
Author
Message
alaintwy New User Joined: 02 Dec 2007Posts: 10 Location: Shanghai
Hi buddies
IF=(1,0,C"//SYSIN DD *"),
MOVE=(1,0,1),
MOVE=(1,C"$$ DD01 COPY IF=(65,EQ,C')') "),
WRITE=DD01
when I check the result, it shows
BO DD01 COPY IF=(65,EQ,C')')
why Fileaid use BO to replace $$?
and I try to use
EA=(1,00,C"BODD01",C"$$DD01") but failed.
How to write $$ using fileaid? or we just could manually update?
Many thanks
Back to top
dick scherrer Moderator Emeritus Joined: 23 Nov 2006Posts: 19244 Location: Inside the Matrix
Hello,
Please post a more complete set of your jcl, "data", and fileaid control statements.
It will probably help if you post the output you want from this execution.
Back to top
gcicchet Senior Member Joined: 28 Jul 2006Posts: 1702 Location: Australia
Hi,
provide JCL, data and messages and what you are trying to achieve.
Gerry
Back to top
alaintwy New User Joined: 02 Dec 2007Posts: 10 Location: Shanghai
dick scherrer wrote:
Hello,
Please post a more complete set of your jcl, "data", and fileaid control statements.
It will probably help if you post the output you want from this execution.
OK, there is a JCL which only has 4 steps, now I need to add two more steps, but I don't want to hard coding, I just want to use fileaid to create these lines.
For example: in this JCL the code is :
//* JS010 PREPARES THE RESTORE FILE *
//* *
//* JS020 RESTORES REQUESTED REPORTS *
//* *
//* JS030 UPDATES THE REPORT INDEX WITH RESTORE INFO *
//* *
//* JS040 DELETES EXPIRED REPORTS FROM USERS REPORT INDEX *
and I use fileaid:
IF=(1,0,C"//* JS040"),
MOVE=(1,0,1),
MOVE=(1,C"//*"),MOVE=(+0,68C' '),
WRITE=DD01,
MOVE=(1,C"//* JS050 PREPARES TO ARCHIVE REPORTS *"),
WRITE=DD01
The result would be
//* JS040 DELETES EXPIRED REPORTS FROM USERS REPORT INDEX *
//* *
//* JS050 PREPARES TO ARCHIVE REPORTS *
Now I will add these two lines:
//SYSIN DD *
$$ DD01 COPY IF=(65,EQ,C')')
my code is
IF=(1,0,C"//SYSIN DD *"),
MOVE=(1,0,1),
MOVE=(1,C"$$DD01 COPY IF=(65,EQ,C')') "),
WRITE=DD01
but the result is
//SYSIN DD *
BO DD01 COPY IF=(65,EQ,C')')
Fileaid will use BO to replace $$, why?
How can I make it to show $$ ?
Back to top
alaintwy New User Joined: 02 Dec 2007Posts: 10 Location: Shanghai
gcicchet wrote:
Hi,
provide JCL, data and messages and what you are trying to achieve.
Gerry
Hi I pasted my code on the last floor , pls~~~
Back to top
alaintwy New User Joined: 02 Dec 2007Posts: 10 Location: Shanghai
$$DD01 USER MEMBER=MSOOS3EY,WRITE=DD01,
IF=(1,0,C"//SYSIN DD *"),
MOVE=(1,0,1),
MOVE=(1,C"$$DD01 COPY IF=(65,EQ,C')') "),
WRITE=DD01
but the result is
//SYSIN DD *
BO DD01 COPY IF=(65,EQ,C')')
Back to top
Please enable JavaScript!