test 我看见国际化的
*..check if table is allowed at all
SELECT * FROM DD02L
WHERE TABNAME = GD-TAB
AND AS4LOCAL = 'A'.
EXIT.
ENDSELECT.
IF SY-SUBRC = 0 AND
DD02L-MAINFLAG = 'N'.
MESSAGE I408(MO) WITH GD-TAB.
CLEAR GD-TAB.
EXIT.
ENDIF.
*..Get text from table
CALL FUNCTION 'DDIF_TABL_GET'
EXPORTING
NAME = gd-tab
* STATE = 'A'
LANGU = sy-langu
IMPORTING
* GOTSTATE =
DD02V_WA = ls_dd02v
EXCEPTIONS
ILLEGAL_INPUT = 1
OTHERS = 2.
IF SY-SUBRC = 0.
gd_tabl_text = ls_dd02v-ddtext.
else.
clear gd_tabl_text.
ENDIF.
if gd-drilldown is initial.
refresh gt_selfields.
refresh gt_multi.
endif.
refresh gt_multi_or_all.
refresh gt_multi_or.
refresh gt_or_mul_all.
refresh gt_or_mul.
CALL FUNCTION 'DDIF_FIELDINFO_GET'
EXPORTING
TABNAME = LD_struc
IMPORTING
X030L_WA = ls_X030L
TABLES
DFIES_TAB = LT_DFIES
EXCEPTIONS
NOT_FOUND = 1
OTHERS = 2.
check: sy-subrc = 0.
*..table is changeable
if ls_x030l-flagbyte z bit5.
gd-edit = true.
gd-tabedit = true.
endif.
*..no maintenance if view exists
if gd-view = true.
clear: gd-edit, gd-tabedit.
endif.
*..no maintenance if only display mode
if gd-display = true.s
国家的法规和附近的看过
fddsfgdb- fgfdhfh
| 标题 | |
|---|---|
graph TD
Start --> Stop
pie title Pets adopted by volunteers
"Dogs" : 386
"Cats" : 85
"Rats" : 15
erDiagram
CUSTOMER ||--o{ ORDER : places
ORDER ||--|{ LINE-ITEM : contains
CUSTOMER }|..|{ DELIVERY-ADDRESS : uses
