abap - 使用 cl_salv_table 显示数据时发生意外的数据库提交

Question

在一个 ABAP 程序中，我注意到使用类 cl_salv_table 显示本地表时数据的意外持久性。 .

为了重现，我创建了一个最小的代码示例。该程序执行插入，在 ALV 中显示数据，然后执行 ROLLBACK WORK .
我希望插入的值在回滚之前存在于数据库中，而在回滚之后则不存在。

但是，如果在插入和回滚之间，显示了一个 ALV 网格，则数据在回滚之后仍然存在，并且立即对其他事务可见。

这是预期的行为，如果是这样，我该如何避免这种情况？我们确实经常使用这个类，看起来我们可能会在我们实际上不想要的时候无意中将值提交到数据库。

这是代码:

*&---------------------------------------------------------------------*
*& Report  zok_alv_commit
*&
*&---------------------------------------------------------------------*
*&
*&
*&---------------------------------------------------------------------*
REPORT zok_alv_commit.

SELECTION-SCREEN BEGIN OF BLOCK b1.

PARAMETERS: p_showtb TYPE boolean AS CHECKBOX DEFAULT abap_false.

SELECTION-SCREEN END OF BLOCK b1.

START-OF-SELECTION.

  DATA: lt_table TYPE TABLE OF zok_alv,
        ls_table TYPE zok_alv.

  """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  " Create new GUID and insert into table
  """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  TRY.
      ls_table-guid = cl_system_uuid=>create_uuid_c22_static( ).
    CATCH cx_uuid_error.
      " Error creating UUID
      MESSAGE e836(/basf/dps3_apodata).
  ENDTRY.
  WRITE: |Create guid { ls_table-guid } |, /.

  INSERT zok_alv FROM ls_table.
  APPEND ls_table TO lt_table.

  """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  " The important bit: show something in an ALV
  """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""

  IF p_showtb = abap_true.
    cl_salv_table=>factory(
      IMPORTING r_salv_table = DATA(lo_alv)
      CHANGING t_table = lt_table
    ).

    lo_alv->display( ).
  ENDIF.

  """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""
  " Check existence in table before and after rollback
  " Expectation: If the ALV is shown above, the data is already committed,
  " so the ROLLBACK WORK will not have an effect.
  """"""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""""

  SELECT SINGLE guid FROM zok_alv INTO @DATA(lv_ignored) WHERE guid = @ls_table-guid.
  IF sy-subrc = 0.
    WRITE: 'GUID exists on DB before rollback.', /.
  ELSE.
    WRITE: 'GUID does NOT exist on DB before rollback.', /.
  ENDIF.

  ROLLBACK WORK.

  SELECT SINGLE guid FROM zok_alv INTO @lv_ignored WHERE guid = @ls_table-guid.
  IF sy-subrc = 0.
    WRITE: 'GUID exists on DB after rollback.', /.
  ELSE.
    WRITE: 'GUID does NOT exist on DB after rollback.', /.
  ENDIF.

它需要一个表 ZOK_ALV只有 MANDT和一个 22 个字符的字段 GUID作为主键，仅此而已。

使用 p_showtb 执行代码时 未选中 :





如您所见，回滚后该值不存在，并且表中也不存在 - 正如预期的那样。

使用 p_showtb 执行代码时 已检查 :




此时，ID 已经在 SE16 中的另一个 session 中可见:



(此时我用 Back (F3) 离开 ALV 屏幕)
代码确认，即使在回滚之后，该值仍然存在:



即使在离开程序之后，这些值仍然存在于数据库中。

Answer 1

要回答 2 个问题:

1) 是的，这是“预期行为”如 database commit documentation 中所述:

a database commit is performed implicitly in the following situation: Completion of a dialog step ...

(这意味着任何显示器都会提交数据库)

这是因为当屏幕显示时，SAP 除了等待用户操作之外什么都不做，所以 workprocess用于在显示之前执行 ABAP 代码的代码可以重用于执行来自其他用户的请求的 ABAP 代码。

为了使工作进程可以重用，工作进程(变量)的内存要被切换，它被称为 推出/推出 ，这还要求为内部 SAP 内容更新一些系统数据库表，并且需要数据库提交。这在 SAP LUWs 的文档中有更好的解释。 .我在某个地方读到过，但我不记得确切的地方。

2) 不，你不能“避免这种行为” ，但考虑到您当前的插入 + 显示 + 回滚插入的逻辑，您可以执行以下解决方案之一，但我只推荐您的情况下的第一个，而不是第二个:

更改您的逻辑以符合 SAP 规则(即，任何显示都会提交数据库，因此请耐心等待)。如果你的逻辑真的是你说的那样，那你为什么要在数据库中插入一些东西并回滚呢？没有更多细节，我的回答是删除插入和回滚并保留显示。回答其他问题纯属猜测，因为您没有提供足够的详细信息，因为您没有提供足够的详细信息，您的实际类(class)是如何真正工作的(它确实插入 + 显示 + 回滚肯定是有原因的，但是您的解释中缺少什么？)您会最好发布另一个问题并提供所有详细信息。

第二种解决方案(“不推荐、反效果和危险”)，如果您真的想坚持当前的逻辑:将您的显示移动到启用 RFC 的功能模块，然后执行 CALL FUNCTION '...' DESTINATION 'NONE' KEEPING LOGICAL UNIT OF WORK (参见 documentation)。不推荐，因为它仅供内部使用。它的表现适得其反，因为它同时占用了 2 个工作流程。这很危险，因为“最坏的情况可能是 系统关闭 ”。