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

Need to compile COBOL pgm with NOT sorted XFER - TIA!


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

New User


Joined: 27 Apr 2005
Posts: 43
Location: United States

PostPosted: Fri Feb 04, 2011 1:54 am
Reply with quote

Hi COBOL Specialists!

I would like to use a COBOL compile parameter to produce a COBOL cross listing that is NOT sorted alphabetically.

I used to be able to do this with old version of COBOL by using XREF instead of SXFER, but now both ways sort the cross reference listing.

The reason that I would like to see the XREF displayed (unsorted) in the same order that it is presented in the COBOL program, is so that I can easily remove the fields that aren't being referenced. I can take them out in blocks instead of looking high and low for each field from a sorted XFER.
If some one has a good idea on how to produce a non-sorted XFER, please advise.

Thank you so much for your time.
~Sharon
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Fri Feb 04, 2011 2:05 am
Reply with quote

Quote:
If some one has a good idea on how to produce a non-sorted XFER, please advise.

if it is possible "if it is"... the manuals of Your cobol will certainly tell !
Have Manual — Will Travel (*)
www-03.ibm.com/systems/z/os/zos/bkserv/index.html

(*) You asked for it, I just went along icon_biggrin.gif
Back to top
View user's profile Send private message
Time2Live

New User


Joined: 27 Apr 2005
Posts: 43
Location: United States

PostPosted: Fri Feb 04, 2011 4:08 am
Reply with quote

Geeee icon_rolleyes.gif THANKS enrico !!!!!!
Back to top
View user's profile Send private message
Time2Live

New User


Joined: 27 Apr 2005
Posts: 43
Location: United States

PostPosted: Tue Feb 08, 2011 3:39 am
Reply with quote

HI all you technical genius' out there!!!

Does anyone have a "more humane" answer please?
Thanks so much for you time.
SRf
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10872
Location: italy

PostPosted: Tue Feb 08, 2011 4:29 am
Reply with quote

Quote:
Does anyone have a "more humane" answer please?

what kind of answer do You want ? icon_evil.gif
in IT the only human answers are those that You can get from the manuals!

for cobol 4.1
publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3pg40/2.4.59?ACTION=MATCHES&REQUEST=xref&TYPE=FUZZY&SHELF=IGY3SH40.bks&DT=20071214180654&CASE=&searchTopic=TOPIC&searchText=TEXT&searchIndex=INDEX&rank=RANK&ScrollTOP=FIRSTHIT#FIRSTHIT

for the other cobol stuff start from here
www-03.ibm.com/systems/z/os/zos/bkserv/zappls2.html
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8696
Location: Dubuque, Iowa, USA

PostPosted: Tue Feb 08, 2011 6:11 am
Reply with quote

The manual does not indicate any way to get a non-sorted cross reference. You might be able to use the MAP output, but if it is not suitable you'll have to clean up your code by doing the work yourself.
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: Tue Feb 08, 2011 6:59 am
Reply with quote

Hello,

Quote:
If some one has a good idea on how to produce a non-sorted XFER, please advise.
One easy way to get what you want is to write the output from the compile to dasd and then use this file as input to a process you code to select/sort/write the output you want. . .

Quote:
in IT the only human answers are those that You can get from the manuals!
Well, usually. . . icon_smile.gif

Once upon a time there were not so many manuals and if you wanted something not covered in the manuals you had to "roll your own" or do without. . . Most of us who have been around for a long time have written many things we wanted/needed that were not a "feature" of some product. . . That it wasn't provided for us was not an acceptable reason to not get the work done.
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 Replace each space in cobol string wi... COBOL Programming 3
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Compile rexx code with jcl CLIST & REXX 6
No new posts Calling DFSORT from Cobol, using OUTF... DFSORT/ICETOOL 5
Search our Forums:

Back to Top