Answer / a.roselin

1. Abend Aid is one of the tool which will trace out the
invalid numeric data over the field.

2. In Spool we could see the offset address of the invalid
numeric field and copy the offset address and pass it to
Parm Parameter on the JCL, it will display the invalid
numeric field of the statement in COBOL program.

Answer / chellad

Soc7 abend will be thrown because of moving any non numeric variable to numeric variable.

The fix is , you have to go to spool.

Check for the DD names either CESDUMP or AbendAid.

Please select the DD name using S

Then try to find the offset address and line number.

If line number doesn't exist then copy offset address and go back to SYSPRINT in spool

In the command line type L_offset address and press enter

You can now see the exact line.

Now go to your program and enter the line number in command area and press enter

You will be moved to the exact line which has error..you can correct it and then go for recompilation and execution.

What are the pertinent COBOL commands?

0 Answers   Satyam,

---

I have 100 records in a file.. i want to sort the records from 5 to 5o... give the syntax...

2 Answers   CTS, DSRC,

---

What is the difference between binary search and sequential search?

0 Answers  

---

What are the functions like c or c++ in cobol?

2 Answers  

---

What is different between variable length and fixed length?

2 Answers   TCS,

---

What are the pertinent COBOL

0 Answers   IBM,

---

How to convert bunch of words in a line to relvant ASCII values?

2 Answers  

---

What is difference between COBOL and VS COBOL II?.

1 Answers   Winsol Solutions,

---

Hi Devolopers.. i need ur help.. i have 3 years of exp in Manual testing and SQL, next month onwards i shifted in to MAINFRAME TESTING... i have ZERO Knowledge abt mainframes.... PLS SUGGEST ME WHAT I LEARN in AMEERPET? mainframe testing or mainframe total devolopment subject... AS a devoloper u know every thing tester what to do PLSSSSSSSSS help me ITS VERY URGENT...

1 Answers  

---

here is my compile and link edit steps in a jcl //COMPILE1 JOB (3CUS,S),'CCDM TEST' //STEPNAME EXEC PGM=IGYCRCTL,PARM='DYNAM,RENT,LIB,OBJECT, // OFFSET,APOST,OPTIMIZE',REGION=4096K //STEPLIB DD DSNAME=PM7351.TEST2.COB,DISP=SHR //SYSIN DD DSNAME=PM7351.TEST2.COB(PGM1),DISP=SHR //SYSUT1 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT2 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT3 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT4 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT5 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT6 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSUT7 DD UNIT=SYSDA,SPACE=(10,(10,10)) //SYSPRINT DD SYSOUT=* //SYSLIN DD DSNAME=&&LOAD,DISP=(MOD,PASS),UNIT=SYSDA, // SPACE=(10,(10,10)),DCB=BLKSIZE=400 //LKED EXEC PGM=IEWL,REGION=1024K //SYSPRINT DD SYSOUT=A //SYSLIB DD DSN=PM7351.TEST2.LOADLIB,DISP=SHR // DD DSN=PM7351.TEST2.COB(PGM1),DISP=SHR //SYSLMOD DD DSN=PM7351.TEST2.LOADLIB, // DISP=SHR //SYSUT1 DD UNIT=SYSDA,DCB=BLKSIZE=1024,SPACE=(CYL,(1,1)) //SYSTERM DD SYSOUT=* //SYSLIN DD DSN=&&LOAD,DISP=(OLD,DELETE) //SYSIN DD DUMMY i am getting IEW2013I 0F08 NO MEMBER NAME WAS SPECIFIED. MODULE WAS SAVED USING TEMPNAM1. could any one tell me the resolution for this..?

1 Answers  

---

I want to declare a field with data type Double in my COBOL program. how shall i do that ?

5 Answers  

---

can u give result for the fallowing example... 05 a pic 9(2) 05 b redifines a pic x(2). move 'xy' to b. display a,b.

10 Answers   IBM,

---