DEWIS 4.5.3.17 - bertoldi

4.5.3.17 (09.03.2023)
– ADD Auftragsbearbeitung/Schnellanlage; Belege mit Patientennamen suchen und übernehmen
(in Namensfeldern CTRL + ENTER oder Schaltfläche benutzen)
– Sammler Ausgangsbuch; Erweiterte Berechnung der anteiligen MwSt. Sätze
– DATEV Export Script für Sammler NEU; geänderte Berechnung

4.5.3.16 (04.03.2023)
– ReportBuilder Update auf Version 22.0 (Duplex Druck, Grafiken werden in 600dpi angezeigt, Outlook Anbindung optimiert, etc.)
– FIX Sammelaufstellungen; Sammeldruck (>1) respektiert nicht PDF Verschlüsselung
– ADD Journal Ausdruck; Sortierung wählbar
– ADD Material Übergabe; HIBC; wird der Scan mitgegeben kann die ‚lic‘ Kennung aus dem Scancode ermittelt werden.

4.5.3.15 (10.02.23)
– FIX PDF Ausgabe aus UDF wurde nicht in der Druckhistorie eingetragen
– FIX Leistungsverzeichnis; Bearbeiten; Anlegen eines neuen Herstellers verursacht Fehler
– E-Mail Texte; Daten aus der Tabelle „kopf“ und „sammler“ können mit dem Feldnamen angesprochen werden „<„+Feldname+“>“
– ADD Monatsaufstellung; Spalte „M-J“ + „M-J (lang); Monat(Jahr Kurz und Langform
– ADD Monatsaufstellung; E-Mail Texte; Kürzel <mj> + <mjl>, s.o.
– ADD Monatsaufstellung Ausgangsbuch Druck; Felder „mj“ + „mjl“
– ADD Vorgangsnummern; 4-stellige Jahreszahl möglich
– ADD Kunden; Bearbeiten; Ein-/Ausschalten der kundenspezifischen Nummernblöcke

4.5.3.14 (24.01.23)
– ADD Datenaustausch Behandler erweitert (+ GUID)
– MOD Auftragswesen; Farbe auf 250 Zeichen erweitert
– ADD Schnittstelle OWLlab erweitert
– Trigger bei Speichern Kunden
– Trigger bei Speichern aus Leistungskatalog
– Trigger bei Speichern Techniker
– MOD Behandlername auf 100 Zeichen

Scripte angepasst:
OWLLab Kundenexport.pas (Script für Einzel + Gesamt)
OWLLab Import Auftrag.pas

————————
18.01.23 – DEWIS Mobile Client 64bit bis Android 11

– MOD Formularverwaltung; Auswahl wo ein Formular abgelegt wird.
– FIX Positionserfassung; Überschreiben einer berechenbaren Position mit Inhaltsstof hat die Menge nicht auf 0 gesetzt. (ggf. Fehler in XML Datei)
– FIX UDF ausführen mit Dialog; Auswahllisten waren nicht korrekt gefiltert

- ADD Schnittstelle; Übergabe beliebiger Textdaten
z.B.
<Patient_Nachname>Test</Patient_Nachname>
<Patient_Vorname />
.........
<adata>
  <data>
    <name>name1</name>
    <value>value1</value>
  </data>
  <data>
    <name>name2</name>
    <value>value2</value>
  </data>
  <data>
    <name>name3</name>
    <value>value3</value>
  </data>
  <data>
  <name>name4</name>
    <value>value4</value>
  </data>
  <data>
    <name>name5</name>
    <value>value5</value>
  </data>
</adata>
.....

Script:
var
cName,cValue:string;
..

...
{bei den Kopfdaten einfügen}
// Universal <ADATA> Sammlung
ANode := Nodes[i].Nodes[j].NodeByName('adata');
if ANode <> nil then
  begin
    for z := 0 to ANode.NodeCount - 1 do
    begin
      ANodePos := ANode.Nodes[z]; // <DATA> Node
      if ANodePos <> nil then 
      begin
        cName := AnodePos.NodeByname('name').ValueAsString; // <NAME>
        cValue := AnodePos.NodeByname('value').ValueAsString; // <VALUE>

        if ((cName<>'') or (cValue <>'')) then
        begin
        // ab Version 4.5.3.13
          AddData( cName, cValue);
        end;
      end;
    end;
end;
..

Daten werden im "kopf" gespeichert.
- sichtbar im Vorgang, Karteireiter: Anweisungen - Parameter aus Übergabe

Ausdruck:
Variable (Typ string) einfügen
Berechnung:
…
Value := GetAData(Kopf[‚adata‘], cWhich);
…

Beispiel für einfaches Memo Feld:

procedure Memo1OnPrint;
var
i:integer;
cData,cText:string;
begin
{alles mit "stl" suchen}
for i := 0 to 10 do
begin
cData := GetAData(Kopf['adata'], 'stl'+inttostr(i));
if cData <> '' then
cText := cText + cData + chr(13)+chr(10);
end;

{einzelnen Satz suchen „STL DATEI“}
cData := GetAData(Kopf['adata'], 'stl datei');
if cData <> '' then
cText := cText + 'STL Datei:'+ cData + chr(13)+chr(10);

memo1.lines.Text := 'Dateien:'+chr(13)+chr(10)+cText;

end;

Alternative Suche: 
GetAData(Kopf['adata'], '#2'); // gibt den Value der 2.ten Zeile zurück

Alternative Suche:
var
  cName,cValue:string;
begin
  cName := '#3'; { gibt die 3.te Zeile zurück }
  cName := 'stl5'; { sucht den Bezeichner "stl5" }
  if GetADataEx(Kopf['adata'], cName, cValue) then
  begin
    {cName und cValue als VAR übergeben; Ergebnis: boolean
    cName und cValue werden entsprechend ersetzt} 
    ShowMessage('Name:' + cName+' Value:'+ cValue);
  end;
end;


Bilder (base64):
name: bild
value: data:image/png;base64,iVBORw0K.....
oder
value: iVBORw0K.....
(wird beim ersten Komma getrennt) 

Leere Bild Komponente dann im OnPrint:

procedure Image1OnPrint;
var 
  b64string:string;
begin

b64string := GetAData(Kopf['adata'], 'bild');
if b64string <> '' then
begin
GetBase64ToPicture(b64string, Image1.Picture);
end;

end;

——————————————-

4.5.3.13
– MOD Bildverwaltung; +PNG Format, Bilder laden+speichern überarbeitet
– FIX Jumbos; Positionen wurden teils mit falscher Positionsart angezeigt
!! ist im UPDATE 4.5.3.13 enthalten und wird automatisch korrigiert (DB Version 3.23) !!
/* bei älteren Versionen: korrigiert und ersetzt die „posart“ in Jumbo Positionen aus dem Leistungsverzeichnis */
UPDATE jumbop p SET p.posart=l.posart
FROM jumbop p INNER JOIN leistung l ON p.leistung_id=l.leistung_id ;

– FIX Auftragsimport; Preisstufen (aus 4.5.3.12) wurden nicht geladen
– MOD Einstellungen – Vorgaben; Farbeinstellungen angepasst
– ADD Leistungsverzeichnis; hinzufügen von Herstellern eingefügt
– MOD Mitarbeiter; PLZ Feld hinzugefügt
– MOD Leistungspositionen bearbeiten – Farbeinstellungen geändert
– MOD Kunden bearbeiten – Farbeinstellungen geändert

4.5.3.12
– ADD Postitionserfassung; Einstellung + Update von Preisstufen
– FIX Kunden; Erfassung von KSP: Sortier- und Suchreihenfolge berichtigt
– FIX Jumbos; Erfassung von Positionen: Sortier- und Suchreihenfolge berichtigt
– FIX Programmstart; wenn DB Server nicht verfügbar gibt es keine Fehlermeldung; nur Hinweis

4.5.3.11
– MOD Leistungskatalog; Kunden; per Default Fragmentsuche eingestellt.
– MOD Auftragsübergabe; Einlesen von Material; abweichende Texte führen nicht zur Neuanlage. Neue Texte werden aktualisiert.
– ADD UDF Scripte; Filterfunktion
– FIX Positionserfassung; Lock Fehler wenn Position in Bearbeitung ist und dann Kunden-, Steuer-, etc. Änderung vorgenommen wurde
– FIX auf Multi-Monitorsystemen wurden Fenster nicht korrekt positioniert
– FIX OWL Import; Einfügen von Zeilen nach dem Einlesen wurden am Anfang eingefügt. (ZeilenID wurde nicht aktualisiert)
– MOD Sammler Ausdruck Sortierung: Behandler, Art (RG/GU), Vorgangsnummer
(29.09.2022) FIX Druck eines Sammelbelegs berücksichtigt nicht kundenspezifische Formulareinstellung.

4.5.3.10
– Sammler; Vorbereitung für DATEV Export der Sammelaufstellungen (DATEV Script erforderlich)
– QR Codes bis Version 40 können erzeugt werden. (DEFAULT war 10)

4.5.3.9
– ADD Sammler Ausgangsbuch; Listung der Beträge mit Steuersatz
– ADD Sammelaufstellungen; vor Erstellung Prüfung auf ggf. noch geöffnete Vorgänge (RG/GU)
– FIX Auftragsbearbeitung; SQL Fehler beim Löschen von Vorgängen
– FIX Kunden; beim Löschen wurden verbundene Daten (KSP,..) nicht mit gelöscht
– FIX Auftragswesen/Suche; Eingabe bei ScanID ohne # erzeugte Fehler
– MOD Technikerstatistik; SQL überarbeitet für Performance
– ADD Import Schnittstelle; „kasse“ aufgenommen