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 select some part of a report?

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
anilanju

New User


Joined: 24 Jan 2008
Posts: 4
Location: Delhi

PostPosted: Mon Nov 10, 2008 9:21 pm    Post subject: How to select some part of a report?
Reply with quote

Hello all

I am a new member, and i am facing a problem.

I have a report which has ouput deatils of many programs, i need to pick
the data of some programs and copy it to some other PS file.

The format of the report is:
Heading and then the data.

So when i try to use sorting, it just gives me the heading.
What needs to be done so that i get the data also along with the report.

The data contains comments n all, no fixed format.

Or please tell me how to pick few lines from a report without knwoing the exact number of lines...

Thanks
Anubhuti
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: Mon Nov 10, 2008 10:49 pm    Post subject:
Reply with quote

Hello,

With what you have posted, no one can help.

You need to post some sample "input", "output", and the processing rules that select/format the output from the sample input.

You should also post the jcl and control statements you have set up so far.

Quote:
Or please tell me how to pick few lines from a report without knwoing the exact number of lines...
There is not now and probably never will be a "do what i want" statement. . .
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Moderator


Joined: 15 Feb 2005
Posts: 7130
Location: San Jose, CA

PostPosted: Mon Nov 10, 2008 11:06 pm    Post subject:
Reply with quote

Based on the information you sent me offline, here's a DFSORT job that will do what you asked for. I assumed your input file and output files have RECFM=FB and LRECL=80, but you can change the job appropriately for other attributes. The job uses DFSORT's new WHEN=GROUP function available with z/OS DFSORT V1R5 PTF UK90013 (July, 2008).

Code:

//S1    EXEC  PGM=ICEMAN
//SYSOUT    DD  SYSOUT=*
//SORTIN DD *
1PROGRAM ID : TPMN300  FSADMFIST1                       ABC
  REPORT  ID : TPMN300.02                                 X
                                                  NJR COSTI
0 APPLICATION : NJR     SOURCE : AB     DATA TYPE : HOURS
0                              -----------INPUT------------
  CORP ID  FIST1               RECORDS                AMOUN
.
.
.
1PROGRAM ID : TPMN500  FSADMFIST1                       ABC
  REPORT  ID : TPMN300.02                                 X
                                                  NJR COSTI
0 APPLICATION : NJR     SOURCE : AB     DATA TYPE : HOURS
0                              -----------INPUT------------
 CORP ID  FIST1               RECORDS
.
.
.
0PROGRAM ID : TPMN400  FSADMFIST1
  REPORT ID : TPMN400.01
                               COMMON SUSPENSE
0 APPLICATION : NJR      SOURCE : AB     DATA TYP
0                                -----------INPUT
 CORP ID  FIST1                  RECORDS
-JOURNAL - NJ660X1131
 ACTUALS  DEBITS                  47,427
          CREDITS                 47,427
.
.
.
/*
//SORTOUT DD SYSOUT=*
//SYSIN    DD    *
  OPTION COPY
  INREC IFTHEN=(WHEN=GROUP,BEGIN=(2,12,CH,EQ,C'PROGRAM ID : '),
     PUSH=(81:15,7))
  OUTFIL INCLUDE=(81,7,SS,EQ,C'TPMN300,TPMN400'),
    BUILD=(1,80)
/*


The data for TPMN300 and TPMN400 will be selected for output.

If you don't have z/OS DFSORT PTF UK90013, ask your System Programmer to install it (it's free).

For complete details on the new functions available with PTF UK90013, see:

www.ibm.com/systems/support/storage/software/sort/mvs/ugpf/
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 -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Two Selects in a single select query Rohit Umarjikar DB2 1 Fri Nov 04, 2016 8:46 pm
No new posts Detailed Transaction History report f... Kyle Carroll CICS 5 Tue Oct 18, 2016 12:42 am
No new posts Easytrieve - Report writing - Only 1 ... Abhi Nature CA Products 2 Wed Sep 14, 2016 11:40 am
No new posts Daily report to be extracted from CA ... polymathtarun DFSORT/ICETOOL 5 Mon Jul 11, 2016 4:33 pm
No new posts Report view in Mobile devices Robert Sample All Other Mainframe Topics 0 Thu Jun 23, 2016 7:05 pm


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