darcs - gombemi

2 --

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

4 --

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.

9 --

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.

14 --

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/>.

17 --

18 -- Test to ensure the mother is female. Really, this tests the

19 -- deferred nature of the biography_data triggers.

20 --

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

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

23 --

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

25 --

27 -- Mother must be female.

29 select '';

30 select 'Expecting:

31 ERROR: Error on commit after insert or update of BIOGRAPHY_DATA

32 DETAIL: Key (AnimID) = (KD2): Value (MomID) = (DAD): The mother must be female';

34 insert into biography_data (

35 animid

36 , animname

37 , birthgroup

38 , bgcertainty

39 , sex

40 , momid

41 , firstborn

42 , birthdate

43 , bdmin

44 , bdmax

45 , bddist

46 , entrydate

47 , entrytype

48 , departdate

49 , departdateerror

50 , departtype)

51 values(

52 'KD2'

53 , 'Another offspring'

54 , 'K'

55 , 'C'

56 , 'M'

57 , 'DAD'

58 , 'Y'

59 , '1965-01-01'

60 , '1965-01-01'

61 , '1965-01-01'

62 , 'R'

63 , '1965-01-01'

64 , 'B'

65 , '2010-01-01'

66 , 0

67 , 'D');

68 select '';