perform I from 0 by 1 until I=5?How maney times it will
executes
Answer Posted / pradeep
IT WILL EXECUTE 5 TIMES
COBOL CODE:
IDENTIFICATION
DIVISION.
PROGRAM-ID.
MOVEPGM.
DATA
DIVISION.
WORKING-STORAGE
SECTION.
01 WS-I PIC 9
(2).
PROCEDURE
DIVISION.
A1000-MAIN-
PARA.
PERFORM PARA-X VARYING WS-I FROM 0 BY 1 UNTIL WS-
I=5
STOP
RUN.
PARA-
X.
DISPLAY "TEST2".
OUTPUT:
COMMAND INPUT ===>
********************************* TOP OF DATA ***
TEST2
TEST2
TEST2
TEST2
TEST2
******************************** BOTTOM OF DATA *
| Is This Answer Correct ? | 2 Yes | 0 No |
Post New Answer View All Answers
I have one ps file in which there are 3 fileds emp_no,emp_name and leave_app.this ps file information give the detail of employee which is going to apply for leave.suppose emp_no=113430,emp_name=ajay,leave_app=1 that means he is going to apply for 1 day leave.and accordingling the table in db2 will be updated means if he has that no of leave in his account then he will get dat leave and updated acc. in table(leave_balance=previous leave present in table-leave_app).Now i want to check whther the updated result is correct or not by comparing the two ps file using IEBCOMPARE or icetool so what is going to be the two ps file and how its is going to be compare.
how can i see junk values in dclgen or in hostvariable of comp ?
How to remove the spaces at the end of each record in the output file of variable length, via cobol program?
how to convert the recors form vsam file to db2 table tru file aid
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
What are declaratives and what are their uses in cobol?
Give some examples of command terminators?
Differentiate cobol and cobol-ii. (Most of our programs are written in cobolii, so, it is good to know, how, this is different from cobol)?
Is it possible that the redefines clause has different picture clauses compared to the one it redefined?
Why did you choose to work with ibm mainframe cobol programming?
What is the Purpose of Pointer in the string?
what is amode(24), amode(31), rmode(24) and rmode(any)?
Which mode is used to operate the sequential file?
What is the difference between a binary search and a sequential search? What are the pertinent cobol commands?
How to fetch 1000 error records from VSAM file(Eg: 1000000 records present) while getting SOC7 abend ?