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
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
|
-- ==============================================================
-- GNUmed database schema change script
--
-- License: GPL v2 or later
-- Author: karsten.hilbert@gmx.net
--
-- ==============================================================
\set ON_ERROR_STOP 1
-- --------------------------------------------------------------
\unset ON_ERROR_STOP
alter table ref.paperwork_templates drop constraint engine_range cascade;
\set ON_ERROR_STOP 1
alter table ref.paperwork_templates
add constraint engine_range
check (engine in ('T', 'L', 'H', 'O', 'I', 'G'));
comment on column ref.paperwork_templates.engine is
'the business layer forms engine used to process this form, currently:
- T: plain text
- L: LaTeX
- H: Health Layer 7
- O: OpenOffice
- I: image editor (visual progress notes)
- G: gnuplot scripts (test results graphing)'
;
-- --------------------------------------------------------------
-- visual progress note template type
\unset ON_ERROR_STOP
insert into ref.form_types (name) values (i18n.i18n('gnuplot script'));
\set ON_ERROR_STOP 1
select i18n.upd_tx('de_DE', 'gnuplot script', 'Gnuplot-Script');
-- --------------------------------------------------------------
delete from ref.paperwork_templates where name_long = '1 test type plot script (GNUmed default)';
insert into ref.paperwork_templates (
fk_template_type,
name_short,
name_long,
external_version,
engine,
filename,
data
) values (
(select pk from ref.form_types where name = 'gnuplot script'),
'1 test plot (GNUmed)',
'1 test type plot script (GNUmed default)',
'1.0',
'G',
'gm2gpl-plot_1_test.scr',
'real template missing'::bytea
);
-- --------------------------------------------------------------
delete from ref.paperwork_templates where name_long = '2 test types plot script (GNUmed default)';
insert into ref.paperwork_templates (
fk_template_type,
name_short,
name_long,
external_version,
engine,
filename,
data
) values (
(select pk from ref.form_types where name = 'gnuplot script'),
'2 tests plot (GNUmed)',
'2 test types plot script (GNUmed default)',
'1.0',
'G',
'gm2gpl-plot_2_tests.scr',
'real template missing'::bytea
);
-- --------------------------------------------------------------
-- example referral template
\unset ON_ERROR_STOP
insert into ref.form_types (name) values (i18n.i18n('referral letter'));
\set ON_ERROR_STOP 1
select i18n.upd_tx('de_DE', 'referral letter', 'Überweisungsbrief');
delete from ref.paperwork_templates where name_long = 'Referral letter (GNUmed default) [Dr.Rogerio Luz]';
insert into ref.paperwork_templates (
fk_template_type,
name_short,
name_long,
external_version,
engine,
filename,
data
) values (
(select pk from ref.form_types where name = 'referral letter'),
'Referral letter (GNUmed)',
'Referral letter (GNUmed default) [Dr.Rogerio Luz]',
'2.0',
'L',
'referral-letter.tex',
'real template missing'::bytea
);
-- --------------------------------------------------------------
-- most recent vaccinations list
\unset ON_ERROR_STOP
insert into ref.form_types (name) values (i18n.i18n('vaccination record'));
\set ON_ERROR_STOP 1
select i18n.upd_tx('de_DE', 'vaccination record', 'Impfnachweis');
delete from ref.paperwork_templates where name_long = 'Most recent vaccinations (GNUmed default)';
insert into ref.paperwork_templates (
fk_template_type,
name_short,
name_long,
external_version,
engine,
filename,
data
) values (
(select pk from ref.form_types where name = 'vaccination record'),
'Latest vaccs (GNUmed)',
'Most recent vaccinations (GNUmed default)',
'1.0',
'L',
'vaccinations.tex',
'real template missing'::bytea
);
-- --------------------------------------------------------------
select gm.log_script_insertion('$RCSfile: v14-ref-paperwork_templates.sql,v $', '$Revision: 1.3 $');
|
