Anzeige der Programmdokumentation

Mit dem Baustein RS_TOOL_ACCESS oder DSYS_SHOW kann die Programmdokumentation angezeigt werden. Die erfolgt jedoch nur als „Liste“. Schöner ist es mit der folgenden Lösung, mit der eine Programmdokumenation gleich als Druckvorschau angezeigt wird

Beispiel

Info

Die Absatzformate werden grafisch ansprechend angezeigt. Fettschrift ist auch als solche zu erkennen. Auch die Überschriften U1 und U2 werden umgesetzt.

Coding

DATA lt_tlines TYPE STANDARD TABLE OF tline.
DATA ls_head   TYPE thead.
DATA ls_opt    TYPE itcpo.
DATA ls_dokil  TYPE dokil.

*** Get index
CALL FUNCTION ‚DOCU_EXIST_CHECK‘
  EXPORTING
    id         = ‚RE‘
    langu      = sy-langu
    object     = ‚ZZMYREPORT‘
    typ        = ‚ ‚
  IMPORTING
    docu_index = ls_dokil
  EXCEPTIONS
    OTHERS     = 5.

IF sy-subrc = 0.
*** Read docu lines
  CALL FUNCTION ‚DOCU_READ‘
    EXPORTING
      id      = ls_dokil-id
      langu   = ls_dokil-langu
      object  = ls_dokil-object
      typ     = ls_dokil-typ
      version = ls_dokil-version
    IMPORTING
      head    = ls_head
    TABLES
      line    = lt_tlines.

*** Read printer options
  SELECT SINGLE spld FROM usr01 INTO ls_opt-tddest
    WHERE bname = sy-uname.
  IF ls_opt-tddest IS INITIAL.
    ls_opt-tddest = ‚LOCL‘.
  ENDIF.
  ls_opt-tdprinter = ‚PRINTER‘.
  ls_opt-tdnoprint = ‚X‘.
  ls_opt-tdpreview = ‚X‘.

*** Call preview
  CALL FUNCTION ‚PRINT_TEXT‘
    EXPORTING
      device  = ‚PRINTER‘
      dialog  = ‚ ‚
      header  = ls_head
      OPTIONS = ls_opt
    TABLES
      lines   = lt_tlines
    EXCEPTIONS
      OTHERS  = 11.

ENDIF.

• Über
• Letzte Artikel

follow me

Enno Wulff

SAP Berater & Entwickler bei Inwerken AG

Moin Moin! Ich heiße Enno und bin der Erfinder, Redakteur und Trickser im Tricktresor. Die Artikel im Tricktresor sollen Euch das Leben einfacher machen und dienen mir als Gedächtnisstütze. Denn an vieles, was ich einmal heraus gefunden habe, kann ich mich später nicht mehr erinnern und suche erneut. Dagegen hilft der Tricktresor. Viel Spaß!

follow me

Letzte Artikel von Enno Wulff (Alle anzeigen)

• Automatische Aufgabengenerierung [abapGit] - 20. Oktober 2020
• Loop At ITAB Group By - 9. September 2020
• Screenshot zur Fehlermeldung erstellen - 9. September 2020