Interested to Buy Any Domain ? << Click Here >> for more details...
What is the maximum length of a field you can define using
COMP-3?
- 4 Answers
- 37295 Views
- Complex System, Infosys, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / smita padhy
The maximum length of a computational item is 18 decimal
digits, except
for a PACKED-DECIMAL item. If the ARITH(COMPAT) compiler
option is in
effect, then the maximum length of a PACKED-DECIMAL item is
18 decimal
digits. If the ARITH(EXTEND) compiler option is in effect,
then the
maximum length of a PACKED-DECIMAL item is 31 decimal
digits.
| Is This Answer Correct ? | 11 Yes | 3 No |
Answer / nihar ranjan karan
If you use the compiler option ARITH(EXTEND) then you can
have a maximum of 31 digits.
Look up the compiler option ARITH in manual... you will get
some more info also...
| Is This Answer Correct ? | 9 Yes | 3 No |
For rewrite, why is it mandatory that file needs to be opened?
When would you use in-line perform?
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.
Which mode is used to operate the sequential file?
I have one column say 'X' defined as VARCHAR Can anyone tell me What are the different ways to update this column thru COBOL-DB2 program?
What is file status 39 ?
Write a program to enter and display the names of students in a class using the occurs clause.
What is the LINKAGE SECTION used in COBOL?
i have a file which contains records like 10,30,90,50,20,40,80,60,70 i want to display these records in reverse order like 70,60,80,40,20,50,90,30,10 please give me the cobol code (do not sort the records)
3 Answers Cap Gemini, Mind Tree,
What are 77 levels used for?
In a COBOL II PERFORM statement, when is the conditional tested, before or after the perform execution?
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 ......
COBOL 
