What is an in-line perform ?
Answers were Sorted based on User's Feedback
Answer / sreedevi
When set of statements are used only in one place then we
can group all of them within PERFORM END-PERFORM structure.
This is called INLINE PERFORM. This is equal to DO..END
structure of other languages.
PERFORM
ADD A TO B
MULTIPLE B BY C
DISPLAY 'VALUE OF A+B*C ' C
END-PERFORM
| Is This Answer Correct ? | 8 Yes | 1 No |
Answer / tiny
PERFORM ... ...
END PERFORM
When the body of the perform will not be used in other
paragraphs. If the body of the perform is a generic type of
code (used from various other places in the program), it
would be better to put the code in a separate para and use
PERFORM paraname rather than in-line perform.It increases
the readability of the program.
| Is This Answer Correct ? | 6 Yes | 0 No |
Answer / dk.kannan@gmail.com
in-line perform is nothing but to check the body of the
statement only.
| Is This Answer Correct ? | 1 Yes | 1 No |
Answer / santosh khot
In-line Perform is included in Cobol II this was not in
Previous version of Cobol. when dont want to take the
control to the paragraph want to execute same code for
number of times with in same in-line perform is used
Syntex is
perform until identifier
....
.....
.....
end-perform.
| Is This Answer Correct ? | 1 Yes | 4 No |
What is an in line perform? When would you use it? Anything else you wish to say about it.
What is the difference between PIC 9.99 and PIC9v99?
what will happen if i give program name and member name as different? program runs successful or w'll abend?
wht is load module and object module ?
can anybody post me about file-aid and changemen tools pls and give me reference if any mainframe guys are there
i have a sequencial file contains multiple records, i want to extract one row which contains various fields like order number,date,warehouse,.ect.. in to the another file by accepting the order number from jcl. how can i do it. pls help me..
whats the disadvantage of search all over search?
how will u find out 3rd week's 2nd day using occurs ?
How to solve SOC7. I have the cobol coded as below 01 A PIC 9(4). 01 AIN REDEFINES A. 05 AIN1 PIC S9(4) 01 B PIC 9(4)V99. 01 BIN REDEFINES B. 05 BIN1 PIC S9(4)V99. PROCEDURE DIVISION. START-PARA. INITIALIZE A AIN B BIN. ACCEPT A B. DISPLAY 'VALUE OF A=' A. DISPLAY 'VALUE OF B=' B. DISPLAY 'VALUE OF BIN1=' BIN1. DISPLAY 'VALUE OF AIN1=' AIN1. COMPUTE AIN1 = BIN1 - AIN1. DISPLAY 'VALUE OF AIN1=' AIN1. When i'm executing this code i'm getting SOC7 for A = 12 & B=34. Can someone explain SDSF OUTPUT DISPLAY TCOM058R JOB05458 DSID 102 LINE 0 COLUMNS 02- 81 COMMAND INPUT ===> SCROLL ===> CSR ********************************* TOP OF DATA ********************************** VALUE OF A=12 VALUE OF B=34 VALUE OF BIN1=34 VALUE OF AIN1=12 CEE3207S The system detected a data exception (System Completion Code=0C7). From compile unit PROG1 at entry point PROG1 at statement 29 at compile +000004CE at address 00007ECE. Please address how to solve this issue Thanks in advance.
How to Pass table from a cobol program to another cobol program and how to use that table in called program
consider the following two statements MOVE 10 TO N PERFORM PARA-X N TIMES STOP RUN PARA-X MOVE 5 TO N how many times PARA-X willbe exicuted? a.10 b.5 c.infinate d.execution error
How to use the same cobol program in Batch and CICS onlines ? Please expalin with an example. Thanks in advance.