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
Answers were Sorted based on User's Feedback
Answer / anand
WS-I should be initialized before calling the para PARA-X
| Is This Answer Correct ? | 4 Yes | 1 No |
Answer / shekhar
initialize with a value and increase & decrease accordingly.
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / billyboyo
In IBM Cobol.
You need to give WS-I a starting value and increment it (or
decrement it, depending on the value) either in the perform
construct or in the paragraph.
You should consider the PICTURE and USAGE of WS-I. Much
better as PIC S9(4) and COMP.
You are also using a compile option, probably NUMPROC
(NOPFD) which is preventing your program abending by
doing "sign fixing". Only use NOPFD is all your data is
good, otherwise it makes errors harder to find.
| Is This Answer Correct ? | 0 Yes | 0 No |
I have a cobol program with a sub program. How ca i find that it is a dynamic call? or static call..?
How to code fscode 10 in cobol program? Where yoy code in your pgm?give ans for the question.
wht is the difference between goto and perform stmts
S9(5)V9(2) occupies how many bytes memory ?
Can we change the password using ALTER? anyone tried and changed?
What is the difference between Structured COBOL Programming and Object Oriented COBOL ?
How do you compile cobol program..?
Can we redefine the field of x(200) to less than 200?
How do you define a sort file in JCL that runs the COBOL program?
What is a SSRANGE and NOSSRANGE?
What compiler option would you use for dynamic linking?
How many bytes do a s9 (7) comp-3 field occupy?