Answer / venkat

specify the field as GLOBAL.

EX.
Main program
WSS.
01 WS-ENO PIC X(9) GLOBAL.

Sub program.
PD.
DISPLAY WS-ENO.

Answer / lakshmisudha

if we defined the variables in main program like below
data division
working-storage section.
01 a1 pic 99.
01 a2 pic 9(3).
if you want use same variables in sub program you define
like below in sub program
DATA DIVISION.
LINKAGE SECTION.
01 B1 PIC 99.
01 B2 PIC 9(2).
PROCEDURE DIVISION USING A1, A2.

Mainframes gets a text file that contains the name of the file. Now using JCL i want to locate that file name in the mainframe system and perform further processing. Please tell how to proceed

0 Answers  

---

shall we concordinate two different length dataset in to a new date set.

6 Answers  

---

proc1,proc2,up to proc5 is there if i want to call proc1 and proc5how can u write the code

2 Answers  

---

1.How to check for the errors using TYPRUN=SCAN?What will be the output if we give TYPRUN=SCAN?

11 Answers  

---

how to identify the file used in the JCL is an VSAM file. Just seeing the JCL code how can we track the file as VSAM file?

6 Answers   CSC,

---

How do you check the syntax of a JCL without running it?

17 Answers  

---

a jcl has 2 steps. How to code the jcl such that if step1 abends, then step2 runs. Else, job terminates with step1?

1 Answers   IBM,

---

There are 5 steps in a Job. How to bypass the first step by making use of only COND Parameter and not using any Restart and IF/THEN/ELSE parameter?

11 Answers   IBM,

---

what is DSN in JCL and what are the parameters to declare the DSN?

0 Answers  

---

i have 6 steps in my jcl program after going to 5th step i want to execute 3rd step.....how can i do it....by using(RESTART) can i do it or not?

2 Answers   Wipro,

---

01 GROSS-PAY 05 BASIC-PAY PIC 9(5) 05 ALLOWENCES PIC 9(3) if BASIC-PAY has a value 1000 and ALLOWENCES has a value of 250,what will be displayed by the statement DISPLAY GROSS-PAY a.1250 b.01000250 c.01250 d.1.250

1 Answers  

---

How to see the COMP3 value(packd decimal)

2 Answers   iGate,

---