akustisches Signal aus RPG für Moachasoft-EMU

[falke34]

Hallo,

muss ein akutisches Signal ausgeben, ALARM und MSGALARM im Format definiert funktionieren nicht.
QSNBEEP habe ich nicht auf der AS400!
Benutzte Mochasoft als Emulation

Wer kann mir helfen ?

Danke

[Joe]

Hallo Falke34.

Bei Mocha W32 TN5250 Version 8.0
gibt es unter Einstellungen den Punkt "Glocke".

Gruss
Joe

[falke34]

Danke für den Hinweis, die Glocke ist bereits an.
Die Anwendung gibt trotzdem kein Signalton, mit ALARM und
MSGALARM habe ich auch bereits alles versucht ?

MfG
falke34

[KM]

Hallo Falke,

bist Du sicher, dass QsnBeep nicht auf Deiner iSeries ist ? Das ist doch standardmäßig dabei. Oder hast Du ein Uralt-Release ? Ich benutze QsnBeep nämlich auch.

Gruß,
KM

[falke34]

Hallo,

leider habe QNSBEEP nicht auf meinen System.
Dieses API müsste ich mir irgendwie, habe dies leider noch nicht gemacht, da ich in meiner alten Firma nicht die Berechtigung hatte. Hat jemand den groben Ablauf ?

Vielen Dank
falke34

[KM]

Hallo Falke,

versuche es doch mal in RPG mit folgendem Code. Damit kannst Du feststellen, ob Du QsnBeep auf der Maschine hast. Wichtig ist, dass Du die Groß- und Kleinschreibung bei "QsnBeep" genau beachtest !!!

Gruß,
KM


D BEEP PR 10I 0 EXTPROC('QsnBeep')
D PARM1 10I 0 CONST OPTIONS(*OMIT)
D PARM2 10I 0 CONST OPTIONS(*OMIT)
D PARM3 1024A OPTIONS(*OMIT:*VARSIZE)
*
C CALLP BEEP(*OMIT:*OMIT:*OMIT)
*
C MOVE *ON *INLR