gelinkte Dokumente AUS Karteikarte HERAUSbekommen?

[rfbdoc]

Durch nochmaliges Überarbeiten und Anpassung der Suchfunktion (Geburtsdatum und Patientennummer) ist nunmehr sichergestellt, dass auch nach Namensänderungen (Heirat o.ä) alle verlinkten Dokumente aus der Patientenkartei exportiert werden.

TmDocExport.zip

[kteamchief]

Hallo rfbdoc,

bei mir erscheint beim Aufrufen des von Ihnen erstellen Formulars (TmDocExport) ein "AcitveX Script Error" (siehe Anhang).
Im Quellcode ist diese Zeile markiert: Set PatForm.Behandlungsfall = Behandlungsfall.

Das Formular kann dann von mir nicht verwendet werden.

Was kann das sein bzw. was kann man hier machen, um mein Problem zu lösen?
Für eine Hilfestellung wäre ich sehr dankbar.

Gruß,
kteamchief

[rfbdoc]

Den Fehler kann ich hier auf meinem Laptop und auch in der Praxis im Netzwerk erst einmal nicht nachvollziehen.

Muss ein Problem beim Setzen des Behandlungsfalls sein.

In Zeile 14 meines Scripts gib es nur den Befehl

Set PatForm.Behandlungsfall = Behandlungsfall



PS: Darf mich zunächst einmal für 2 Wochen urlaubsbedingt abmelden.

[EXEWERKER]

Vielleicht hat der aktive Patient keinen Behandlungsfall?

[kteamchief]

Dieser ActiveX-Script Error kommt bei mir immer, auch wenn der Patient einen aktiven Behandlungsfall hat.
Das Fehlerbild tritt an allen Clients und am Server auf.
Irgendwie scheint bei mir die Variable "Behandlungsfall" nicht definiert zu sein. Hat das evtl. etwas mit der Datei "TMFTools.dll" zu tun. Ist diese defekt? Kann man diese Variable irgendwo definieren?

Gruß,
kteamchief

[rfbdoc]

Ich kann den Fehler hier nicht nachvollziehen.
Die Datei TmDocExport.tmf sollte lokal im Verzeichnis TurboMed\Formulare\
oder (übersichtlicher) im Verzeichnis TurboMed\Formulare\SelbsterstellteFormulare\ liegen

Zwei Versuche zu Fehlerbeseitigung könnte man unternehmen
Versuch 1)
Im Explorer die Datei TmDocExport.tmf aufsuchen. Unter Eigenschaften-> Sicherheit Vollzugriff für Benutzer oder Jeder einrichten
Versuch 2)
Datei TmDocExport.tmf umbenennen in TmDocExportAlt.tmf
Mit dem Formulareditor selbst eine neue leere Datei TmDocExport.tmf erstellen
Aus der alten umbenannten TmDocExportAlt.tmf die Datenfelder und das Scipt (F7) einkopieren und abspeichern
Vielleich tritt der Fehler dann nicht mehr auf.

[Johnny]

Hallo rfbdoc,,

habe Ihr Script mit dem Formular auf meinem Server-PC (Win XP Prof.) installiert und ausgeführt.
Funktioniert fast: Formular wird angezeigt, Button kann angeklickt werden Ordner für Patient wird angelegt und ..... bleibt leer.
Soeben, beim Schreiben, ist mir die Ursache auch eingefallen. Habe meine Dokumente von der Festplatte C: ausgelagter auf D:
In TM ist der Pfad zu den Dokumenten auf D: in den Grundeinstellungen richtig eingestellt.
Wo kann ich das in Ihrem Script einstellen?

Gruß aus Kiel
Johnny

[rfbdoc]

In Zeile 39 des scripts können sie ggfs. die Änderungen vornehmen
Da Sie den Formularpfad D: in Grundeinstellungen gesetzt haben vermute aber eher, dass die batchdatei nicht korrekt aufgerufen wird.
Vielleicht geben Sie einfach die Pfade zur Batchdatei und Dokumenten mit den bei Ihnen zutreffenden festen Laufwerksbuchstaben ein.

Zeile 39
DokExport.run TMTools.Path("\Bat\TMExportTools\TmDocExport.bat") &" " &PatFilter.Text &" " &App.Settings.ServerPfad &"Dokumente\"
ändern in
DokExport.run TMTools.Path("C:\???\TmDocExport.bat") &" " &PatFilter.Text &" " &"D:\????\Dokumente\"

[rfbdoc]

Um auch "ausgelagerte" Dokumente zu erfassen, die nicht im Standardordner TurboMed\Dokumente\ liegen habe ich das Script nochmals angepasst. Die Batchdatei TmDocExport.bat hat auch einen neuen Speicherort erhalten. Der Export erfolgt zudem jetzt auf einen Ordner auf dem Desktop, das erleichtert das Auffinden der exportierten Dateien.

Installationsanleitung dabei. Die Dateien der Vorversion einfach löschen
Die Verwendung des kleinen Programms erfolgt natürlich auf eigene Gefahr.

TmDocExportVersion2.zip

[Johnny]

hallo rfbdoc,
hallo ewerker,

besten Dank für eure Bemühungen.

Soweit ich dies jetzt eruiert habe, gibt es den Befehl forfiles unter windows xp nicht!

Man könnte diese Datei forfiles.exe höchstens aus win 7 in ein Win Xp-System einkopieren oder hier https://www.petri.com/download_free_reskit_tools in einer toolsammlung herunterladen.

Gruß aus Kiel

Johnny

[Johnny]

Leider, leider kein Erfolg,

Forfiles.exe aus Win7 32bit bzw 64 bit läuft nicht unter Win XP.
Obige tools beinhalteten keine forfiles.exe


Habe hier noch eine original windows server 2003 cd (nie installiert) soll auch forfiles.exe beinhalten.
Wie kann man es jedoch aus der CD extrahieren ohne win server 2003 zu installieren?

Gruß aus Kiel

Johnny

[DrYES]

Hallo Zusammen,

könnte noch eine aktuelle Version von
TmDocExportVersion2.zip

gepostet werden.

Vielen Dank

YD