Answer / karan

s9(4) ---- 2bytes(COM)
s9(4) ---- 3bytes(COM-3)

Answer / rekha

comp | comp-3

___________________________|__________________________________1>it
will store the data | it will store the data in PACKED in
BINARY FORMAT | DECIMAL FORMAT
2>s9(1)-s9(4) --> 2byts | s9(n)
s9(5)-s9(9) --> 4bytes | if n --> even occupies (n/2)+1b
s9(10-s9(18) -->8bytes | if n --> odd occupies (n+1)/2b
3> it will occupies the | it will occupy less memory
memory based on the range |
____________________________________________________________ex
- s9(4) occupies 2bytes for comp
s9(4) occupies 3bytes for comp-3

I have a Main Program which is calling Sub-Program which is a DB2 pgm. What will happen if I am not closing the cursor used in the Sub-program? Please advise..

3 Answers   iGate,

---

How can we know that cobol program is using report file or simple file....?

4 Answers  

---

SIGN TRAILING SEPARATE field occupy ?

3 Answers  

---

i have mainprogram and subgram...if i compile mainprogram without stop run..what will u get in compilation time?

1 Answers   HCL,

---

What is ASKTIME, SUSPEND

1 Answers   IBM,

---

What is the different between index and subscript?

3 Answers  

---

What is the purpose of Identification Division?

1 Answers  

---

)If there are 10 steps in GDG, if I want to refer the step2 after step5 . what should I do?

0 Answers   IBM,

---

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  

---

what is subscript in cobol?give realtime example?

2 Answers   Wipro,

---

Why occurs can not be used in 01 level ?

2 Answers   TCS,

---

Should I use STOP RUN in the sub program??why?

6 Answers   Xansa,

---