-
SNDBRKMSG an Benutzer senden ?
Hallo
Wir haben jeden Tag einige Abschlüsse und dann soll an bestimmte User eine art SNDBRKMSG gesendet werden, damit diese wissen, dass der Abschluß fertig ist. Danch können Sie dann wieder in der Anwendung arbeiten. Im Standard kann ich mit SNDBRKMSG nur eine Nachricht an eine Datenstation schicken und nicht an ein Benutzer. In meinem Fall sind es ca. 10 Benutzer die den gleichen Text bekommen sollen. Das API Programm QEZSNDMG nützt mir nichts, weil ich das nicht in einem CL-Programm aufrufen kann. Kann mir hier jemand weiterhelfen ?
Vielen Dank
-
SNDMSG
Hallo,
wie wäre es denn mit "sndmsg" ?
-
Natürlich kannst du auch API's aus CLP aufrufen.
Für die Binär-Angaben verwendest du die Funktion %BIN(&VAR pos len), wobei "pos" die Position (default 1) im Feld und "len" die Länge (2- oder 4-Byte, default 4) angibt.
Also:
dcl &msgtp *char 10 '*INFO'
dcl &delmod *char 10 '*BREAK'
dcl &msgtext *char 512
dcl &msglen *char 4
dcl &usrlst *char 250
dcl &nbrusr *char 4
dcl &msgind *char 4
dcl &funreq *char 4
dcl &errcod *char 8 x'0000000000000000'
chgvar &msgtext ('Nachricht ......')
chgvar %bin(&msglen) 80
chgvar &usrlst ('USER1.....USER2.....')
chgvar %bin(nbrusr) 2
call QEZSNDMG parm(&msgtp &delmod ...
-
@TARASIK
SNDMSG gibt eben keine Durchbruchnachricht an den User !
API-Beschreibung:
http://publib.boulder.ibm.com/iserie...s/QEZSNDMG.htm
This API combines the functions of the Send Message (SNDMSG) and Send Break Message (SNDBRKMSG) commands. In addition, it provides the ability to:
Send inquiry messages to more than one user
Send break messages to user profiles
Send break and inquiry messages to all active users
Send nonbreak and inquiry messages to display stations
-
An
[Hallo Fuerchau
Vielen Dank für die Hilfe , klappt auch schon, allerdings wie kann ich das Programm in eine CL aufrufen , dass im Batch läuft. Geht das Überhaupt ?
Danke
-
Hallo Herbie!
Ja das geht, du musst dazu noch die optionale Parameter-Gruppe 2 angeben. Darin sind 3 Parameter enthalten.
Code:
1. Parameter: CHAR(1) VALUE(N) /* Bedienerführung nicht anzeigen */
2. Parameter: CHAR(20) VALUE('QSYSOPR *LIBL ') /* Antwort-MSGQ */
3. Parameter: CHAR(4) VALUE(*USR) /* Benutzertyp */
Diese Parameter gibtst du einfach hinter dem Fehlercode-Parameter an das Programm QEZSNDMG weiter.
Viele Grüße
Jürgen
-
Super vielen Dank hat mit sehr geholfen
Similar Threads
-
By pwrdwnsys in forum IBM i Hauptforum
Antworten: 0
Letzter Beitrag: 27-11-06, 12:10
-
By Weki in forum IBM i Hauptforum
Antworten: 4
Letzter Beitrag: 11-09-06, 13:31
-
By ath in forum IBM i Hauptforum
Antworten: 3
Letzter Beitrag: 15-06-06, 11:23
-
By fischers in forum IBM i Hauptforum
Antworten: 13
Letzter Beitrag: 12-06-06, 08:57
-
By Peet in forum IBM i Hauptforum
Antworten: 5
Letzter Beitrag: 20-11-05, 10:13
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