SAP ABAP 拼接JSON串

JSON格式：[{“BUKRS”:"",“KOSTL”:"",“MCTXT”:""}, {“BUKRS”:"",“KOSTL”:"",“MCTXT”:""}]
DATA:GT_M_KOSTN LIKE TABLE OF M_KOSTN WITH HEADER LINE.

SELECT * INTO CORRESPONDING FIELDS OF TABLE GT_M_KOSTN FROM M_KOSTN WHERE BUKRS = G_BUKRS AND DATBI = ‘99991231’ .

CONCATENATE ‘[’ RESULT INTO RESULT.
LOOP AT GT_M_KOSTN.
CONCATENATE RESULT ‘{’ ‘“BUKRS”:’ '"'GT_M_KOSTN-BUKRS ‘"’ ‘,’ ‘“KOSTL”:’ '"'GT_M_KOSTN-KOSTL ‘"’ ‘,’ ‘“MCTXT”:’ '"'GT_M_KOSTN-MCTXT ‘"’ ‘},’ INTO RESULT.

ENDLOOP.
DATA:N TYPE I.
N = strlen( RESULT ) - 1.
RESULT = RESULT+0(N).

CONCATENATE RESULT ‘]’ INTO RESULT.