方法1：使用函数EM_GET_NUMBER_OF_ENTRIES

这个函数使用起来很简单，只需要将想查询的数据库表名称维护进输入参数IT_TABLES:

上图说明这个函数支持批量操作，我查询的两张表名为TADIR和PROGDIR.

执行函数，得到表的条目数：

方法2:使用ADBC

方法1的实现其实没有什么神奇之处，就是用Open SQL SELECT COUNT(*)来取得一张表的数据个数。

如果我们使用的ABAP Netweaver底层数据库用的是SAP HANA，那么有一张元数据表M_TABLES，存放了所有表的元数据。

看个例子：

下面一条SQL语句，可以轻松获得表COMM_PRODUCT和TADIR的条目数：

SELECT * FROM M_TABLES WHERE TABLE_NAME IN (‘COMM_PRODUCT’, ‘TADIR’)

M_TABLES这张表的详细信息可以查看SAP帮助：https://help.sap.com/doc/4fe29514fd584807ac9f2a04f6754767/2.0.01/en-US/20c7689a75191014ad52c1beb40ce2d2.html

我写了个简单的ABAP工具，把对表M_TABLES的操作封装了起来：

class CL_CRM_HOME_TABLE_SIZE_TOOL definition

public

final

create public .

public section.

TYPES: BEGIN OF ty_size,

table_name TYPE char256,

record_count TYPE int4,

table_size TYPE int4,

END OF ty_size.

TYPES: tt_size TYPE TABLE OF ty_size with key table_name.

class-methods GET_SIZE

importing

!IT_INPUT type STRING_TABLE

returning

value(RT_RESULT) type tt_size .

protected section.

private section.

ENDCLASS.

CLASS CL_CRM_HOME_TABLE_SIZE_TOOL IMPLEMENTATION.

METHOD get_size.

DATA(lv_in) = REDUCE string( INIT x TYPE string FOR <data> IN it_input NEXT x = SWITCH #( x

WHEN space THEN |'{ <data> }'| ELSE x && ',' && |'{ <data> }'| ) ).

TRY.

DATA(lo_sql_con) = cl_sql_connection=>get_connection( ).

DATA(lo_stmt) = lo_sql_con->create_statement( ).

DATA: lv_stmt TYPE string.

lv_stmt = |select table_name, record_count, table_size from m_tables where table_name in ({ lv_in })|.

DATA(lo_res) = lo_stmt->execute_query( lv_stmt ).

GET REFERENCE OF rt_result INTO DATA(lr_data).

lo_res->set_param_table( lr_data ).

lo_res->next_package( ).

lo_res->close( ).

CATCH cx_sql_exception INTO DATA(cx_root).

WRITE:/ 'Error:', cx_root->get_text( ).

RETURN.

ENDTRY.

ENDMETHOD.

ENDCLASS.

上述class的消费方式：

REPORT zsize.

DATA: lt_input TYPE String_table.

lt_input = VALUE #( ( CONV string( 'TADIR' ) )

( CONV string( 'TFDIR' ) )

).

DATA(lt_size) = cl_crm_home_table_size_tool=>get_size( lt_input ).

cl_demo_output=>display_data( lt_size ).

执行上述report，显示的结果如下：

本文提到的工具的源代码请在我的SAP社区博客下载.

CRM

从ERP导入到CRM系统的Product Hierarchy，在CRM系统切换成编辑模式时，会收到一条提示信息：

Hierarchy XXX may only be changed in the original system XXX

C4C（Cloud for Customer）

在这个系统里，New hierarchy按钮处于禁用状态。

首先通过Chrome开发者工具找到Product Categories这个视图所在的工作中心视图：

/SAP_BYD_APPLICATION_UI/mdm/pmm/ProductData_CentralPCH_WCView.WCVIEW.uiwocview

打开这个工作中心视图，找到Product Categories Hierarchy列表的UI模型：

检查这个按钮的Enabled控制字段，发现被绑定到了模型字段isNewHierarchyEnabled:

这个字段没有绑定到BO字段上(如下图，绿色字段代表绑定到BO上，黄色字段说明没有绑定值)，说明它是在UI控制器的逻辑里被赋值的。

在这个UI模型里有一个事件处理器ev_RowCountChange, 每当表格内记录个数发生变化时会触发。控制newHierarchy按钮是否禁用的模型字段isNewHierarchyEnabled就是在这个事件处理器里进行赋值的。

要获取更多Jerry的原创文章，请关注公众号"汪子熙"。