9 Commits

9 changed files with 108 additions and 72 deletions

View File

@ -1,12 +1,13 @@
[package] [package]
name = "bzkf-rwdp-check" name = "bzkf-rwdp-check"
version = "0.1.0" version = "0.2.0"
edition = "2021" edition = "2021"
authors = ["Paul-Christian Volkmer <volkmer_p@ukw.de>"]
# See more keys and their definitions at https://doc.rust-lang.org/cargo/reference/manifest.html description = "Anwendung zur Durchführung einer Plausibilitätsprüfung anhand der Daten für die BZKF Real World Data Platform."
repository = "https://github.com/CCC-MF/bzkf-rwdp-check"
[dependencies] [dependencies]
clap = { version = "4.4", features = ["std", "help", "usage", "derive", "error-context"], default-features = false } clap = { version = "4.5", features = ["std", "help", "usage", "derive", "error-context"], default-features = false }
console = "0.15" console = "0.15"
csv = "1.3" csv = "1.3"
dialoguer = "0.11" dialoguer = "0.11"
@ -14,6 +15,7 @@ itertools = "0.12"
mysql = "24.0" mysql = "24.0"
serde = { version = "1.0", features = ["derive"] } serde = { version = "1.0", features = ["derive"] }
urlencoding = "2.1" urlencoding = "2.1"
regex = "1.10"
[profile.release] [profile.release]
opt-level = "s" opt-level = "s"

View File

@ -58,6 +58,10 @@ Options:
-y, --year <YEAR> Jahr der Diagnose -y, --year <YEAR> Jahr der Diagnose
``` ```
Der zusätzliche Parameter `--ignore-exports-since` ist optional.
Wird er angegeben, werden keine Einträge mit Exportdatum ab diesem Datum verwendet.
Dies eignet sich um nachträglich Zahlen zu einem bestimmten Datum zu ermitteln.
## Export aus der Onkostar-Datenbank ## Export aus der Onkostar-Datenbank
Die Anwendung ist in der Lage, mit dem Befehl `export` die Spalten Die Anwendung ist in der Lage, mit dem Befehl `export` die Spalten

View File

@ -19,6 +19,7 @@
*/ */
use clap::{Parser, Subcommand}; use clap::{Parser, Subcommand};
use regex::Regex;
#[derive(Parser)] #[derive(Parser)]
#[command(author, version, about)] #[command(author, version, about)]
@ -58,6 +59,8 @@ pub enum SubCommand {
user: String, user: String,
#[arg(short = 'y', long, help = "Jahr der Diagnose")] #[arg(short = 'y', long, help = "Jahr der Diagnose")]
year: String, year: String,
#[arg(long, value_parser = value_is_date, help = "Ignoriere LKR-Exporte seit Datum")]
ignore_exports_since: Option<String>,
}, },
#[command( #[command(
about = "Erstellt eine (reduzierte) CSV-Datei zum direkten Vergleich mit der OPAL-CSV-Datei" about = "Erstellt eine (reduzierte) CSV-Datei zum direkten Vergleich mit der OPAL-CSV-Datei"
@ -88,6 +91,8 @@ pub enum SubCommand {
output: String, output: String,
#[arg(short = 'y', long, help = "Jahr der Diagnose")] #[arg(short = 'y', long, help = "Jahr der Diagnose")]
year: String, year: String,
#[arg(long, value_parser = value_is_date, help = "Ignoriere LKR-Exporte seit Datum")]
ignore_exports_since: Option<String>,
}, },
#[command(about = "Abgleich zwischen CSV-Datei für OPAL und Onkostar-Datenbank")] #[command(about = "Abgleich zwischen CSV-Datei für OPAL und Onkostar-Datenbank")]
Compare { Compare {
@ -116,5 +121,19 @@ pub enum SubCommand {
file: String, file: String,
#[arg(short = 'y', long, help = "Jahr der Diagnose")] #[arg(short = 'y', long, help = "Jahr der Diagnose")]
year: String, year: String,
#[arg(long, value_parser = value_is_date, help = "Ignoriere LKR-Exporte seit Datum")]
ignore_exports_since: Option<String>,
}, },
} }
fn value_is_date(value: &str) -> Result<String, String> {
let re = Regex::new(r"^[0-9]{4}-[0-1][0-9]-[0-3][0-9]$").unwrap();
if re.is_match(value) {
Ok(value.into())
} else {
Err(format!(
"Ungültiges Datum '{}', bitte im Format 'yyyy-mm-dd' angeben",
value
))
}
}

