-
CMD PARM mit Eingabe eines einzelnen "?"
Hallo allerseits,
ich habe ein *CMD geschrieben, das u.a. ein 6-stelliges Zeichenfeld erwartet.
Hier soll der Anwender ein ? als Wert eingeben können.
Code:
PARM KWD(ACT) TYPE(*CHAR) LEN(6) RSTD(*NO) +
DFT('*ALL') SPCVAL((IDX '000001') (*ALL +
'000000')) CHOICE('IDX, *ALL, ?, Action +
key') PROMPT('Action')
Dummerweise interpretiert die AS400 das als Prompt, als ob F4 gedrückt worden wäre.
Ein einzelnes ? als Wert kann man nicht eingeben.
Ich habe es auch so versucht:
Code:
PARM KWD(ACT) TYPE(*CHAR) LEN(6) RSTD(*NO) +
DFT('*ALL') SPCVAL((IDX '000001') (*ALL +
'000000') ('?' '?00000')) CHOICE('IDX, +
*ALL, ?, Action key') PROMPT('Action')
? wird einfach nicht akzeptiert.
(Natürlich kann man '?' eingeben, aber bis man das allen Anwendern erklärt hat, schreibe ich lieber ein eigenes Programm mit DSPF etc...)
Kann man das irgendwie hinbekommen?
Es wäre schade, wenn ich nur wegen diesem winzigen Detail das *CMD nicht verwenden könnte...
Gruß, Christian
-
Nimm doch statt "?" einen anderen Spezial-Wert:
(*ASK '?')
Die ?-F4-Übersetzung wirst du nicht wegbekommen.
Das gehört zur selektiven Bedienerführung automatisch dazu.
-
es ist leider andersrum:
nicht die Anwendung will unbedingt ein ?,
sondern die Anwender sind es gewöhnt, als Prompt-Auswahl ein ? einzugeben.
Und ich will dann nicht den IBM-Prompt, sondern ein eigenes Auswahl-Programm ausführen
-
Dann gibt es noch den Prompt Override.
Mittels PMTOVRPGM kann man ein Programm schreiben, dass ähnliche Aufrufparameter wie das Verarbeitungsprogramm, jedoch zusätzlich ein großes Feld für die Rückgabe von Auswahlwerten.
Bei F4 bzw. "?" wird dieses aufgerufen, an Hand der vorherigen Parameter kann man entscheiden was man eingeben lassen will und diese Werte als Liste zurückgeben.
Vernünftig macht das nur Sinn, wenn man in den PARM's entsprechende PMTCLT(*PMTRQS) oder auch PMTCTLPGM's verwendet da das Override-Programm sonst die falschen Auswahlmöglichkeiten bietet.
-
Danke Baldur. PMTOVRPGM scheint mir der einzige Ansatz zu sein, habe aber auf Anhieb außer Abbrüchen nichts hinbekommen und auch keine vernünftigen Beispiele/Doku gefunden.
Und da es wahrscheinlich sowieso das einzige Mal sein wird, dass ich so einen Fall habe, habe ich es halt doch in RPG gemacht.
Es läuft jetzt, und gut ist.
Gruß, Christian
Similar Threads
-
By lch in forum Intern - Hilfe - Feedback - Tests-Forum
Antworten: 10
Letzter Beitrag: 15-02-21, 11:06
-
By Edi in forum IBM i Hauptforum
Antworten: 8
Letzter Beitrag: 07-11-14, 07:52
-
By RLurati in forum NEWSboard Programmierung
Antworten: 1
Letzter Beitrag: 05-08-14, 09:10
-
By OMi in forum NEWSboard Programmierung
Antworten: 11
Letzter Beitrag: 17-02-14, 14:44
-
By loeweadolf in forum NEWSboard Programmierung
Antworten: 4
Letzter Beitrag: 13-02-14, 20:58
Berechtigungen
- Neue Themen erstellen: Nein
- Themen beantworten: Nein
- You may not post attachments
- You may not edit your posts
-
Foren-Regeln
|
Erweiterte Foren Suche
Google Foren Suche
Forum & Artikel Update eMail
AS/400 / IBM i
Server Expert Gruppen
Unternehmens IT
|
Kategorien online Artikel
- Big Data, Analytics, BI, MIS
- Cloud, Social Media, Devices
- DMS, Archivierung, Druck
- ERP + Add-ons, Business Software
- Hochverfügbarkeit
- Human Resources, Personal
- IBM Announcements
- IT-Karikaturen
- Leitartikel
- Load`n`go
- Messen, Veranstaltungen
- NEWSolutions Dossiers
- Programmierung
- Security
- Software Development + Change Mgmt.
- Solutions & Provider
- Speicher – Storage
- Strategische Berichte
- Systemmanagement
- Tools, Hot-Tips
Auf dem Laufenden bleiben
|
Bookmarks