AW: Help with SQL Update using join files

Try to add a DISTINCT to your select-Statement:
update vinbini set baqcm = (select DISTINCT ifqcm from vinitmb join vinbini
on bacmp = ifcomp and baloc = ifloc and baitem = ifitem
where ifqcm <> baqcm and babloc = 'WHS') where exists (select 1 from
vinitmb join vinbini on bacmp = ifcomp and baloc = ifloc and baitem = ifitem
where ifqcm <> baqcm
and babloc = 'WHS' )

Mit freundlichen Grüßen / Best regards

Birgitta Hauser

"Shoot for the moon, even if you miss, you'll land among the stars." (Les
Brown)
"If you think education is expensive, try ignorance." (Derek Bok)
"What is worse than training your staff and losing them? Not training them
and keeping them!"

-----Ursprüngliche Nachricht-----
Von: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] Im Auftrag von Jeff Young
Gesendet: Wednesday, 22.8 2012 16:12
An: Midrange Systems Technical Discussion
Betreff: Help with SQL Update using join files

I have the following SQL statement:
update vinbini set baqcm = (select ifqcm from vinitmb join vinbini on bacmp
= ifcomp and baloc = ifloc and baitem = ifitem
where ifqcm <> baqcm and babloc = 'WHS') where exists (select 1 from
vinitmb join vinbini on bacmp = ifcomp and baloc = ifloc and baitem = ifitem
where ifqcm <> baqcm
and babloc = 'WHS' )

Where file vinitmb is unique at the company/location/item level and vinbini
is unique at the company/location/item/bin level.
I want to update a field in vinbini for the 'WHS' bin records only when the
committed qty in vinitmb does not equal the value in vinbini.
I am receiving the Result of SELECT more than one row message.
What am I missing?

Thanks,

--
Jeff Young
Sr. Programmer Analyst
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe,
or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a
moment to review the archives at http://archive.midrange.com/midrange-l.