Golgappa.net | Golgappa.org | BagIndia.net | BodyIndia.Com | CabIndia.net | CarsBikes.net | CarsBikes.org | CashIndia.net | ConsumerIndia.net | CookingIndia.net | DataIndia.net | DealIndia.net | EmailIndia.net | FirstTablet.com | FirstTourist.com | ForsaleIndia.net | IndiaBody.Com | IndiaCab.net | IndiaCash.net | IndiaModel.net | KidForum.net | OfficeIndia.net | PaysIndia.com | RestaurantIndia.net | RestaurantsIndia.net | SaleForum.net | SellForum.net | SoldIndia.com | StarIndia.net | TomatoCab.com | TomatoCabs.com | TownIndia.com
Interested to Buy Any Domain ? << Click Here >> for more details...


Explain about CBL/PROCESS statement syntax



Explain about CBL/PROCESS statement syntax..

Answer / dimpy19

>>-+-CBL-----+--+--------------+-------------------------------><
'-PROCESS-' '-options-list-'
You can use CBL as a synonym for PROCESS.


options-list - A series of one or more compiler options, each one separated by a comma or a space.

**Compiler option can be set up in two way
1. JCL
2. COBOL Code

1. JCL - pass in PARM in EXEC statement

//MANGO1 EXEC PGM=IGYCRCTL,
// PARM='NUM,NODYN,APOST,NOSEQUENCE,NONAME,NOMDECK,LIST'

2. COBOL Code - PROCESS LIST,NOOFFSET

PROCESS LIST,NOOFFSET
IDENTIFICATION DIVISION.
PROGRAM-ID. HELLO.
ENVIRONMENT DIVISION.
INPUT-OUTPUT SECTION.
FILE-CONTROL.
DATA DIVISION.
FILE SECTION.
WORKING-STORAGE SECTION.
01 VAR1 PIC 999 VALUE ZEROS.
01 VAR2 PIC 999 VALUE ZERO .
01 VAR3 PIC 999 VALUE ZEROS.
PROCEDURE DIVISION.
DISPLAY ' IN PROCEDURE DIVISION ' .
MOVE 12 TO VAR2.
MOVE 10 TO VAR3.
DIVIDE VAR1 INTO VAR2 GIVING VAR3.
DISPLAY ' VAR3 ' VAR3.
STOP RUN.



then go to sysout check message like below ---

The system detected a decimal-divide exception (System Completion Code=0CB).
From compile unit HELLO at entry point HELLO at compile unit offset +000001E2 at
address 25C001E2.

here offset +000001E2
take last 4 and check in compiler listing for the offset

000016: DIVIDE VAR1 INTO VAR2 GIVING VAR3.
0001D6 E902 D16C 80A0 000016 PKA 364(R13),160(3,R8)
0001DC E902 D15C 8098 000016 PKA 348(R13),152(3,R8)
0001E2 FD31 D178 D16A 000016 DP 376(4,R13),362(2,R13)
0001E8 F321 80A8 D178 000016 UNPK 168(3,R8),376(2,R13)
0001EE 96F0 80AA 000016 OI 170(,R8),X'F0'

now check line number 000016
000016** DIVIDE VAR1 INTO VAR2 GIVING VAR3.

Is This Answer Correct ?    0 Yes 0 No

Post New Answer

More JCL Interview Questions

Can I share my data with other jobs? How?

0 Answers  


is there any way to execute more than one proc in the same exec statement at the same time..?

0 Answers  


Name a few IBM utility programs, and explain its function.

0 Answers  


whats the difference between empty and noempty of GDG?

4 Answers   Patni,


is it possible to submitt more than one job in job card in jcl? and if yes than is it necessary to have the jobs same name?

4 Answers   Accenture,


. What is the difference between the following statements : I) step#1 exec PGM=accpay ii) step#1 exec tbalance

1 Answers  


do we need to mention the location of catalogued procedure for each it's call in a single job?

1 Answers  


What is the exact difference between PRTY and DPRTY

2 Answers   iGate,


what disp parameter we mention for creation of temporary dataset so that we can use it in later steps?

0 Answers   IBM,


What is JOBLIB ?

5 Answers   Xansa,


There are two input sorting files and there is a need to create one sort out file which contains data of both input files. What is the sort card for this. Write a sample JCL for this using a control card?

3 Answers  


Which is the most widely used batch performance monitor for DB2?

2 Answers  


Categories