ALV 界面数据与内表相互传递

左手的ㄟ右手 2022-04-03 04:15 508阅读 0赞

# **一 、 界面传递给内表** #

1 首选 ALV 数据必须是可修改状态

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2l0eWFuZ2ppYQ_size_16_color_FFFFFF_t_70][]

2 加上一段代码

![watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2l0eWFuZ2ppYQ_size_16_color_FFFFFF_t_70 1][]

"alv 修改后传给GT\_OUT  
  CALL FUNCTION 'GET\_GLOBALS\_FROM\_SLVC\_FULLSCR'  
    IMPORTING  
      e\_grid = lr\_grid.  
  
  CALL METHOD lr\_grid->check\_changed\_data .  
  CALL METHOD lr\_grid->refresh\_table\_display .

# 二 、内表传递给界面  #

通过判断内表值赋予红绿灯，然后更新内表，显示在前台

\* ALV显示数据  
  CALL FUNCTION 'REUSE\_ALV\_GRID\_DISPLAY\_LVC'  
    EXPORTING  
      i\_callback\_program       = sy-repid "lv\_repid  
      is\_layout\_lvc            = ls\_layo  
      i\_callback\_pf\_status\_set = 'FRM\_STATUS\_SET'  
      i\_callback\_user\_command  = 'FRM\_USER\_COMMAND'  
      it\_fieldcat\_lvc          = lt\_fcat\[\]  
      i\_save                   = 'A'  
    TABLES  
      t\_outtab                 = gt\_out\[\]  
    EXCEPTIONS  
      program\_error            = 1  
      OTHERS                   = 2.  
\* 数据显示失败  
  IF sy-subrc NE 0.  
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno  
             WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.  
  ENDIF.

更新内表数据

![70][]

在 AVL 的实现过程 i\_callback\_user\_command  = 'FRM\_USER\_COMMAND' 的最后如入 us\_selfield-refresh = 'X'.

![70][]

![70 1][]

FORM frm\_user\_command USING uv\_ucomm LIKE sy-ucomm  
                          us\_selfield TYPE slis\_selfield.

DATA: ls\_out LIKE gs\_out .  
  DATA: lt\_out LIKE TABLE OF gs\_out .  
  IF  sy-ucomm EQ 'CK' .  
    LOOP AT gt\_out INTO gs\_out .  
      IF  ( gs\_out-bdmng - gs\_out-zjxhs >= 10 )  
           OR ( gs\_out-zjxhs - gs\_out-bdmng >= 10 ) .  
        gs\_out-light  =   '@08@'.  
      ELSE .  
        gs\_out-light = '@0A@'.  
      ENDIF .  
      MODIFY gt\_out FROM gs\_out   TRANSPORTING light .  
    ENDLOOP .

ENDIF .

主要下面这句话

us\_selfield-refresh = 'X'.

[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2l0eWFuZ2ppYQ_size_16_color_FFFFFF_t_70]: /images/20220403/52bd79fb90804a098be74fc4b5e92c53.png
[watermark_type_ZmFuZ3poZW5naGVpdGk_shadow_10_text_aHR0cHM6Ly9ibG9nLmNzZG4ubmV0L2l0eWFuZ2ppYQ_size_16_color_FFFFFF_t_70 1]: /images/20220403/4098408a1b4e45c6976a32073a56627e.png
[70]: /images/20220403/354b41e67d7b47ffa9c3c291c820ca0a.png
[70 1]: /images/20220403/227fd44591aa494b94f6a7915a2c9f8f.png