Von AS/Menu über WRKSPLF zu Custom-Funktion

[FrEEk]

Hallo,
ich habe gerade meine Möhre nicht am laufen, muss also aus dem Gedächtnis einiges ergänzen:



geht net gibbds net, sagt man bei uns.

Hinter der Auswahl 1 steht wohl SNDNETSPLF 1. Ansatzpunkt ist an diesen Command einen Validity Checker anzuhängen, damit kommt man vor dem Versenden des Objektes an den Command dran und kann sich einklinken. Wir haben mal auf diese Art den CHGSPLFA aufgebohrt; wenn in der Formularart z.B.: #H13272 drinstand, haben wir mit APIs den Druck umformatiert, damit er auf ein bestimmtes Formular gepasst hat.
Das mit der eigenen Auswahl Maske, da müsste man mal unter Prompt Overwrite Programm suchen, ich meine da ist noch was, wo man den F4 in den Commands fummeln kann.

nette Herausforderung, früher hat mir sowas mal Spass gemacht.

mfg

Dieter Bender

Hört sich nett an..

Ich müsste irgendwie an den FILE-Parameter rankommen und überprüfen ob er NICHT leer ist. Wenn nicht, dann verzweige ich in den befehl STRSNDMAIL, wo die Eingabemaske kommt.

Zu Prompt Overwrite Programme:

Da habe ich jetzt so ziemlich alles durchsucht, aber das einzige, was ich gefunden habe ist der Befehl PMTCTL (Prompt Control). Irgendwie lässt sich der Befehl aber nicht in der CLP-Umgebung ausführen..

Ich schaue mal noch nach einem brauchbaren RTV-Befehl.. Vielleicht gibt es den ja.

[Pikachu]

Hallo FrEEk!

Doch das geht, man kann dem WRKSPLF für Auswahl 1 einen eigenen Befehl mitgeben, der dann bei dieser Auswahl aufgerufen wird.

Dazu muss man eine Nachrichtendatei (so eine wie QCPFMSG) anlegen, und in diese die Nachrichten CPX3438 und CPX3439 eintragen, entsprechend den Nachrichten in QCPFMSG, jedoch anstelle dem SNDNETSPLF einen eigenen Befehl und die Übergabeparameter entsprechend anpassen.

Dieser eigene Befehl muss in die Bibliothek QSYS kopieren werden, da der WRKSPLF nur in der Systembibliotheksliste sucht (V5R2).

Jetzt noch ein OVRMSGF MSGF(QCPFMSG) TOMSGF(MYMSGF) und dann ein WRKSPLF.

So, ich hoffe ich habe nichts vergessen ...

Viele Grüße
Jürgen

[FrEEk]

Hallo FrEEk!

Doch das geht, man kann dem WRKSPLF für Auswahl 1 einen eigenen Befehl mitgeben, der dann bei dieser Auswahl aufgerufen wird.

Dazu muss man eine Nachrichtendatei (so eine wie QCPFMSG) anlegen, und in diese die Nachrichten CPX3438 und CPX3439 eintragen, entsprechend den Nachrichten in QCPFMSG, jedoch anstelle dem SNDNETSPLF einen eigenen Befehl und die Übergabeparameter entsprechend anpassen.

Dieser eigene Befehl muss in die Bibliothek QSYS kopieren werden, da der WRKSPLF nur in der Systembibliotheksliste sucht (V5R2).

Jetzt noch ein OVRMSGF MSGF(QCPFMSG) TOMSGF(MYMSGF) und dann ein WRKSPLF.

So, ich hoffe ich habe nichts vergessen ...

Viele Grüße
Jürgen

Hallo Pikachu!

Das ist ja genial!

Danke schön für Deine Antwort.

Funktioniert bestens.. habe einen Test mit einem einfachen Befehl (DSPLIBL) gemacht und der hat prompt richtig reagiert

Nochmals danke!

MfG
Florian

[Fuerchau]

Beim OVRMSGF muss man allerdings aufpassen, dass ALLE Nachrichten zu diesem Zeitpunkt überschrieben werden. Nachrichten, die nicht gefunden werden, führen ggf. zu unerwarteten Abstürzen oder Fehlverhalten. Insbesonders, wenn e.g. eine Kommandozeile geöffnet ist und weitere Befehle ab dieser Ebene aufgerufen werden können. Der OVRMSGF gilt für alle Programme ab der Ebene des OVR's.
Da ist es schon einfacher, direkt die QCPFMSG zu ändern und ggf. bei jedem Release/PTF diese Änderungen zu wiederholen.

Prompt-Overwrite ist eine Funktion des CRTCMD bzw CHGCMD und hat mit PMTCTL nichts zu tun. PMTCTL ist eine Anweisung in einer CMD-Quelle um bestimmte Abhängigkeiten beim Prompting zu steuern.

[Pikachu]

Hallo Fuerchau!

Beim OVRMSGF muss man allerdings aufpassen, dass ALLE Nachrichten zu diesem Zeitpunkt überschrieben werden. Nachrichten, die nicht gefunden werden, führen ggf. zu unerwarteten Abstürzen oder Fehlverhalten. ...

Der Hilfetext zum OVRMSGF sagt da aber was anderes. Da steht, dass die überschreibende Nachrichtendatei nicht alle Nachrichten enthalten muss. Wird eine Nachricht nicht gefunden, wird einfach in der überschriebenen Nachrichtendatei nach dieser Nachricht gesucht.

Viele Grüße
Jürgen

[Fuerchau]

Danke für den Hinweis, man lernt halt immer was dazu.

[FrEEk]

Ich kann ja nach dem ausgeführten Befehl DLTOVR machen und dann ist das wieder zurückgesetzt..

[Peet]

Hallo Jürgen,

wo kann man solche Funktionen nachlesen, oder z.b.
welche Befehle durch die von Dir beschriebene Art und Weise
angepasst werdnen ??

Danke für die Infos im Vorfeld.

Gruß
Peet

Hallo FrEEk!

Doch das geht, man kann dem WRKSPLF für Auswahl 1 einen eigenen Befehl mitgeben, der dann bei dieser Auswahl aufgerufen wird.

Dazu muss man eine Nachrichtendatei (so eine wie QCPFMSG) anlegen, und in diese die Nachrichten CPX3438 und CPX3439 eintragen, entsprechend den Nachrichten in QCPFMSG, jedoch anstelle dem SNDNETSPLF einen eigenen Befehl und die Übergabeparameter entsprechend anpassen.

Dieser eigene Befehl muss in die Bibliothek QSYS kopieren werden, da der WRKSPLF nur in der Systembibliotheksliste sucht (V5R2).

Jetzt noch ein OVRMSGF MSGF(QCPFMSG) TOMSGF(MYMSGF) und dann ein WRKSPLF.

So, ich hoffe ich habe nichts vergessen ...

Viele Grüße
Jürgen

[Pikachu]

Hallo Peet!

Hm, nachlesen? Ich weiß nicht. Ist eher eine Suche nach dem Befehl, der bei besagter Auswahl aufgerufen wird, in der Nachrichtendatei QCPFMSG. Am besten geht das mit DSPMSGD RANGE(*ALL) MSGF(QCPFMSG) DETAIL(*BASIC) OUTPUT(*PRINT) und anschließender Suche in der erstellten Spooldatei. Aber ob das irgendwo in einem Handbuch steht, keine Ahnung.

Gruß
Jürgen