Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

How to 'continue line' when use File-Aid batch process

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools
View previous topic :: :: View next topic  
Author Message
alaintwy

New User


Joined: 02 Dec 2007
Posts: 10
Location: Shanghai

PostPosted: Wed Aug 27, 2008 12:52 pm    Post subject: How to 'continue line' when use File-Aid batch process
Reply with quote

For example, I use the following sentence to add one line automatically using File-Aid :

$$DD01 USER WRITE=DD01,IF=(1,0,C"//JS010 EXEC PROC=MYTAS950"),
MOVE=(1,0,1),
MOVE=(1,C"// COND.PS025=(0,LE)"),
WRITE=DD01

But now I want to add a whole line, which include 71 chars,
So could any one kindly tell me, how to continue line in SYSIN, when I use File-aid.

Many thanks
Back to top
View user's profile Send private message

gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Wed Aug 27, 2008 3:12 pm    Post subject:
Reply with quote

Hi,

can you please explain what problems you are experiencing ?

Gerry
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 7993
Location: Bellevue, IA

PostPosted: Wed Aug 27, 2008 5:10 pm    Post subject:
Reply with quote

From the manual:
Quote:
CHAP_2.1 Coding Conventions

Use the following conventions to code control cards:

• You can have information in location 1 through location 80 of your
control cards.

• To specify a continuation line, code a comma after the last complete
parameter entry on a control card.

• To code continuation cards, place a blank in location 1 and make
sure the next parameter entry starts before location 26 of the card.

• Separate the function/dataset organization identifier and the
parameter identifiers with at least one blank space.

• Do not split an individual parameter entry element between cards.
Back to top
View user's profile Send private message
alaintwy

New User


Joined: 02 Dec 2007
Posts: 10
Location: Shanghai

PostPosted: Thu Aug 28, 2008 11:43 am    Post subject:
Reply with quote

gcicchet wrote:
Hi,

can you please explain what problems you are experiencing ?

Gerry


yes, in a JCL, it has JS010, which is just one step, and now I will add JS020, not hard coding, but just use File-aid batch process to run a job and it will create JS020 step automatically.

For example:
$$DD01 USER MEMBER=MSOOYSD2,WRITE=DD01,
IF=(1,0,C"// SET CKPTUYA0=''"),
MOVE=(1,0,1),
MOVE=(1,C"// SET DUNSNBR='MYSIGPQ#' |DU"),
WRITE=DD01

In this case, MSOOYSD2, when find '//SET CKPTUYA0=' '" this sentence,
then through the batch process, it will add a whole line :
// SET DUNSNBR='MYSIGPQ#' |DU
automatically, but this line less than 71 charecters,

But actually, I want to insert
// SET DUNSNBR='MYSIGPQ#' |DUNS NBR.

I can not write down the whole sentence completed in one line... so how to continue line... Many thanks
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Thu Aug 28, 2008 12:28 pm    Post subject:
Reply with quote

Hi,

I'm not sure I really understand your requirement but assuming your issue is that you want add more information than you can code on 1 line you can try something like this
Code:
  MOVE=(1,C"// SET DUNSNBR='MYSIGPQ#' |DU"),     
  MOVE=(+0,C'NS NBR.'),                           



Gerry
Back to top
View user's profile Send private message
alaintwy

New User


Joined: 02 Dec 2007
Posts: 10
Location: Shanghai

PostPosted: Thu Aug 28, 2008 2:34 pm    Post subject:
Reply with quote

gcicchet wrote:
Hi,

I'm not sure I really understand your requirement but assuming your issue is that you want add more information than you can code on 1 line you can try something like this
Code:
  MOVE=(1,C"// SET DUNSNBR='MYSIGPQ#' |DU"),     
  MOVE=(+0,C'NS NBR.'),                           



Gerry


Thanks for your reply, haha, I fixed this issue, hehe
Here is my coding

$$DD01 USER MEMBER=MSOOYSM2,WRITE=DD01,
IF=(1,0,C"//JS010 EXEC PROC=MYSAM200"),
MOVE=(1,0,1),
MOVE=(1,C"//* "),
WRITE=DD01,
MOVE=(1,C"//*****************************************************"),
MOVE=(56,C"****************"),
WRITE=DD01,
MOVE=(1,C"//* JS020 - TRANSMIT MONTHLY VOLUME FILE "),
MOVE=(56,C" *"),
WRITE=DD01,
MOVE=(1,C"//*****************************************************"),
MOVE=(56,C"****************"),
WRITE=DD01,
MOVE=(1,C"//* "),
MOVE=(56,C" "),
WRITE=DD01,
MOVE=(1,C"//JS020 EXEC PGM=EDSXMIT,PARM='&XMIT,,&PLTLOC' "),
WRITE=DD01,
MOVE=(1,C"//SYSUT1 DD DSN=&CNTL.&CUST..MYSAT.M200AT00.MONTHVOL,"),
WRITE=DD01,
MOVE=(1,C"// DISP=(SHR,KEEP,KEEP) "),
WRITE=DD01,
MOVE=(1,C"//SYSMSG DD MGMTCLAS=GM02D02D, "),
WRITE=DD01,
MOVE=(1,C"// SPACE=(1,45), "),
WRITE=DD01,
MOVE=(1,C"// AVGREC=K "),
WRITE=DD01

that means MOVE=(pos,C"....."), I just need to set the postion then can achieve the continue line.
Back to top
View user's profile Send private message
gcicchet

Senior Member


Joined: 28 Jul 2006
Posts: 1703
Location: Australia

PostPosted: Fri Aug 29, 2008 4:42 am    Post subject:
Reply with quote

Hi,

the
Code:
  MOVE=(+0,C'NS NBR.'),                           

will give you the same result without having to set the position.


Gerry
Back to top
View user's profile Send private message
alaintwy

New User


Joined: 02 Dec 2007
Posts: 10
Location: Shanghai

PostPosted: Thu Sep 04, 2008 11:11 am    Post subject:
Reply with quote

gcicchet wrote:
Hi,

the
Code:
  MOVE=(+0,C'NS NBR.'),                           

will give you the same result without having to set the position.


Gerry


Yes, It works well, Many thx :-)
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> Compuware & Other Tools All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Batch job tunning sgandhla Testing & Performance analysis 0 Fri Mar 24, 2017 9:41 pm
No new posts Changing of LRECL of a file abdulrafi DFSORT/ICETOOL 1 Fri Mar 24, 2017 3:25 pm
No new posts splitting a file abdulrafi DFSORT/ICETOOL 3 Fri Mar 24, 2017 11:51 am
No new posts Count the length of the record & ... sreekusr DFSORT/ICETOOL 4 Thu Mar 23, 2017 7:52 pm
No new posts Receive a file using PCOMM macro Harald.v.K IBM Tools 0 Thu Mar 23, 2017 6:50 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us