View File

@ -68,7 +68,7 @@ impl Check {
.map(|(icd10, group)| (icd10, group.collect::<Vec<_>>())) .map(|(icd10, group)| (icd10, group.collect::<Vec<_>>()))
.map(|record| Icd10GroupSize { .map(|record| Icd10GroupSize {
name: record.0, name: record.0,
size: record.1.iter().count(), size: record.1.len(),
}) })
.collect::<Vec<_>>(); .collect::<Vec<_>>();
@ -76,10 +76,7 @@ impl Check {
} }
pub fn is_relevant(code: &str) -> bool { pub fn is_relevant(code: &str) -> bool {
match Self::map_icd_code(code).as_str() { !matches!(Self::map_icd_code(code).as_str(), "Other")
"Other" => false,
_ => true,
}
} }
fn map_icd_code(code: &str) -> String { fn map_icd_code(code: &str) -> String {

View File

@ -20,6 +20,7 @@
use mysql::prelude::Queryable; use mysql::prelude::Queryable;
use mysql::{params, Pool}; use mysql::{params, Pool};
use std::time::Duration;
use crate::common::{ExportData, Icd10GroupSize}; use crate::common::{ExportData, Icd10GroupSize};
use crate::resources::{EXPORT_QUERY, SQL_QUERY}; use crate::resources::{EXPORT_QUERY, SQL_QUERY};
@ -33,13 +34,13 @@ impl DatabaseSource {
DatabaseSource(url) DatabaseSource(url)
} }
pub fn check(&self, year: &str) -> Result<Vec<Icd10GroupSize>, ()> { pub fn check(&self, year: &str, ignore_exports_since: &str) -> Result<Vec<Icd10GroupSize>, ()> {
match Pool::new(self.0.as_str()) { match Pool::new(self.0.as_str()) {
Ok(pool) => { Ok(pool) => {
if let Ok(mut connection) = pool.get_conn() { if let Ok(mut connection) = pool.try_get_conn(Duration::from_secs(3)) {
return match connection.exec_map( return match connection.exec_map(
SQL_QUERY, SQL_QUERY,
params! {"year" => year}, params! {"year" => year, "ignore_exports_since" => ignore_exports_since},
|(icd10_group, count)| Icd10GroupSize { |(icd10_group, count)| Icd10GroupSize {
name: icd10_group, name: icd10_group,
size: count, size: count,
@ -58,13 +59,18 @@ impl DatabaseSource {
Err(()) Err(())
} }
pub fn export(&self, year: &str, use_pat_id: bool) -> Result<Vec<ExportData>, ()> { pub fn export(
&self,
year: &str,
ignore_exports_since: &str,
use_pat_id: bool,
) -> Result<Vec<ExportData>, ()> {
match Pool::new(self.0.as_str()) { match Pool::new(self.0.as_str()) {
Ok(pool) => { Ok(pool) => {
if let Ok(mut connection) = pool.get_conn() { if let Ok(mut connection) = pool.try_get_conn(Duration::from_secs(3)) {
return match connection.exec_map( return match connection.exec_map(
EXPORT_QUERY, EXPORT_QUERY,
params! {"year" => year}, params! {"year" => year, "ignore_exports_since" => ignore_exports_since},
|(condition_id, icd_10_code, diagnosis_date, pat_id)| ExportData { |(condition_id, icd_10_code, diagnosis_date, pat_id)| ExportData {
condition_id, condition_id,
icd_10_code, icd_10_code,

View File

@ -36,6 +36,27 @@ mod database;
mod opal; mod opal;
mod resources; mod resources;
fn request_password_if_none(password: Option<String>) -> String {
if let Some(password) = password {
password
} else {
let password = dialoguer::Password::new()
.with_prompt("Password")
.interact()
.unwrap_or_default();
let _ = Term::stdout().clear_last_lines(1);
password
}
}
fn sanitize_year(year: String) -> String {
if year.len() == 4 {
year
} else {
format!("2{:0>3}", year)
}
}
fn print_items(items: &[Icd10GroupSize]) { fn print_items(items: &[Icd10GroupSize]) {
let term = Term::stdout(); let term = Term::stdout();
let _ = term.write_line( let _ = term.write_line(
@ -46,6 +67,24 @@ fn print_items(items: &[Icd10GroupSize]) {
items.iter().for_each(|item| { items.iter().for_each(|item| {
let _ = term.write_line(&format!("{:<20}={:>6}", item.name, item.size)); let _ = term.write_line(&format!("{:<20}={:>6}", item.name, item.size));
}); });
let sum: usize = items
.iter()
.filter(|item| item.name != "Other")
.map(|item| item.size)
.sum();
let _ = term.write_line(&style("".repeat(27)).dim().to_string());
let _ = term.write_line(
&style(format!("{:<20}={:>6}", "Summe (C**.*/D**.*)", sum))
.dim()
.to_string(),
);
let sum: usize = items.iter().map(|item| item.size).sum();
let _ = term.write_line(
&style(format!("{:<20}={:>6}", "Gesamtsumme", sum))
.dim()
.to_string(),
);
let _ = term.write_line(&style("".repeat(27)).dim().to_string());
} }
fn main() -> Result<(), Box<dyn Error>> { fn main() -> Result<(), Box<dyn Error>> {
@ -65,23 +104,10 @@ fn main() -> Result<(), Box<dyn Error>> {
port, port,
user, user,
year, year,
ignore_exports_since,
} => { } => {
let password = if let Some(password) = password { let password = request_password_if_none(password);
password let year = sanitize_year(year);
} else {
let password = dialoguer::Password::new()
.with_prompt("Password")
.interact()
.unwrap_or_default();
let _ = term.clear_last_lines(1);
password
};
let year = if year.len() == 4 {
year
} else {
format!("2{:0>3}", year)
};
let _ = term.write_line( let _ = term.write_line(
&style(format!("Warte auf Daten für das Diagnosejahr {}...", year)) &style(format!("Warte auf Daten für das Diagnosejahr {}...", year))
@ -91,7 +117,7 @@ fn main() -> Result<(), Box<dyn Error>> {
let db = DatabaseSource::new(&database, &host, &password, port, &user); let db = DatabaseSource::new(&database, &host, &password, port, &user);
let items = db let items = db
.check(&year) .check(&year, &ignore_exports_since.unwrap_or("9999-12-31".into()))
.map_err(|_e| "Fehler bei Zugriff auf die Datenbank")?; .map_err(|_e| "Fehler bei Zugriff auf die Datenbank")?;
let _ = term.clear_last_lines(1); let _ = term.clear_last_lines(1);
@ -107,23 +133,10 @@ fn main() -> Result<(), Box<dyn Error>> {
user, user,
output, output,
year, year,
ignore_exports_since,
} => { } => {
let password = if let Some(password) = password { let password = request_password_if_none(password);
password let year = sanitize_year(year);
} else {
let password = dialoguer::Password::new()
.with_prompt("Password")
.interact()
.unwrap_or_default();
let _ = term.clear_last_lines(1);
password
};
let year = if year.len() == 4 {
year
} else {
format!("2{:0>3}", year)
};
let _ = term.write_line( let _ = term.write_line(
&style(format!("Warte auf Daten für das Diagnosejahr {}...", year)) &style(format!("Warte auf Daten für das Diagnosejahr {}...", year))
@ -133,7 +146,11 @@ fn main() -> Result<(), Box<dyn Error>> {
let db = DatabaseSource::new(&database, &host, &password, port, &user); let db = DatabaseSource::new(&database, &host, &password, port, &user);
let items = db let items = db
.export(&year, pat_id) .export(
&year,
&ignore_exports_since.unwrap_or("9999-12-31".into()),
pat_id,
)
.map_err(|_e| "Fehler bei Zugriff auf die Datenbank")?; .map_err(|_e| "Fehler bei Zugriff auf die Datenbank")?;
let _ = term.clear_last_lines(1); let _ = term.clear_last_lines(1);
@ -164,23 +181,10 @@ fn main() -> Result<(), Box<dyn Error>> {
user, user,
file, file,
year, year,
ignore_exports_since,
} => { } => {
let password = if let Some(password) = password { let password = request_password_if_none(password);
password let year = sanitize_year(year);
} else {
let password = dialoguer::Password::new()
.with_prompt("Password")
.interact()
.unwrap_or_default();
let _ = term.clear_last_lines(1);
password
};
let year = if year.len() == 4 {
year
} else {
format!("2{:0>3}", year)
};
let _ = term.write_line( let _ = term.write_line(
&style(format!("Warte auf Daten für das Diagnosejahr {}...", year)) &style(format!("Warte auf Daten für das Diagnosejahr {}...", year))
@ -190,7 +194,11 @@ fn main() -> Result<(), Box<dyn Error>> {
let db = DatabaseSource::new(&database, &host, &password, port, &user); let db = DatabaseSource::new(&database, &host, &password, port, &user);
let db_items = db let db_items = db
.export(&year, pat_id) .export(
&year,
&ignore_exports_since.unwrap_or("9999-12-31".into()),
pat_id,
)
.map_err(|_e| "Fehler bei Zugriff auf die Datenbank")?; .map_err(|_e| "Fehler bei Zugriff auf die Datenbank")?;
let _ = term.clear_last_lines(1); let _ = term.clear_last_lines(1);

View File

@ -41,8 +41,7 @@ impl OpalCsvFile {
let items = reader let items = reader
.deserialize::<OpalRecord>() .deserialize::<OpalRecord>()
.filter(|record| record.is_ok()) .filter_map(|record| record.ok())
.map(|record| record.unwrap())
.map(|record| Record { .map(|record| Record {
condition_id: record.cond_id, condition_id: record.cond_id,
icd10_code: record.cond_coding_code, icd10_code: record.cond_coding_code,
@ -57,8 +56,7 @@ impl OpalCsvFile {
let items = reader let items = reader
.deserialize::<ExportData>() .deserialize::<ExportData>()
.filter(|record| record.is_ok()) .filter_map(|record| record.ok())
.map(|record| record.unwrap())
.collect::<Vec<_>>(); .collect::<Vec<_>>();
Ok(items) Ok(items)

View File

@ -34,10 +34,11 @@ FROM (
SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) AS diagnosejahr SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) AS diagnosejahr
FROM lkr_meldung_export lme FROM lkr_meldung_export lme
JOIN lkr_meldung lm ON (lm.id = lme.lkr_meldung AND lme.typ <> '-1') JOIN lkr_meldung lm ON (lm.id = lme.lkr_meldung AND lme.typ <> '-1')
JOIN lkr_export le ON (le.id = lme.lkr_export)
WHERE lme.xml_daten LIKE '%ICD_Version%' WHERE lme.xml_daten LIKE '%ICD_Version%'
AND SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) = :year AND SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) = :year
AND (lme.xml_daten LIKE '%<cTNM%' OR lme.xml_daten LIKE '%<pTNM%' OR lme.xml_daten LIKE '%<Menge_Histologie>%' OR lme.xml_daten LIKE '%<Menge_Weitere_Klassifikation>%') AND (lme.xml_daten LIKE '%<cTNM%' OR lme.xml_daten LIKE '%<pTNM%' OR lme.xml_daten LIKE '%<Menge_Histologie>%' OR lme.xml_daten LIKE '%<Menge_Weitere_Klassifikation>%')
AND le.exportiert_am < :ignore_exports_since
) o1 ) o1
LEFT OUTER JOIN ( LEFT OUTER JOIN (

View File

@ -119,10 +119,11 @@ FROM (
SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) AS diagnosejahr SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) AS diagnosejahr
FROM lkr_meldung_export lme FROM lkr_meldung_export lme
JOIN lkr_meldung lm ON (lm.id = lme.lkr_meldung AND lme.typ <> '-1') JOIN lkr_meldung lm ON (lm.id = lme.lkr_meldung AND lme.typ <> '-1')
JOIN lkr_export le ON (le.id = lme.lkr_export)
WHERE lme.xml_daten LIKE '%ICD_Version%' WHERE lme.xml_daten LIKE '%ICD_Version%'
AND SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) = :year AND SUBSTRING_INDEX(SUBSTRING_INDEX(EXTRACTVALUE(lme.xml_daten, '//Diagnosedatum'), ' ', 1), '.', -1) = :year
AND (lme.xml_daten LIKE '%<cTNM%' OR lme.xml_daten LIKE '%<pTNM%' OR lme.xml_daten LIKE '%<Menge_Histologie>%' OR lme.xml_daten LIKE '%<Menge_Weitere_Klassifikation>%') AND (lme.xml_daten LIKE '%<cTNM%' OR lme.xml_daten LIKE '%<pTNM%' OR lme.xml_daten LIKE '%<Menge_Histologie>%' OR lme.xml_daten LIKE '%<Menge_Weitere_Klassifikation>%')
AND le.exportiert_am < :ignore_exports_since
) o1 ) o1
LEFT OUTER JOIN ( LEFT OUTER JOIN (