Answer / shanuss

PERFORM UNTIL I = 10
MOVE RATE(I) TO SPLIT-TOT(1)
ADD 1 TO I
END-PERFORM.

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.

Answer / abhishek vashishta

PERFORM UNTIL WS-EXIT = 'Y'
DISPLAY 'ENTER UR NAME '
ACCEPT WS-NAME
DISPLAY 'WANT TO EXIT'
ACCEPT WS-EXIT
END-PERFORM.

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.

Answer / ssampath

perform witin a section

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.

Write down the divisions of cobol program?

0 Answers  

What is the LINKAGE SECTION used for?

4 Answers  

how can we get current dat and time thru cobol pgm

3 Answers   DELL,

How to find How Many Lines in Sysin DD * Parameter Thru Cobol Coding? If any one knows the Answer Please Reply .....Thanks From Shree

3 Answers   Merrill Lynch,

01 b pic +9(4) How many bytes it will take for storage???

2 Answers  

Hi, My interviewer ask A calls B and C calls B, a and b are static c and b are dynamic.what happens if they compile and execute at same time.

3 Answers   iGate,

I have a table with 3 dimensions like this : 01 ws-table 04 ws-page occurs 3 08 ws-column occurs 2. 12 ws-record occurs 20 pic x(40). How to code with PERFORM varying with 3 dimension...I forgot..

2 Answers   EDS,

What is the reference modification.

2 Answers  

how many bytes does s9(15) occupy in comp1 comp2 and comp3 ?

4 Answers   TCS,

Should I use STOP RUN in the sub program??why?

6 Answers   Xansa,

i want a program using by if, evaluate , string, unstring, perform, occurs?

1 Answers  

I am getting S00F abend when i try to compare two variable of different pic class,one variable is of 9(09) and another is S9(09) comp-3. First i moved the data from S9(09) comp-3 to 9(09), but no luck. So i tried to move the data from S9(09) comp-3 to X (09) and move to 9(09). I am getting same error message, Please help me to find solution for this ptoblem. ERROR MESSAGE - "The system or user abend S00F R=NULL was issued."

1 Answers