当前位置：网站首页>Demo submit a program and obtain ALV data of the program

Demo submit a program and obtain ALV data of the program

2022-07-27 07:44:00 【51CTO】

Shop QQ Group number ：834508274

Please provide your module consultant when applying , Otherwise, it will not pass .
Enter the group and modify the group business card , for example BJ_ABAP_ Forest wood . Advertising and all other irrelevant links are forbidden in the Group , Small program etc. , Enter the group to see the announcement , Thank you for your cooperation
If you don't change your nickname, you will be kicked out irregularly , Thank you for your cooperation ！

Sometimes you need to get the results of other programs , Consider encapsulating the main logic of a program into function, You can also consider somewhere submit Next program .

because submit return, No output interface .

So you need to get from memory .

Here is a simple demo：

Build one first program, according to carrid obtain spfli data .

DEMO SUBMIT A program and get it ALV data _ Code the agriculture

       
       REPORT zlm_spfli.
       
TABLES:spfli.
       
DATA:lt_spfli TYPE TABLE OF spfli.
       
SELECT-OPTIONS s_carrid FOR spfli-carrid.
       
START-OF-SELECTION.
       
  SELECT * FROM spfli INTO TABLE lt_spfli
       
    WHERE carrid IN s_carrid.
       
  CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
       
    EXPORTING
       
      i_structure_name = 'SPFLI'
       
    TABLES
       
      t_outtab         = lt_spfli
       
    EXCEPTIONS
       
      program_error    = 1.
      
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.

Now another program submit This procedure , And get alv Value

       
       *&---------------------------------------------------------------------*
       
*& Report ZLM_GET_ALV_DATA
       
*&---------------------------------------------------------------------*
       
*&
       
*&---------------------------------------------------------------------*
       
REPORT zlm_get_alv_data.
       
TABLES spfli.
       
RANGES s_carrid FOR spfli-carrid.
       
DATA:lr_alv_data TYPE REF TO data.
       
FIELD-SYMBOLS:<lt_alv_data> TYPE ANY TABLE .
       
FIELD-SYMBOLS:<lt_data> TYPE any.
       
START-OF-SELECTION.
       
  s_carrid[] = VALUE #( ( sign = 'I' option = 'EQ' low = 'LH'
       
                                                       high = '' ) ).
       
  cl_salv_bs_runtime_info=>set(
       
   EXPORTING
       
     display  = abap_false
       
     metadata = abap_false
       
     data     = abap_true ).
       
  CLEAR lr_alv_data.
       
  UNASSIGN <lt_alv_data>.
       
  SUBMIT zlm_spfli
       
    WITH s_carrid IN   s_carrid
       
    AND RETURN.
       
  TRY.
       
      cl_salv_bs_runtime_info=>get_data_ref(
       
        IMPORTING
       
          r_data = lr_alv_data ).
       
      ASSIGN lr_alv_data->* TO <lt_alv_data>.
       
      IF <lt_alv_data> IS ASSIGNED AND sy-subrc = 0.
       
      ENDIF.
       
    CATCH cx_salv_bs_sc_runtime_info.
       
  ENDTRY.
       
  cl_salv_bs_runtime_info=>clear_all( ).​
      
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.