Searching for "HO"

Q:

In the JCL, how do you define the files referred to in a subroutine ?

Answer

Supply the DD cards just as you would for files referred to in the main program.

Report Error

View answer Workspace Report Error Discuss

Q:

How do you sort in a COBOL program? Give sort file definition, sort statement syntax and meaning.

Answer

Syntax:


SORT   file-1 ON ASCENDING/DESCENDING KEY key....


USING  file-2


GIVING file-3.


 


USING can be substituted by INPUT PROCEDURE IS para-1 THRU para-2


GIVING can be substituted by OUTPUT PROCEDURE IS para-1 THRU para-2.


 


file-1 is the sort workfile and must be described using SD entry in FILE SECTION.


file-2 is the input file for the SORT and must be described using an FD entry in FILE SECTION and SELECT clause in FILE CONTROL.


file-3 is the outfile from the SORT and must be described using an FD entry in FILE SECTION and SELECT clause in FILE CONTROL.


file-1, file-2 & file-3 should not be opened explicitly.


 


INPUT PROCEDURE is executed before the sort and records must be RELEASEd to the sort work file from the input procedure.


OUTPUT PROCEDURE is executed after all records have been sorted. Records from the sort work file must be RETURNed one at a time to the output procedure.

Report Error

View answer Workspace Report Error Discuss

Q:

How do you define a sort file in JCL that runs the COBOL program?

Answer

Use the SORTWK01, SORTWK02,..... dd names in the step. Number of sort datasets depends on the volume of data being sorted, but a minimum of 3 is required.

Report Error

View answer Workspace Report Error Discuss

Q:

How do you handle errors in CICS programs?

Answer

Check EIBRESP after the call or use the HANDLE condition.


 

Report Error

View answer Workspace Report Error Discuss

Q:

How would you resolve an ASRA abend?

Answer

In COBOL II start with CEBR, and get the offset/instruction.

Report Error

View answer Workspace Report Error Discuss

Q:

Explain how to handle exceptional conditions in CICS?

Answer

An abnormal situation during execution of a CICS command is called an exceptional condition:


1. Handle Condition Command: It is used to transfer control to the procedure label specified if the exceptional condition specified occurs.


2. Ignore Condition Command: It causes no action to be taken if the condition specified occurs in the program. That is control will be returned to the next instruction following the command which encountered the exceptional condition.


3. No Handle Option: This option can be specified in any CICS command and it will cause no action to be taken for any exceptional condition occurring during execution of this command.


4. RESP Option: This option can be specified in any CICS command. If the RESP option is specified in a command, CICS places a response code at a completion of the command. The application program can check this code, then proceed to the next processing.

Report Error

View answer Workspace Report Error Discuss

Q:

How will u send data from a cobol file to db2 table?

Answer

USING HOST VARIABLE we can pass data from COBOL to DB2

Report Error

View answer Workspace Report Error Discuss

Q:

How can record locking be achieved in those DB2 versions which do not support it?

Answer

It can be done by setting the record length’s size to more than half of the page’s size.

Report Error

View answer Workspace Report Error Discuss