projects
/
vrDialog
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
decode parts of control data
[vrDialog]
/
db3-dump.pl
diff --git
a/db3-dump.pl
b/db3-dump.pl
index
fdaa541
..
953645c
100755
(executable)
--- a/
db3-dump.pl
+++ b/
db3-dump.pl
@@
-46,8
+46,9
@@
select Id, TexteEN from "UnitNames"
my $diags = lookup( qq{
select Id,x0136,x0142,x0144,x0147,x0151,x0152,x0153,x0158,x0160,x0161 from "DiagnoseDaten"
my $diags = lookup( qq{
select Id,x0136,x0142,x0144,x0147,x0151,x0152,x0153,x0158,x0160,x0161 from "DiagnoseDaten"
+where x0147 = 1
});
});
-warn "# diags = ",dump($diags);
+
#
warn "# diags = ",dump($diags);
my $sth = $dbh->prepare( qq{
select * from "ComuInfos"
my $sth = $dbh->prepare( qq{
select * from "ComuInfos"