Can anyone please give the example of Inline Perform.
Answers were Sorted based on User's Feedback
Answer / shanuss
PERFORM UNTIL I = 10
MOVE RATE(I) TO SPLIT-TOT(1)
ADD 1 TO I
END-PERFORM.
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / nikhil
There is one special thing about inline performs - there
has to be a END-PERFORM associated with the perform
statement otherwise it will give compile error. I have
tried this as well.
| Is This Answer Correct ? | 3 Yes | 0 No |
Answer / abhishek vashishta
PERFORM UNTIL WS-EXIT = 'Y'
DISPLAY 'ENTER UR NAME '
ACCEPT WS-NAME
DISPLAY 'WANT TO EXIT'
ACCEPT WS-EXIT
END-PERFORM.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / anjan
HI,
Inline perform is like inline function in C++. which
means in this case the control will not transfered to any
particular paragraph where as Immediately throws the result
of the code which has mentioned in the block perform and
end-perform.
Please correct me if i am wrong.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / bijay krishna mohapatra
perform varyiung i from 1 by 1 under i>5
display i
add 1 to i
end perform
display 'bijay'
stop run.
***********rules********:
1.in line should be terminated into scope delimiter(end-if)
2.we cant apply the after opt.
3.nesting can be done hr.
| Is This Answer Correct ? | 1 Yes | 1 No |
give the examples for strings and unstrings in cobol
where do we use dyanamic call ? and where do we use static call pls give any example pls ?
input= ,,,, mainframe training ,,, hyderabad .... location.... output1=$ mainframe training in hyderabad location$ output2=**** mainframe training in hyderabad location ****. In this pgn when we give input considering the spaces the output is displayed in this format.Like in the place of ,,,, $ should be displayed likewise.So please helpmeout.
How do you code Cobol to access a parameter that has been defined in JCL?
What is difference between static and dynamic call in cobol?
If you were passing a table via linkage, which is preferable - a subscript or an index?
77 a pic x(4) value '1234' -----> instead of this 'abcd' 77 b pic 9(4) value zeros. move a to b what is the answers for both cases? IS it possible? Give me elementary move rules briefly......
what is the minimum number of lines a Cobol program should have to successfully compile and run
11 Answers ABC, Societe Generale,
If by mistake we MOVE a working storage variable into LINKAGE area. What will happen??
Which is the best IBM mainframe Training Institute in Ameerpet, Hyderabad
i have a requrement in A as viswa!@#$%&^**reddy i need to move viswareddy in B without junk values pls say how to do ths reply fast
How to read a record from bottom of a file which is indexed by 'A'.