Re: DFSORT/ICETOOL: merge records from 2files
Hi, the problem is that I was not trusting the results (there was no match). Many thx anyway, A.cEcilio. On Wed, May 15, 2013 at 4:24 PM, Sri h Kolusu skol...@us.ibm.com wrote: It is quite easy to get the desired results using Joinkeys. The sample data you have shown does not have any matching records. It would have been nice if you showed the required output also //STEP0100 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //INA DD * +1+2+3+4+5+6+7-- 1O1578 PAS.CMN.PADCMN02.CMNRPROM.D130423.T0545 23/04/2013 1O4901 PAS.CMN.PADCMN02.CMNRPROM.D130424.T0543 24/04/2013 1B4778 GET.THIS.DATASET.NAME.ASIT.MATCHED 24/04/2013 //INB DD * +1+2+3+4+5+6+7-- 1B2906,DEFERRED,QUEUED,49:18:37,3.90 1B4236,DEFERRED,QUEUED,48:54:04,2.63 1B4778,DEFERRED,QUEUED,48:49:18,3.90 1B4852,DEFERRED,QUEUED,48:46:45,3.90 //SORTOUT DD SYSOUT=* //SYSINDD * OPTION COPY JOINKEYS F1=INA,FIELDS=(1,6,A) JOINKEYS F2=INB,FIELDS=(1,6,A) REFORMAT FIELDS=(F1:1,52) //* The output from this job is 1B4778 GET.THIS.DATASET.NAME.ASIT.MATCHED If you just need the dataset name then change the REFORMAT statement to the following REFORMAT FIELDS=(F1:8,44) which will produce this output GET.THIS.DATASET.NAME.ASIT.MATCHED Hope this helps... Kolusu DFSORT Development IBM Corporation IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 05/15/2013 04:05:03 AM: From: af dc acbi...@gmail.com To: IBM-MAIN@listserv.ua.edu, Date: 05/15/2013 04:06 AM Subject: DFSORT/ICETOOL: merge records from 2files Sent by: IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu Hello, I know this is a newbie question and I got User Guide for DFSORT PTFs UK51706 and UK51707 near me, but I can't get this done: F1 file: EDIT PRS.CTT.FWK310 Command === ** * Top of D 01 1B2906,Deferred,Queued,49:18:37,3.90 =COLS +1+2+3+--- 02 1B4236,Deferred,Queued,48:54:04,2.63 03 1B4778,Deferred,Queued,48:49:18,3.90 04 1B4852,Deferred,Queued,48:46:45,3.90 F2 file: EDIT PRS.CTT.FWK120 Columns 1 0 Command === Scroll === ** * Top of Data * 01 1O1578 PAS.CMN.PADCMN02.CMNRPROM.D130423.T0545 23/04/2013 =COLS +1+2+3+4+5+6+-- 02 1O4901 PAS.CMN.PADCMN02.CMNRPROM.D130424.T0543 24/04/2013 Both files are FB/80. I want to get all dsns from F2 file from F1 volser list., so key is 1,6 in both files. Any hints are welcome. Many thx, A.Cecilio -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT/ICETOOL: merge records from 2files
Show the complete jobstep you are using, including all the sort control cards, and some samples from the actual input files that you think should produce a match. Your original message stated that both files contained volser data in positions 1-6 but your sample input showed that to be false. :: -Original Message- :: From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On :: Behalf Of af dc :: Sent: Thursday, May 16, 2013 9:13 AM :: To: IBM-MAIN@LISTSERV.UA.EDU :: Subject: Re: DFSORT/ICETOOL: merge records from 2files :: :: Hi, :: the problem is that I was not trusting the results (there was no match). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
DFSORT/ICETOOL: merge records from 2files
Hello, I know this is a newbie question and I got User Guide for DFSORT PTFs UK51706 and UK51707 near me, but I can't get this done: F1 file: EDIT PRS.CTT.FWK310 Command === ** * Top of D 01 1B2906,Deferred,Queued,49:18:37,3.90 =COLS +1+2+3+--- 02 1B4236,Deferred,Queued,48:54:04,2.63 03 1B4778,Deferred,Queued,48:49:18,3.90 04 1B4852,Deferred,Queued,48:46:45,3.90 F2 file: EDIT PRS.CTT.FWK120 Columns 1 0 Command === Scroll === ** * Top of Data * 01 1O1578 PAS.CMN.PADCMN02.CMNRPROM.D130423.T0545 23/04/2013 =COLS +1+2+3+4+5+6+-- 02 1O4901 PAS.CMN.PADCMN02.CMNRPROM.D130424.T0543 24/04/2013 Both files are FB/80. I want to get all dsns from F2 file from F1 volser list., so key is 1,6 in both files. Any hints are welcome. Many thx, A.Cecilio -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: DFSORT/ICETOOL: merge records from 2files
It is quite easy to get the desired results using Joinkeys. The sample data you have shown does not have any matching records. It would have been nice if you showed the required output also //STEP0100 EXEC PGM=SORT //SYSOUT DD SYSOUT=* //INA DD * +1+2+3+4+5+6+7-- 1O1578 PAS.CMN.PADCMN02.CMNRPROM.D130423.T0545 23/04/2013 1O4901 PAS.CMN.PADCMN02.CMNRPROM.D130424.T0543 24/04/2013 1B4778 GET.THIS.DATASET.NAME.ASIT.MATCHED 24/04/2013 //INB DD * +1+2+3+4+5+6+7-- 1B2906,DEFERRED,QUEUED,49:18:37,3.90 1B4236,DEFERRED,QUEUED,48:54:04,2.63 1B4778,DEFERRED,QUEUED,48:49:18,3.90 1B4852,DEFERRED,QUEUED,48:46:45,3.90 //SORTOUT DD SYSOUT=* //SYSINDD * OPTION COPY JOINKEYS F1=INA,FIELDS=(1,6,A) JOINKEYS F2=INB,FIELDS=(1,6,A) REFORMAT FIELDS=(F1:1,52) //* The output from this job is 1B4778 GET.THIS.DATASET.NAME.ASIT.MATCHED If you just need the dataset name then change the REFORMAT statement to the following REFORMAT FIELDS=(F1:8,44) which will produce this output GET.THIS.DATASET.NAME.ASIT.MATCHED Hope this helps... Kolusu DFSORT Development IBM Corporation IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu wrote on 05/15/2013 04:05:03 AM: From: af dc acbi...@gmail.com To: IBM-MAIN@listserv.ua.edu, Date: 05/15/2013 04:06 AM Subject: DFSORT/ICETOOL: merge records from 2files Sent by: IBM Mainframe Discussion List IBM-MAIN@listserv.ua.edu Hello, I know this is a newbie question and I got User Guide for DFSORT PTFs UK51706 and UK51707 near me, but I can't get this done: F1 file: EDIT PRS.CTT.FWK310 Command === ** * Top of D 01 1B2906,Deferred,Queued,49:18:37,3.90 =COLS +1+2+3+--- 02 1B4236,Deferred,Queued,48:54:04,2.63 03 1B4778,Deferred,Queued,48:49:18,3.90 04 1B4852,Deferred,Queued,48:46:45,3.90 F2 file: EDIT PRS.CTT.FWK120 Columns 1 0 Command === Scroll === ** * Top of Data * 01 1O1578 PAS.CMN.PADCMN02.CMNRPROM.D130423.T0545 23/04/2013 =COLS +1+2+3+4+5+6+-- 02 1O4901 PAS.CMN.PADCMN02.CMNRPROM.D130424.T0543 24/04/2013 Both files are FB/80. I want to get all dsns from F2 file from F1 volser list., so key is 1,6 in both files. Any hints are welcome. Many thx, A.Cecilio -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN