IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

ISPF : Tip Of The Day


IBM Mainframe Forums -> JCL & VSAM
Post new topic   This topic is locked: you cannot edit posts or make replies.
View previous topic :: View next topic  
Author Message
Gautam512

Active User


Joined: 05 Oct 2005
Posts: 308
Location: Vizag / US

PostPosted: Thu Dec 29, 2005 1:57 pm
Reply with quote

Coments required for this TIP....

Try this one in View MODE first.......(Then u can use it )

1. View an element
2. Enter COLS in the line command area to have a ruler line appear.
3. Enter BNDS in the line command area. A blank line will appear.
4. On the blank line, position angle brackets < >in the columns to be affected. The affected portion will be that portion between the angle brackets, inclusive. I could find no way to affect a single column.
5. The following example shows how to comment out a portion of a paragraph.

1. EDIT XXXXX.XXXXX.XXXXX(PGM1)
2. Command ===>
3. =COLS> ----+----1----+----2----+----3----+----4----+----5----+--
4. =BNDS> <>
5. 000139
6. 000140 00133 A300-PROCESS-CEP-DST.
7. 000141 00134 READ IN-EXPLO INTO IN-HOLD
8. 000142 00135 AT END
9. 000143 00136 MOVE HIGH-VALUES TO IN-HOLD
10. 000144 00137 GO TO A300-PROCESS-CEP-DST-EXIT.
11. c00145 00138 *
12. oo0146 00139 IF IN-HOLD-REC-TYP = '60'
13. 000147 00140 MOVE IN-HOLD TO IN-RECD60
14. 000148 00141 MOVE 'Y' TO FLAG
15. 000149 00142 MOVE IN-HOLD-SHOP-ORD TO HOLD-SO
16. 000150 00143 PERFORM A400-PROCESS-RECD60 THRU
17. oo0001 00144 A400-PROCESS-RECD60-EXIT.
000152 00145
6. The following screen shows the results.
EDIT XXXXX.XXXXX.XXXXX(PGM1)
1. Command ===>
2. =COLS> ----+----1----+----2----+----3----+----4----+----5----+--
3. =BNDS> <>
4. 000139
5. 000140 00133 A300-PROCESS-CEP-DST.
6. 000141 00134 READ IN-EXPLO INTO IN-HOLD
7. 000142 00135 AT END
8. 000143 00136 MOVE HIGH-VALUES TO IN-HOLD
9. 000144 00137 GO TO A300-PROCESS-CEP-DST-EXIT.
10. 000145 00138 *
11. 000146 00139 * IF IN-HOLD-REC-TYP = '60'
12. 000147 00140 * MOVE IN-HOLD TO IN-RECD60
13. 000148 00141 * MOVE 'Y' TO FLAG
14. 000149 00142 * MOVE IN-HOLD-SHOP-ORD TO HOLD-SO
15. 000150 00143 * PERFORM A400-PROCESS-RECD60 THRU
16. 000151 00144 * A400-PROCESS-RECD60-EXIT.
000152 00145
Back to top
View user's profile Send private message
iknow

Active User


Joined: 22 Aug 2005
Posts: 411
Location: Colarado, US

PostPosted: Thu Dec 29, 2005 2:24 pm
Reply with quote

Hi Gautam,

Good one man...Come out with more stuff like this.
Back to top
View user's profile Send private message
Gautam512

Active User


Joined: 05 Oct 2005
Posts: 308
Location: Vizag / US

PostPosted: Thu Mar 02, 2006 8:21 pm
Reply with quote

Thanks .........
Back to top
View user's profile Send private message
bonniem

New User


Joined: 09 Aug 2005
Posts: 67

PostPosted: Fri Mar 03, 2006 10:47 am
Reply with quote

This can be done from command line also.

For example "BNDS 10 30" sets the bounds as between 10 and 30. This can be reset by issuing "BNDS" again on the command line.
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Sun Mar 05, 2006 12:28 pm
Reply with quote

Hi Gau,

As Bonniem suggested, bnds 1 7 is a better choice. I've never tried bnds 7 7, but that may work too.

