satya valluru

• May 29th, 2012

STOP RUN: We can use only in Main PGM.will return control BACK to O.S
GO BACK: We can use in both Main & Sub PGMs.will return control BACK to Main PGM or O.S.
EXIT-PROGRAM:Only for Sub PGM.will return control BACK to Main PGM.

ramesh4greek

 Profile Answers by ramesh4greek Questions by ramesh4greek

• Jun 11th, 2010

STOP RUN: IT terminates the current program.GO Back: When we apply in place of stop run the loop will be continued infinately.Exit: It's a optional one, for paragraphs we can apply this one.Eg: Pa...

Answer Question  Select Best Answer

What is the difference between INSPECT & EXAMINE?

subha2010

 Profile Answers by subha2010 Questions by subha2010

• Aug 10th, 2010

Inspect will inspect leading space and special characters ..Examine will check for spaces even in between statements.

masti.mainframe

 Profile Answers by masti.mainframe Questions by masti.mainframe

• Sep 3rd, 2009

Both are same meaning one is used in Cobol-II other in Cobol-I. According to syntax INSPECT identifire-1 TALLYING identifier-2 FOR ALL identifire BEFORE identifire. ...

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

davindersingh29

 Profile Answers by davindersingh29 Questions by davindersingh29

• May 17th, 2013

Just to add, my two cents: Data items in the LOCAL-STORAGE SECTION are automatically allocated for each instance of a program invocation. When a program runs in multiple threads simultaneously, each ...

Toleshwar

• Mar 14th, 2013

Local storage section is a section of Data Division of Cobol which is similar to the Working storage section. The only difference being that the variables in the Local Storage always get initialised w...

Answer Question  Select Best Answer

I need to concatenate records by using cobol and jcl (both) as follows.

Input File:

AAAAA
BBBBB
CCCCC
DDDDD
11111
22222
33333
44444

Split the file into two halves and
1st rec of first half and 2nd rec of second half records are concatinated and
2nd rec of first half and 2nd rec of second half records are...

GAURAVARAM

• Dec 6th, 2018

Please post your requirement clearly .. If you have to concatenate the records from two different files you can use IEBGENER

Code
 

Kalyan

• Mar 20th, 2018

Outrec overlay=(5:13,3,9:5,3,13:17,3,17:9,3)

Answer Question  Select Best Answer

gopalchand

 Profile Answers by gopalchand Questions by gopalchand

• Dec 3rd, 2009

It is a Figurative Constant

peaceabhi

 Profile Answers by peaceabhi Questions by peaceabhi

• Nov 7th, 2009

Figurative

Answer Question  Select Best Answer

In COBOL II the 88 levels can be set rather than moving their associated values to the related data item. (Web note: This change is not one of COBOL II's better specifications.)

Nath

• Sep 13th, 2013

@poojaDeep & @gilbat82, As you said, I have three doubts. 1. While starting execution of the program after declaring in working storage as you said, what are the initial values (TRUE or FALSE) are s...

gilbat82

 Profile Answers by gilbat82 Questions by gilbat82

• Jul 15th, 2008

Last answer is correct and below example also.e.g. 05  ACCOUNT-TYPE         PIC X(01) VALUE 'N'.        &nb...

Answer Question  Select Best Answer

TheMadProfessor

 Profile Answers by TheMadProfessor Questions by TheMadProfessor

• Oct 12th, 2009

CALL is an actual COBOL verb which invokes an external program and then returns. LINK does much the same, but is a CICS verb, not a COBOL one.

lfrank

 Profile Answers by lfrank Questions by lfrank

• Jan 8th, 2008

Be aware that CALL does not mean the called module is part of the load module. That is only true if it is a Static call. Dynamic calls do not include the called routine in the load module.This questio...

Answer Question  Select Best Answer

mainframetq

 Profile Answers by mainframetq Questions by mainframetq

• May 21st, 2008

   by default sign is trailing with no separate char and ans:    12345N

V

• Dec 13th, 2006

Output will be -123455

Answer Question  Select Best Answer

Rohit

• Feb 22nd, 2007

You can pass data from cobol to jcl by setting the value in RETURN register and fetching it in JCL.example, if file is empty, you can set return code by MOVE 22 to RETURN-CODEin JCL for that step executing the program you can define a COND parameter to handle that return code. Try it.

simmu

 Profile Answers by simmu Questions by simmu

• Nov 29th, 2006

Please explain what is internal readers. Please give some exampls too.

Answer Question  Select Best Answer

satya valluru

• Jun 5th, 2012

JCL:
//STEP1 EXEC PGM=SAMPLE,PARM=SATYA

COBOL:

LINKAGE SECTION.

01 PARM-VALUE.
05 PARM-LENGTH PIC S9(2) COMP-----it will store length of data we are passing from JCL
05 PARM-DATA X(10) -------------will store actual data we passed.

PROCEDURE DIVISION USING PARM-VALUE.

gandikotasiva

 Profile Answers by gandikotasiva Questions by gandikotasiva

• Apr 27th, 2012

PARM is used to pass data from JCL to COBOL
we can pass max of 100 bytes
first 2 bytes are reserved to length
thus we can pass only 98 bytes of data
--------------
Let me know if u need more information

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

natarajan

• Aug 22nd, 2017

Using sort utility, include the following command
sum fields=none;

Vengat

• Mar 19th, 2015

Sum Fields = None will do it

Answer Question  Select Best Answer

vijay

• Jul 31st, 2011

------>Just read all records into an array....
------>Then read records in reverse order by using subscript or index from array....
------>Now write records into new file....

P.Karthikkumar

• Jan 17th, 2007

Hi, It is possible through jcl. For example if the input file contains 80 record length thenIn sort, INREC=(1:1,80,81:SEQNUM,6,ZD),SORT FIELDS=(81,6,ZD,D),OUTREC=(1:1,80) 1) Using inrec...

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

