Terminzettel in F3 abspeichern

Fragen, Anregungen oder Tipps und Tricks? Hier ist der erste Anlaufpunkt.
Nicht sicher, wo ein Thema hingehört? Hier hinein - wir kümmern uns! :)

Moderator: Forum Moderatoren

Forumsregeln
TM-Startforum - "offen für alle Themen".
Beiträge, die in einen anderen Bereich passen, werden bei Bedarf verschoben.
Antworten
frabu
Beiträge: 310
Registriert: Mittwoch 9. April 2008, 20:33
15
Bedankt: 3 times

Terminzettel in F3 abspeichern

Beitrag von frabu »

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.).
frabu
______________________________________

Allgemeinmedizin, Kinder- und Jugendmedizin
TM 24.1.2.6138
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

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
Gruß Nobbie

Ich werde keine frühe Turbomed - Downloadversion installieren
frabu
Beiträge: 310
Registriert: Mittwoch 9. April 2008, 20:33
15
Bedankt: 3 times

Re: Terminzettel in F3 abspeichern

Beitrag von frabu »

Ok, danke für den Tipp!
frabu
______________________________________

Allgemeinmedizin, Kinder- und Jugendmedizin
TM 24.1.2.6138
Max
Beiträge: 222
Registriert: Donnerstag 19. Februar 2009, 08:28
15

Re: Terminzettel in F3 abspeichern

Beitrag von Max »

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
Könnte man das Formular nicht unter dem neu zu erstellenden Ordner "Eigene" speichern? Das sollte klappen, auch wenn Änderungen vorgenommen wurden, oder?

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.
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

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
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

Wie kann man die Formularprüfung denn deaktivieren?
Gruß Nobbie

Ich werde keine frühe Turbomed - Downloadversion installieren
Kasimir
PowerUser
Beiträge: 1618
Registriert: Mittwoch 11. Mai 2005, 20:23
18
Wohnort: Land Brandenburg
Hat sich bedankt: 3 times
Bedankt: 23 times

Re: Terminzettel in F3 abspeichern

Beitrag von Kasimir »

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.
Das habe ich mit meinem Marcumarplan gemacht, weil mir das Standardformular nicht gefällt.
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
baerdoc
Beiträge: 387
Registriert: Montag 19. August 2013, 10:34
10
Hat sich bedankt: 1 time
Bedankt: 6 times

Re: Terminzettel in F3 abspeichern

Beitrag von baerdoc »

Nobbie hat geschrieben:Wie kann man die Formularprüfung denn deaktivieren?
1.) Datei Global.ini mit einem Text-Editor öffnen.
2.) unter folgendem Punkt nein "eintragen": TURBOMED-Sicherheitsprüfung={nein}
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

cool, danke
Gruß Nobbie

Ich werde keine frühe Turbomed - Downloadversion installieren
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

Affengeil, unser Terminzettel druckt sich jetzt ohne Strg+d direkt nach dem aufrufen !
Gruß Nobbie

Ich werde keine frühe Turbomed - Downloadversion installieren
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

Man muß TM offensichtlich einmal als Administrator starten damit das greift.
Gruß Nobbie

Ich werde keine frühe Turbomed - Downloadversion installieren
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

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
NuklMed
Beiträge: 9
Registriert: Dienstag 16. Februar 2010, 10:55
14

Re: Terminzettel in F3 abspeichern

Beitrag von NuklMed »

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!
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

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

Ich werde keine frühe Turbomed - Downloadversion installieren
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

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
Gruß Nobbie

Ich werde keine frühe Turbomed - Downloadversion installieren
Benutzeravatar
Nobbie
Beiträge: 1647
Registriert: Samstag 27. Juli 2013, 11:42
10
Bedankt: 1 time

Re: Terminzettel in F3 abspeichern

Beitrag von Nobbie »

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
Antworten

Wer ist online?

Mitglieder in diesem Forum: Ahrefs [Bot], Bing [Bot] und 44 Gäste