You can also use M instead of C. You'll get the same result. And you won't even have to worry about the * line you created.
Back to top
View user's profile Send private message
sril.krishy

Active User


Joined: 30 Jul 2005
Posts: 183
Location: hyderabad

PostPosted: Mon Mar 06, 2006 12:18 pm
Reply with quote

Hi,
This seems to be a shop dependant.I tried it in my shp,but it's not working.

Thanks
Krishy
Back to top
View user's profile Send private message
bonniem

New User


Joined: 09 Aug 2005
Posts: 67

PostPosted: Mon Mar 06, 2006 12:30 pm
Reply with quote

Setting bounds is an ISPF primary command, so I dont think it is shop dependant.
Back to top
View user's profile Send private message
hikaps14

Active User


Joined: 02 Sep 2005
Posts: 189
Location: Noida

PostPosted: Tue Apr 25, 2006 5:28 pm
Reply with quote

Hi Gautam ,

i followed ur approach for commenting out a para.
but i was stuck .
i set the bounds on the first column .

but now i dont know how to insert an asterik and comment out
only someportion of lines .

can ne one give some detail regarding this .

Thanks in advance ,
-Kapil .
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Mon May 01, 2006 12:36 am
Reply with quote

Hi Kapil,

Try this instead of the bnds:

Enter .a at the 1st line of the pgraph.
Enter .b at the last line of the pgraph.
Enter c all ' ' '*' 7 .a .b on the cmd line.

Gives you the same result.
Back to top
View user's profile Send private message
hikaps14

Active User


Joined: 02 Sep 2005
Posts: 189
Location: Noida

PostPosted: Mon May 01, 2006 5:43 pm
Reply with quote

hi ,

Thanks a lot .

I think its a cool thechnique.
we require these type of things quite regularly
Back to top
View user's profile Send private message
Gautam512

Active User


Joined: 05 Oct 2005
Posts: 308
Location: Vizag / US

PostPosted: Fri May 05, 2006 3:43 am
Reply with quote

thanks a lot....
Back to top
View user's profile Send private message
pavan reddy

New User


Joined: 21 Dec 2020
Posts: 15
Location: India

PostPosted: Tue Jun 01, 2021 6:52 pm
Reply with quote

Hi,

Is it possible to use copy data from a dataset which has data in column 6 to column 12 to other dataset and paste it with a overlay in other dataset from column 6 to column 12 without any disruption to other columns data using BNDS and Overlay command lines.

I am able to do it within the same dataset by giving MM MM in the command line for the required rows and giving OO OO for the rows to be overlayed.

Thanks and Regards,
Pavan.[/code]
Back to top
View user's profile Send private message
sergeyken

Senior Member


Joined: 29 Apr 2008
Posts: 2139
Location: USA

PostPosted: Wed Jun 02, 2021 12:52 am
Reply with quote

pavan reddy wrote:
Hi,

Is it possible to use copy data from a dataset which has data in column 6 to column 12 to other dataset and paste it with a overlay in other dataset from column 6 to column 12 without any disruption to other columns data using BNDS and Overlay command lines.

I am able to do it within the same dataset by giving MM MM in the command line for the required rows and giving OO OO for the rows to be overlayed.

Thanks and Regards,
Pavan.[/code]

Do not tailgate any aged topic, especially with a completely different issue.
Back to top
View user's profile Send private message
Rohit Umarjikar

Global Moderator


Joined: 21 Sep 2010
Posts: 3076
Location: NYC,USA

PostPosted: Wed Jun 02, 2021 1:32 am
Reply with quote

Pavan , Start a new post. locked.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   This topic is locked: you cannot edit posts or make replies. View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Preserve changes to ISPF Panel Variables TSO/ISPF 5
No new posts can an ISPF appl save user changes in... TSO/ISPF 14
No new posts Unload and Load ISPF Table TSO/ISPF 4
No new posts ISPF Table to add a new column TSO/ISPF 1
No new posts Looking for a little history of ISPF ... TSO/ISPF 5
Search our Forums:

Back to Top