1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
|
-- Projekt GNUmed
-- Impfkalender der Hersteller von Influenza-Impfstoff
-- Quellen: Beipackzettel
-- author: Karsten Hilbert <Karsten.Hilbert@gmx.net>
-- license: GPL v2 or later
-- =============================================
-- force terminate + exit(3) on errors if non-interactive
\set ON_ERROR_STOP 1
-- Impfplan erstellen
insert into clin.vaccination_course
(fk_recommended_by, fk_indication, comment)
values (
-1,
(select id from clin.vacc_indication where description='tick-borne meningoencephalitis'),
'Normal-Immunisierung (Hersteller)'
);
-- Impfzeitpunkte definieren
insert into clin.vaccination_definition
(fk_course, seq_no, min_age_due, max_age_due)
values (
currval('clin.vaccination_course_pk_seq'),
1,
'12 months'::interval,
'12 years'::interval
);
insert into clin.vaccination_definition
(fk_course, seq_no, min_age_due, max_age_due, min_interval, comment)
values (
currval('clin.vaccination_course_pk_seq'),
2,
'13 months'::interval,
'12 years'::interval,
'1 month'::interval,
'frühestmögliche Serokonversion in 14 Tagen, 1-3 Monate nach 1.Impfung'
);
insert into clin.vaccination_definition
(fk_course, seq_no, min_age_due, max_age_due, min_interval, comment)
values (
currval('clin.vaccination_course_pk_seq'),
3,
'22 months'::interval,
'12 years'::interval,
'9 months'::interval,
'9-12 Monate nach 2.Impfung'
);
-- fast path
insert into clin.vaccination_course
(fk_recommended_by, fk_indication, comment)
values (
-1,
(select id from clin.vacc_indication where description='tick-borne meningoencephalitis'),
'Schnell-Immunisierung (Hersteller)'
);
-- Impfzeitpunkte definieren
insert into clin.vaccination_definition
(fk_course, seq_no, min_age_due, max_age_due)
values (
currval('clin.vaccination_course_pk_seq'),
1,
'12 months'::interval,
'12 years'::interval
);
insert into clin.vaccination_definition
(fk_course, seq_no, min_age_due, max_age_due, min_interval, comment)
values (
currval('clin.vaccination_course_pk_seq'),
2,
'12 months 7 days'::interval,
'12 years'::interval,
'7 days'::interval,
'am Tag 7 nach 1.Impfung, frühestmögliche Serokonversion in 14 Tagen'
);
insert into clin.vaccination_definition
(fk_course, seq_no, min_age_due, max_age_due, min_interval, comment)
values (
currval('clin.vaccination_course_pk_seq'),
3,
'12 months 21 days'::interval,
'12 years'::interval,
'14 days'::interval,
'am Tag 21, 14 Tage nach 2.Impfung'
);
-- =============================================
-- do simple revision tracking
delete from gm_schema_revision where filename = '$RCSfile: Impfplan-FSME.sql,v $';
INSERT INTO gm_schema_revision (filename, version) VALUES('$RCSfile: Impfplan-FSME.sql,v $', '$Revision: 1.6 $');
|
