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
 
internal sort output procedure

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
vamsivaranasi

New User


Joined: 22 Sep 2008
Posts: 8
Location: Bangalore

PostPosted: Thu Oct 23, 2008 9:37 pm    Post subject: internal sort output procedure
Reply with quote

Hi
I have an internal sort in cobol program. In this sort, there is input & output procedure. The records before the sort (in input procedure ) are having proper values. One record after the sort (in output procedure while returning the sort record ) has spaces and hence it gives a SOC-7. I can't use "IS NOT NUMERIC". Please let me know the alternative solution.
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: Fri Oct 24, 2008 4:20 am    Post subject:
Reply with quote

Hello and welcome to the forum,

Either you have one bad record somewhere in the input or there is an error in the code that creates the bad record. Possibly a record is released to the sort before the data is moved to it.

Have you checked the sort statistics to make sure the proper number of records were read from the input, released to the sort, and returned from the sort?

Quote:
I can't use "IS NOT NUMERIC".
Why not? You might also check for spaces. . .

You do not want code in the output procedure to look for the bad record and skip it. You need to put code in the input procedure to prevent it.
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Extract record for change in combinat... Trinadh DFSORT/ICETOOL 6 Thu Nov 23, 2017 3:32 pm
No new posts VBS and VB, COBOL syntax is the same ... natt.sut COBOL Programming 3 Sun Nov 12, 2017 6:36 am
No new posts JOINKEYS Paired and Unpaired Sort on ... MFwhiz DFSORT/ICETOOL 7 Tue Nov 07, 2017 2:46 am
No new posts Copy selected columns from 2 input fi... Poha Eater DFSORT/ICETOOL 3 Thu Nov 02, 2017 3:43 pm
No new posts Subtract the ZD fields to provide neg... Balaryan DFSORT/ICETOOL 4 Wed Oct 11, 2017 10:51 pm

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