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.

How to concatenate different LRECL of files?

2 Answers   IBM,

---

what r the types of job control statements?

2 Answers  

---

if we have a job consist of two steps and each step calling a proc having 10 steps each then how many steps are counted only 2 or 22(10+10+1+1)? can we have more than 255 steps in a single job?

5 Answers   Accenture,

---

a set statement is used to define commonly used symbolic across job steps or procedures. It initializes the previous values in the symbolic names. It has to be defined before the first use of the symbolic names in the jcl. State whether true or false?

0 Answers   IBM,

---

Step 1 RC 4 Step 2 Step 3 I want to know the COND parameter which can be coded in step 2 or 3. Step 2 should be executed based on Step 1 RC and Step 3 should not be executed based on step 1's RC

0 Answers  

---

What are the causes for S0C1, S0C4, S0C5, S0C7, S0CB abends ?

11 Answers   Tesco,

---

how can u identify the db2 from jcl ?

2 Answers   TCS,

---

List the various advantages of using jcl language?

0 Answers  

---

Can I concatenate various datasets whose organization are different from each other. Lets say I want to cancatenate a PDS file, a PS file, a GDG file etc. Can You do that ?? If yes, how ? is there any separate Utility to do so ???

4 Answers  

---

There is a procedure in A.B.PROCS(PROC1) (member name is PROC1) //PROCA... There is a call to a procedure PROCA from a JOB. //STEP01 EXEC PROCA ... Here "PROCA" in JOB refers to the actual PROC name or the member name of the PDS where this PROCA is stored.

2 Answers   Merrill Lynch,

---

what is force complete

2 Answers   IBM,

---

What is the purpose and meaning of the TIME keyword and what JCL statement is it associated with?

1 Answers  

---