How many times the loop runs here
01 a pic 9(2) value 10.
perform para1 a times
stop run.
para1:
move 20 to a.
Answers were Sorted based on User's Feedback
Answer / suresh
it performs 10 times only it donot change while looping
| Is This Answer Correct ? | 14 Yes | 3 No |
Answer / shiva
initally a=10
perfrm para1 a(10) times
move 20 to a...so now a=20
now again perform para1 a(20)times
and loop goes on
hence infinite loop
| Is This Answer Correct ? | 3 Yes | 5 No |
here is my requirement A1 is alphanumeric with value 'A1B2C3D4' as defined below 05 A1 PIC X(8) VALUE IS 'A1B2C3D4' but i need to have A2,A3 as ABCD & 1234 repectively...... A2 = ABCD A3 = 1234 Can you please explain me what are the different ways to do it?
I have a source program compiled with Cobol-2. The output file has a record length of 100 defined in the program but a record of 60 bytes getting written into it. i.e. The rest of 40 bytes I am not Writing anything. But it by default puts some values into the last 40 bytes. However it does not impact anything. But when Compiled the module with Enterprise Cobol the last 40 bytes were spaces as fillers. Can anyone explain?
Explain about Redefines cluse?
I have one column say 'X' defined as VARCHAR Can anyone tell me What are the different ways to update this column thru COBOL-DB2 program?
what is index and how to use two tables using index?
What are subroutines ? and how do we pass data to the sub routines?
how can u pass the values into db2 values from cobol ?
) How do you access the migrate the data from production region to development region
how do you reference the variable unblock file formats from cobol programs
How can you add a particular field in copybook?
I have 100 records in a file.. i want to sort the records from 5 to 5o... give the syntax...
how would find total records in files using seqientional