[NEWSboard IBMi Forum]
Seite 1 von 2 1 2 Letzte
  1. #1
    Registriert seit
    May 2004
    Beiträge
    47

    SMTP Mailadresse auslesen

    Hallo Zusammen,
    kann mir jemand sagen wir ich im RPG-Programm an die SMTP-Information komme, die ich bei dem Befehl WRKDIRE und dann die F19-Taste hinterlegen kann?
    Ich muss im RPG-Programm die dort hinterlegte eMail-Adresse ermitteln.

    Danke für eure Hilfe
    Gruß, cono2000
    http://www.cono2000.de

  2. #2
    Registriert seit
    Aug 2006
    Beiträge
    2.077
    Entweder dspdire oder

    qusrsys/qatmsmtpa

    GG

  3. #3
    Registriert seit
    Nov 2002
    Beiträge
    173
    Zalot!

    Die gewünschte Info müsstest Du in der Tabelle QUSRSYS/QATMSMTPA finden.

    Gruss

    -Martin

    P.S.: Dat kommt davon, wemma zu lang am Teflon hängt statt "Antworten" zu drücken :-)

  4. #4
    Registriert seit
    May 2004
    Beiträge
    47
    Danke für Eure Hilfe
    Gruß, cono2000
    http://www.cono2000.de

  5. #5
    Registriert seit
    Jan 2007
    Beiträge
    189
    Diese o.g. Datei ist nicht von IBM dokumentiert, d.h. IBM kann diese ohne Warnung oder Ankundigung ändern. Vielleicht besser wär's wenn Du die QOKSCHD API nutzt.
    mfg

    Kit
    www.ecofitonline.com
    DeskfIT - ChangefIT - XrefIT

  6. #6
    Registriert seit
    May 2004
    Beiträge
    47
    Zitat Zitat von kitvb1 Beitrag anzeigen
    Diese o.g. Datei ist nicht von IBM dokumentiert, d.h. IBM kann diese ohne Warnung oder Ankundigung ändern. Vielleicht besser wär's wenn Du die QOKSCHD API nutzt.
    Hast du evtl ein Beispiel wie ich mit dem AMI über den Benutzernamen die Mailadtresse ermitteln kann?
    Ich komme mit der IBM-Doku nicht klar.
    Gruß, cono2000
    http://www.cono2000.de

  7. #7
    Registriert seit
    Jan 2007
    Beiträge
    189
    Here's the link - Think400 - iSeries (AS/400) API interfaces

    Option available to return the *CURRENT email address.

    I have (and would if I were you, I would as well) changed the following:
    Code:
    //   MODIFICATION HISTORY                                                  
    //   ====================                                                  
    //   DATE    NR  BY/REASON                                                 
    //   ----    --  ---------                                                 
    // 21.09.09 001  Deon A von Blerk                                          
    //               Use a copybook for the parms                              
     
    // 14.12.10 002  Deon A von Blerk                                          
    // DE1/1000147   If requested do not return the domain part
    mfg

    Kit
    www.ecofitonline.com
    DeskfIT - ChangefIT - XrefIT

  8. #8
    Registriert seit
    May 2004
    Beiträge
    47
    Zitat Zitat von kitvb1 Beitrag anzeigen
    Here's the link - Think400 - iSeries (AS/400) API interfaces

    Option available to return the *CURRENT email address.

    I have (and would if I were you, I would as well) changed the following:
    Code:
    //   MODIFICATION HISTORY                                                  
    //   ====================                                                  
    //   DATE    NR  BY/REASON                                                 
    //   ----    --  ---------                                                 
    // 21.09.09 001  Deon A von Blerk                                          
    //               Use a copybook for the parms                              
     
    // 14.12.10 002  Deon A von Blerk                                          
    // DE1/1000147   If requested do not return the domain part
    Danke für die Antwort.
    Ich glaube das ist es was ich brauche.
    Allerdings bekomme ich eine Fehlermeldung bei der Erstellung:
    CRTSRVPGM SRVPGM( CBX005 ) MODULE( CBX005 ) ACTGRP( QSRVPGM )

    Fehlermeldung:
    CRTSRVPGM SRVPGM(CBX005) MODULE(CBX005) ACTGRP(QSRVPGM)
    Keine Module für angegebenen Wert CBX005 in Bibliothek *LIBL gefunden.
    Serviceprogramm CBX005 nicht erstellt.

    Die Datei befindet sich in der QGPL und hat in der Tat keinen Eintrag. Woher auch?

    Ich bin "noch" nicht der ILE-Profi und komme nicht weiter.
    Gruß, cono2000
    http://www.cono2000.de

  9. #9
    Registriert seit
    Jan 2007
    Beiträge
    189
    CBX005 mit Deine pgm-name ersetzen.
    p.s. Ich habe auch eine beliebige ACTGRP benutzt - nicht QSRVPGM.


    p.p.s. @Biggie: siegschda... und auf Deutsch
    mfg

    Kit
    www.ecofitonline.com
    DeskfIT - ChangefIT - XrefIT

  10. #10
    Registriert seit
    Jan 2001
    Beiträge
    833
    Hallo,


    am einfachsten geht es so wie oben schon angedeutet

    PHP-Code:
    DSPDIRE    USER(&USRPRFOUTPUT(*OUTFILE)
                 
    OUTFILE(QTEMP/QAOSDIRO
    PHP-Code:
    OVRDBF     FILE(QAOSDIROTOFILE(QTEMP/QAOSDIRO)     
                                                         
    RCVF                                                 
    MONMSG     MSGID
    (CPF0000)                            
    OVRDBF     FILE(QATMSMTPATOFILE(QUSRSYS/QATMSMTPA
    Call auf ein Programm
    mit Userprofil und Adresse

    Das war es eigentlich.

    Gruß
    MIchael

  11. #11
    Registriert seit
    Nov 2011
    Beiträge
    16
    Hallo,

    ich suche auch nach einer Möglichkeit die SMTP Adresse mit DSPDIRE aus zu lesen. Aber egal welches Format der Ausgabedatei ich nehme(Type1, 2 oder 3), die Felder sind leer! Mit der Anzeige und F19
    sehe ich aber die SMTP Daten.
    Kann mir da jemand weiter helfen?

    Und noch eine Frage dazu: DSPDIRE mit Benutzer Profil oder mit Benutzer-ID und Adresse, oder ist das egal??

    Gruß
    Annegret

  12. #12
    Registriert seit
    Dec 2005
    Beiträge
    276
    Hallo Tabby,

    diese Werte sind erst verfügbar, wenn du mit CVTNAMSMTP die SMTP Objekte konvertierst.
    Danach ist aber kein WRKNAMSMTP mehr möglich.

    MFG Zerberus
    MFG Zerberus

Similar Threads

  1. Datensätze blockweise auslesen
    By Easyrider in forum NEWSboard Programmierung
    Antworten: 9
    Letzter Beitrag: 20-06-08, 06:32
  2. 5250-Masken auslesen
    By anateus in forum IBM i Hauptforum
    Antworten: 1
    Letzter Beitrag: 23-01-07, 10:35
  3. SMTP Server bricht ab
    By BN78 in forum IBM i Hauptforum
    Antworten: 1
    Letzter Beitrag: 21-11-06, 11:32
  4. Mailadresse von User auf Iseries speichern und auslesen
    By linguin in forum IBM i Hauptforum
    Antworten: 3
    Letzter Beitrag: 22-06-06, 08:39
  5. Spoolattribute zur Seitengröße auslesen?
    By FrankL in forum NEWSboard Programmierung
    Antworten: 2
    Letzter Beitrag: 27-04-06, 14:24

Berechtigungen

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