Hi, Can any one tell how to use copybook in COBOL, and please explain with file structure(means i am using 5 fields of file and i want to declare them in copybook and and i want use it in COBOL programming)

gandikotasiva

 Profile Answers by gandikotasiva Questions by gandikotasiva

• Apr 27th, 2012

Don't forget to specify the library where that copy book resides ie.., in SYSLIB

rasheeed17

 Profile Answers by rasheeed17 Questions by rasheeed17

• Jan 3rd, 2012

Workinfg-storage section. pds: TEST.RASH.LIB.ABC.COPY(COPYBK1) 02 VAR-LIST. 05 VAR1 PIC X(10) 05 VAR2 PIC X(10) 05 VAR3 PIC X(10) 05 VAR4 PIC X(10) 05 VAR5 PIC X(10) TEST.RASH.LIB.ABC.PROG(TESTP...

Answer Question  Select Best Answer

what are the transaction commands in cics? Explain with an example and sample code ?

babjee talluri

• Jul 26th, 2011

CECI:-- cics execution command interpreter CEMT:-- cics execution master terminal(sing this we can copy the load module from batch to online & know program-id associated...

Answer Question  Select Best Answer

when will occur -811 abend? how will u resolve the -811 abend?

rasheeed17

 Profile Answers by rasheeed17 Questions by rasheeed17

• Jan 19th, 2012

- You will get -811 abend when your SQL query returns more than one record. - COBOL do not have ability to handle more than one db2 record at a time. - You must USE CURSOR If your query returns mor...

6983manish

 Profile Answers by 6983manish Questions by 6983manish

• Nov 12th, 2011

If the need is to get any of the row qualified for the predicates given , you can use "Fetch First 1 Row Only" with your select query.

OR

If you are interested all the data qualified for the query , there is no option except the use of Cursors.

Answer Question  Select Best Answer

write a program the following scenarios, declare vsam ksds cluster by jcl by the following record layout?customer info(7) comp3,customer no x(6),customer name x(20),customer address x(35),customer mail-id x(25),and load the above layout thru jcl?

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

i am passing data from jcl using parm to COBOL-db2 program, where can u retrieve the passing data in COBOL-db2 program and where it stored?

Gunesh Asatkar

• Feb 13th, 2013

The parm parameter is used to passed data from jcl to cobol program.
The max 100 character we can sent by parm parameter including special character.
And value get by code s9(4)comp var in linkage section

rasheeed17

 Profile Answers by rasheeed17 Questions by rasheeed17

• Jan 19th, 2012

Whether it simple Cobol program or an COBOL-DB2 program. passing PARM value & reading it with in program is same for both. - We have to define an variable for PARM in linkage section - LINKAGE SECTI...

Answer Question  Select Best Answer

how can u resolve soc7 abend? how do you know the cause for soc7 abend? how do you findout. where soc7 abend occurs?

SUPRIYA

• Sep 7th, 2017

Soc7 abend occurs due to invalid or nonnumeric data entered in numeric field.

Guru

• Feb 27th, 2016

SOC7 abend typically happens due to data type mismatch such as numeric data in an alpha field. Way to fix is to validate the data before the move and move it to the appropriate data type variable.

Answer Question  Select Best Answer

i have 10 steps in my job, how can i execute second step without executing first step, without using restart and commenting first step?

dhin

• Sep 4th, 2017

Using IEBEDIT utility

Nagaraju

• May 23rd, 2017

Using COND Parameter, cond parameter coded on step1 in these ways COND=ONLY

Answer Question  Select Best Answer

if i changed one column of table, and i want to know impact of that change?(how do you do impact analysis from ISPF panel,explain in detail?

Aloke Deb

 Profile Answers by Aloke Deb Questions by Aloke Deb

• Jul 25th, 2011

Go to ISPF panel and use the 3.14 option. Type the name of the column and in the Dataset field type the PDS which contains the Programs followed by (*). This will search the library and find all the p...

Answer Question  Select Best Answer

how do you read a ksds file in reverse order?

hemanth.pesce

 Profile Answers by hemanth.pesce Questions by hemanth.pesce

• Sep 29th, 2011

- Use STARTBR Command to point it to last record with by moving Keys to HIGH values .
-Then use READPREV to read records ...

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