Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Eliminating Header Rows in a report

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> DFSORT/ICETOOL
View previous topic :: :: View next topic  
Author Message
samuel_Inba

New User


Joined: 03 Jan 2008
Posts: 53
Location: Chennai

PostPosted: Thu Jun 12, 2008 4:37 pm    Post subject: Eliminating Header Rows in a report
Reply with quote

Hi,
I have a FB file which is has a multi page report.Each report has a standard headers (company name & other details) which is about 8 lines.
The format of the file will be like this>

( Company name:Report name:etc.... ) for the first 8 lines

Actual report data ( from line num 9 thru 58)

then the second page of the report which again has the standard header as mentioned above (59 thru 66) thn the report continues with standard report length of (58 lines)...

Now I need to remove the eight header lines from the fB file which occurs repeatedly.

I cant use Omit with eight conditions with report heading.

Is there any way to use seqnum with restart & then use a single OMIT ?

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

samuel_Inba

New User


Joined: 03 Jan 2008
Posts: 53
Location: Chennai

PostPosted: Thu Jun 12, 2008 5:24 pm    Post subject:
Reply with quote

//TOOLIN DD * *** CONSTANT CONTROL CARDS ***
SELECT FROM(I1) TO(O1) NODUPS ON(1,100,CH)
/*
//CTL1CNTL DD *
SORT FIELDS=COPY
SUM FIELDS=NONE
/*

I tried to use the above mentioned step and it gave me the required result...but the resultant report was sorted and it messed up the final report...Is there any way to copy without getting the output sorted ?
Back to top
View user's profile Send private message
samuel_Inba

New User


Joined: 03 Jan 2008
Posts: 53
Location: Chennai

PostPosted: Thu Jun 12, 2008 5:26 pm    Post subject:
Reply with quote

Sorry - SUM FIELDS=NONE - Need not be there ( as NODUPS) Can take of the dups...

Thanks,
Back to top
View user's profile Send private message
scorp_rahul23

New User


Joined: 06 May 2008
Posts: 93
Location: Delhi

PostPosted: Thu Jun 12, 2008 5:31 pm    Post subject: Reply to: Eliminating Header Rows in a report
Reply with quote

U can very well Easytreive for this. It will remove the header lines
Back to top
View user's profile Send private message
samuel_Inba

New User


Joined: 03 Jan 2008
Posts: 53
Location: Chennai

PostPosted: Thu Jun 12, 2008 5:38 pm    Post subject:
Reply with quote

Sorry I am not supposed to use othr than JCL. icon_sad.gif
Back to top
View user's profile Send private message
enrico-sorichetti

Senior Member


Joined: 14 Mar 2007
Posts: 10478
Location: italy

PostPosted: Thu Jun 12, 2008 5:44 pm    Post subject: Reply to: Eliminating Header Rows in a report
Reply with quote

Quote:
I cant use Omit with eight conditions with report heading.

why ?
Quote:

Sorry I am not supposed to use other than JCL

I guess that Your organization must be trained on the proper terminology
jcl does nothing, it just setups things in order for programs to be able to execute
any action on data must be carried on by a .... program
utilities are just that, programs

it' s very difficult to understand the reasons for such sick requirements
Back to top
View user's profile Send private message
Skolusu

Senior Member


Joined: 07 Dec 2007
Posts: 2205
Location: San Jose

PostPosted: Thu Jun 12, 2008 11:47 pm    Post subject:
Reply with quote

samuel_Inba,

Please refer to the solution posted here

http://ibmmainframes.com/viewtopic.php?p=137819#137819
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 -> DFSORT/ICETOOL All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Splitting one row into multiple Rows ... Rajan Moorthy DFSORT/ICETOOL 9 Mon May 14, 2018 10:58 pm
No new posts Undefined Report Program socker_dad COBOL Programming 2 Fri Mar 30, 2018 1:45 am
No new posts help to replace columns by rows Vikas Maharnawar DFSORT/ICETOOL 8 Tue Mar 06, 2018 3:27 pm
No new posts Unloading DB2 table in CSV format alo... grvtomar COBOL Programming 7 Sun Jan 28, 2018 2:05 am
No new posts How to select record x+7 or x+2 based... JoAnn Kulcyk SYNCSORT 6 Tue Jan 16, 2018 10:49 pm

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us