Interested to Buy Any Domain ? << Click Here >> for more details...
I have two input files
i/p1
name id-key flag date
i/p 2
name id-key date
if id-key matches in the both the files then it should
write the output file from i/p1 with flag 'Y'. It should be
done thru JCL sort card ,Please provide the info on this.
---Note : output file should have all records from i/p1
with proper Flag.
- 2 Answers
- 5937 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / muttaiah
Please give us a sample of both the I/P files and the data
you expect in O/P files so that it will be useful for us to
answer
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / vivek chandrasekaran
Give the two input files to be compared as
//SORTIN DD DSN=INPUT1,DISP=SHR
// DD DSN=INPUT2,DISP=SHR
//SORTOUT DD DSN=OUTPUT,DISP=...
//SORTXSUM DD DSN=MATCH,DISP=(NEW,CATLG,DELETE),..
//SYSIN DD *
SORT FIELDS=(11,5,CH,A),EQUALS
SUM FIELDS=NONE,XSUM
Considering name length 10 and key length 5 starting from
11 pos. XSUM will capture the duplicates. EQUALS will keep
the first duplicate record. To put 'Y' flag use OUTREC
FIELDS=(1:1,15,16:C'Y',17:17,8) considering date length 8
starting from 17 pos.
SUM FIELDS=NONE
| Is This Answer Correct ? | 0 Yes | 0 No |
What type of versions we r using in mainframe (jcl, cobol, db2, vsam, cics)?
what if any ,is the syntax error in the following piece of code 01 B PIC A(7) 02 C PIC 9(4) ........ IF(B NUMERIC) ADD 10 TO C a.the condition in the if statement is wrong b.noting is wrong c.because C is initialised.ADD 10 TO C is wrong d.both B and C shoud have same size.
Explain the function of //jcllib statement?
What is a GDG
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 ?
How to send different PARM values based on the any condition to the program in a JCL? For example :- If the time is before 12:00 pm, I want to send "A" to some program and if it past 12:00 pm , I want to send "B" as a PARM value to that program. How to do it thur JCL only?
How to concatenate different LRECL of files?
Suppose there r 10 steps . Out fo which i want to execute 10th, 9th and 8th in reverse order without using IEBEDIT. How can i do that..???
How to release a JOB (from the input queue) held by TYPRUN = HOLD ? and how to see the installation default time after which a JOB will be automatically released ? How to see the list of currently HELD JOBS ?
what is the meaning of 'sysin dd dummy'
What are the parameter we cannot use in procedure?
What methodology can be adapted to transfer data to a program that is coded using the exec statement?
COBOL 
