sample code for read a 2nd record from last in flatfile how can do?

sample code for read a 2nd record from last in flatfile how
can do?

Question Posted / sujatha

4 Answers
14435 Views
iNautix, I also Faced
E-Mail Answers

Answers were Sorted based on User's Feedback

sample code for read a 2nd record from last in flatfile how can do?..

Answer / nsingh

ADD SEQUENCE NUMBER

SORT FIELDS=COPY
OUTREC FIELDS = (1,80,SEQNUM,ZD,A)

NOW SORT SEQ NUM IN DESCENDING ORDER
SORT FIELDS=(81,4,ZD,D)

INCLUDE ONLY 2ND LAST REC
SORT FILEDS = COPY
INCLUDE COND = (81,4,ZD,EQ,0002')

REMOVE SEQ NUM FROM FILE & THIS REC IS SELECTED
SORT FIELDS =COPY
OUTREC FIELDS = (1,80)

Is This Answer Correct ?

1 Yes

0 No

sample code for read a 2nd record from last in flatfile how can do?..

Answer / abhijit

Suppose file has 100 Record

1,2,3.........................100

a) Read the file and Count the number of records into a variable
Suppose CNT_VAR = 100

b) Suppose you want to read 2nd record from Last

So Set N = 2

c) Now to find the search variable compute the below

SRC_VAR = CNT_VAR - N i.e (100 - 2)

SRC_VAR = 98

d) Now Read the file to pick 98th record from top

Is This Answer Correct ?

1 Yes

2 No

sample code for read a 2nd record from last in flatfile how can do?..

Answer / sunilkumar

First open the file in reverse order using OPEN command

OPEN FILE file-name REVERSE

Then read twice to get the 2nd last record.

Is This Answer Correct ?

0 Yes

2 No

sample code for read a 2nd record from last in flatfile how can do?..

Answer / santhosh vayathuri

for this we need to do fallowing steps

1) read all the records and store into an array and count
value store into an var

2) from that array subtract count var by 1 we will get last
2nd record

ex :: array(count-1) == last 2nd rec

Is This Answer Correct ?

1 Yes

6 No

Post New Answer

More COBOL Interview Questions

Can you call an OS VS COBOL pgm from a VS COBOL II pgm ?

3 Answers Microsoft,

Our issue is there seems to be a disconnect, or no link, between our SELECT statement and our SD. We had SELECT SORT-FILE and SELECT SORT-FILE ASSIGN TO SORTWRK. ASSIGN TO SORTWRK1 SORTWRK2 SORTWRK3 SORTWRK4. with SD SORT_FILE RECORD CONTAINS 7833 CHARACTERS. In either case, at run time, the system ignored our SORTWRK# DD statements and allocated 16 sort works with the SORTWK## naming convention. Any ideas why the system does not recognize the connection? We do not even need the SORTWRK DD statements. Thanks

0 Answers

What is JOBLIB and STEPLIB in JCL? what is the purpose of using it?

1 Answers

diffrence between z(2) and z9(2)

4 Answers Cap Gemini,

what is S04E error in jcl?

11 Answers IBM, L&T,

can I copy book which contain db2 statment in procedure divion?

2 Answers Bank Of America,

can we display comp-3 variables. if we want to display what we have to do . give me one example

6 Answers CGI, Deloitte,

)what is retrieve?

1 Answers IBM,

What are declaratives and what are their uses in cobol?

0 Answers

how to submit a jcl by cobol program. clear me with an example.

3 Answers HCL,

I have a program with an Array of 5000 occurences which is being passed from 5 sub levels to the front end screen. Thess 5 programs using each 5*2 = 10 different arrays with size as 5000. This is causing the transaction to utilize more storage consupmtion. I am looking to reduce the storage consumption. As part of that initially i thought Dynamic array may solve my problem. After viewing the comments given i see its same as normal array. IS there any other way we can resolve this issue?

0 Answers HCL,

What is difference between COBOL and VS COBOL II?.

1 Answers Winsol Solutions,

For more COBOL Interview Questions Click Here