IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Syncsort -display recs in file A,which are matched in File B


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Fri Oct 22, 2010 11:13 pm
Reply with quote

fb,

If I understand what you want correctly, you can use a DFSORT/ICETOOL job like the following:

Code:

//S1 EXEC PGM=ICETOOL
//TOOLMSG DD SYSOUT=*
//DFSMSG DD SYSOUT=*
//IN1 DD *
A1
A1
B1
C1
A1
C1
C1
D1
//IN2 DD *
A1
B1
C1
B1
C1
//T1 DD DSN=&&T1,UNIT=SYSDA,SPACE=(CYL,(5,5)),DISP=(,PASS)
//T2 DD DSN=&&T2,UNIT=SYSDA,SPACE=(CYL,(5,5)),DISP=(,PASS)
//OUT DD SYSOUT=*
//TOOLIN DD *
SORT FROM(IN1) TO(T1) USING(CTL1)
SORT FROM(IN2) TO(T2) USING(CTL1)
COPY JKFROM TO(OUT) USING(CTL2)
//CTL1CNTL DD *
  SORT FIELDS=(1,2,CH,A)
  OUTREC OVERLAY=(81:SEQNUM,8,ZD,RESTART=(1,2))
//CTL2CNTL DD *
  JOINKEYS F1=T1,FIELDS=(1,2,A,81,8,A),SORTED,NOSEQCK
  JOINKEYS F2=T2,FIELDS=(1,2,A,81,8,A),SORTED,NOSEQCK
  REFORMAT FIELDS=(F1:1,80)
  OPTION COPY
/*
Back to top
View user's profile Send private message
foolsbrain

New User


Joined: 15 Apr 2010
Posts: 11
Location: chennai

PostPosted: Tue Oct 26, 2010 6:03 pm
Reply with quote

Hi Frank,
Thanks for the code...
While trying to execute the above jcl, am getting the below error in copy step. Please help on this.

Code:


         COPY JKFROM TO(OUT) USING(CTL2)
SYT050E  INVALID OPERAND ON "COPY" STATEMENT
SYT030I  OPERATION COMPLETED WITH RETURN CODE 12

SYT015I  PROCESSING MODE CHANGED FROM "STOP" TO "SCAN" DUE TO OPERATION FAILURE
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8796
Location: Welsh Wales

PostPosted: Tue Oct 26, 2010 6:06 pm
Reply with quote

Methinks that Frank will take no further part in this thread as the product being used in SYNCSORT.

DFSORT and SYNCSORT are competitive products.
Back to top
View user's profile Send private message
Frank Yaeger

DFSORT Developer


Joined: 15 Feb 2005
Posts: 7129
Location: San Jose, CA

PostPosted: Tue Oct 26, 2010 8:29 pm
Reply with quote

The job works fine with DFSORT/ICETOOL. The SYT messages indicate you're using Syncsort, not DFSORT. I'm a DFSORT developer. DFSORT and Syncsort are competitive products. I'm happy to answer questions on DFSORT and DFSORT's ICETOOL, but I don't answer questions on Syncsort.
Back to top
View user's profile Send private message
Anuj Dhawan

Superior Member


Joined: 22 Apr 2006
Posts: 6248
Location: Mumbai, India

PostPosted: Tue Oct 26, 2010 9:10 pm
Reply with quote

That's why we usually ask to start over a new thread - the OP had DFSORT while foolsbrain posted a related question in between and we all know the end result now! icon_neutral.gif
Back to top
View user's profile Send private message
Arun Raj

Moderator


Joined: 17 Oct 2006
Posts: 2481
Location: @my desk

PostPosted: Wed Oct 27, 2010 11:54 am
Reply with quote

Anuj Dhawan wrote:
That's why we usually ask to start over a new thread - the OP had DFSORT while foolsbrain posted a related question in between and we all know the end result now! icon_neutral.gif
Will it help if the topic is "cut" into two?. The original topic has grown big for no reason icon_rolleyes.gif
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM Goto page Previous  1, 2

 


Similar Topics
Topic Forum Replies
No new posts Unable to interpret a hex value to De... COBOL Programming 7
No new posts Syncsort help SYNCSORT 3
No new posts SYNCSORT-DB2 interface SYNCSORT 0
No new posts how to eliminate null indicator value... DB2 7
No new posts Format Binary file to EBCDIC JCL & VSAM 4
Search our Forums:

Back to Top