Answer / varun v

1) Move Spaces to Numeric field:

Here program would give compilation error saying Spaces
to Numeric integer did not follow the "MOVE" statement
compatibility rules.

2) Move Zeroes to Alphabetic field:

Would work fine with Movement of Zeroes to the
Alphabetic field.

Answer / aliya

It will give SOC7.

Answer / ram.g

ans to last ans

anything you can move to alpha...provided ..ur input is w/n
quotes...


ans to ur qn...

its quite possible by using redefine command...

the field will be sharing same memorylocation..

eg: 05 ws-num pic 99
10 ws-char redefines ws-num pic x(2)

move 12 to ws-num
move 'ab' to ws-char

Answer / ram.g

sorry for post 3 2nd ans

it supposed for the qn ...x(7) to 9(9) nd vice versa..
plz refer the qn...

Answer / sivakumar sekharannair

compile error will occure if zeroes moved to alphabetic
field or spaces moved to numeric field.

Answer / jayaprabhu

spaces to umeric field will give data exp error soc7

bocz we cant move the spaces to numeric field

Zeroes to alphabetic we cant bcoz zeroes is numeric we cant
move into the alphabetic if we move it will give soc7

But using redefines we can moves num-alpa, alpa -num
these kind we use for copybook where in if you have one
field need to change for num/alpa.instead going for new
copybook .

Answer / thavasi

all above answers are incorrect.


Move SPACES to numeric field:
=============================

Moving spaces/non-numeric to numeric won't give any
compilation error or S0C7.

S0C will occur only when u do computation with non-numeric data.

ZERO to alphabetic field:
========================

MOVing ZEROS to alphabetic - will result in compilation error.

If my file contains 100,000 records and job abended at 55,000th records processing then how can i restart job from that record onward by ignoring that record. I can not edit the file as file size is big and it is getting browse substituted?

5 Answers   TCS,

what is difference between cobol and cobol/400

1 Answers   HCL,

What happens in the background of spool when we submit a job for compilation and execution... This is a recent question in ibm...Kindly help me.....

3 Answers   IBM,

explain sorting techniques in cobol program?

0 Answers  

How do you define a variable of COMP-1? COMP-2?

3 Answers  

Discuss about changing dataset name in proc.

0 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 need a program by giving input as a abcd in any randem order but i need a output as 1234 related to abcd. i.e,. a for 1,b=2,c.....etc..

5 Answers   IBM,

What is SSRANGE, NOSSRANGE ?

5 Answers  

How to execute a set of JCL statements from a COBOL program?

2 Answers   Patni, Syntel,

What care has to be taken to force program to execute above 16 Meg line?

1 Answers  

Why occurs cannot be used in 01 level in COBOL?

0 Answers   Arigo Infotech,