ERRMSG wird nicht ausgegeben

[Mr.iSeries]

Habe bei einigen Programmen immer wieder das gleiche Phänomen.

Obwohl die Bezugszahl für meine ERRMSG gesetzt ist wird beim EXFMT meine ERRMSG nicht ausgegeben.

Bei manchen Programmen klappt es und bei anderen nicht.

Mein Arbeitskollege hatte das auch schon und weiß nicht weiter.

Mich macht das echt noch Wahnsinnig.

Hat jemand vielleicht ne Lösung oder hatte schon mal das gleiche Problem?

[Fuerchau]

ERRMSG ist insoweit ein Problem, als dass ausschließlich diese Information an das Device übertragen wird.
Alle anderen Felder werden NICHT gesendet.
Man muss also sicherstellen, dass das Format auch aktiv auf dem Bildschirm ist.

Das Problem hier ist der EXFMT, der ja den WRITE und READ kombiniert.

Bei ERRMSG habe ich mir immer mit einem Trick geholfen:

BZ an
WRITE Format
BZ aus
EXFMT Format

Durch die Pufferung wird der Inhalt dann korrekt ausgegeben.

[Mr.iSeries]

Wäre dann so... aber funktioniert leider nicht... die ERRMSG wird nur ganz kurz für weniger als 1 Sek. angezeigt.

Ferrmsg CF E WORKSTN
C dou *in03 = *on
C exfmt test
C if *in03 = *off
C if feld1 = 'F'
C eval *in99 = *on
C write test
C eval *in99 = *off
C else
C eval *in99 = *off
C endif

C endif
C enddo
C eval *inlr=*on

vorher hatte ich es so... und es hat funktioniert. Jedoch funktioniert es bei einigen Programmen und bei anderen nicht.

Ferrmsg CF E WORKSTN
C dou *in03 = *on
C exfmt test
C if *in03 = *off
C if feld1 = 'F'
C eval *in99 = *on
C else
C eval *in99 = *off
C endif

C endif
C enddo
C eval *inlr=*on

[harkne]

Ich bin nicht sicher aber könnte es vielleicht damit zusammen hängen dass Du vielleicht deine Funktionstaste 3 als CA03 und nicht als CF03 definiert hast ?

Sorry hab nicht gesehen dass Du auf *off abfragst. Also ist es egal wie sie definiert wurde.

[B.Hauser]

Nur so'ne Idee!

Könnte es sein, dass die Formate z.T. die 24. Zeile belegen?
In diesm Fall würde die Fehlermeldung beim Rausscheiben des Formats überklatscht.

Birgitta