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

SCO 7 in numeric value


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

New User


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

PostPosted: Tue Apr 07, 2020 7:48 pm
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: 8696
Location: Dubuque, Iowa, USA

PostPosted: Tue Apr 07, 2020 8:19 pm
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

Global Moderator


Joined: 21 Sep 2010
Posts: 3049
Location: NYC,USA

PostPosted: Wed Apr 08, 2020 7:25 am
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: 121
Location: Puerto Rico

PostPosted: Thu Apr 09, 2020 8:28 pm
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: 1042
Location: Richmond, Virginia

PostPosted: Fri Apr 10, 2020 4:35 am
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: 121
Location: Puerto Rico

PostPosted: Mon Apr 13, 2020 7:43 pm
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: 8696
Location: Dubuque, Iowa, USA

PostPosted: Tue Apr 14, 2020 11:28 pm
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: 121
Location: Puerto Rico

PostPosted: Wed Apr 15, 2020 2:38 am
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 View Bookmarks
All times are GMT + 6 Hours
Forum Index -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Convert HEX to Numeric DB2 3
No new posts Find a record count/numeric is multip... COBOL Programming 1
No new posts Handling the numeric data in unstring... COBOL Programming 18
No new posts Numeric check on packed signed and un... COBOL Programming 4
No new posts Numeric check w/SyncSort. SYNCSORT 1
Search our Forums:

Back to Top