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

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

《BW转换例程Word文档下载推荐.docx》由会员分享，可在线阅读，更多相关《BW转换例程Word文档下载推荐.docx（22页珍藏版）》请在冰豆网上搜索。

ZNCSBBH00设备编号.

/BIC/ZNCSBBH00TYPE/BIC/OIZNCSBBH00,

ZNCSDQMRQ时段期满日期.

/BIC/ZNCSDQMRQTYPE/BIC/OIZNCSDQMRQ,

ZNCBJLB00表计类别.

/BIC/ZNCBJLB00TYPE/BIC/OIZNCBJLB00,

ZNCGSDM00供电公司.

/BIC/ZNCGSDM00TYPE/BIC/OIZNCGSDM00,

ZNCDYJGZ0地域结构组.

/BIC/ZNCDYJGZ0TYPE/BIC/OIZNCDYJGZ0,

ZNCGKFL00关口分类.

/BIC/ZNCGKFL00TYPE/BIC/OIZNCGKFL00,

ZNCHTZH00合同帐户.

/BIC/ZNCHTZH00TYPE/BIC/OIZNCHTZH00,

ZNCZHLB00帐户类别.

/BIC/ZNCZHLB00TYPE/BIC/OIZNCZHLB00,

ZNCBJWZ00表计位置.

/BIC/ZNCBJWZ00TYPE/BIC/OIZNCBJWZ00,

ZNCSDWXRQ生效日期.

/BIC/ZNCSDWXRQTYPE/BIC/OIZNCSDWXRQ,

ZNCBJYZRQ表计移走日期.

/BIC/ZNCBJYZRQTYPE/BIC/OIZNCBJYZRQ,

ZNCAZRQ00安装日期.

/BIC/ZNCAZRQ00TYPE/BIC/OIZNCAZRQ00,

ZNCHDYY00活动原因.

/BIC/ZNCHDYY00TYPE/BIC/OIZNCHDYY00,

ZNCBJLBZH表计类别组合.

/BIC/ZNCBJLBZHTYPE/BIC/OIZNCBJLBZH,

ZNCLJSBBH逻辑设备编号.

/BIC/ZNCLJSBBHTYPE/BIC/OIZNCLJSBBH,

ZNCSBLB00设备类别.

/BIC/ZNCSBLB00TYPE/BIC/OIZNCSBLB00,

ZNCRZ0000绕组.

/BIC/ZNCRZ0000TYPE/BIC/OIZNCRZ0000,

ZNCDJZ000登记组.

/BIC/ZNCDJZ000TYPE/BIC/OIZNCDJZ000,

ZNCAZD000安装点.

/BIC/ZNCAZD000TYPE/BIC/OIZNCAZD000,

ZNCAZLX00安装类型.

/BIC/ZNCAZLX00TYPE/BIC/OIZNCAZLX00,

ZNCDYDJ00电压等级.

/BIC/ZNCDYDJ00TYPE/BIC/OIZNCDYDJ00,

ZNCAZDFL0安装点费类.

/BIC/ZNCAZDFL0TYPE/BIC/OIZNCAZDFL0,

ZNCJLFS00计量方式.

/BIC/ZNCJLFS00TYPE/BIC/OIZNCJLFS00,

ZNCXLH000序列号.

/BIC/ZNCXLH000TYPE/BIC/OIZNCXLH000,

ZNCCBDY00参比电压.

/BIC/ZNCCBDY00TYPE/BIC/OIZNCCBDY00,

ZNCCBDL00参比电流.

/BIC/ZNCCBDL00TYPE/BIC/OIZNCCBDL00,

ZNCZQD000准确度.

/BIC/ZNCZQD000TYPE/BIC/OIZNCZQD000,

ZNCZCGS00资产归属.

/BIC/ZNCZCGS00TYPE/BIC/OIZNCZCGS00,

ZNCYFFGN0预付费功能.

/BIC/ZNCYFFGN0TYPE/BIC/OIZNCYFFGN0,

ZNCZBGN00载波功能.

/BIC/ZNCZBGN00TYPE/BIC/OIZNCZBGN00,

ZNCSFSXNZ是否是虚拟资产.

/BIC/ZNCSFSXNZTYPE/BIC/OIZNCSFSXNZ,

ZNCEDDY00额定电压.

