toton_tcs

 Profile Answers by toton_tcs Questions by toton_tcs

• Mar 4th, 2010

YES  It's possible..but the level number should be same.

ragavprasanna

 Profile Answers by ragavprasanna Questions by ragavprasanna

• Aug 31st, 2008

Yes, it is possible, redefines means using (sharing) the same memory space. It is not necessary to share variables having same picture clause.

Answer Question  Select Best Answer

Kathir

• Jul 1st, 2017

Static Call: Sub programs compiled version of code is embedded with main program so if compile sub program with modified changes then main program is also being compiled. Dynamic Call:Sub programs ve...

Maria

• Jun 16th, 2015

We can identify whether the call is static or dynamic by seeing the CALL structure. Static Call: we refer the program name in the CALL statement. e.g. CALL PGM1 Dynamic call : we use one WS variabl...

Answer Question  Select Best Answer

Lalit Pant

• Jul 10th, 2014

Option b

Rishi Sharma

 Profile Answers by Rishi Sharma Questions by Rishi Sharma

• Jun 11th, 2014

Sorry Shashi and Soumya but this will work and answer would be B

Answer Question  Select Best Answer

• Aug 1st, 2012

C=B/A

Cathy

• Jul 1st, 2012

C.C=B/A

Answer Question  Select Best Answer

NEXT SENTENCE gives control to the verb following the next period. CONTINUE gives control to the next verb after the explicit scope terminator. (This is not one of COBOL II's finer implementations). It's safest to use CONTINUE rather than NEXT SENTENCE in COBOL II.

Read Best Answer

Editorial / Best Answer

Answered by: umapathi

• Jul 20th, 2006

---

the following code explains u clearly

If A>B

next sentence

end-if

display 1

display 2.

display 3.

     it will display only 3. if a>b

if a>b

continue

end-if

display 1

display 2.

display 3.

it will display 1 2 3. if a>b. let me know if it is not correct.

Prasanth Karthikeyan

• Sep 14th, 2018

Continue pushes the control to Add +1 to Input-count. Say if Input-count was 0 then the value will be iterated to 1

Next sentence will never add +1 to Input-count it will bypass the command. Say if Input-count was 0 then the value will remain same.

Amit

• Jan 17th, 2017

When NEXT SENTENCE is coded, Program will not add +1 to INPUT-COUNT.
When CONTINUE is coded, +1 will be added to INPUT-COUNT.

Improve 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

In the case of static call the mainprogram and subpgms r loaded into the mainmemory initially.in the case of dynamic call only the mainpgm is loaded first and the subpgm is loaded only when a call to it is made.so the memory utilization is good in dynamic call.

sadik s

• Jun 4th, 2016

Static and dynamic will be decided only on compiler if NODYNAM - it is static, if DYNUM then dynamic.

Saurabh Bandyopadhyay

• Mar 8th, 2016

In case of Static Call, we use the call literal. For example, CALL PGM1. In case of dynamic call, we define a variable and pass the sub-program name to it before calling. Ex- 01 WS-VAR1 PIC...

Answer Question  Select Best Answer

snehali

• Apr 3rd, 2013

The level number 02 to 49 are use to specify the group and elementary data items within a record.

Vaneeshkhurana

 Profile Answers by Vaneeshkhurana Questions by Vaneeshkhurana

• Mar 21st, 2010

Although level 02-49 level are group or elementry elements but sometimes 49 are used for dynmic SQL, i.e.01 WS-SQl-statement1-VARIABLE.    49  WS-SQL-STATEMENT1-LEN  &nbs...

Answer Question  Select Best Answer

What is redefine in COBOL?

Dhans

• Sep 2nd, 2019

The REDEFINES clause is used to store more than one data items in the same storage area. Syntax: level-number Data-name1 REDEFINES Data-name-2 data-name-1 is the redefining item or the REDEFINES su...

gauravaram

• Dec 6th, 2018

redefines class is something you can use the existing memory location for your new variable using the redefines caluse 01 emp-data pic x(100) 05 emp-name pic x (40) 05 emp-no pic x(20) 05 fi...

Answer Question  Select Best Answer

shashank

• Aug 18th, 2015

A.50

shashank

• Aug 18th, 2015

D..because comp1 and com2 value contains only hexadecimal value hence it predicts unpredictable value

Answer Question  Select Best Answer

An external sort is not COBOL; it is performed through JCL and PGM=SORT. It is understandable without any code reference. An internal sort can use two different syntaxes: 1.) USING, GIVING sorts are comparable to external sorts with no extra file processing; 2) INPUT PROCEDURE, OUTPUT PROCEDURE sorts allow for data manipulation before and/or after the sort.

Kirk

• Aug 8th, 2015

Internal sort uses the compilers internal sort features. External sort calls 3rd party utility sort feature.
External sort feature is usually used for LARGE volume of data.

