Answer / dimpy19

"B (ALPHABETIC)" did not have a valid type for the specified class condition. T
nformational Warning Error Severe Terminating


WORKING-STORAGE SECTION.
01 B PIC A(7) VALUE '1'.
01 C PIC 9(4) VALUE 2.
PROCEDURE DIVISION.
IF(B NUMERIC)
ADD 10 TO C.
STOP RUN.

I have a COBOL program that Accepts some input data. How do you code the JCL statement for this? ( How do you code instream data in a JCL? )

9 Answers  

---

How can a stopped job be started again?

0 Answers  

---

i am trying to copy a PS file into VSAM file in step2 by using PGM=IDCAMS,COND=(0,LT) and the pS file is getting sorted in the step1. I got the return code 00 for step1 but step2 got flushed. can u please help on this. Below is My JCL. SEPP050 EXEC PGM=SORT,REGION=6144K SYSIN DD DSN=SYSCMN.PROD.CCLIB (F5910BNN), DISP=SHR SYSOUT DD SYSOUT=* SYSUDUMP DD SYSOUT=A SORTIN DD DSN=Z1225BT.F5910EPP.HISOUT, DISP=SHR SORTOUT DD DSN=Z1225BT.F5910EPP.HISOUT.SORTOUT5, DISP= (NEW,CATLG,DELETE),UNIT=DELQ, SPACE=(CYL, (500,500),RLSE), DCB= (RECFM=FB,LRECL=1606,BLKSIZE=16060,BUFNO=15) SORTWK01 DD UNIT=SYSDA,SPACE=(CYL, (1)) SORTWK02 DD UNIT=SYSDA,SPACE=(CYL, (1)) SORTWK03 DD UNIT=SYSDA,SPACE=(CYL, (1)) SORTWK04 DD UNIT=SYSDA,SPACE=(CYL, (1)) SYSIN1 DD UNIT=VIO,SPACE= (80,1) * SEPP060 EXEC PGM=IDCAMS,COND= (0,LT) SYSPRINT DD SYSOUT=* SYSOUT DD SYSOUT=* SYSLIST DD SYSOUT=* *** DD01 DD DSN=Z1225BT.F5910EPP.HISOUT.SORTOUT, // DISP=SHR //*** //DD01O DD DSN=Z1225BT.F5910PHS, // DISP=SHR, // AMP=(AMORG,'BUFND=12,BUFNI=5') //SYSIN DD DSN=SYSCMN.PROD.CCLIB(F5910BBB), // DISP=SHR Output RC for the two steps: SDCBPJ05 SEPP050 00 236 .00 .00 .0 SDCBPJ05 SEPP060 FLUSH 0 .00 .00 .0

3 Answers  

---

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

11 Answers   Tesco,

---

if time parameter is not coded on the job card and job step then what is the default time assigned to the entire job and for each step in the job by the systyem ?

2 Answers   ITC Infotech,

---

List some valid operation codes in JCL

3 Answers  

---

In jcl i have 255 steps. In 255 step i declared proc. In proc i have 20 steps this job is executable or not? why?

4 Answers  

---

Explain the function of the steplib dd statement?

0 Answers  

---

What are the maximum and minimum sizes of any CONTROL AREA (VSAM datasets) ?

2 Answers   Patni,

---

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

1 Answers  

---

What is primary allocation for a dataset?

4 Answers  

---

Can an individual step be restricted from using all the jobs allowed cpu time?

0 Answers  

---