IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

sequence in reort writing


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
ch.prashant

New User


Joined: 16 Sep 2006
Posts: 27
Location: Hyderabad

PostPosted: Fri Jan 09, 2009 11:39 am
Reply with quote

Hi all,

I want to create a report using generate command I need to give sequence for 3 fields and control for two fields,I have a attched the piece of code which shows the report section.

My control command is not working in output shown it just dumping the input in report
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Fri Jan 09, 2009 12:09 pm
Reply with quote

Hello,

Suggest you re-post the info by using copy/paste/ and the "Code" tag.This is a much more readable format for your post. There is Preview which will show you how your post will appear to the forum. When you are satisfied with how the post appears, click submit.

Also, we have several members who cannot download attached files due to security reasons.

Please post a smal amount of the input data and what is produced as output. Then explain how the output should be different.
Back to top
View user's profile Send private message
ch.prashant

New User


Joined: 16 Sep 2006
Posts: 27
Location: Hyderabad

PostPosted: Fri Jan 09, 2009 4:46 pm
Reply with quote

Code:

***************************************************************
        REPORT SECTION.                                               
        RD EE-RPT CONTROLS ARE FINAL, EE-UNCAT-CO, EE-UNCAT-ASSET     
            PAGE LIMIT IS 57                                         
            LINES HEADING 4.                                         
       *    SEQUENCE IS UNCAT-CO UNCAT-ASSET UNCAT-VOU               
        01  EE-RPT-H TYPE PAGE HEADING.                               
            05  LINE 1.                                               
                10  COLUMN 01           PIC X(15)                     
                                 VALUE 'GE FIXED ASSETS'.             
                10  COLUMN 30           PIC X(33)                     
                    VALUE 'CAPITAL UNCATALOGUED ASSET REPORT'.       
                10  COLUMN 72           PIC X(09)                     
                    VALUE 'RUN  DATE'.                               
                10  COLUMN 84           PIC X(08)                     
                    SOURCE WS-RUNDATE.                               
                10  COLUMN 121          PIC X(04)  VALUE 'PAGE'.     
                10  COLUMN 125          PIC Z(7)9                     
                    SOURCE PAGE-COUNTER OF EE-RPT.
Back to top
View user's profile Send private message
ch.prashant

New User


Joined: 16 Sep 2006
Posts: 27
Location: Hyderabad

PostPosted: Fri Jan 09, 2009 6:12 pm
Reply with quote

Iam getting output as this
Code:
********************************* Top of Data **********************************
GE FIXED ASSETS              CAPITAL UNCATALOGUED ASSET REPORT         RUN  DATE
PGM : FER040                           SORTED : CO-NO                           
CORP                                   SORTED : 06RN                           
   CO        ASSET      COST                                                   
   NO        NUMBER     CTR    BUS-CD  BUS-FUNC  GAP   VOUCHER    INV-NO       
  06RN     08EYUS612    YUS6   GEU     N46       164            13088646       
******************************** Bottom of Data ********************************


but I want like this

Code:
********************************* Top of Data **********************************
GE FIXED ASSETS              CAPITAL UNCATALOGUED ASSET REPORT         RUN  DATE
PGM : FER040                           SORTED : CO-NO                           
CORP                                   SORTED : 06RN                           
                                                                               
   CO        ASSET      COST                                                   
   NO        NUMBER     CTR    BUS-CD  BUS-FUNC  GAP   VOUCHER    INV-NO       
  06RN     08EYUS612    YUS6    GEU      N46     164            13088646       
  06RN     08EYUS612                                                           
  06RN                                                     


So could u tell me the syntax of control and sequence for report writing I had used generate command in the code
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Sat Jan 10, 2009 3:44 am
Reply with quote

Hello,

What happens when you remove the "*" from the "SEQUENCE" statement?
Back to top
View user's profile Send private message
ch.prashant

New User


Joined: 16 Sep 2006
Posts: 27
Location: Hyderabad

PostPosted: Mon Jan 12, 2009 11:10 am
Reply with quote

it says cannot understand the word sequence
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Mon Jan 12, 2009 9:13 pm
Reply with quote

Hello,

Quote:
it says cannot understand the word sequence
Bummer - that was just a guess. . .

Did you code SEQUENCE from some manual or other code that works?

If has been many years since i've seen the cobol report writer used and it is no longer in the cobol manual. I believe it is now an add-on product (rather than part of Enterprise COBOL). Whnich version of cobol are you using?

Is there more to the report definition that has not been posted?
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Two input files & writing counter... DFSORT/ICETOOL 12
No new posts Cobol program with sequence number ra... COBOL Programming 5
No new posts AI writing DFSORT, REXX codes.. All Other Mainframe Topics 3
No new posts Writing the output file name from a p... JCL & VSAM 7
No new posts writing into VSAM indexed tabl in PL1... PL/I & Assembler 8
Search our Forums:

Back to Top