how do you read a file in reverse order through COBOL program?

sunny

• Jun 28th, 2017

Add a seq number to file thru JCL (1:seqnum,3,zd) and sort the file in descending order sortfields=copy, include cond=(1,3,zd,d) after this provide the file in Cobol as input.

Gyanendra Singh

• Jul 7th, 2016

Can be done in VSAM : by using Low and HIGH-VALUE
If you pass HIGH-VALUE to the key field, then it will read the record from bottom

Answer Question  Select Best Answer

Harsha

• Jul 24th, 2014

Both are binary values. One can have + or - values while other can only have + values

Pradip Wagh

• Apr 17th, 2014

First is Binary storage and Second one is just Numeric storage.
Also, First will take 2 bytes of storage whereas Second one requires 4 Bytes of memory.

Correct me if I am wrong.!!!

Answer Question  Select Best Answer

INITIALIZE moves spaces to alphabetic fields and zeros to alphanumeric fields. The REPLACING option can be used to override these defaults.

sunapana

 Profile Answers by sunapana Questions by sunapana

• Apr 17th, 2010

DATA DIVISION. WORKING-STORAGE SECTION. 01 Var-C. 05 Var-d PIC x VALUE "A". 05 Var-e PIC 9 VALUE 5. 05 FILLER PIC X(2) VALUE 'HI'. PROCEDURE DIVISION. PUTPARA. DISPLAY VAR-D. DISPLAY VAR-E. ...

panzer1

 Profile Answers by panzer1 Questions by panzer1

• Feb 1st, 2010

Yes,  the "VALUE' is used once to set the value at the beginning of the program execution.The "INITIALIZE" can be used multiple times any where in the program after execution begins.

Answer Question  Select Best Answer

talluri

 Profile Answers by talluri Questions by talluri

• Jul 27th, 2011

One to many possible

many to many not possible

many to one not possible

many to many not possible

Babjee Talluri

TheMadProfessor

 Profile Answers by TheMadProfessor Questions by TheMadProfessor

• Oct 12th, 2009

No, while a single sending field can be sent to multiple targets such as MOVE A to C, Dthe only way to send mutiple sending fields to multiple target fields is via a MOVE CORRESPONDING.

Answer Question  Select Best Answer

TheMadProfessor

 Profile Answers by TheMadProfessor Questions by TheMadProfessor

• Oct 12th, 2009

MOVE copies data from one field within the program to another. WRITE creates an entire record that is written to an external file defined to the program.I believe you are referring to 'TALLYI...

dipti

• Dec 12th, 2006

there is a registor called tally so the count is stored in this tally reg using tally verbmove to move the values between variables or between literals and variables or between corresponding variables having the same qualifierswrite is used to write a record in a file

Answer Question  Select Best Answer