SOOD Empfänger E-Mail-Adresse auslesen

Code: Alles auswählen.

"Deklaration
DATA: sreq        TYPE REF TO cl_in_adm_bcs, "Klasse mit Methoden und Parametern zur E-Mail-Ermittlung
      crtim_l     TYPE bcs_timestamp_crea,
      crtim_h     TYPE bcs_timestamp_crea,
      l_timestamp TYPE timestampl.

"Parameter mit Zeitlichen Einschränkungen zur E-Mail Suche
PARAMETERS: cdat_l TYPE d, "Anfangsdatum
            ctim_l TYPE t, "Anfangszeit 
            cdat_h TYPE d, "Ende-Datum
            ctim_h TYPE t. "Ende-Zeit

START-OF-SELECTION.

  CREATE OBJECT sreq.
  
  "Zeitdaten formatieren
  CONVERT DATE cdat_l TIME ctim_l
    INTO TIME STAMP l_timestamp TIME ZONE sy-zonlo.
  crtim_l = l_timestamp.
  CONVERT DATE cdat_h TIME ctim_h
  INTO TIME STAMP l_timestamp TIME ZONE sy-zonlo.
  crtim_h = l_timestamp.

  " Zeitparamter des Objects sreq füllen
  sreq->set_crtim_low( crtim_low = crtim_l ). "Startzeitpunkit setzen
  sreq->set_crtim_high( crtim_high =  crtim_h ). "Endzeitpunkt setzen
  
  " Datenselektion über die Methode Select
  sreq->select( ). " Daten holen
  
  "Die Daten stehen nun in der Tabelle sreq->sreqs. Die Empfänger in der Spalte to_recname.
  write:/ lines( sreq->sreqs ).