Interested to Buy Any Domain ? << Click Here >> for more details...
Write a JCL by using the below requirement:
File1 =1, File2 =11 and output needs to come as File3 =111?
- 8 Answers
- 19415 Views
- Saggezza, I also Faced
- E-Mail Answers
Answer Posted / msharib
One can try this
//STEP2 EXEC PGM=SORT
//IN1 DD *
1
/*
//IN2 DD *
111
/*
//SORTOUT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//SYSIN DD *
JOINKEYS F1=IN1,FIELDS=(1,1,A)
JOINKEYS F2=IN2,FIELDS=(1,1,A)
REFORMAT FIELDS=(F1:1,1,F2:1,3)
OPTION COPY
/*
| Is This Answer Correct ? | 0 Yes | 0 No |
Post New Answer View All Answers
What is the purpose of dd * statement in jcl?
Name a few IBM utility programs, and explain its function.
I HAVE A VB BLOCK WHICH IS USED AS INPUT IN COBOL CONATINING SOME RECORDS CAN I CHANGE THE FILE FROM VB TO FB?
How do you create a temporary dataset?
What are the difference between jcl and jes?
Explain the function of dd name parameter with a 2 part structure; audit.report?
what is the purpose of coding notify parameter in job statement?
I want to join to input files and write the matching fields on to an output file but i dont want the output file a sorted one
what sort card you will use to copy the data from one dataset to another dataset?
how you can direct the data to spool using SYSOUT option?
In job processing, what happens in conversion stage?
which utility is used to run a cobol-db2 program?
Immediate Job opening for mainframe professionals in Keane Bangalore. Please find the below details: Organization: Keane India Location: Bangalore Skill: COBOL, JCL,VSAM,DB2,CICS,IMS,REXX,CLIST Exp: 1 to 4 years only Employment Type: Permenant Employee Note: If you have attended keane interview in past 6 months please ignore this job opening. Please respond to email id keanemfjob@gmail.com OR keanemfjob@yahoo.in with your latest resume and following details, We will contact you within 24 hours: Total IT Exp: Exp in Mainframe: Current CTC: Expected CTC: Notice Period:
WORKING-STORAGE SECTION. 01 GROSS-PAY. 05 BASIC-PAY PIC 9(5). 05 ALLOWENCES PIC 9(3). PROCEDURE DIVISION. MOVE 1000 TO BASIC-PAY. MOVE 250 TO ALLOWENCES. DISPLAY GROSS-PAY. STOP RUN. 77 W-A PIC 9(3)V99 VALUE 23.75 77 W-B PIC ZZ9V99 VLAUE 123.45 after the statement MOVE W-A TO W-B what will be W-B's value? a.123.75 b.b23.75 (where b indicates space) c.023.75 d.invalid move
How do you access an uncatalogued dataset in a jcl?
