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