WT R TECHNICAL MAINFRAME QUESTION ASKED IIN ANJANASOFTEARE??



WT R TECHNICAL MAINFRAME QUESTION ASKED IIN ANJANASOFTEARE?? ..

Answer / sugisuhan

PLZ ANY ONE SAY

Is This Answer Correct ?    0 Yes 1 No

Post New Answer

More COBOL Interview Questions

Explain the configuration section of a cobol program with examples of syntax.

0 Answers  


I have PS flat file with 14 records. I want to read from 4th to 9th record and want to write those 6 records (4th record to 9th record) to another PS file (output file). there is no key defined in the input file. I just want read a certain Consecutive records. can any one please give me the procedure division Coding for this. I have coded the below coding but the READ-PARA is performing only 1 time even though I have 14 records in my input file (i.e FILE-1): PROCEDURE DIVISION. A000-SECTION. MOVE 0 TO I. OPEN INPUT FILE-1. IF CHECK-KEY1 > 0 DISPLAY "OPEN ERROR FOR FILE-1, CODE IS:" CHECK-KEY1 END-IF. OPEN EXTEND NEWFILE-1 IF CHECK-KEY3 > 0 DISPLAY "OPEN ERROR FOR NEWFILE-1 COD IS" CHECK-KEY3 END-IF. PERFORM READ-PARA THRU EXIT-PARA UNTIL EOF-REC = 'YES'. DISPLAY " FINALLY OUT OF LOOP" CLOSE FILE-1 CLOSE NEWFILE-1 STOP RUN. READ-PARA. ADD 1 TO I READ FILE-1 AT END MOVE 'YES' TO EOF-REC IF I > 3 AND < 10 PERFORM WRITE-PARA ELSE DISPLAY "NOT IN RANGE" END-IF. EXIT-PARA. EXIT. WRITE-PARA. WRITE NEW-REC FROM FILE1-REC.

8 Answers   IBM,


Which is not true about evaluate statement

0 Answers  


I am sending values a and b with pic x(10) and pic x(10) by using call statement. In linkage section, I am receiving values with pic x(10) and pic x(11). Will my program fail? will it be compile error or run time abend?

3 Answers  


how to pass 100 to s9(4) how r they inserted ?

3 Answers   TCS,






Without using move verb how to move one variable to another.

5 Answers  


S9(5)V9(2) occupies how many bytes memory ?

6 Answers   Cap Gemini,


how will u pass dadta to cobol+db2 program...?

4 Answers   IBM,


What are the two search techniques ?

2 Answers   iGate,


Difference between ps, esds

3 Answers  


How many times the loop runs here 01 a pic 9(2) value 1. perform para1 until a=10 move 1 to a. stop run. para1: move 10 to a.

5 Answers  


Can you REWRITE a record in an ESDS file? Can you DELETE a record from it?

6 Answers   ABC, IBM, Mphasis, Wipro,


Categories