The only way that I know of may sound silly. Read the data and check. That is 
basically what ISPF does. z/OS itself does not maintain any metainformation 
about the existance of sequence numbers.

What I do, after I download ASM source or JCL or anything else which __might__ 
have sequence number in it to "mess me up", is unconditionally remove whatever 
may be in columns 73-end_of_record, then remove trailing blanks too. It is 
simple with Perl (I use Linux on my desktop, not Windows).

#!/usr/bin/perl
use strict;
use warnings;
while (<>) {
        chomp;
        s/^(.{1,72}).*$/$1/;
        s/^(.*?) *$/$1/;
        print $_,"\n";
}

Invoke with:

perl -i.bak ~/bin/noseq.pl list..of..files

The -i.bak saves the original by appending ".bak" to the original file name. If 
you don't want a backup, just do -i and the file will be updated "inplace" with 
no backup.

--
John McKown

Systems Engineer IV

IT



Administrative Services Group



HealthMarkets(r)



9151 Boulevard 26 * N. Richland Hills * TX 76010

(817) 255-3225 phone *

[email protected] * www.HealthMarkets.com



Confidentiality Notice: This e-mail message may contain confidential or 
proprietary information. If you are not the intended recipient, please contact 
the sender by reply e-mail and destroy all copies of the original message. 
HealthMarkets(r) is the brand name for products underwritten and issued by the 
insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance 
Company(r), Mid-West National Life Insurance Company of TennesseeSM and The 
MEGA Life and Health Insurance Company.SM



> -----Original Message-----
> From: IBM Mainframe Assembler List
> [mailto:[email protected]] On Behalf Of Scott Bennett
> Sent: Thursday, September 15, 2011 3:14 PM
> To: [email protected]
> Subject: Determine if a dataset contains line numbers
>
> Is there a way to know if a dataset contains line numbers?
>
> For example when I PROF a file in ISPF I can see that a
> dataset has "NUMBER
> OFF" or "NUMBER ON STD".   I need a way, from within
> assembler ZOS data
> areas, to know if a dataset has line numbers so I can handle
> line numbers
> in a remote system correctly.
>
>

Reply via email to