/BIC/ZNCEDDY00TYPE/BIC/OIZNCEDDY00,

ZNCDRDCS0电容/电磁式.

/BIC/ZNCDRDCS0TYPE/BIC/OIZNCDRDCS0,

ZNCBYQRL0变压器容量.

/BIC/ZNCBYQRL0TYPE/BIC/OIZNCBYQRL0,

ZNCZZS000制造商.

/BIC/ZNCZZS000TYPE/BIC/OIZNCZZS000,

ZNCXH0000型号.

/BIC/ZNCXH0000TYPE/BIC/OIZNCXH0000,

ZNCXTZT00系统状态.

/BIC/ZNCXTZT00TYPE/BIC/OIZNCXTZT00,

ZNCBJZT00表计状态.

/BIC/ZNCBJZT00TYPE/BIC/OIZNCBJZT00,

ZNCYXBJSL运行表计数量.

/BIC/ZNCYXBJSLTYPE/BIC/OIZNCYXBJSL,

0RECORDMODEBW增量处理:

更新模式.

RECORDMODETYPERODMUPDMOD,

ZNCBYQRL1变压器容量.

/BIC/ZNCBYQRL1TYPE/BIC/OIZNCBYQRL1,

0UNIT计量单位.

UNITTYPE/BI0/OIUNIT,

ZNCBJFZ00表计分组.

/BIC/ZNCBJFZ00TYPE/BIC/OIZNCBJFZ00,

ZNCLJDX00连接对象.

/BIC/ZNCLJDX00TYPE/BIC/OIZNCLJDX00,

ZNCLJDXMS连接对象描述.

/BIC/ZNCLJDXMSTYPE/BIC/OIZNCLJDXMS,

ZNCYWHZHB业务合作伙伴.

/BIC/ZNCYWHZHBTYPE/BIC/OIZNCYWHZHB,

ZNCYWHBMC业务合作伙伴名称.

/BIC/ZNCYWHBMCTYPE/BIC/OIZNCYWHBMC,

ZNCKGBH00开关编号.

/BIC/ZNCKGBH00TYPE/BIC/OIZNCKGBH00,

ZNCZJJYRQ最近检验日期.

/BIC/ZNCZJJYRQTYPE/BIC/OIZNCZJJYRQ,

ZNCYJJYRQ压降最近检验日期.

/BIC/ZNCYJJYRQTYPE/BIC/OIZNCYJJYRQ,

ZNCZDXLGN最大需量功能.

/BIC/ZNCZDXLGNTYPE/BIC/OIZNCZDXLGN,

ZNCSFXBB0是否是谐波表.

/BIC/ZNCSFXBB0TYPE/BIC/OIZNCSFXBB0,

ZNCYDXZ00费率数据组（限制特性用）.

/BIC/ZNCYDXZ00TYPE/BIC/OIZNCYDXZ00,

ZNCSRSCZ0输入/输出组.

/BIC/ZNCSRSCZ0TYPE/BIC/OIZNCSRSCZ0,

ZNCSRDY00输入电压.

/BIC/ZNCSRDY00TYPE/BIC/OIZNCSRDY00,

ZNCSCDY00输出电压.

/BIC/ZNCSCDY00TYPE/BIC/OIZNCSCDY00,

ZNCFLLB00费率类别.

/BIC/ZNCFLLB00TYPE/BIC/OIZNCFLLB00,

ZNCQRRQ00迁入日期.

/BIC/ZNCQRRQ00TYPE/BIC/OIZNCQRRQ00,

ZNCYCRQ00移出日期.

/BIC/ZNCYCRQ00TYPE/BIC/OIZNCYCRQ00,

*Field:

RECORD.

RECORDTYPERSARECORD,

ENDOF_ty_s_SC_1.

_ty_t_SC_1TYPESTANDARDTABLEOF_ty_s_SC_1

WITHNON-UNIQUEDEFAULTKEY.

*$*$beginofglobal-insertyourdeclarationonlybelowthisline*-*

..."

insertyourcodehere

*$*$endofglobal-insertyourdeclarationonlybeforethisline*-*

METHODS

start_routine

IMPORTING

requesttypersrequest

datapackidtypersdatapid

EXPORTING

monitortyperstr_ty_t_monitors

CHANGING

SOURCE_PACKAGEtype_ty_t_SC_1

RAISING

