How To Resolve Soc7 Error In Cobol
Contents |
Log in MAINFRAME - TIP OF THE DAY : programming pearls - Good judgement comes from experience, soc4 abend and experience comes from bad judgement. how to resolve soc7 abend in production Web mainframegurukul.com Programmers Voted for below topics. Please Vote for good Posts. soc7 abend offset Votes Salutes Topic Title Votes Salutes EJECT Verb in COBOL 21 Cobol Multiple Choice Questions By Shravan Wipro 16 what is index or subscript in cobol. please give me brief ex how to identify soc7 abend 14 jcl sort to add leading zeroes 13 SOC 7 abend - interview question 13 what is static or dynamic call in cobol 13 How to resolve soc7? 12 Hexadecimal to decimal conversion - SORT JCL INREC OUTREC 12 Infosys Training Program for freshers 10 HOW TO FIND LINKAGE LENGTH 10 VSAM File status 23 ,but records are present in the file 7
Compiler Listing In Cobol
Changes in copybook 6 splitting of records using cobol 6 JOIN UNPAIRED,F1,F2,ONLY 6 Endevor 6 Difference Between XCTL and LINK 5 Frequently used commands in FileAid. 5 Interview questions - 3 years Exp - BOA, HCL and CTS 4 Various Locking mechanism for cursors and other SQL? 4 GDG interview question 4 Comparing two files 4 JCL return codes 4 COBOL Program performance tuning tips 4 JOIN UNPAIRED,F1,F2,ONLY 3 3 alphanumeric to numeric value padding with ZEROS in COBOL 3 3 How to Display COMP-3 value in report 3 3 JCL to Purge All Held output? 3 IKJ56500I COMMAND DSN NOT FOUND 3 S322 abend while sorting records 3 Call & Execute a COBOL-DB2 from a COBOL program? 3 compare two files using SORT 3 Submit a JCL thru Cobol - sysout=(INTRDR,*) 3 Comparing 2 files based on Acct number without using tables 3 Sort fields difference 3 Sending an Email from JCL with attachment 3 Control flow from one STEP to another 3 Recently faced mainframe cobol Interview Questions. 3 RESTART - Executing 2 and 3 rd step in 5 step jcl 3 sort two f
Management Accounting Operating System Operating System Android iOS Microsoft Coding Programming J2EE Languages Database Database Data Warehousing Oracle Applications Applications Clarify CRM Oracle Apps Peoplesoft Siebel Software Testing Testing
How To Find Offset In Cobol Program
Testing Tools Miscelleanous Helpdesk Mainframe Networking SAP R/3 Web Interview Coaching Career Counseling soc7 abend in sort Job Interview Interview eBooks Accounting eBook C eBook Citrix eBook Job Interview eBook Career Advice Career Change Jobs Help difference between soc4 and soc7 Projects Requests Resume Help Training Advice Engineering Chemical Engineering Civil Engineering Electrical Engineering Electronics Engineering Micro Processor Mechanical Engineering By Company Ask Question Home Interview QuestionsMainframe Explain the process of resolving soc4& http://www.mainframegurukul.com/ibmmainframeforums/viewtopic.php?t=3586 soc7 errors? Interview Candidate Dec 6th, 2005 22 26574 Mainframe Answer First Prev Next Last Showing Answers 1 - 22 of 22 Answers Geetha Dec 22nd, 2005 Steps taken to resolve to resolve S0C71. Get the offet of the abend from sysout e.g lets say the offset is 0005DA2. Go the compile listing and locate the offset. This will be present http://www.geekinterview.com/question_details/19646 in the assembly listing of the program.000067 MOVE 0005D6 4820 8018 LH 2,24(0,8) WS-COMP 0005DA 4E20 D100 CVD 2,256(0,13) TS2=0 0005DE F332 8020 D105 UNPK 32(4,8),261(3,13) WS-DEST 0005E4 96F0 8023 OI 35(8),X'F0' WS-DEST+3 000068 DISPLAY 0005E8 5820 905C L 2,92(0,9) TGTFIXD+92 0005EC 58F0 202C L 15,44(0,2) V(IGZCDSP ) 0005F0 4110 A1F6 LA 1,502(0,10) PGMLIT AT +490 0005F4 05EF BALR 14,15 000069 DISPLAY 0005F6 58F0 202C L 15,44(0,2) V(IGZCDSP ) 0005FA 4110 A1E0 LA 1,480(0,10) PGMLIT AT +468 0005FE 05EF BALR 14,15 3. Get the statement number from the listing, here the offet 0005DA is the expansion for the statrement number 000067.4. Using the statement number obtain the statement.which would be something like this:000067 MOVE WS-COMP TO WS-DEST. Now this is the problematic statement.Look in to this to resolve the abend.Hope this helps.Regards,Geetha
Was this answer useful?Yes 3 Reply ratnesh Jan 16th, 2006 why do we get this abends?? . whats the process to resolve soc4 abend?/ Was this answer useful?Yes Reply sharmila Jan 18th, 2006 S0C4 may be due to 1.Missing Select statement(during compile) 2.Bad Subscfor empty file If the VSAM is empty then copy job abends Copying files from Tapes to DASD Low values to Spaces using SORT Difference Between Catalog and Instream http://mainframewizard.com/content/s0c7-abend Procs Maximum Exec Statements in a JCL COBOLSmallest Program RENAME CLAUSE REDEFINE CLAUSE EDITED PICTURE ACCEPT and DISPLAY ADD VERB SUBTRACT VERB MULTIPLY VERB DIVIDE VERB Initialize a filler in cobol COBOL http://www.ibmmainframeforum.com/ibm-cobol/topic2229.html Allowed Moves COBOL PERFORM PARA EVALUATE ARITHMETIC EXPRESSION EVALUATE CONDITIONAL EXPRESSION EVALUATE FALSE EVALUATE IDENTIFIER EVALUATE LITERAL EVALUATE TRUE EVALUATE TRUE ALSO TRUE GO TO DEPENDING ON INLINE PERFORM INSPECT REPLACING how to ALL SPACES BY LITERAL INSPECT REPLACING CHARACTERS BY LITERAL BEFORE INITIAL LITERAL INSPECT REPLACING LEADING SAPCES BY LITERAL INSPECT TALLYING FOR ALL IDENTIFIER INSPECT TALLYING FOR ALL LITERAL INSPECT TALLYING FOR ALL SPACES INSPECT TALLYING FOR CHARACTER INSPECT TALLYING FOR CHARACTER AFTER INITIAL SPACES INSPECT TALLYING FOR CHARACTER BEFORE INITIAL SPACES INSPECT TALLYING FOR LEADING SPACES INSPECT TALLYING FOR LEADING ZEROES JUST RIGHT CLAUSE how to resolve PERFORM THRU PERFORM TIMES PERFORM UNTIL PERFORM VARYING UNTIL PERFORM WITH TEST BEFORE PERFORM WITH TEST AFTER DIFFERENCE BETWEEN STRING and MOVE STRING DELIMITED BY IDENTIFIER STRING DELIMITED BY LITERAL STRING DELIMITED BY SIZE STRING DELIMITED ON OVERFLOW STRING DELIMITED WITH POINTER UNSTRING DELIMITED BY IDENTIFIER UNSTRING DELIMITED BY LITERAL UNSTRING DELIMITED ON OVERFLOW UNSTRING DELIMITED WITH POINTER OPTION COBOL TO RECEIVE DATA FROM JCL DIFFERENCE BETWEEN SEARCH AND SEARCH ALL DB2DB2 query to select first or last N rows Description of a DB2 Table Difference in number of days CONTOKEN Verification Update Table using other Table Update a column using other column in Table Adding Primary Key on exisitng DB2 Table Alias of DB2 Table Changing the primary key on existing DB2 Table Compile and Link JCL for COBOL Create a DB2 Table Creating Primary Key while creating DB2 Table Delete Duplicate Rows from DB2 Table Drop Index of a DB2 Table Drop Primary Key on DB2 Table Drop Table DB2 How to Find the Length of a DB2 Table SELECT INTO Synonym of DB2 Table What is a db2 package? What is db2 plan What is the differen
to solve SOC7 abend ? Support for OS/VS COBOL, VS COBOL II, COBOL for OS/390 & VM and Enterprise COBOL for z/OS Post a reply Previous topic • Next topic • 10 posts • Page 1 of 1 How to solve SOC7 abend ? by sammouse » Thu Aug 06, 2009 11:51 am Hi, when i run my program it got abened with SOC7.Using offset address i found where it got abened.Then i put some display statements for the input records and i found the bad record.MY input is a GDG file it has around 50 versions in it.out of this 50 versions i found that,the 50 th version got fully corrputed.so i ran my program with the first 49 verions(like moving the first 49 verions from tape to disk ) and ir ran sucessfully...when i ran my program with 50 th version alone it ran sucessfully ??? no idea why it ran ..but when i am running with all the 50 versions it is abending wit SOC7.can anyone please help me how to solve this... sammouse Posts: 9Joined: Wed Aug 06, 2008 8:12 pm Hasthanked: 0 time Beenthanked: 0 time Top Re: How to solve SOC7 abend ? Top Re: How to solve SOC7 abend ? by swd » Thu Aug 06, 2009 2:49 pm A difficult one to answer. I suspect that the problem is with the logic of your application program. Are you sure that the 50th GDG actually processed the records when you ran it on its own? perhaps it opened the file, but did not process the records due to some condition not being met when the GDG was processed on its own.If you know the offending line of code that causes the S0C7, what is different about the contents of the fields when you run the 50th GDG on its own compared to when you run all 50 together? Have you displayed the values so you know for certain that it is processing the records when you run the 50th GDG on its own? swd Posts: 109Joined: Wed Feb 18, 2009 9:18 pmLocation: UK Hasthanked: 0 time Beenthanked: 0 time Top Re: How to solve SOC7 abend ? by sammouse » Thu Aug 06, 2009 3:01 pm hi swd, Thanks for your reply. The 50th gdg is processed because it got abened at the last record.when i tried to delete the last record,it got abended with SOC7 for previous record and so on But when i ran the 50 th version alone it ran sucessfully.no idea ??? why it ran ...can you please help me regarding this? sammouse Posts: 9Joined: Wed Aug 06, 2008 8:12 pm Hasthanked: 0 time Beenthanked: 0 time Top Re: How to solve SOC7 abend ? by arunprasad.k » Thu Aug 06, 2009 4:18 pm Just a blind guess!! Does