Question

我连接了select-options和参数的值。该查询的条件基于连接数据。我可以得到我需要的所有数据。

这是我的代码：

TABLES: bkpf.

SELECT-OPTIONS: s_belnr FOR bkpf-belnr NO-EXTENSION OBLIGATORY .
PARAMETERS: p_ghjahr LIKE bkpf-gjahr DEFAULT sy-datum(4) OBLIGATORY. "Fiscal

DATA: it_con TYPE TABLE OF BKPF,
      ls_con TYPE bkpf-AWKEY,
      lv_belnr   LIKE bkpf-belnr,
      IT TYPE STANDARD TABLE OF BKPF,
      WA TYPE BKPF.

IF s_belnr-high IS INITIAL.
  CONCATENATE s_belnr-low p_ghjahr INTO ls_con.
  APPEND ls_con TO it_con.
ELSE.  
  lv_belnr = s_belnr-low.
  WHILE lv_belnr LE s_belnr-high.
    CONCATENATE lv_belnr p_ghjahr INTO ls_con.
    APPEND ls_con TO it_con.
    ADD 1 TO lv_belnr.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input  = lv_belnr
      IMPORTING
        output = lv_belnr.
  ENDWHILE.
ENDIF.
LOOP AT it_concats INTO ls_concats.
  SELECT BELNR
    FROM BKPF 
    INTO CORRESPONDING FIELDS OF TABLE IT 
    FOR ALL ENTRIES IN IT_CONCATS 
    WHERE AWKEY EQ IT_CONCATS-AWKEY.
ENDLOOP.

LOOP AT IT INTO WA.
  WRITE: / WA-BELNR.
ENDLOOP.

Answer 1

忽略（因为你的问题太模糊了），你正在寻找的文件类型，我会建议像（警告，我不提供完整的答案，只是代码snipets你必须调整，以使其工作;如果有人想改善我的答案，随意做，我会很乐意投票新的作为好的......如果是的话）

data: awkey_range type range of bkpf-awkey,
      awkey_line like  line of awkey_range.

* Fill the awkey_range with something like
awkey_line-sign = 'I'.
awkey_line-option = 'EQ'.
* loop at bkpf_table into bkpf_line.
*   concatenate bkpf_line-belnr bkpf_line-ghjahr into awkey_line-low.
*   append awkey_line to awkey_range.
* endloop.

* And then a single SQL
select *
  from bkpf
  into table IT "Ouch, what a name
  where awkey in awkey_range.

如果我没有遗漏某些东西，它应该可行。

如何从表中获取值

1 个答案: