Terminzettel in F3 abspeichern
Moderator: Forum Moderatoren
Forumsregeln
TM-Startforum - "offen für alle Themen".
Beiträge, die in einen anderen Bereich passen, werden bei Bedarf verschoben.
TM-Startforum - "offen für alle Themen".
Beiträge, die in einen anderen Bereich passen, werden bei Bedarf verschoben.
Terminzettel in F3 abspeichern
Hallo,
kann ich den Patienten den Terminzettel ("Patientermine"), nachdem ich ihn ausgedruckt habe in der Karteikarte (F3) abspeichern. Dies quasi als Nachweis, dass dem Patienten ein Terminzettel ausgedruckt wurde.
(Wir nutzen normalerwesie handgeschriebene Terminzettel, immer wieder behaupten aber Patienten, ein anderes Datum genannt bekommen zu haben und kommen zum falschen Zeitpunkt/Datum. Evtl. würden wir bei großen Terminen dann eine Turbomedlösung "zum Beweis" bevorzugen.).
kann ich den Patienten den Terminzettel ("Patientermine"), nachdem ich ihn ausgedruckt habe in der Karteikarte (F3) abspeichern. Dies quasi als Nachweis, dass dem Patienten ein Terminzettel ausgedruckt wurde.
(Wir nutzen normalerwesie handgeschriebene Terminzettel, immer wieder behaupten aber Patienten, ein anderes Datum genannt bekommen zu haben und kommen zum falschen Zeitpunkt/Datum. Evtl. würden wir bei großen Terminen dann eine Turbomedlösung "zum Beweis" bevorzugen.).
frabu
______________________________________
Allgemeinmedizin, Kinder- und Jugendmedizin
TM 24.2.1.6161
______________________________________
Allgemeinmedizin, Kinder- und Jugendmedizin
TM 24.2.1.6161
Re: Terminzettel in F3 abspeichern
Hallo,
das wird nichts werden. Wenn sie das Formular "Terminzettel" editieren, erkennt TM, dass es nicht mehr das Originalformular ist und meckert das mit einer Fehlermeldung an. (Ich wollte den z.B. automatisch druckbar machen um Strg+d zu umgehen).
Wir haben das dahingehend gelöst, dass wir auf dem Terminzettel einen Vermerk haben: bitte am Termin vorlegen. Machen auch die meisten Patienten. Das hat noch den Vorteil, dass die Pat.-Nr. drauf ist, und wir dadurch den richtigen Schmitz, Meier, Müller usw. aufrufen.
Gruß Nobbie
das wird nichts werden. Wenn sie das Formular "Terminzettel" editieren, erkennt TM, dass es nicht mehr das Originalformular ist und meckert das mit einer Fehlermeldung an. (Ich wollte den z.B. automatisch druckbar machen um Strg+d zu umgehen).
Wir haben das dahingehend gelöst, dass wir auf dem Terminzettel einen Vermerk haben: bitte am Termin vorlegen. Machen auch die meisten Patienten. Das hat noch den Vorteil, dass die Pat.-Nr. drauf ist, und wir dadurch den richtigen Schmitz, Meier, Müller usw. aufrufen.
Gruß Nobbie
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Re: Terminzettel in F3 abspeichern
Ok, danke für den Tipp!
frabu
______________________________________
Allgemeinmedizin, Kinder- und Jugendmedizin
TM 24.2.1.6161
______________________________________
Allgemeinmedizin, Kinder- und Jugendmedizin
TM 24.2.1.6161
-
- Beiträge: 222
- Registriert: Donnerstag 19. Februar 2009, 08:28
- 15
Re: Terminzettel in F3 abspeichern
Könnte man das Formular nicht unter dem neu zu erstellenden Ordner "Eigene" speichern? Das sollte klappen, auch wenn Änderungen vorgenommen wurden, oder?Nobbie hat geschrieben:Hallo,
das wird nichts werden. Wenn sie das Formular "Terminzettel" editieren, erkennt TM, dass es nicht mehr das Originalformular ist und meckert das mit einer Fehlermeldung an. (Ich wollte den z.B. automatisch druckbar machen um Strg+d zu umgehen).
Wir haben das dahingehend gelöst, dass wir auf dem Terminzettel einen Vermerk haben: bitte am Termin vorlegen. Machen auch die meisten Patienten. Das hat noch den Vorteil, dass die Pat.-Nr. drauf ist, und wir dadurch den richtigen Schmitz, Meier, Müller usw. aufrufen.
Gruß Nobbie
Ansonsten kann man die Formularprüfung deaktivieren und auch Formulare zu Turbomed schicken, habe ich vor Ewigkeiten mit meiner Rechnungsvorlage machen müssen. Die kam signiert zurück.
Re: Terminzettel in F3 abspeichern
Das kann man machen. Nur wird der Terminkalender das Originalformular weiterhin aufrufen oder man müßte im Terminkalender rumprogammieren. Das führt dann wohl auch zu der Fehlermeldung. Und im Terminkalender rumprogrammieren übersteigt bei weitem meine bescheidenen Kenntnisse.
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Re: Terminzettel in F3 abspeichern
Wie kann man die Formularprüfung denn deaktivieren?
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
-
- PowerUser
- Beiträge: 1618
- Registriert: Mittwoch 11. Mai 2005, 20:23
- 18
- Wohnort: Land Brandenburg
- Hat sich bedankt: 3 times
- Bedankt: 25 times
Re: Terminzettel in F3 abspeichern
Das habe ich mit meinem Marcumarplan gemacht, weil mir das Standardformular nicht gefällt.Max hat geschrieben:Nobbie hat geschrieben: ...Formulare zu Turbomed schicken, habe ich vor Ewigkeiten mit meiner Rechnungsvorlage machen müssen. Die kam signiert zurück.
Also ich würde auch vorschlagen, sich das geänderte Formular signieren zu lassen, so geht man allen Problemen aus dem Weg.
Viele Grüße
Kasimir
Kasimir
-
- Beiträge: 388
- Registriert: Montag 19. August 2013, 10:34
- 10
- Hat sich bedankt: 1 time
- Bedankt: 6 times
Re: Terminzettel in F3 abspeichern
1.) Datei Global.ini mit einem Text-Editor öffnen.Nobbie hat geschrieben:Wie kann man die Formularprüfung denn deaktivieren?
2.) unter folgendem Punkt nein "eintragen": TURBOMED-Sicherheitsprüfung={nein}
Re: Terminzettel in F3 abspeichern
cool, danke
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Re: Terminzettel in F3 abspeichern
Affengeil, unser Terminzettel druckt sich jetzt ohne Strg+d direkt nach dem aufrufen !
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Re: Terminzettel in F3 abspeichern
Man muß TM offensichtlich einmal als Administrator starten damit das greift.
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Re: Terminzettel in F3 abspeichern
Man müsste jetzt nur noch einen Hotkey haben, um den Terminzettel aufzurufen, damit das leidige anklicken mit der Mouse entfällt.
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
-
- Beiträge: 9
- Registriert: Dienstag 16. Februar 2010, 10:55
- 14
Re: Terminzettel in F3 abspeichern
Danke für die Vorschläge! Aber schade, dass nicht automatisch wie bei Bescheinigungen die Speicherung erfolgt oder zumindest das Angebot kommt, speichern zu können. Ich habe schon vor vielen Jahren bei Turbomed den Wunsch geäußert, die Terminzettel abspeichern zu können. Es kam nie eine Reaktion. So schwierig dürfte das doch eigentlich nicht zu Programmieren sein, liebe Leute von TM. Aber gut, dass es wenigstens pfiffige und hilfsbereite Nutzer hier im Forum gibt, vielen Dank an Euch!
Re: Terminzettel in F3 abspeichern
Ich habe auch schon vor Jahren das automatisierte Drucken angefragt und da hieß es "Wir können das als Wunsch aufnehmen, aber das geht nicht zur Zeit", und dabei war es ganz einfach. Vielleicht kann man sich das Speichern an einem anderen Formular abgucken, z.B. Attest, ich schaue da mal nach. Oder als Auftragsprogammierung bei einem TM-Partner.
Gruß Nobbie
Gruß Nobbie
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Re: Terminzettel in F3 abspeichern
Das ist offensichtlich der Programmcode zum speichern in der Kartei (der Anwesenheitsbescheinigung):
'############# Formular speichern ###############
Sub Form_QueryClose( ByVal Cancel )
If Modus <> "ZentralDruck" then
If Api.GetPrivateProfileString ("Ärztliche Bescheinigung zum Praxisbesuch" , "Runden" ,True, (File)) then
Uhr1_Deactivate 0 , False
Uhr2_Deactivate 0 , False
End If
if PatForm.FormClose (cancel,Restore) ="Save" then
Dim Kartei
if modus = "Restore" then
Set Kartei= Patform.AlleFormulare.PruefBfGueltigkeit(Modus, KarteiZeile).Karteikarte
else
Set Kartei= Patform.AlleFormulare.PruefBfGueltigkeit(Modus).Karteikarte
end if
PatForm.AlleFormulare.Karteispeichern "Ärztliche Bescheinigung Sprechstundenbesuch","ABS"
End if
End if
End Sub
Sub DatumOrt_KeyDown( ByVal Key , ByVal Shift , ByVal Index )
Patform.AlleFormulare.ShowListe key, DatumOrt,"F4"
End Sub
Das ist die Routine, die die Anwesenheitsbescheinigung druckt:
Sub Form_OnLoad
If Modus = "ZentralDruck" Then
Set MyProfil = CreateObject("TMFTools.FormularProfile")
Set MyProfil.Formular = Formular
Else
'--Aufruf von TMFTools.dll---
Set PatForm.Formular = Formular
Set PatForm.Behandlungsfall = Behandlungsfall
If NOT PatForm.FormularOK Then Formular.close: Exit Sub
If Not Restore Then
PatForm.FuelleKopf
FillDaten
WriteData
If Api.GetPrivateProfileString ("Anwesenheitsbescheinigung" , "Runden" ,True, (File)) then
Uhr1_Deactivate 0 , False
Uhr2_Deactivate 0 , False
Formular.print !!das habe ich eingefügt, damit der sich ohne Strg + d druckt
End If
Uhr1.SetFocus
End If
if modus = "KomplexRun" then
dim cKmplx
Set cKmplx = CreateObject("TMFtools.cKomplex")
Set cKmplx.ParentClass = PatForm
cKmplx.start
end if
End If
End Sub
Sub DatumOrt_DblClick( ByVal Index )
Patform.AlleFormulare.ShowListeMouse DatumOrt,"F4"
End Sub
Ich denke, das hier auch die Subroutine zum speichern aufgerufen wird.
Das muß man dann irgenwie in den Terminzettel reinbasteln.
Viel Spaß beim basteln.
Gruß Nobbie
'############# Formular speichern ###############
Sub Form_QueryClose( ByVal Cancel )
If Modus <> "ZentralDruck" then
If Api.GetPrivateProfileString ("Ärztliche Bescheinigung zum Praxisbesuch" , "Runden" ,True, (File)) then
Uhr1_Deactivate 0 , False
Uhr2_Deactivate 0 , False
End If
if PatForm.FormClose (cancel,Restore) ="Save" then
Dim Kartei
if modus = "Restore" then
Set Kartei= Patform.AlleFormulare.PruefBfGueltigkeit(Modus, KarteiZeile).Karteikarte
else
Set Kartei= Patform.AlleFormulare.PruefBfGueltigkeit(Modus).Karteikarte
end if
PatForm.AlleFormulare.Karteispeichern "Ärztliche Bescheinigung Sprechstundenbesuch","ABS"
End if
End if
End Sub
Sub DatumOrt_KeyDown( ByVal Key , ByVal Shift , ByVal Index )
Patform.AlleFormulare.ShowListe key, DatumOrt,"F4"
End Sub
Das ist die Routine, die die Anwesenheitsbescheinigung druckt:
Sub Form_OnLoad
If Modus = "ZentralDruck" Then
Set MyProfil = CreateObject("TMFTools.FormularProfile")
Set MyProfil.Formular = Formular
Else
'--Aufruf von TMFTools.dll---
Set PatForm.Formular = Formular
Set PatForm.Behandlungsfall = Behandlungsfall
If NOT PatForm.FormularOK Then Formular.close: Exit Sub
If Not Restore Then
PatForm.FuelleKopf
FillDaten
WriteData
If Api.GetPrivateProfileString ("Anwesenheitsbescheinigung" , "Runden" ,True, (File)) then
Uhr1_Deactivate 0 , False
Uhr2_Deactivate 0 , False
Formular.print !!das habe ich eingefügt, damit der sich ohne Strg + d druckt
End If
Uhr1.SetFocus
End If
if modus = "KomplexRun" then
dim cKmplx
Set cKmplx = CreateObject("TMFtools.cKomplex")
Set cKmplx.ParentClass = PatForm
cKmplx.start
end if
End If
End Sub
Sub DatumOrt_DblClick( ByVal Index )
Patform.AlleFormulare.ShowListeMouse DatumOrt,"F4"
End Sub
Ich denke, das hier auch die Subroutine zum speichern aufgerufen wird.
Das muß man dann irgenwie in den Terminzettel reinbasteln.
Viel Spaß beim basteln.
Gruß Nobbie
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Re: Terminzettel in F3 abspeichern
Hier noch mal etwas übersichtlicher
Code: Alles auswählen
'############# Formular speichern ###############
Sub Form_QueryClose( ByVal Cancel )
If Modus <> "ZentralDruck" then
If Api.GetPrivateProfileString ("Ärztliche Bescheinigung zum Praxisbesuch" , "Runden" ,True, (File)) then
Uhr1_Deactivate 0 , False
Uhr2_Deactivate 0 , False
End If
if PatForm.FormClose (cancel,Restore) ="Save" then
Dim Kartei
if modus = "Restore" then
Set Kartei= Patform.AlleFormulare.PruefBfGueltigkeit(Modus, KarteiZeile).Karteikarte
else
Set Kartei= Patform.AlleFormulare.PruefBfGueltigkeit(Modus).Karteikarte
end if
PatForm.AlleFormulare.Karteispeichern "Ärztliche Bescheinigung Sprechstundenbesuch","ABS"
End if
End if
End Sub
Sub DatumOrt_KeyDown( ByVal Key , ByVal Shift , ByVal Index )
Patform.AlleFormulare.ShowListe key, DatumOrt,"F4"
End Sub
Sub DatumOrt_DblClick( ByVal Index )
Patform.AlleFormulare.ShowListeMouse DatumOrt,"F4"
End Sub
Code: Alles auswählen
Sub Form_OnLoad
If Modus = "ZentralDruck" Then
Set MyProfil = CreateObject("TMFTools.FormularProfile")
Set MyProfil.Formular = Formular
Else
'--Aufruf von TMFTools.dll---
Set PatForm.Formular = Formular
Set PatForm.Behandlungsfall = Behandlungsfall
If NOT PatForm.FormularOK Then Formular.close: Exit Sub
If Not Restore Then
PatForm.FuelleKopf
FillDaten
WriteData
If Api.GetPrivateProfileString ("Anwesenheitsbescheinigung" , "Runden" ,True, (File)) then
Uhr1_Deactivate 0 , False
Uhr2_Deactivate 0 , False
Formular.print
End If
Uhr1.SetFocus
End If
if modus = "KomplexRun" then
dim cKmplx
Set cKmplx = CreateObject("TMFtools.cKomplex")
Set cKmplx.ParentClass = PatForm
cKmplx.start
end if
End If
End Sub
Gruß Nobbie
Ich werde keine frühe Turbomed - Downloadversion installieren
Ich werde keine frühe Turbomed - Downloadversion installieren
Wer ist online?
Mitglieder in diesem Forum: Ahrefs [Bot], Bing [Bot], Google [Bot] und 146 Gäste