[NEWSboard IBMi Forum]
  1. #1
    Registriert seit
    Dec 2000
    Beiträge
    279

    PGM MSGQ auslese

    Hallo
    ich versuche gerade eine Info im CL auzulesen.
    Hintergrund:
    wir stellen Drucker von RMTOUTQ auf DEV um.
    dh im CL löschen anhalten und löschen der Outq
    ...
    und dann ein Ping auf den Neuen Druckernamen (IP wird über DNS/MAC -adresse vergeben.
    Jetz möcht ich die IP auslesen und in eine Datenbank schreiben.
    Ich hbe es Versucht mit
    ping &neuname
    RCVMSG PGMQ(*SAME) MSGQ(*PGMQ) MSGTYPE(*any) +
    RMV(*NO) MSG(&MSG1) MSGDTA(&MSG2) MSGID(&TCP)
    aber bekomme irgendwelche Nachrichten von vorherigen Aktionen im Programm.


    hat jemand einen Tipp
    Programmierung

  2. #2
    Registriert seit
    Jan 2007
    Beiträge
    904
    Versteh ich das richtig, Du möchtest einen Ping auf den Druckernamen machen und die IP Adresse auslesen. Damit der Ping mit dem Namen funktioniert, brauchst Du, soviel ich weiss, einen Eintrag in der TCP-IP Hosttabelle. Diese kannst Du ja auch in der TCP Administration abrufen und auch eine Liste drucken. Und wenn der Drucker als DEV konfiguriert ist, gäbe es noch das Retrieve Device Description (QDCRDEVD) API.
    kf

  3. #3
    Registriert seit
    Feb 2001
    Beiträge
    20.206
    Wenn der DNS-Server aber nicht die IBM i ist, steht nichts in der Host-Tabelle.
    Was den Ping angeht, so sendet dieser die Nachrichten an das übergeordnete Programm.
    Es kommt also auf die Reihenfolge der Aufrufe an.
    EIn CLP, dass den Ping absetzt, sollte also aus der eigenen PGMQ die Nachrichten rückwärts (*LAST) auslesen können. Ein Remove *YES wäre dazu hilfreich.
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de

  4. #4
    Registriert seit
    Dec 2000
    Beiträge
    279
    Danke es funktioniert. ich muss nur mehrmals lesen (und löschen) bis ich die richtige Meldung habe.
    "PING-Antwort..." Das Ganze sicherheitshalber nur max. 5 mal.
    Programmierung

  5. #5
    Registriert seit
    Feb 2001
    Beiträge
    20.206
    Die Anzahl kannst du im Kommando anpassen. Hoffe mal, dass kein Spaßvogel die Defaults mal anpasst.
    Z.B. NBRPKT(10) WAITTIME(30).
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de

  6. #6
    Registriert seit
    Dec 2000
    Beiträge
    279
    Guten Morgen,
    ja deshalb habe ich es sicherheitshalber altmodisch über eine Zählschleife gemacht. :-))
    Programmierung

Similar Threads

  1. MSGQ als PGM Schalter
    By Techniker in forum IBM i Hauptforum
    Antworten: 8
    Letzter Beitrag: 09-09-08, 11:42
  2. Triggermeldungen von RPG-Pgm zu Cobol-Pgm
    By puddschini in forum NEWSboard Programmierung
    Antworten: 7
    Letzter Beitrag: 23-05-08, 10:52
  3. MSGQ meheren Jobs zuordnen ?
    By Schnichels in forum IBM i Hauptforum
    Antworten: 8
    Letzter Beitrag: 09-08-02, 19:07
  4. MSGQ QSYSMSG
    By Ina in forum IBM i Hauptforum
    Antworten: 5
    Letzter Beitrag: 29-05-02, 09:38
  5. QSYSOPR msg an meine MSGQ??
    By Dana in forum IBM i Hauptforum
    Antworten: 1
    Letzter Beitrag: 14-12-01, 10:35

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •