EWM-RF

RF 程序所在Package : /SCWM/RF_FRAMEWORK

程序：

/SCWM/RF_UI_START 开始 RF 用户界面

/SCWM/R_RF_MENU_MANAGER 菜单管理器

/SCWM/R_SCREEN_MANAGER 屏幕管理器

事务:

/SCWM/RFUI RF主启动屏幕

/SCWM/RFSCR RF 屏幕管理器

/SCWM/RFMENU RF 菜单管理器

/SCWM/PRDVC 描述设备维护

/SCWM/09000468 自定义功能键

/SCWM/09000414 分配描述参数文件到仓库

当想查看RF界面的技术修改时，可以执行CTRL+SHIFT+F1 ,也可以在GUI标题上显示RF的技术信息

CTRL+SHIFT+F1

在标题上显示逻辑事务及步骤及屏幕信息

GUI系统用户参数文件—>个人数据

参数：/SCWM/RF_TECH_TITLE = X

发布EWM RF ITS Mobile 相关服务

TCODE：SIAC_PUBLISH_ALL_INT

SICF 参数：

~THEME 99

~TRANSACTION /SCWM/RFUI

#MOBILE This is a mobile service

~ITSMOBILE 1

#ENABLE BACKGROUND SOUND FOR MESSAGES

~ITSMOBILEMSGSOUND 1

~SOURCES /SCWM/RFUI,itsmobile

~POPUPS 1

语音：~ITSMOBILEDEVICEINCLUDE

EWM RF 开发常用代码

1. 设置RF警告消息

/scwm/cl_rf_bll_srvc=>message(

iv_msg_view = '1'

iv_flg_continue_flow = 'X'

iv_msgid = '/SCWM/WHO'

iv_msgty = 'W'

iv_msgno = '539' ).

2. 查询商品

TRY.

CALL FUNCTION '/SCWM/MATERIAL_READ_SINGLE'

EXPORTING

iv_matid = ls_stock-matid

iv_langu = sy-langu

IMPORTING

es_mat_global = ls_mat_global

et_mat_uom = lt_mat_uom.

CATCH /scwm/cx_md.

ENDTRY.

屏幕输入商品代码

DATA lv_matean TYPE /scwm/de_rf_ean11.

CALL FUNCTION '/SCWM/RF_PRODUCT_INPUT'

EXPORTING

input = selection-matnr40

IMPORTING

ev_matid = iv_matid

ev_matnr = selection-matnr40

ev_matean = lv_matean.

IF iv_matid IS INITIAL.

* Product doesn't exists

MESSAGE e195(/scwm/rf_en).

ENDIF.

.

* get the product details

CALL FUNCTION '/SCWM/SELECT_STOCK'

EXPORTING

iv_lgnum = lv_lgnum

it_matid = lt_matid

it_guid_lgpla = lt_guid_loc

IMPORTING

et_huitm = lt_huitm

EXCEPTIONS

OTHERS = 2.

获得商品GUID

CALL FUNCTION 'CONVERSION_EXIT_MDLPD_INPUT'

EXPORTING

INPUT = ZEWM_HUHDR_HP-HUMATID

IMPORTING

OUTPUT = lv_matid

.

3. RF屏幕参数相关代码

* Initiate screen parameter

/scwm/cl_rf_bll_srvc=>init_screen_param( ).

* Set screen parameter

/scwm/cl_rf_bll_srvc=>set_screen_param('CT_INQ_ST_LOOP').

****************************

/scwm/cl_rf_bll_srvc=>set_screen_param('CS_INQ_ST_PRD').

* Transfer table name into RF framework

/scwm/cl_rf_bll_srvc=>set_screen_param('/SCWM/TT_RF_INQ_ST_LOOP').

CALL METHOD /scwm/cl_rf_bll_srvc=>set_line

EXPORTING

iv_line = 1.

CALL METHOD /scwm/cl_rf_bll_srvc=>set_screen_param

EXPORTING

iv_param_name = 'LS_INQ_ST_LOOP'.

4. 设置代码调试

BREAK-POINT ID /scwm/rf_inquiry.

5. 获得用户资源

CALL FUNCTION '/SCWM/RSRC_RESOURCE_MEMORY'

EXPORTING

iv_uname = sy-uname

CHANGING

cs_rsrc = ls_rsrc.

6. 转换日期和时间字段

*********** Conversion of Timestamp into date and time field

APPEND :lt_lagp-idatu TO lt_timestamp,

lt_lagp-cleared_at TO lt_timestamp,

lt_lagp-moved_at TO lt_timestamp.

CALL FUNCTION '/SCWM/CONVERT_TIMESTAMP'

EXPORTING

iv_lgnum = lv_lgnum

it_timestamp = lt_timestamp

IMPORTING

et_date_time = lt_timedate

EXCEPTIONS

input_error = 1

data_not_found = 2

OTHERS = 3.

LOOP AT lt_timedate INTO ls_timedate.

CASE sy-tabix.

WHEN 1.

WRITE ls_timedate-date DD/MM/YY TO cs_inq_st-idatu_d.

MOVE ls_timedate-time TO cs_inq_st-idatu_t.

WHEN 2.

WRITE ls_timedate-date DD/MM/YY TO cs_inq_st-cleared_d.

MOVE ls_timedate-time TO cs_inq_st-cleared_t.

WHEN 3.

WRITE ls_timedate-date DD/MM/YY TO cs_inq_st-moved_d.

MOVE ls_timedate-time TO cs_inq_st-moved_t.

ENDCASE.

ENDLOOP.

7. 获得功能代码

lv_fcode TYPE /scwm/de_fcode,

lv_fcode = /scwm/cl_rf_bll_srvc=>get_fcode( ).

8. 设置仓库号

CALL METHOD /scwm/cl_tm=>set_lgnum( ls_rsrc-lgnum ).

9. 查询源HU信息

CALL FUNCTION '/SCWM/TO_READ_SRC'

EXPORTING

iv_lgnum = ls_rsrc-lgnum

iv_huident = selection-huident

IMPORTING

et_ordim_o = lt_ordim_o

et_ordim_c = lt_ordim_c.

10. 查询目前的HU信息

CALL FUNCTION '/SCWM/TO_READ_DES'

EXPORTING

iv_lgnum = ls_rsrc-lgnum

iv_huident = selection-huident

IMPORTING

et_ordim_o = lt_ordim_o

et_ordim_c = lt_ordim_c.

CALL FUNCTION '/SCWM/TO_READ_HU'

EXPORTING

iv_lgnum = ls_rsrc-lgnum

iv_huident = selection-huident

IMPORTING

et_ordim_o_src = lt_ordim_o

et_ordim_o_des = lt_ordim_o_des

et_ordim_c_src = lt_ordim_c

et_ordim_c_des = lt_ordim_c_des.

11. RF确认对话框

CALL METHOD /SCWM/CL_RF_BLL_SRVC=>POPUP_TO_CONFIRM(

IV_TITLE = ‘’,

IV_TEXT=’’

IV_FLG_CANCEL=’X’,

RV_ANSWER = RV_ANSWER)

/scwm/cl_rf_dynpro_srvc=>display_message(

iv_msgid = sy-msgid

iv_msgno = sy-msgno

iv_msgty = 'Q'

iv_msgv1 = sy-msgv1

iv_msgv2 = sy-msgv2

iv_msgv3 = sy-msgv3

iv_msgv4 = sy-msgv4 ) = /scwm/cl_rf_bll_srvc=>c_answer_yes