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

Easytrieve - Compare files - Duplicate Key


IBM Mainframe Forums -> CA Products
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Sep 24, 2012 10:23 pm
Reply with quote

well, i am not an ezytrieve specialist,

but there is such a thing as JOB INPUT NULL
and a GET instruction.

you need two additional proc's. one to GET the O's and one to GET the R's.

you don't want to have a JOB INPUT statement that reads one record from both,
because you don't always want to read a record from both.
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6966
Location: porcelain throne

PostPosted: Mon Sep 24, 2012 10:33 pm
Reply with quote

you (sorta) stipulated that reversals should eliminate matches on the other file.
what if you have an unmatched reversal?


PERFORM GET R
PERFORM GET O

PROCESS:
if R end-of-file Perform write rest of O's as clean
If O end-of-file Perform write rest of R's as unmatched

If R = O then PERFORM GET R, Perform GET O, goto process
If R < O then Perform write unmatched R, Perform GET R, goto process
IF R > O then PERFORM Write O as clean, Perform GET O, goto process
goto process.
Back to top
View user's profile Send private message
Bill Woodger

Moderator Emeritus


Joined: 09 Mar 2011
Posts: 7309
Location: Inside the Matrix

PostPosted: Tue Sep 25, 2012 12:11 am
Reply with quote

Quote:
The use of Easytrieve under these circumstances is the flaw.


The only flaw was the code. OK, maybe the requirement. I'm with Dick on former and enrico on latter.

From the sample data you showed after your first post:

  • The SFP was never going to do what you want
  • The coder not only didn't know how to do the SFP, but neither the matching conditions
  • The coder failed to test properly
  • Every single tester down the line, of all stripes, failed
  • Something that just would not work managed to get into production


To blame the language for the mal-use of an element of the language is absurd.

Code it out. Get it going how it should have been at first. Dbz has given a start.
Back to top
View user's profile Send private message
Michaelod
Warnings : 1

New User


Joined: 02 Sep 2008
Posts: 49
Location: Edinburgh

PostPosted: Tue Sep 25, 2012 12:15 am
Reply with quote

Bill Woodger wrote:
Quote:
The use of Easytrieve under these circumstances is the flaw.


The only flaw was the code. OK, maybe the requirement. I'm with Dick on former and enrico on latter.

From the sample data you showed after your first post:

  • The SFP was never going to do what you want
  • The coder not only didn't know how to do the SFP, but neither the matching conditions
  • The coder failed to test properly
  • Every single tester down the line, of all stripes, failed
  • Something that just would not work managed to get into production


To blame the language for the mal-use of an element of the language is absurd.

Code it out. Get it going how it should have been at first. Dbz has given a start.


It may have come across wrong but I'm not blaming the language.

What I'm blaming is the lack of knowledge of the person who coded the easytrieve i.e. not understanding how to use it properly.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


Joined: 23 Nov 2006
Posts: 19244
Location: Inside the Matrix

PostPosted: Tue Sep 25, 2012 12:20 am
Reply with quote

Hello,

Quote:
What I'm blaming is the lack of knowledge of the person who coded the easytrieve i.e. not understanding how to use it properly.
Yup, but that ship has sailed long ago.

Now a re-code/re-test is in order whether the original author is available or not.

Given thet the code "as is" many not ever be made to work, suggest you use the logic from the Sticky or the hints from DBZ.
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 -> CA Products

 


Similar Topics
Topic Forum Replies
No new posts Duplicate transid's declared using CEDA CICS 3
No new posts Write line by line from two files DFSORT/ICETOOL 7
No new posts Compare only first records of the fil... SYNCSORT 7
No new posts Merge two VSAM KSDS files into third ... JCL & VSAM 6
No new posts Joinkeys - 5 output files DFSORT/ICETOOL 7
Search our Forums:

Back to Top