BW转换例程Word文档下载推荐.docx

1、 ZNCSBBH00 设备编号. /BIC/ZNCSBBH00 TYPE /BIC/OIZNCSBBH00, ZNCSDQMRQ 时段期满日期. /BIC/ZNCSDQMRQ TYPE /BIC/OIZNCSDQMRQ, ZNCBJLB00 表计类别. /BIC/ZNCBJLB00 TYPE /BIC/OIZNCBJLB00, ZNCGSDM00 供电公司. /BIC/ZNCGSDM00 TYPE /BIC/OIZNCGSDM00, ZNCDYJGZ0 地域结构组. /BIC/ZNCDYJGZ0 TYPE /BIC/OIZNCDYJGZ0, ZNCGKFL00 关口分类. /BIC/ZNCGK

2、FL00 TYPE /BIC/OIZNCGKFL00, ZNCHTZH00 合同帐户. /BIC/ZNCHTZH00 TYPE /BIC/OIZNCHTZH00, ZNCZHLB00 帐户类别. /BIC/ZNCZHLB00 TYPE /BIC/OIZNCZHLB00, ZNCBJWZ00 表计位置. /BIC/ZNCBJWZ00 TYPE /BIC/OIZNCBJWZ00, ZNCSDWXRQ 生效日期. /BIC/ZNCSDWXRQ TYPE /BIC/OIZNCSDWXRQ, ZNCBJYZRQ 表计移走日期. /BIC/ZNCBJYZRQ TYPE /BIC/OIZNCBJYZRQ,

3、ZNCAZRQ00 安装日期. /BIC/ZNCAZRQ00 TYPE /BIC/OIZNCAZRQ00, ZNCHDYY00 活动原因. /BIC/ZNCHDYY00 TYPE /BIC/OIZNCHDYY00, ZNCBJLBZH 表计类别组合. /BIC/ZNCBJLBZH TYPE /BIC/OIZNCBJLBZH, ZNCLJSBBH 逻辑设备编号. /BIC/ZNCLJSBBH TYPE /BIC/OIZNCLJSBBH, ZNCSBLB00 设备类别. /BIC/ZNCSBLB00 TYPE /BIC/OIZNCSBLB00, ZNCRZ0000 绕组. /BIC/ZNCRZ00

4、00 TYPE /BIC/OIZNCRZ0000, ZNCDJZ000 登记组. /BIC/ZNCDJZ000 TYPE /BIC/OIZNCDJZ000, ZNCAZD000 安装点. /BIC/ZNCAZD000 TYPE /BIC/OIZNCAZD000, ZNCAZLX00 安装类型. /BIC/ZNCAZLX00 TYPE /BIC/OIZNCAZLX00, ZNCDYDJ00 电压等级. /BIC/ZNCDYDJ00 TYPE /BIC/OIZNCDYDJ00, ZNCAZDFL0 安装点费类. /BIC/ZNCAZDFL0 TYPE /BIC/OIZNCAZDFL0, ZNCJL

5、FS00 计量方式. /BIC/ZNCJLFS00 TYPE /BIC/OIZNCJLFS00, ZNCXLH000 序列号. /BIC/ZNCXLH000 TYPE /BIC/OIZNCXLH000, ZNCCBDY00 参比电压. /BIC/ZNCCBDY00 TYPE /BIC/OIZNCCBDY00, ZNCCBDL00 参比电流. /BIC/ZNCCBDL00 TYPE /BIC/OIZNCCBDL00, ZNCZQD000 准确度. /BIC/ZNCZQD000 TYPE /BIC/OIZNCZQD000, ZNCZCGS00 资产归属. /BIC/ZNCZCGS00 TYPE /

6、BIC/OIZNCZCGS00, ZNCYFFGN0 预付费功能. /BIC/ZNCYFFGN0 TYPE /BIC/OIZNCYFFGN0, ZNCZBGN00 载波功能. /BIC/ZNCZBGN00 TYPE /BIC/OIZNCZBGN00, ZNCSFSXNZ 是否是虚拟资产. /BIC/ZNCSFSXNZ TYPE /BIC/OIZNCSFSXNZ, ZNCEDDY00 额定电压. /BIC/ZNCEDDY00 TYPE /BIC/OIZNCEDDY00, ZNCDRDCS0 电容/电磁式. /BIC/ZNCDRDCS0 TYPE /BIC/OIZNCDRDCS0, ZNCBYQR

