ABAP限定客戶端選擇數據

REPORT  zabap_gui.

TABLES: kna1.

* Local structure for local internal table
* and work area
TYPES:
       BEGIN OF ty_kna1,
         mandt TYPE kna1-mandt,
         kunnr TYPE kna1-kunnr,
         land1 TYPE kna1-land1,
         name1 TYPE kna1-name1,
         ort01 TYPE kna1-ort01,
         pstlz TYPE kna1-pstlz,
         regio TYPE kna1-regio,
       END OF ty_kna1.

* Local internal table & work area
DATA:
      it_kna1 TYPE TABLE OF ty_kna1,
      wa_kna1 TYPE ty_kna1.

* Selection range by select option internal table
SELECT-OPTIONS: s_kunnr FOR kna1-kunnr.

START-OF-SELECTION.

* Selection of the specific fields
  SELECT mandt kunnr land1 name1 ort01 pstlz regio
    INTO TABLE it_kna1 FROM kna1
    CLIENT SPECIFIED  "MANDT has been selected
                      "hence client specified is must 
                      " "此處是重點
    WHERE mandt = '800'    "此處是重點
      AND kunnr IN s_kunnr.

  IF sy-subrc = 0.
    WRITE:/   'Clnt',
            5 'Customer No',
           14 'Country',
           24 'Name',
           60 'City',
          100 'Postal',
          112 'Region'.
    ULINE.
    SKIP.

    LOOP AT it_kna1 INTO wa_kna1.
      WRITE:/    wa_kna1-mandt,
               5 wa_kna1-kunnr,
              14 wa_kna1-land1,
              24 wa_kna1-name1,
              60 wa_kna1-ort01,
             100 wa_kna1-pstlz,
             112 wa_kna1-regio.
    ENDLOOP.
  ENDIF.
?著作權歸作者所有,轉載或內容合作請聯系作者
平臺聲明:文章內容(如有圖片或視頻亦包括在內)由作者上傳并發布,文章內容僅代表作者本人觀點,簡書系信息發布平臺,僅提供信息存儲服務。

推薦閱讀更多精彩內容