-
ERRMSGID - Problem
Hallo,
ich habe mehrere Bilder die ich überprüfe und Bezugszahlen schalte.
Aber beim ersten mal wird die ERRMSGID bie F3KST(*IN60) nicht angezeigt obwohl sie gesetzt ist.
Beim 2. mal drücken der ENTER Taste erscheint die Meldung.
Ein Overlay hätte ich auch im Format.
Was mache ich falsch?
Dank im Voraus
Code:
A DSPSIZ(24 80 *DS3)
A REF(*LIBL/MATARTP)
A PRINT
A VLDCMDKEY(27)
A PAGEUP(17)
A PAGEDOWN(18)
A CF01
A CF03
A CF04
A CA05
A CF08
A CF09
A CA12
A HELP
A HLPRCD(DFTHELP)
A R SCREEN2
A OVERLAY
A CHANGE(28)
A RTNCSRLOC(&SCRN## &FELD## &PSFD##)
A CSRLOC(ROW### COLM##)
A ROW### 3S 0H
A COLM## 3S 0H
A SCRN## 10A H
A FELD## 10A H
A PSFD## 4S 0H
A SDSPGM 10A O 1 2
A SDSUSR 10A O 1 13
A SDSPGM 10A O 1 2
A SDSUSR 10A O 1 13
A 1 63DATE
A EDTCDE(Y)
A 1 73TIME
A R0FMTB 38 O 1 24DSPATR(HI)
A DSPATR(RI)
A 1 71USER
A F3KST R B 6 16REFFLD(DFKST *LIBL/MATARTP)
A 11 DSPATR(UL)
A N11 DSPATR(PR)
A 60 ERRMSGID(ERR0019 *LIBL/ERRMSGF)
A 60 COLOR(RED)
A 60 DSPATR(RI)
A 60 DSPATR(PC)
-
ERRMSGID war schon immer Problematisch.
Wenn die BZ an ist, so wird ausschließlich diese Nachricht ausgegeben und das Feld markiert.
Alle anderen Ausgaben werden ignoriert!
D.h., ERRMSGID wirkt wie PUTOVR/OVRDTA auf einem Feld.
Um das Problem zu lösen (so habe ich das vor laaaanger Zeit festgestellt), muss man
1. BZ an setzen und das Format ausgeben
2. BZ aus setzen und nun das Format nochmal ausgeben bzw. per EXFMT verarbeiten.
Durch die interne Pufferung funktioniert das ganz gut.
Wichtig ist, dass neben ERRMSGID keine anderen Attribute zusätzlich angeschaltet sind.
-
Hallole,
war es nicht gerade umgekehrt? Erst BZ aus, dann an?
A R FMTKEY
...
A XPNR R B 4 11REFFLD(VVHPNR)
A 71N21 ERRMSG('Projektnr. nicht +
A gefunden.' 71)
A 74N21 ERRMSG('Zugriffsfehler in +
A VVPRJP.' 74)
C 21 WRITEFMTKEY
C SETOF 21
C EXFMTFMTKEY
Wir haben immer eine Hilfsbezugszahl genommen, so dass die ERRMSG erst beim EXFMT ausgegeben wurde.
Das ist einfacher bei mehreren Bezugszahlen für verschiedene Fehler.
Gruß, Christian
-
Ja, das kann auch sein .
Similar Threads
-
By Günter Majewski in forum IBM i Hauptforum
Antworten: 0
Letzter Beitrag: 07-01-03, 15:10
-
By Tommy in forum IBM i Hauptforum
Antworten: 7
Letzter Beitrag: 16-12-02, 16:43
-
By Mädele in forum IBM i Hauptforum
Antworten: 2
Letzter Beitrag: 22-11-02, 17:06
-
By HoScHiE in forum IBM i Hauptforum
Antworten: 4
Letzter Beitrag: 03-06-02, 13:30
-
By chrisi in forum IBM i Hauptforum
Antworten: 2
Letzter Beitrag: 27-02-02, 08:46
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