7、L0 变压器容量. /BIC/ZNCBYQRL0 TYPE /BIC/OIZNCBYQRL0, ZNCZZS000 制造商. /BIC/ZNCZZS000 TYPE /BIC/OIZNCZZS000, ZNCXH0000 型号. /BIC/ZNCXH0000 TYPE /BIC/OIZNCXH0000, ZNCXTZT00 系统状态. /BIC/ZNCXTZT00 TYPE /BIC/OIZNCXTZT00, ZNCBJZT00 表计状态. /BIC/ZNCBJZT00 TYPE /BIC/OIZNCBJZT00, ZNCYXBJSL 运行表计数量. /BIC/ZNCYXBJSL TYPE /

8、BIC/OIZNCYXBJSL, 0RECORDMODE BW 增量处理: 更新模式. RECORDMODE TYPE RODMUPDMOD, ZNCBYQRL1 变压器容量. /BIC/ZNCBYQRL1 TYPE /BIC/OIZNCBYQRL1, 0UNIT 计量单位. UNIT TYPE /BI0/OIUNIT, ZNCBJFZ00 表计分组. /BIC/ZNCBJFZ00 TYPE /BIC/OIZNCBJFZ00, ZNCLJDX00 连接对象. /BIC/ZNCLJDX00 TYPE /BIC/OIZNCLJDX00, ZNCLJDXMS 连接对象描述. /BIC/ZNCLJDX

9、MS TYPE /BIC/OIZNCLJDXMS, ZNCYWHZHB 业务合作伙伴. /BIC/ZNCYWHZHB TYPE /BIC/OIZNCYWHZHB, ZNCYWHBMC 业务合作伙伴名称. /BIC/ZNCYWHBMC TYPE /BIC/OIZNCYWHBMC, ZNCKGBH00 开关编号. /BIC/ZNCKGBH00 TYPE /BIC/OIZNCKGBH00, ZNCZJJYRQ 最近检验日期. /BIC/ZNCZJJYRQ TYPE /BIC/OIZNCZJJYRQ, ZNCYJJYRQ 压降最近检验日期. /BIC/ZNCYJJYRQ TYPE /BIC/OIZNC

10、YJJYRQ, ZNCZDXLGN 最大需量功能. /BIC/ZNCZDXLGN TYPE /BIC/OIZNCZDXLGN, ZNCSFXBB0 是否是谐波表. /BIC/ZNCSFXBB0 TYPE /BIC/OIZNCSFXBB0, ZNCYDXZ00 费率数据组（限制特性用）. /BIC/ZNCYDXZ00 TYPE /BIC/OIZNCYDXZ00, ZNCSRSCZ0 输入/输出组. /BIC/ZNCSRSCZ0 TYPE /BIC/OIZNCSRSCZ0, ZNCSRDY00 输入电压. /BIC/ZNCSRDY00 TYPE /BIC/OIZNCSRDY00, ZNCSCDY0

11、0 输出电压. /BIC/ZNCSCDY00 TYPE /BIC/OIZNCSCDY00, ZNCFLLB00 费率类别. /BIC/ZNCFLLB00 TYPE /BIC/OIZNCFLLB00, ZNCQRRQ00 迁入日期. /BIC/ZNCQRRQ00 TYPE /BIC/OIZNCQRRQ00, ZNCYCRQ00 移出日期. /BIC/ZNCYCRQ00 TYPE /BIC/OIZNCYCRQ00,* Field: RECORD. RECORD TYPE RSARECORD, END OF _ty_s_SC_1. _ty_t_SC_1 TYPE STANDARD TABLE OF

