How to find How Many Lines in Sysin DD * Parameter Thru
Cobol Coding?
If any one knows the Answer Please Reply .....Thanks From
Shree
Answers were Sorted based on User's Feedback
Answer / guest1
you need to put it in a loo. In sysin dd* u need to pass a
value that will terminate loop. (Here say /1*)
in your cobol coding performthe loop till it reaches '/1*'.
For every accept, increment the counter variable by 1. Once
the loop is terminated, display the count.
Hope that this could help you.
| Is This Answer Correct ? | 5 Yes | 0 No |
Answer / shiva
sys inn dd*...is used to pass data from jcl to cobol...
so in shorter way... how many accept stmts u code in cobol
that many relative values only it will consider frm
jcl...beyond tat it will neglect....
| Is This Answer Correct ? | 1 Yes | 2 No |
Answer / sruthi
We can say how many lines in sysin dd * parameter by seeing
ACCEPT stmt in cobol pgm.
| Is This Answer Correct ? | 2 Yes | 5 No |
Study the DATA DIVISION entries and the three PROCEDURE DIVISION entries given below: 01 END-OF-FILE-SWITCH PIC XXX. 88 NO-MORE-RECS VALUE "YES". 88 MORE-RECS VALUE "NO". (i) READ SAMPLE-FILE AT END MOVE "YES" TO NO-MORE-RECS. (ii) IF NO-MORE-RECS = "YES" GO TO LAST-PARA. (iii) IF NO-MORE-RECS GO TO LAST-PARA. Which are wrong? (a) (i) and (ii) (b) (ii) and (iii) (c) (i) and (iii) (d) all
Which of the following characters is NOT valid in column 7? a. - b. \ c. * d. # e. $
what are the paramater we cannot use in procedure?how many instream we can write in single jcl?can we call instream to catalog and ctalog to instream?
How to increase the logical record length of existing PS file?
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 ......
How do you differentiate between cobol and cobol-ii?
can i use multiple when statements in search & search all ? justify ur answer?
How to get the last record in vsam file in cluster? And how can you get the ksds file records into your cobol program?
Can anyone please give the example of Inline Perform.
I HAVE FOLLOWING DECLARATION. 02. A PIC X(10) VALUE 'XXXXXXXXXX'. 02. B REDEFINES A. 05. C PIC X(3). 05. D PIC X(3). 05. E PIC 9(3). IN MY PROG, I HAVE MOVE 1 TO E. DISPLAY A. WHAT WILL BE DISPLAYED AS A RESULT OF THIS? PLEASE EXPLAIN THE ANSWER. THANKS.
WT R TECHNICAL MAINFRAME QUESTION ASKED IIN ANJANASOFTEARE??
2 input fles: 2 flat files, with different number of records. both are having unique key for each record and already sorted in ascending order . match these files using unique key and in output only matching key value has to be written. please procide cobol logic