Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Forum Index
 
Register
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
SCO 7 in numeric value

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

New User


Joined: 03 Jul 2015
Posts: 2
Location: United States

PostPosted: Tue Apr 07, 2020 7:48 pm    Post subject: SCO 7 in numeric value
Reply with quote

Hi,

I want to increase the numeric length of WS-CONTROL-REPT-AMT but I am getting SOC 7 abend.

Code:

       01  WS-CONTROL-REPORT-RECORD.                                   
               05  WS-CONTROL-REPORT-FIELDS OCCURS 17 TIMES.               
                     10  WS-CONTROL-REPT-CTR   PIC S9(09).                   
                     10  WS-CONTROL-REPT-AMT   PIC S9(07)V99.                 
                05  FILLER                    PIC  X(44)        VALUE SPACES.



Any help would be much appreciated.[/code]
Back to top
View user's profile Send private message

Robert Sample

Global Moderator


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

PostPosted: Tue Apr 07, 2020 8:19 pm    Post subject: Reply to: SCO 7 in numeric value
Reply with quote

Increasing the length will not generate a SOC7 error. Since you provided us absolutely nothing that would help us resolve the issue, that's about all that we can say.

If you want additional help, at a minimum you need to provide us with the error message(s) the computer generated, which line of code the error occurred on, and how you initialized the numeric variables. If you're using WS-CONTROL-REPORT-RECORD (the 01 level) in your code you need to let us see what that code looks like (you can easily tell if it is used by generating a cross reference using the compiler option and looking in the variable table).
Back to top
View user's profile Send private message
Rohit Umarjikar

Senior Member


Joined: 21 Sep 2010
Posts: 2387
Location: NY,USA

PostPosted: Wed Apr 08, 2020 7:25 am    Post subject:
Reply with quote

And at the least have you known INITIALIZE a variable can avoid this ?
Back to top
View user's profile Send private message
Jose Mateo

Active User


Joined: 29 Oct 2010
Posts: 120
Location: Puerto Rico

PostPosted: Thu Apr 09, 2020 8:28 pm    Post subject:
Reply with quote

Did you increase the subscribe value in your search routine where it loop thru the table?
Back to top
View user's profile Send private message
Phrzby Phil

Senior Member


Joined: 31 Oct 2006
Posts: 1002
Location: Richmond, Virginia

PostPosted: Fri Apr 10, 2020 4:35 am    Post subject:
Reply with quote

I always get nervous when computer programmers, who should be more detailed oriented than just about any other profession, except maybe brain surgery, are so sloppy to not just type, but then not review and fix, terms like "SCO 7" and "increase the subscribe value".
Back to top
View user's profile Send private message
Jose Mateo

Active User


Joined: 29 Oct 2010
Posts: 120
Location: Puerto Rico

PostPosted: Mon Apr 13, 2020 7:43 pm    Post subject:
Reply with quote

Thank you for correcting me Phil. Subscribe value should be subscript value.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


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

PostPosted: Tue Apr 14, 2020 11:28 pm    Post subject:
Reply with quote

I'm curious about why, if a table entry has its PICTURE increased, that would require any change to the subscript? The table still has 17 entries no matter what the length of WS-CONTROL-REPT-AMT becomes so why is the subscript being changed? How else could "increase the numeric length of WS-CONTROL-REPT-AMT" be interpreted except as a requirement to change the PICTURE?
Back to top
View user's profile Send private message
Jose Mateo

Active User


Joined: 29 Oct 2010
Posts: 120
Location: Puerto Rico

PostPosted: Wed Apr 15, 2020 2:38 am    Post subject:
Reply with quote

Robert you are right the change has nothing to do with the subscript. I am interested were does he move the field WS-CONTROL-REPT-AMT to because the receiving field needs to increase.
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 Get next 5 numeric from a string of '... maxsubrat COBOL Programming 7 Fri Apr 24, 2020 2:30 pm
No new posts Convert Numeric to Packed decimal and... anand1204 DFSORT/ICETOOL 5 Thu Aug 08, 2019 3:53 am
No new posts Training on numeric fields data formats sergeyken SYNCSORT 12 Thu Aug 01, 2019 8:15 pm
No new posts Comparison of numeric edited variables Nileshkul COBOL Programming 4 Sat Mar 16, 2019 1:18 am
No new posts Convert alpha numeric to signed digits Balu5491 COBOL Programming 4 Mon Feb 25, 2019 10:39 pm

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