12、_ty_s_SC_1 WITH NON-UNIQUE DEFAULT KEY.*$*$ begin of global - insert your declaration only below this line *-* . insert your code here*$*$ end of global - insert your declaration only before this line *-* METHODS start_routine IMPORTING request type rsrequest datapackid type rsdatapid EXPORTING moni

13、tor type rstr_ty_t_monitors CHANGING SOURCE_PACKAGE type _ty_t_SC_1 RAISING cx_rsrout_abort. inverse_start_routine i_th_fields_outbound TYPE rstran_t_field_inv i_r_selset_outbound TYPE REF TO cl_rsmds_set i_is_main_selection TYPE rs_bool i_r_selset_outbound_complete TYPE REF TO cl_rsmds_set i_r_univ

14、erse_inbound TYPE REF TO cl_rsmds_universe c_th_fields_inbound TYPE rstran_t_field_inv c_r_selset_inbound TYPE REF TO cl_rsmds_set c_exact TYPE rs_bool.ENDCLASS. routine DEFINITION*$*$ begin of 2nd part global - insert your code only below this line *. *$*$ end of 2nd part global - insert your code

15、only before this line * CLASS routine IMPLEMENTATIONCLASS lcl_transform IMPLEMENTATION.*-* Method start_routine* Calculation of source package via start routine* source package METHOD start_routine.*= Segments = FIELD-SYMBOLS: TYPE _ty_s_SC_1. MONITOR_REC TYPE rstmonitor.*$*$ begin of routine - inse

16、rt your code only below this line *-*- fill table MONITOR with values of structure MONITOR_REC*- to make monitor entriesto cancel the update process* raise exception type CX_RSROUT_ABORT.*接线方式不合格计量点数=35KV及以下高供高计使用了三相四线电能表的计量点+110KV及以上使用了三相三线电能表的计量点数 data : idx like sy-tabix . l_gnl type c LENGTH 8 .

17、 gt_gnl type STANDARD TABLE OF /BIC/PZNCBJLB00 , wa_gnl type /BIC/PZNCBJLB00 . delete SOURCE_PACKAGE where /BIC/ZNCBJLBZH Z . delete SOURCE_PACKAGE where /BIC/ZNCAZD000 = delete SOURCE_PACKAGE where /BIC/ZNCGSDM00 = if not SOURCE_PACKAGE is INITIAL . select * into table gt_gnl from /BIC/PZNCBJLB00 F

18、OR ALL ENTRIES IN SOURCE_PACKAGE where /BIC/ZNCBJLB00 = SOURCE_PACKAGE-/BIC/ZNCBJLB00 . sort gt_gnl by /BIC/ZNCBJLB00 . endif . loop at SOURCE_PACKAGE ASSIGNING idx = sy-tabix . READ TABLE gt_gnl into wa_gnl with key /BIC/ZNCBJLB00 =-/BIC/ZNCBJLB00 BINARY SEARCH . if sy-subrc = 0 . l_gnl = wa_gnl-/B

19、IC/ZNCGNL000 . if （ -/BIC/ZNCDYDJ00 = 03 or04 or 05060708 ） and （ -/BIC/ZNCJLFS00 = 10 ） and （ l_gnl =DTB or l_gnl = DTJDTZ ）. CONTINUE .* 110KV及以上使用了三相三线电能表的计量点数 add by leo 20091229 start* else . elseif （ 000102 ） and （ l_gnl = DSB l_gnl = DSJDSZ else .* 110KV及以上使用了三相三线电能表的计量点数 add by leo 20091229

20、end delete SOURCE_PACKAGE INDEX idx .* if （ * l_gnl = * CONTINUE .* ELSE .* delete SOURCE_PACKAGE INDEX idx .* endif . CLEAR l_gnl . endloop . free gt_gnl .*$*$ end of routine - insert your code only before this line *-* ENDMETHOD. start_routine* Method inverse_start_routine* This subroutine needs t

21、o be implemented only for direct access* （for better performance） and for the Report/Report Interface* （drill through）.* The inverse routine should transform a projection and* a selection for the target to a projection and a selection* for the source, respectively.* If the implementation remains empty all fields are filled and* all values are selected.*-