Explain about CBL/PROCESS statement syntax
- 1 Answers
- 2255 Views
- I also Faced
- E-Mail Answers
>>-+-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 |
What is the difference between run mode and addressing mode?
How are GDGs concatenated?
Hi, can we call catalog( say myproc } proc n times in jcl if so how please explain Thanks in advance
What are isolation levels? Where do we need to specify them in compiling JCL?
how can u understand ps and pds from their names ?
Given a input file with duplicates how to remove the duplicate records from the file using JCL?
6 Answers CDS, Convergys, TCS,
What is the difference between specifying DISP=OLD and DISP=SHR for a dataset?
How does the jcl specify the job to os?
how to have variable length record in outrec..i have the requmt as follows.. i/p file variable lenght record output file : i need to alter the input and write into outrec(another file) sort fields: copy from(dd1) using ctl1 ctl1cntl dd * outfil fnames=xxx, outrec=(1,131) here i outrec is bombing with error..how to overcome this defect...???
Ques: How can we code COND parameter in a JCL so that only even steps (or only odd steps) get execute??
IN MY JCL I VE 8 STEPS I WANT TO EXCUTE STEP 8 FIRST THEN EXCUTE STEP 4 ,HOW WILL EXCUTE STEP 8 BEFORE STEP 4?
7 Answers Cognizant, IBM, IGT,
What is the parameter to be passed in the job card for the unlimited time , irrespective of the job class ?
COBOL 
