Code: Alles auswählen.
FORM daten_beschaffen .
SELECT RQIDENT RQOWNER RQCRETIME RQMODTIME RQ0NAME RQ1NAME RQ2NAME RQAPPRULE RQPJSERR
FROM tsp01
INTO TABLE gt_tsp01
WHERE rqowner = p_uname.
*--------------------Änderungen in die interne Tabelle speichern------------------------*
LOOP AT gt_tsp01 INTO gs_tsp01.
*---------------------Ändern der Formatierung von "Erzeugungszeit"-----------------------*
SELECT SINGLE RQCRETIME FROM tsp01 INTO gv_rqcretime
WHERE rqowner = p_uname.
gv_rqcretime2 = gv_rqcretime(14).
CALL FUNCTION 'RRBA_CONVERT_TIMESTAMP_TO_STR'
EXPORTING
I_TIMESTAMP = gv_rqcretime2
IMPORTING
E_OUTPUT = gv_rqcretimeausgabe.
*---------------------Ändern der Formatierung von "Änderungszeit"-----------------------*
SELECT SINGLE RQMODTIME FROM tsp01 INTO gv_rqmodtime
WHERE rqowner = p_uname.
gv_rqmodtime2 = gv_rqmodtime(14).
CALL FUNCTION 'RRBA_CONVERT_TIMESTAMP_TO_STR'
EXPORTING
I_TIMESTAMP = gv_rqmodtime2
IMPORTING
E_OUTPUT = gv_rqmodtimeausgabe.
MOVE gv_rqcretimeausgabe TO gs_tsp01-RQCRETIME.
MOVE gv_rqmodtimeausgabe TO gs_tsp01-RQMODTIME.
MODIFY gt_tsp01 FROM gs_tsp01.
ENDLOOP.
ENDFORM. " DATEN_BESCHAFFEN