darcs - gombemi

3 -- This file is part of Gombe-MI.

5 -- Gombe-MI is free software; you can redistribute it and/or modify

6 -- it under the terms of the GNU General Public License as published by

7 -- the Free Software Foundation; either version 3 of the License, or

8 -- (at your option) any later version.

10 -- This program is distributed in the hope that it will be useful,

11 -- but WITHOUT ANY WARRANTY; without even the implied warranty of

12 -- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the

13 -- GNU General Public License for more details.

15 -- You should have received a copy of the GNU General Public License

16 -- along with Gombe-MI. If not, see <http://www.gnu.org/licenses/>.

18 -- Change the MOM to an actee in the MOM grooms KID event at 9:00 in follow 1.

20 -- All data appearing in this work are fictitious. Any resemblance to

21 -- actual data, living or archived, is purely coincidental.

23 -- Karl O. Pinc <kop@meme.com>

26 -- Comment the existing data so we get a new commit to test the

27 -- parts trigger.

28 commit;

29 begin;

31 update parts

32 set part = 'E'

33 where parts.pid =

34 (select mom.pid

35 from intervals

36 join events on (events.intid = intervals.intid)

37 join parts as mom on (mom.eid = events.eid)

38 join parts as kid on (kid.eid = events.eid)

39 where intervals.followid = 1

40 and intervals.time = '9:00'

41 and events.behavior = 'G'

42 and mom.participant = 'MOM'

43 and mom.part = 'R'

44 and kid.participant = 'KID'

45 and kid.part = 'E');