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
 

 

Line Number Problems Using P Option in DSLISTS

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> TSO/ISPF
View previous topic :: :: View next topic  
Author Message
Charles Wolters

New User


Joined: 30 Mar 2011
Posts: 48
Location: United States

PostPosted: Tue Jan 14, 2014 10:28 pm    Post subject: Line Number Problems Using P Option in DSLISTS
Reply with quote

I have a SAS program and in the DSLISTS panel I typed P by the data set containing the SAS program. At the command line I typed LIST and that took me to another panel where I chose the PD option and specified a SYSOUT class and gave the printer name. The contents of the SAS program did print but there is a problem with the line numbers. Below I display 6 lines from the SAS program as they appear in EDIT mode followed by the 6 lines shown in the printed output. Rather than printing and deleting the LIST data set I suppose I could save it and try editing it but I don't really want to do that. This has me baffled.


000162 IF UNITCODE = 'RES' THEN SEPDATEC = LASTOUT ;
000163 SEPYR = SUBSTR(SEPDATEC,3,2) ;
000164 SEPMO = SUBSTR(SEPDATEC,5,2) ;
000165 SEPDA = SUBSTR(SEPDATEC,7,2) ;
000166 SEPYRNUM = INPUT(SEPYR,2.) ;


START _ _ _ _ + _ _ _ _ 1 _ _ _ _ + _ _ _ _ 2 _ _ _ _ + _ _ _ _ 3
COL

1 IF UNITCODE = 'RES' THEN SEPDATEC = LASTOUT ;
000162

1 SEPYR = SUBSTR(SEPDATEC,3,2) ;
000163
1 SEPMO = SUBSTR(SEPDATEC,5,2) ;

000164
1 SEPDA = SUBSTR(SEPDATEC,7,2) ;

000165
1 SEPYRNUM = INPUT(SEPYR,2.) ;

000165

CW
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Tue Jan 14, 2014 10:36 pm    Post subject:
Reply with quote

Hello,

Those are line numbers. You need to ignore these on the printout.
Back to top
View user's profile Send private message
Charles Wolters

New User


Joined: 30 Mar 2011
Posts: 48
Location: United States

PostPosted: Tue Jan 14, 2014 10:53 pm    Post subject: RE: Line Number Problems Using P Option in DSLISTS
Reply with quote

Dick,

I am assuming you are a COBOL guy so if your COBOL program has line numbers do they typically show up like in my printed listing or do they show up at the beginning of the COBOL statement where I would expect them to. If this is the way it is, then I won't take this any further.

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

Global Moderator


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

PostPosted: Wed Jan 15, 2014 12:06 am    Post subject:
Reply with quote

Line numbers, if stored using STANDARD in ISPF, will be placed in columns 73 to 80. This is why SAS generally recognizes only columns 1 through 72 for source code. If you are printing without allowing for 81 bytes per line, the output you show is expected and normal.
Back to top
View user's profile Send private message
Charles Wolters

New User


Joined: 30 Mar 2011
Posts: 48
Location: United States

PostPosted: Wed Jan 15, 2014 1:33 am    Post subject: RE: Line Number Problems Using P Option in DSLISTS
Reply with quote

Robert,

Yes, given your explanation what I am seeing is normal and expected. I never knew that the ISPF standard was to place the line numbers in columns 73 through 80. I am certain you are anticipating my next question. Can I change STANDARD so that I have the capability of printing more than 80 bytes per line? I did go to the ISPF Settings Panel but did not see anything that looked like it would allow me to alter the length of the print line.

CW
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1712
Location: UK

PostPosted: Wed Jan 15, 2014 2:31 pm    Post subject: Reply to: Line Number Problems Using P Option in DSLISTS
Reply with quote

Just turn numbering off:
Code:
UNNUM if lines exist with numbering
NUM OFF to turn off numbering

I do not think you can change the LRECL of the default ISPF log and print files so, possibly, the simplest way is to run an IEBEGENR (or Sort or ICEGENER) with your dataset to be printed as SYSUT1 and SYSUT2 pointing to SYSOUT.
Back to top
View user's profile Send private message
Bill Woodger

DFSORT Moderator


Joined: 09 Mar 2011
Posts: 7223

PostPosted: Wed Jan 15, 2014 9:02 pm    Post subject: Reply to: Line Number Problems Using P Option in DSLISTS
Reply with quote

You could just fold the paper, or use scissors, or avert your eyes from that final column.

What particular problem is this causing you?
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 -> TSO/ISPF All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts BWO option in VSAM blayek CICS 3 Sat Nov 05, 2016 10:47 am
No new posts Regarding COBOL Stored Procedure opti... selvamsrinivasan85 DB2 4 Fri Nov 04, 2016 8:57 pm
No new posts Sequence number add in SORT pshongal SYNCSORT 3 Fri Sep 02, 2016 3:32 pm
No new posts Insert Lines in JCL with Rexx after a... Willy Jensen CLIST & REXX 3 Tue Aug 30, 2016 4:18 pm
No new posts Casting a Binary Number to Numeric in... Bob Steinkraus Java & MQSeries 6 Tue Aug 09, 2016 5:58 pm


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