Boney s

• Aug 26th, 2011

FOR VS COBOL 2 ,THERE ARE 7 SECTION FOR DATA DIVISION:

1.FILE SECTION.
2.WORKING-STORAGE SECTION.
3.SCREEN SECTION.
4.REPORT SECTION.
5.COMMUNICATION SECTION.
6.LOCAL STORAGE SECTION.
7.LINKAGE SECTION.

neha

• Oct 4th, 2007

Data division contains 6 sections but generally only 3 are used.They are-1.
Working-storage section.2. File section.3. Linkage section.4.
Local storage section.-used for the program 's local area.5. Screen section.- for screen alignment.6.
Report section. for preparing reports.

Answer Question  Select Best Answer

VIVEKANANDA

• Aug 26th, 2011

Yes, we can declare in the Working-storage section. Because Elementary items are 01 to 49 and 77.

01 WS-NAME PIC X(20).
77 CUR-YEAR PIC 9(4) VALUE 2006.
01 WS-DATE.
05 WS-MONTH PIC 9(2).
05 FILLER PIC X VALUE '-'.
05 WS-DATE PIC 9(2).
05 FILLER PIC X VALUE '-'.
05 WS-YEAR PIC 9(4).

Answer Question  Select Best Answer

guptavik1

 Profile Answers by guptavik1 Questions by guptavik1

• Aug 27th, 2011

(A) S9(3)V99 COMP-3 will occupy (N/2 +1) if N=Even and (N+1)/2 if N=Odd. Here N=5 which is odd. Hence, No of bytes used for storage internally=3 bytes (B) S9(1)V99 COMP will occupy based ...

talluri

 Profile Answers by talluri Questions by talluri

• Jul 27th, 2011

Comp-3 will occupies 3bytes

comp doesn't allow the decimal values

Babjee talluri

Answer Question  Select Best Answer

jzmoonrock56

 Profile Answers by jzmoonrock56 Questions by jzmoonrock56

• Aug 31st, 2011

There will be no difference between the two

Stephen

• Jul 28th, 2011

It will abend with the below message " The flow of control in program TRIAL proceeded beyond the last line of the program."

Answer Question  Select Best Answer

richard

• Sep 16th, 2011

Can you give me an example of program c#.net that can be encrypt/decrypt password in the database.......

praddu

 Profile Answers by praddu Questions by praddu

• May 7th, 2007

Ans: ACCEPT PASSWORD WITH NO ECHO.  With this clause the password is encrypted

Answer Question  Select Best Answer

A place to reserve storage for data that is not part of the program's input or output. This area contains fields that are used as temporary storage while the program is executing. Some temporary storage variables include: switches, flags, fields containing textual comments, fields to accumulate numeric totals.

Jeevan

• Sep 16th, 2011

In the working-storage section all the temporarily fields are declared.

Abyss

• Sep 8th, 2011

It is the working as in WORKING storage section in Cobol

Answer Question  Select Best Answer

I have a file with 2 fields say 1st field is a indicator.2nd field is amount field.It has the values A,B,C,D.Suppose if the indicator is A,i want to move 123.4when B move 12.34when c move 1.234when d move 1234my question is what pic clause(only one op field variable) should be used to hold all the 4 types of variables.

Neelesh Baghel

• Oct 12th, 2011

Declared variables as

D
01 PIC 9(4)v9(3).

neelesh baghel

• Oct 12th, 2011

We can use picture clause like bellow mention

01 PIC 9(3)v9(3)

so u can move all given value on this

Answer Question  Select Best Answer

chinmay

• Nov 21st, 2011

Occurs clause is repeated occurrences of a field with same format, not for records that's why we can't define
occurs clause in 01 level.

sameeuddin

• Aug 16th, 2011

At 01 level it expects the record structure

Answer Question  Select Best Answer

I have a file having 1000 records and each record having 8 fields, but i want to output having 1,3,5,7 fields only, then how can i achieve this criteria?

sandeep

• Nov 24th, 2011

using sort in jcl we can get the required fields in output file like, "jcl in sort jcl, //sysin dd * sort fields=copy outrec fields=(starting position in o/p file:starting fie...

babjee talluri

• Jul 26th, 2011

But we know the length of the field, if we know the length, if it's wrong let you tell me asap, i am fresher

perform until 1000 times
read file1rec
move(1:10) to a(1:10)
move(30:10) to a(12:10)
move(50:10) to a(24:10)
move(70:10) to a(36:10)
display a
end-perform.

Answer Question  Select Best Answer

What is the use of Alternate Index? Is using alternate index in file processing fast ?

