Beenden eines Bildschirmprogrammes (RPG)

[gaby68]

Hallo,

ich habe folgendes Problem:

Ich möchte ein Bildschirmprogramm (RPG) beenden, wenn der User xx Minuten lang nichts getan hat. Ich will damit verhindern, dass bestimmte User längere Zeit ein Programm ohne Bearbeitung am Bildschirm stehen lassen und dadurch andere Prozesse behindern.

Mein Problem ist, dass ich die Steuerung nicht an das Programm zurück bekomme.

Hat jemand einen Tipp für mich??

Viele Grüße
Gaby

[Fuerchau]

Das geht mit Hilfe einer DTAQ.
An eine DSPF kann man eine DTAQ hängen.
Das RPG darf dann keinen EXFMT machen, sondern gibt per WRITE und DDS-Schlüsselwort INVITE die Tastatur frei.
Per QRCVDTAQ mit Timeout kann dann entsprechend gewartet werden.
Gibt es einen Datensatz, dann können die DSPF-Daten per READ ausgelesen werden.
Gibt es einen Timeout, hat der User eben nichts eingegeben.

[gaby68]

Hallo Fuerchau,

danke für die schnelle Antwort!

Ich hab dazu noch folgende Fragen:
Die DTAQ muss ich bei Umwandlung des DSPF angeben, richtig?

Muss ich nach jeder Benutzereingabe selbst einen Satz in die DTAQ schreiben oder geschieht das automatisch.

Mit Timeout meinst Du wahrscheinlich die Wartezeit, also den Parameter des APIs QRCVDTAQ, oder?

Viele Grüße
Gaby

[gaby68]

Ich habs hinbekommen

nochmal danke für die Hilfe

Viele Grüße
Gaby

[holly]

Hallo,
warum so umständlich mit DTAQ?
Nehme doch den Parameter WAITFILE oder WAITRCD des CRTDSPF , dann bekommst Du nach x Sekunden die Steuerung zurück, wenn der Anwender nichts eingibt!
Gruß Holger

[Fuerchau]

@Holger
Probier das bitte mal aus, bei mir gehts nicht !!!

Wäre mir auch vollkommen neu, da diese Timer sich auf Lock beziehen:
WAITFILE startet beim OPEN
WAITRCD startet beim READ/CHAIN
Da es aber bei DSPF's keine Satzsperren gibt, kann es keinen Timeout bei WAITRCD geben.

[holly]

@Baldur
Bei mir funktioniert das schon. Ist die Frage, ob es für den oben erwähnten Fall was bringt (Anwendungsabhängig).
Ich zeige über ein RPG-PGM eine Digitaluhr an, deren Anzeige selbstständig jede Sekunde wechselt (WAITRCD = 1); das ganze 30 Sekunden lang. Betätigt der User eine Taste endet das Programm vorzeitig. (Kuempi wird sich noch dran erinnern, hat Alex damals programmiert)
Gruß Holger

[kuempi von stein]

Hey klar erinnere ich mich. Diese Technik kann man ja für viele nette Spielereien missbrauchen.

Trotzdem rate ich dem TO (Thread-Opener) mal diese Anwendung grundlegend zu überdenken.

Wenn man das richtig programmiert, dürfen solche Störungen (Kaffepause und "vergessen" aus dem Programm zu gehen) nicht von Belang sein!

kuempi

[gaby68]

Hey klar erinnere ich mich. Diese Technik kann man ja für viele nette Spielereien missbrauchen.

Trotzdem rate ich dem TO (Thread-Opener) mal diese Anwendung grundlegend zu überdenken.

Wenn man das richtig programmiert, dürfen solche Störungen (Kaffepause und "vergessen" aus dem Programm zu gehen) nicht von Belang sein!

kuempi

Hallo kuempi,

das Problem ist, dass diese Anwendung von einem Rechner B auf dem Rechner A (zentrale iSeries) gestartet wird. Die Rechner B sind ältere iSeries mit einem sehr alten Releasestand.

Wenn nun Anwender ewig in diesem Programm stehen bleiben, weil sie "Kaffeepausen" oder sonstige Pausen einlegen, hat das zur Folge, dass andere User dieses Programm nicht aufrufen können.

Deshalb meine Frage hier im Forum. Dank Fuerchaus Hilfe hab ich es jetzt auch hinbekommen.

Viele Grüße
Gaby

[kuempi von stein]

Japp,

danke für die Ausführung.
Verteilte Datenbanken und Programme die rechnerübergreifend arbeiten sind natürlich nicht unbedingt gleichzusetzen mit ner "normalen" Anwendung.

Ich "vergesse" manchmal, das es solche Geschichten immer noch zu Hauf gibt.
Leicht Reden, wenn man produktionstechnisch nur mit zwei Rechner zu tun hat, die klar untereinander abgegrenzt sind.

In meinen Augen fast ne "üble" Geschichte, aber vermutlich nicht leicht zu bereinigen.

Wenn Dir die Geschichte mit der DTAQ geholfen hat... gut ist es!

Bis zum nächsten mal...

Gruss

k.