rahul

• Dec 7th, 2014

Internal sorting is used to arrange a certain order in RAM or else we can say primary memory while external sorting is to sort order of external memory for huge data

Answer Question  Select Best Answer

What are the four divisions in COBOL

Read Best Answer

Editorial / Best Answer

venkat65318  

 Profile Answers by venkat65318 Questions by venkat65318

• Member Since Sep-2009 | Sep 13th, 2009

---

In Cobol there are 4 divisions.

1. Identification division or ID division
In this no setions are there. It has 5 paragraphs.
a. Progaram-id. programname
b. Author
c. Writen-date
d. Compiled-date
e. Installer

2. Environment Division
Under this there are two sub-sections
a. Configuration-section.
     Source compter.
     Object computer.
b. Input-Output section.
     File control.
     IO control.

3. Data Division
File-section.
Working-storage section.
Linkage section.
Report section.
Screen section.

4. Procedure Division

saurabh bandyopadhyay

• May 25th, 2012

There is another section in Data division; named as LOCAL-STORAGE SECTION.

For a recursive cobol program, you need to use that section to hold the current values of each variable while the program run.

Regards,
Saurabh Bandyopadhyay.
Mainframe Developer, India.

Nithya

• May 10th, 2012

IDENTIFICATION DIVISION */ mandatory */should contain PROGRAM-ID ENVIRONMENT DIVISION ...

Improve Answer

No comments

TheMadProfessor

 Profile Answers by TheMadProfessor Questions by TheMadProfessor

• Oct 12th, 2009

There are a great many more than two: COPY and INCLUDE are two such.

sethy.pradeep

 Profile Answers by sethy.pradeep Questions by sethy.pradeep

• Nov 20th, 2008

Only Copy & Include these two verbs are used in data division.Regards,Pradeep

Answer Question  Select Best Answer

VISHAL

• Jan 25th, 2020

01-49--------------W-S-SECTION
02-49---------------FILE SECTION

giriswamy

• Aug 17th, 2012

Except 66 and 88 levels it will work.

Answer Question  Select Best Answer

Lagnesh prithiviraj

• Nov 21st, 2017

Using ICETOOL, Below syntax will get just all duplicates if duplicates are decided based first eight charactes
SELECT FROM(SORTIN) TO(SORTOUT) ON(1,8,CH) ALLDUPS DISCARD(SORTXSUM)

raman gupta

• May 26th, 2017

//STEP010 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //SYSPRINT DD SYSOUT=* //SORTIN DD DSN=TEST...

Answer Question  Select Best Answer

Ramesh

• Jun 16th, 2012

Yes...You can define redefines clause at all levels except 66 and 88 in working-storage section....where as in file section we cant redefine at 01 level..other than this you can...and you cant redefine at occurs clause level...

PKK

• Dec 9th, 2011

The REDEFINES clause can be used when the two data items have the same level number. The exceptions are when the special purpose 66 or 88 level numbers are used and when the level number is at 01 in t...

Answer Question  Select Best Answer

Harsha

• Jul 26th, 2014

Redefine with occur is possible
Redefine within occur is possible
Occur within redefine is possible
Redefining occur clause is not possible

Let me know if anything is not clear

ARPANA K CHANDRA

• May 10th, 2012

NO.occurs cant be redefined.

Answer Question  Select Best Answer

05 WS-VAR1 PIC X(5),05 WS-VAR2 REDEFINES WA-VAR1 PIC 9(5),PROCEDURE DIVISION MOVE 'ABCDE' TO WS-VAR1.Now what is the value of WS-VAR1 and WS-VAR2 ?

Jeevan Poojar

• Apr 25th, 2021

WS_VAR1 - ABCDE
WS-VAR2 - A CDE

supriya

• Sep 5th, 2017

Here given 05 WS-VAR2 redefines WA-VAR1 pic 9(5). means WA-VAR1 should be defined in working storage so while compiling it will throw the error. but excluding this next statement in procedure division is move abcde to ws-var1. means value of ws-var1 is =abcde

Answer Question  Select Best Answer

Dear Friends,

This is regarding COBOL comp.

PIC X(3) occupy the 3 bytes... but PIC 9(3)V9(7) COMP occupied how much bytes?

I said in interview that 10/2 = 5 bytes. V is specified for decimal point.

Is that correct? But interviewer looked at me differently when I said this answer?

If you are more confident, please reply this ...thanks...

Jyoti Kalagi

• Feb 15th, 2023

We can store only 9 and S not V in comp ,if we want to store decimal use comp-3 not comp

rathna

• Aug 17th, 2022

N/2 for even number and than +1. (n+1/2) for odd number.
3+7=10
10/5= 5
5+1=6

Answer Question  Select Best Answer