RE: Comparing data in two tables

Mike,

You could do a full outer join if you're on 6.1 or later and select out the matching details so you don't have to do the union:

Select count(*)
From mprlib.v_tshoursumm a full outer join mprlib.v_reqhoursumm b
using ( em_number, timesheet_code, hours_summary )
Where ( a.em_number = :id
or b.em_number = :id )
and ( a.em_number is null
or b.em_number is null )

Paul Morgan

Principal Programmer Analyst
IT Supply Chain/Replenishment

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Mike Wills
Sent: Wednesday, March 09, 2011 11:11 PM
To: RPG programming on the IBM i / System i
Subject: Re: Comparing data in two tables

Using the exception join worked, but I have to still do the following:

select sum(error_count) as total_errors from (
select count(*) as error_count
from mprlib.v_tshoursumm a exception join mprlib.v_reqhoursumm b
on a.em_number = b.em_number and a.timesheet_code = b.timesheet_code
and a.hours_summary = b.hours_summary
where a.em_number = :id OR b.em_number = :id
union
select count(*) as error_count
from mprlib.v_reqhoursumm a exception join mprlib.v_tshoursumm b
on a.em_number = b.em_number and a.timesheet_code = b.timesheet_code
and a.hours_summary = b.hours_summary
where a.em_number = :id OR b.em_number = :id)table;

Unless I am missing something. This was the other way I could make
sure I wasn't missing anything. I am planning on putting this into a
stored procedure now. Any other optimizations you can recommend? I
will be asking the iSeries what it thinks yet.

--
Mike Wills
http://mikewills.me



On Wed, Mar 9, 2011 at 5:53 PM, Morgan, Paul <Paul.Morgan@xxxxxxxxxxx> wrote:

Exception join instead of the union as Scott recommended:

Select count(*)
 From mprlib.v_tshoursumm a exception join mprlib.v_reqhoursumm b
 using ( em_number, timesheet_code )
 Where a.em_number = :id
   or b.em_number = :id

Paul Morgan

Principal Programmer Analyst
IT Supply Chain/Replenishment

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Mike Wills
Sent: Wednesday, March 09, 2011 5:37 PM
To: RPG programming on the IBM i / System i
Subject: Re: Comparing data in two tables

This seems to work and could even be used outright in a stored
procedure. Thoughts?

select count(*) from (
select timesheet_code, count(timesheet_code) as count from (
select em_number, prhrt as timesheet_code, prhrsq as hours_summary
from mprlib.v_tshoursumm
union all
select em_number, timesheet_code, hours_summary from mprlib.v_reqhoursumm
order by em_number, timesheet_code ) table
where em_number = :id
group by timesheet_code
having count(timesheet_code) <> 2) table;

Is there a better way to do this?

--
Mike Wills
http://mikewills.me



On Wed, Mar 9, 2011 at 4:15 PM, Scott Klement <rpg400-l@xxxxxxxxxxxxxxxx> wrote:

Exception join?

On 3/9/2011 3:50 PM, Mike Wills wrote:

What is MR?

For some visual reference here is what I am looking for:

This is what I need to make sure is true.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.

--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.


--
This is the RPG programming on the IBM i / System i (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.