std.hl7.adt

Patient Administration (ADT) — parst und erzeugt ADT^Axx-Nachrichten für alle Patientenvorgänge: Aufnahme, Entlassung, Verlegung, Datenänderung und Patientenzusammenführung (Merge). Die Unit dekodiert PID, PV1, MRG und NK1 aus einer einzigen Nachricht in klar strukturierte Structs.

import std.hl7.adt;
import std.alloc;

// ADT^A01 (Aufnahme) parsen
var adt: int64 := alloc(HL7_ADT_SIZE);
Hl7AdtParse(msgBuf, msgLen, adt);

// Patienten-ID auslesen
var pid: int64 := adt + HL7_ADT_PID;
var idPtr: int64 := peek64(pid + HL7_PID_ID1);
var idLen: int64 := peek64(pid + HL7_PID_ID1_LEN);

// Bettbelegung auslesen
var pv1: int64 := adt + HL7_ADT_PV1;
var bed: int64 := peek64(pv1 + HL7_PV1_LBED);

// Merge-Ereignis erkennen
if (peek64(adt + HL7_ADT_ISMERGE) == 1) {
    var mrg: int64 := adt + HL7_ADT_MRG;
    var oldId: int64 := peek64(mrg + HL7_MRG_PID);
    // Zusammenführung durchführen ...
}

free(adt, HL7_ADT_SIZE);

• std.hl7.core
• std.alloc

Alle Structs verwenden das Zero-Copy-Prinzip: Zeiger verweisen in den Originalnachrichtenpuffer.

PID-3 kann bis zu 3 Wiederholungen enthalten (Tilde ~ als Trennzeichen). Hl7PidParse füllt alle drei ID-Slots.

Patientenklassen: I = Inpatient (stationär), O = Outpatient (ambulant), E = Emergency (Notfall)

Kombinierter Struct mit direkt eingebetteten Sub-Structs. Zeiger auf die Sub-Structs über Offset-Konstanten:

Hl7AdtIsMerge erkennt folgende Trigger-Events als Merge:

Bei Merge-Ereignissen enthält HL7_ADT_MRG die alte (aufzulösende) Identität; HL7_ADT_PID enthält die neue (verbleibende) Identität.

import std.hl7.adt;
import std.alloc;

fn handleAdmission(msgBuf: int64, msgLen: int64) {
    var adt: int64 := alloc(HL7_ADT_SIZE);
    Hl7AdtParse(msgBuf, msgLen, adt);

    var pid: int64 := adt + HL7_ADT_PID;
    var pv1: int64 := adt + HL7_ADT_PV1;

    // Patientenname und ID
    var fam: int64 := peek64(pid + HL7_PID_FAMILY);
    var giv: int64 := peek64(pid + HL7_PID_GIVEN);
    var pid1: int64 := peek64(pid + HL7_PID_ID1);

    // Stationszuweisung
    var room: int64 := peek64(pv1 + HL7_PV1_LROOM);
    var bed:  int64 := peek64(pv1 + HL7_PV1_LBED);
    var cls:  int64 := peek64(pv1 + HL7_PV1_CLASS);

    // Merge-Sonderfall
    if (peek64(adt + HL7_ADT_ISMERGE) == 1) {
        var mrg: int64 := adt + HL7_ADT_MRG;
        var oldPid: int64 := peek64(mrg + HL7_MRG_PID);
        // mergePatients(oldPid, pid1);
    }

    // Neue ADT-A08-Nachricht (Update) erstellen
    var outBuf: int64 := alloc(4096);
    var outLen: int64 := Hl7AdtWrite(adt, "A08"c as int64, outBuf, 4096);

    free(outBuf, 4096);
    free(adt, HL7_ADT_SIZE);
}

• Zero-Copy: Alle Parse-Funktionen setzen Zeiger in den Originalpuffer — kein Kopieren. Der Nachrichtenpuffer muss während der gesamten Verarbeitung des ADT-Structs gültig bleiben.
• PID-3 Repeats: Hl7PidParse verarbeitet bis zu drei ~-getrennte Wiederholungen in PID-3 (ID1, ID2, ID3). In der Praxis enthält PID-3 oft nur eine ID.
• Merge-Logik: Hl7AdtIsMerge prüft den Event-Code; HL7_ADT_HASMRG zeigt an ob physisch ein MRG-Segment vorhanden war. Beide können zusammen auftreten.
• Hl7AdtWrite: Erzeugt immer MSH+PID+PV1. MRG wird nur angehängt wenn HL7_ADT_HASMRG=1. NK1 wird nicht geschrieben (nur lesbar).

Letzte Aktualisierung: 2026-06-16