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.
- 7. December: Excel Racing Simulation – Root Vole Race - 7. Dezember 2024
- 5. December: ABAPConf - 5. Dezember 2024
- 4. December: Only a lazy developer is a good developer - 4. Dezember 2024