在ABAP中，可以使用以下步骤来模拟自主事务：

1. 创建一个独立的内部子程序，这个内部子程序应该被定义为“自主的”，也就是说，它在被调用时将启动一个新的数据库事务。

DATA: l_var TYPE char1.

START-OF-SELECTION. CALL FUNCTION 'Z_TRANSACTION' EXPORTING iv_parameter = 'X' IMPORTING ev_result = l_var EXCEPTIONS OTHERS = 1.

WRITE: / 'Result:', l_var.

2. 在内部子程序中，定义一个新的数据库事务：

FORM z_transaction USING iv_parameter TYPE char1 CHANGING ev_result TYPE char1.

DATA: l_var TYPE char1.

UPDATE table1 SET field1 = iv_parameter.
COMMIT WORK.

SELECT SINGLE field1 FROM table2 INTO l_var.
ev_result = l_var.

ENDFORM.

在上述示例中，我们的内部子程序是“Z_TRANSACTION”，它接收一个字符型参数“iv_parameter”并返回一个字符型结果“ev_result”。在内部子程序中，我们通过修改“table1”表的“field1”字段的值来模拟一些事务。然后我们提交此更改。

接下来，我们从“table2”表中选择“field1”的值并将其存储在本地变量“l_var”中。最后，我们'l_var”赋给传递的结果参数“ev_result”。

当我们调用该子程序时，将启动一个新的数据库事务，并在其中执行所有的更改和查询。在事务提交之前，对于调用程序中的其他操作，这些更改和查询不可见。这就是自主事务的效果。