MF Learner

• Dec 8th, 2011

Alternate Index is used to access the records from the file using alternate key, when there is no primary key avaliable. But using this index accessing the records is slow. Because, alternate index fo...

surendhar

• Nov 13th, 2011

Alternate index is used to access a vsam file by using alternate key.file processing is very fast.

Answer Question  Select Best Answer

I have a seq file with 1000 records and I need to skip alternate records and write into a output file using cobol How can I do it

RohitPd

 Profile Answers by RohitPd Questions by RohitPd

• Dec 12th, 2011

It writes the first record and then skips a record and then writes the third record again, so basically were here writing the odd numbered records .i.e. when divided by 2 and the remainder is not equa...

burelamanohar

 Profile Answers by burelamanohar Questions by burelamanohar

• Dec 8th, 2011

Use Counter

Code
 

Answer Question  Select Best Answer

burelamanohar

 Profile Answers by burelamanohar Questions by burelamanohar

• Dec 13th, 2011

Without compiling the program, is it possible to find whether it doesnt have errors? If Yes,
Could you please let me know what is the procedure you are following to find the errors?

krishna

• Oct 11th, 2011

Compilation converts the source code in to object code but the object code is not executable in mainframe environment so we need to link-edit it by using iewl............compilation is must for the programs to execute...............

Answer Question  Select Best Answer

ansgar

 Profile Answers by ansgar Questions by ansgar

• Dec 13th, 2011

Not always correct. In our computer Comp = Comp-3.
So always check the manual of the compiler.

Kamal

• Nov 16th, 2007

For all of you out who have not heard about comp-4. Wake up. Comp-4 does exist and it is just like comp - ie. it is a half-word (2 bytes).This might help those of you who are confused about comp ...

Answer Question  Select Best Answer

A PIC X(1) value A.B PIC X(2) VALUE SPACES.IF MOVE A TO B. WHAT IS THE VALUE OF B. Is it ' A' OR 'A '.

vardhan.frd

 Profile Answers by vardhan.frd Questions by vardhan.frd

• Dec 21st, 2011

The answer is A

talluri

 Profile Answers by talluri Questions by talluri

• Jul 27th, 2011

Alpha numeric data insertion is write justification so the answer is "a "

Answer Question  Select Best Answer

vivek

• Dec 30th, 2011

Actually Index is a register variable in COBOL, which will tell about the displacement ; as Subscripts are telling about the occurrences only. And there will be no need to declare them in Working Storage section.

ramesh4greek

 Profile Answers by ramesh4greek Questions by ramesh4greek

• Jun 11th, 2010

Index can be used to search the data in tables. Here Index represents the searching coloumn or field value of the table.

Answer Question  Select Best Answer

Lrecl and block size mismatch .can anyone explain in detail...

R.Rajeshwari

• Jan 14th, 2012

Mismatch in LRECL or BLOCKSIZE or RECFM between your COBOL pgm & the JCL (or the dataset label). You will get file status 39 on an OPEN.

Answer Question  Select Best Answer

rasheeed17

 Profile Answers by rasheeed17 Questions by rasheeed17

• Jan 19th, 2012

Inspect is a kind String function in COBOL, examples given by PKK are pretty good

PKK

• Dec 9th, 2011

Individual characters in a field can be accessed and possibly changed by use of the INSPECT verb. INSPECT is used with TALLYING option to count designated characters. eg: INSPECT WS-A TALLYING...

Answer Question  Select Best Answer

I want delete one record from the file that is50 th record how can we delete ...?

Hussain

• Jan 25th, 2012

In normal dasds the data cant be deleted where we like for that ksds vsam files are used there we have option of index and randomly picking of data we want.So by file handling we can delete the 50th r...

Madhavi Chava

• Jan 19th, 2012

It is NOT possible to delete records of a seq file. If you do not want a specific record to be kept in a seq file any more, all you can do is to modify the contents of the record so that it contains s...

Answer Question  Select Best Answer

madhavi_csit

• Jan 27th, 2012

Data Division

Answer Question  Select Best Answer

Meetal

• Feb 6th, 2012

One correction in example given above post ofr Ifrank. We can not move HIGH-VALUES/LOW-VALUES to PIC 9 (NUMERIC FIELD) . We can onlye move in PIC X (ALPHANUMERIC)

lfrank

 Profile Answers by lfrank Questions by lfrank

• Jan 8th, 2008

LOW-VALUE represents X'00' and HIGH-VALUE represents X'FF'. These equate to  the lower and upper limits of the collating sequence. All other values fall in between. There are...

Answer Question  Select Best Answer