Answer / naveen87ginjupalli

S9(5)V9(2) occupies 7 bytes of memory.

Here V doesn't occupies any space it assumes internally.V is
the assumed Decimal point, it is used to store the Decimal
values.

Answer / ravi

7 bytes

Answer / saikiran

7 bytes,sign does n't occupy any space internally.

Answer / vaneesh

Only 7 bytes will be occupied.
Sign 's' will be stored as Zooned decimal (punch char).
and V will be only an assumed decimal which is stored
internally.

Answer / ronaldo luyo

I have a file with a field with s9(3)v9(4) and i need to
load with LOAD UTILITY DB2 v9. What data db2 type correspond
to this case in the crate table and load utility DB2 V9 FOR ZOS.

Answer / chavanbb33

it occupies 7 bytes as v doesn't occupy any storage space it is a assumed/implied decimal point.

How can we know that cobol program is using report file or simple file....?

4 Answers  

What do you understand by psb and acb?

0 Answers  

plz,could any one tell me? what about EBCDIC in cobol?briefly?

1 Answers  

why occurs clause not mentioned in 01 level

6 Answers   HCL, NIIT, TCS, Tesco,

what are the limitations of Inline Perform?

3 Answers   Zensar,

How many sections are there in data division in COBOL?

0 Answers   B-Ways TecnoSoft,

select TURE Statement(s) aboUt eject statemenet in cobol? a)The eject statememnt must be the only statement on the line b.It causes the program to edit abnormally c. eject statement can be written in either area A or area B d. specifies that the next source statement is to be printed at Top of the next page e.The EJECTstatement has no effect on the compilation of the source program itself

2 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,

If A>B next sentence end-if display 1 display 2. display 3. If a>b, it will display only 3.(the next sentence, ie., after fullstop/period) ____________________________________ if a>b continue end-if display 1 display 2. display 3. If a>b, it Will display 1 2 3 (the next statement) ____________________________________ if a>b continue display 1 end-if display 2 display 3. display 4. If a>b, Will it display 2 3 4 (or) 1 2 3 4 ?

8 Answers   UST,

wht is the use of evalute verb ? how do u declare recfm in cobol and jcl ?

2 Answers   EDS,

we can use set true for condition names.. similarly can we code set to false in cobol pgm? will it work?

1 Answers  

how to access the file from prodution from changeman tool and to submit a file to production

1 Answers   IBM,