cx_rsrout_abort.

inverse_start_routine

i_th_fields_outboundTYPErstran_t_field_inv

i_r_selset_outboundTYPEREFTOcl_rsmds_set

i_is_main_selectionTYPErs_bool

i_r_selset_outbound_completeTYPEREFTOcl_rsmds_set

i_r_universe_inboundTYPEREFTOcl_rsmds_universe

c_th_fields_inboundTYPErstran_t_field_inv

c_r_selset_inboundTYPEREFTOcl_rsmds_set

c_exactTYPErs_bool.

ENDCLASS."

routineDEFINITION

*$*$beginof2ndpartglobal-insertyourcodeonlybelowthisline*

..."

*$*$endof2ndpartglobal-insertyourcodeonlybeforethisline*

*CLASSroutineIMPLEMENTATION

CLASSlcl_transformIMPLEMENTATION.

*----------------------------------------------------------------------*

*Methodstart_routine

*Calculationofsourcepackageviastartroutine

*<

->

sourcepackage

METHODstart_routine.

*===Segments===

FIELD-SYMBOLS:

<

SOURCE_FIELDS>

TYPE_ty_s_SC_1.

MONITOR_RECTYPErstmonitor.

*$*$beginofroutine-insertyourcodeonlybelowthisline*-*

*--filltable"

MONITOR"

withvaluesofstructure"

MONITOR_REC"

*-tomakemonitorentries

tocanceltheupdateprocess

*raiseexceptiontypeCX_RSROUT_ABORT.

*接线方式不合格计量点数=35KV及以下高供高计使用了三相四线电能表的计量点+110KV及以上使用了三相三线电能表的计量点数

data:

idxlikesy-tabix.

l_gnltypecLENGTH8.

gt_gnltypeSTANDARDTABLEOF/BIC/PZNCBJLB00,

wa_gnltype/BIC/PZNCBJLB00.

deleteSOURCE_PACKAGE[]where/BIC/ZNCBJLBZH<

>

'

Z'

.

deleteSOURCE_PACKAGE[]where/BIC/ZNCAZD000='

'

deleteSOURCE_PACKAGE[]where/BIC/ZNCGSDM00='

ifnotSOURCE_PACKAGE[]isINITIAL.

select

*

intotablegt_gnl

from/BIC/PZNCBJLB00

FORALLENTRIESINSOURCE_PACKAGE

where/BIC/ZNCBJLB00=SOURCE_PACKAGE-/BIC/ZNCBJLB00.

sortgt_gnlby/BIC/ZNCBJLB00.

endif.

loopatSOURCE_PACKAGEASSIGNING<

idx=sy-tabix.

READTABLEgt_gnlintowa_gnlwithkey/BIC/ZNCBJLB00=

-/BIC/ZNCBJLB00BINARYSEARCH.

ifsy-subrc=0.

l_gnl=wa_gnl-/BIC/ZNCGNL000.

if（<

-/BIC/ZNCDYDJ00='

03'

or

04'

or<

05'

06'

07'

08'

）

and（<

-/BIC/ZNCJLFS00='

10'

）and（l_gnl=

DTB'

orl_gnl='

DTJ'

DTZ'

）.

CONTINUE.

*110KV及以上使用了三相三线电能表的计量点数addbyleo20091229start

*else.

elseif（<

00'

01'

02'

）and（l_gnl='

DSB'

l_gnl='

DSJ'

DSZ'

else.

*110KV及以上使用了三相三线电能表的计量点数addbyleo20091229end

deleteSOURCE_PACKAGEINDEXidx.

*if（<

*l_gnl='

*CONTINUE.

*ELSE.

*deleteSOURCE_PACKAGEINDEXidx.

*endif.

CLEARl_gnl.

endloop.

freegt_gnl[].

*$*$endofroutine-insertyourcodeonlybeforethisline*-*

ENDMETHOD."

start_routine

*Methodinverse_start_routine

*Thissubroutineneedstobeimplementedonlyfordirectaccess

*（forbetterperformance）andfortheReport/ReportInterface

*（drillthrough）.

*Theinverseroutineshouldtransformaprojectionand

*aselectionforthetargettoaprojectionandaselection

*forthesource,respectively.

*Iftheimplementationremainsemptyallfieldsarefilledand

*allvaluesareselected.

*-------------------------------------------------------