READ TEXT: Unterschied zwischen den Versionen

Aus SAP Wiki ツ
(Die Seite wurde neu angelegt: „=== Parameter für Texte === => Texte in Stammsätze und Belege“)
 
Zeile 1: Zeile 1:
=== Parameter für Texte ===
=== Parameter für Texte ===


Mit diesen FuBa können die Texte aus Stammsätze und Belege ermittelt werden.
Wie die Parameter für die verschiedenen Texte zusammengesetzt werden müssen, kann man hier auf einen Blick sehen:
=> [[Texte_in_Stammsätze_und_Belege#Header_verschiedener_Texte|Texte in Stammsätze und Belege]]
=> [[Texte_in_Stammsätze_und_Belege#Header_verschiedener_Texte|Texte in Stammsätze und Belege]]
Der Text wird in eine simple interne Tabelle mit Typ "TLINE" geschrieben.
Oft ist es das Ziel die Inhalte in einem String zu speichern.
Zum Beispiel könnte der Inhalt der interne Tabelle so aussehen:
[[Datei:READ TEXT Output Table.png]]
Die Verkettung abhängig vom TDFORMAT:
  IF sy-subrc = 0 AND lines( lt_text_lines ) > 0.
    LOOP AT lt_text_lines ASSIGNING FIELD-SYMBOL(<text_line>).
      IF <text_line>-tdformat EQ '*'.
        rv_result = |{ rv_result }{ cl_abap_char_utilities=>cr_lf }{ <text_line>-tdline }|.
      ELSEIF <text_line>-tdformat EQ '='.
        rv_result = |{ rv_result }{ <text_line>-tdline }|.
      ELSE.
        rv_result = |{ rv_result } { <text_line>-tdline }|.
      ENDIF.
    ENDLOOP.
  ENDIF.

Version vom 4. August 2021, 12:49 Uhr

Parameter für Texte

Mit diesen FuBa können die Texte aus Stammsätze und Belege ermittelt werden.

Wie die Parameter für die verschiedenen Texte zusammengesetzt werden müssen, kann man hier auf einen Blick sehen: => Texte in Stammsätze und Belege

Der Text wird in eine simple interne Tabelle mit Typ "TLINE" geschrieben. Oft ist es das Ziel die Inhalte in einem String zu speichern.

Zum Beispiel könnte der Inhalt der interne Tabelle so aussehen:

READ TEXT Output Table.png

Die Verkettung abhängig vom TDFORMAT:

 IF sy-subrc = 0 AND lines( lt_text_lines ) > 0.
   LOOP AT lt_text_lines ASSIGNING FIELD-SYMBOL(<text_line>).
     IF <text_line>-tdformat EQ '*'.
       rv_result = |{ rv_result }{ cl_abap_char_utilities=>cr_lf }{ <text_line>-tdline }|.
     ELSEIF <text_line>-tdformat EQ '='.
       rv_result = |{ rv_result }{ <text_line>-tdline }|.
     ELSE.
       rv_result = |{ rv_result } { <text_line>-tdline }|.
     ENDIF.
   ENDLOOP.
 ENDIF.