MVSFORUMS.com

[Narsimha]

Hi,

I need any simple method for finding the number of bytes written in a Tape file. Also is there anyway for getting the record count in a tape file without using Sort?

Thanks,
Narsimha

[kolusu]

Narsimha,

The following JCL will give you the desired results.Look at the SYSOUT messages from this job.It gives the filesize in bytes as well as the count of records.

[Narsimha]

Hi Kolusu,

I found the record count. I am pasting the SYSOUT here. Please highlight the statements which mentions the tape file size? I want to know how many bytes are being used and how many bytes is the total capacity of the file.
***********************************
23,424K BYTES OF VIRTUAL STORAGE AVAILABLE, MAX REQUESTED,
0 BYTES RESERVE REQUESTED, 23,328K BYTES USED
20K BYTES OF EMERGENCY SPACE ALLOCATED
SORTIN : RECFM=VBM ; LRECL= 8205; BLKSIZE= 32760
SORTOUT : RECFM=VBM ; LRECL= 8205; BLKSIZE= 32760
CONTROL FIELD WITHIN RDW
22,396K BYTES OF VIRTUAL STORAGE AVAILABLE ABOVE THE 16MEG LINE,
0 BYTES RESERVE REQUESTED, 22,396K BYTES USED
G=2672,SEGLEN=3088
TURNAROUND SORT PERFORMED
END SORT PHASE
SYNCSMF CALLED BY SYNCSORT; RC=0000
SORTIN: EXCP'S=3,UNIT=3490,DEV=B009,CHP=10A2
BSAM WAS USED FOR SORTOUT
FILESIZE 5 BYTES
RCD IN 1, OUT 1
RELEASE 3.7D BATCH 0366 TPF LEVEL 3A
END SYNCSORT - TSONPELS,STEP0100,,DIAG=A600,36C1,48F4,2C26,A7E6,26C1
*****************************************************
Thanks,
Narsimha

[kolusu]

Narsimha,

Look at the 4th line from the bottom. FILESIZE 5 BYTES . The 3rd line from the bottom gives you the count RCD IN 1, OUT 1


kolusu

[DaveyC]

[Bill Dennis]

Note on kolusu's example: Be sure to add SORTWKs if the file exceeds the virtual memory work sizes.

Bill

[kolusu]

Bill Dennis,

Copy does not give give FILESIZE. I just gave the link as narsimha wanted to count the no: of records in the file apart from the file size.

Kolusu