Startseite Beiträge getaggt mit "tbtcp"

Schlagwort: tbtcp

[ABAP] Job zu einem Report suchen 

* Tabelle TBTCP (Step-Uebersicht eines Batch-Jobs)

* Reportname
DATA(lv_progname) = VALUE tbtcp-progname( ).
* Einplanungsdatum
DATA(lv_date) = VALUE tbtcp-sdldate( ).
* Einplanungszeit
DATA(lv_time) = VALUE tbtcp-sdltime( ).

SELECT-OPTIONS: so_prog FOR lv_progname.
SELECT-OPTIONS: so_date FOR lv_date.
SELECT-OPTIONS: so_time FOR lv_time.

START-OF-SELECTION.

  SELECT *
    INTO TABLE @DATA(it_job)
    FROM tbtcp
    WHERE progname IN @so_prog
      AND sdldate IN @so_date
      AND sdltime IN @so_time.

* Hier Objekte für die Ausgabe hinzufügen
  cl_demo_output=>write_data( it_job ).

* HTML-Code vom Demo-Output holen
  DATA(lv_html) = cl_demo_output=>get( ).

* Daten im Inline-Browser im SAP-Fenster anzeigen
  cl_abap_browser=>show_html( EXPORTING
                                title        = 'Daten'
                                html_string  = lv_html
                                container    = cl_gui_container=>default_screen ).

* cl_gui_container=>default_screen erzwingen
  WRITE: space.

[ABAP] Erzeugte Spool-Aufträge eines Jobs anzeigen 

DATA: it_tbtcp TYPE STANDARD TABLE OF tbtcp WITH DEFAULT KEY.

* TBTCP - Step-Uebersicht eines Batch-Jobs
SELECT * FROM tbtcp INTO TABLE @it_tbtcp
  WHERE jobname = '<JOBNAME>'.

LOOP AT it_tbtcp ASSIGNING FIELD-SYMBOL(<s>).
  WRITE: / '                              Name eines Hintergrundjobs:', <s>-jobname.   " Jobname
  WRITE: / '                                    Kennummer eines Jobs:', <s>-jobcount.
  WRITE: / '                               Kennummer eines Job-Steps:', <s>-stepcount.
  WRITE: / 'Name eines Programms innerhalb eines Steps (z.B. Report):', <s>-progname.  " Programm
  WRITE: / '                   Datum einer Job- bzw. Step-Einplanung:', <s>-sdldate.
  WRITE: / '                 Uhrzeit einer Job- bzw. Step-Einplanung:', <s>-sdltime.
  WRITE: / '               Initiator einer Job- bzw. Step-Einplanung:', <s>-sdluname.  " Batch-User
  WRITE: / '               Name einer Variante innerhalb eines Steps:', <s>-variant.
  WRITE: / '    Kennung einer Ausgabeliste eines Batch-Jobs im Spool:', <s>-listident. " Spool-Auftrags-Nummer
  WRITE: / 'Status eines Steps innerhalb der Hintergrundverarbeitung:', <s>-status.
  WRITE: / '                      Exitkode eines externen Programmes:', <s>-exitcode.
  WRITE: / '                                      Spool-Ausgabegerät:', <s>-pdest.     " Drucker
  WRITE: / '                                 Spool-Beschreibungstext:', <s>-prtxt.
  WRITE: / '                         DRUCKEN: Typ des Spool-Auftrags:', <s>-ptype.
  WRITE: / '                                      Spool-Aufbereitung:', <s>-paart.

  ULINE.

ENDLOOP.