Interested to Buy Any Domain ? << Click Here >> for more details...
Can we use goto statement in inline_perform ?
- 5 Answers
- 10520 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / sivakumar sekharannair
Yes go to can be used in inline perform. when GO TO is used
in inline perform then irrespective of the number of times
the perform has to execute.. the control will go to GO TO.
example:
PERFORM VARYING A1 FROM 1 BY 1 UNTIL A1 > 4
DISPLAY 'SIVAKUMAR'
GO TO DISPLAY-PARA
END-PERFORM.
DISPLAY-PARA
DISPLAY 'KUMAR'.
SYSOUT:
SIVAKUMAR
KUMAR
Instead of
SIVAKUMAR
SIVAKUMAR
SIVAKUMAR
SIVAKUMAR
Actually the perform has to execute 4 times and so the
display should be executed 4 times. but because GO TO is
given inside the inline perform the control goes to display-
para and and dose not come back.
| Is This Answer Correct ? | 16 Yes | 0 No |
Answer / shan
The example used by Sivakumar is perfect,
Perform is used for looping, so it should have a exit
condition. simply perform and end perform wont make wright
syntax.
another kind of perform is
PERFORM <paragraph name> until < conditions>
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / chaitanya
could u please clarify d perform which was specified
PERFORM VARYING A1 FROM 1 BY 1 UNTIL A1 > 4
is inline perform??
I think the format of inline perform is...
perform
...
....
,,,
end perform.
| Is This Answer Correct ? | 3 Yes | 1 No |
Answer / rajesh
In-line PERFORMs work as long as there are no internal GO
TOs, not even to an exit.
| Is This Answer Correct ? | 2 Yes | 0 No |
Answer / sroul4
The format of inline perform is...
perform
...
....
Go TO para2
display' inline perform'
end perform.
Para2
you can put a GO TO but the control would pass to the go to
label , and it would not display inline perform.
| Is This Answer Correct ? | 2 Yes | 0 No |
diffrence between z(2) and z9(2)
What is wrong with the following data declaration? 01 W-DATE PIC X(6). 05 DD PIC 99. 05 MM PIC 99. 05 YY PIC 99. (a) Nothing is wrong. (b) Under W-DATE all level 05 items are having a PIC 99 but level 01 has PIC X(6). (c) PIC can't be specified for a group item. (d) DD, MM, and YY are invalid datanames.
Re: 01 NAME1 PIC X(13) VALUE "COBOL PROGRAMMING". 01 NAME2 PIC X(13). now I want to display the value of NAME1 in reverse order i.e value should be displayed as "GNIMMARGORP LOBOC" HOW can I do that ??? please let me know if any one knows it.
can I copy book which contain db2 statment in procedure divion?
what will happen if i give program name and member name as different? program runs successful or w'll abend?
how do you define single dimensional array and multidimensional array in your cobol?
I have program P1 which calls file F1 which has 100 records and following structure 001 .................. 002 .................. 003 .................. 098 .................... 099 ................... 100 .................... Now I want to read these files and write these records in file F2 in following manner. 001 ...... 051 ..... 002 ...... 052 ..... 003 ...... 053 ..... .......... ....... .......... ....... .......... ....... 048 ........ 098 ...... 049 .......... 099 ....... 050 .... 100 ......
What is difference between com and com3? Eg. s9(4) so what is the memory it will occupy com and com3.
I've one string with spaces ( I N D I A ). My question is I want remove the spaces & combine in to single string without space (INDIA).How we can write the cobol program & wich options we need to use. Please let me know.
where do u use low-value and high value in cobol
The disposition parameter in the jcl is share ( DISP+SHR ) and the program opens file in extend mode what will happen?
i have n records in one file and in this file there is some fields and i want to count that how many sharma in my file so plz give the coding that how we read sharma ?
COBOL 
