IDENTIFICATION DIVISION.
PROGRAM-ID. MOVEPGM.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 WS-I PIC 9(2).
PROCEDURE DIVISION.
A1000-MAIN-PARA.
PERFORM PARA-X WITH TEST BEFORE UNTIL WS-I= 5
STOP RUN.
PARA-X.
DISPLAY "BEST2".
I m getting error s722,while executing the program, seems
getting in loop, can anybody tell me why
Answer Posted / shekhar
initialize with a value and increase & decrease accordingly.
Is This Answer Correct ? | 1 Yes | 1 No |
Post New Answer View All Answers
How to change size of Initial number of records to *NOMAX for ALL PF files from perticular library, how can I do that
explain sorting techniques in cobol program?
please..could u give an example about USAGE IS POINTER ..and explain why and when we use it ?
How many bytes S(8) comp field occupy and its maximum value?
What is rmode(any) ?
1.Is it possible to move the data from 99.99 to 99v99? 2.What is the CICS-vsam Compilation process? 3.In My GDG 5 generation will be there GDG3 got an abend what will happen? 4.In my GDG first generation is +1 And I want to add the new generation what will happen previous generation? 5.How can you give the PIC clause below conditions A). s9 (reddy), B). s9 (5) occurs 5 times? 6.How override the proc from a particular step? and what is symbolic and override Procs?
What is perform what is varying?
Explain how will you differentiate between an internal and an external sort, the pros and cons, internal sort syntax etc
) How do u handle errors in BMS macro
Write the code implementing the perform … varying.
What are all the divisions of a COBOL program?
) what is the difference between AID and HANDLE AID?
Describe the cobol database components?
What is the usage of comp fields in cobol?
How do you reference the fixed block file formats from cobol programs