广汇项目技术设计说明书车险送修平台短信接收副本.docx
- 文档编号:23861884
- 上传时间:2023-05-21
- 格式:DOCX
- 页数:18
- 大小:72.17KB
广汇项目技术设计说明书车险送修平台短信接收副本.docx
《广汇项目技术设计说明书车险送修平台短信接收副本.docx》由会员分享,可在线阅读,更多相关《广汇项目技术设计说明书车险送修平台短信接收副本.docx(18页珍藏版)》请在冰豆网上搜索。
广汇项目技术设计说明书车险送修平台短信接收副本
广汇汽车SAP项目
开发技术设计说明书
接口名称:
车险送修平台短信接收
2017年2月
第一部分:
程序信息(*为必输项)
开发类型
程序
使用单位(*)
广汇汽车
开发编号
程序名称(*)
SAP系统相关事务代码(*)
业务流程
业务子流程
系统版本
模块(*)
SR
业务负责人(*)
李莹
功能设计者(*)
李莹
报表开发者(*)
李红艳
TechniqueSPEC文档(*为必输项)
开发对象名称(*)
车险送修平台短信接收
版本
1.0
模块(*)
SR
程序类型(*)
□屏幕输出报表ReportingtoScreen
□打印输出报表ReportingtoPrinter
□批输入程序BatchDataProcessing
□用户出口UserExit/BADI
□外挂表单CustomizedTable
□SAP标准程序修改StandardCodeChange
■接口程序Interfacing
□WebDynproWebDynpro
□其它____________
运行频率(*)
□随时□周报■月报
□季报□年报
优先级别
□低□中■高
关键用户
业务顾问
于明浩
提交日期
功能文档设计者
版本修改历史记录
版本号
修改日期
修改者
修改原因
1.0
2017.02.04
李红艳
新建
第二部分:
业务需求
程序用途(描述程序的用途或目的)
总体要求(程序执行的功能概述)
程序使用者
使用频度(实时、日、月、季度或年)
月末
后台处理/在线处理(*)
在线处理
打印机类型(激光/喷墨/针式)
纸张大小/方向
使用语言
中文
数据量预估
N/A()。
其它说明
第三部分:
功能设计
权限要求
数据结构或表说明
数据结构/表:
(说明文字)ZTCI_INSURANCE保险公司表
字段名
主键
必输项
描述
数据类型
长度
值域列表
MANDT
是
是
集团
CLNT
3
INSURANCE_ID
是
是
保险公司ID
CHAR
3
INSURANCE_COMPANY
保险公司名称
CHAR
20
ZTCAR_INSURANCE车险送修平台短信接收表
字段名
主键
必输项
描述
数据类型
长度
值域列表
MANDT
是
是
CLNT
3
BUSINESS_ID
是
是
CHAR
36
MARK_DATE
是
是
DATS
8
MARK_TIME
是
是
TIMS
6
WERKS
CHAR
4
INSURANCE_ID
CHAR
3
REPORT_ID
CHAR
40
POLICY_ID
CHAR
40
LICPL
CHAR
15
MOB_NUMBER
CHAR
11
BUSINESS_DATE
DATS
8
BUSINESS_TIME
TIMS
6
MESSAGE1
CHAR
255
MESSAGE2
CHAR
255
MESSAGE3
CHAR
255
MESSAGE4
CHAR
255
MESSAGE5
CHAR
255
MARK_JOB
CHAR
1
ZTCI_NOMARKS车险送修平台无效标记原因
字段名
主键
必输项
描述
数据类型
长度
值域列表
MANDT
是
是
集团
CLNT
3
BUSINESS_ID
是
是
业务ID
CHAR
36
MARK_DATE
是
是
标记日期
DATS
8
MARK_TIME
是
是
标记时间
TIMS
6
UN_REASON
无效标记原因
CHAR
1
0取消无效业务标记
1信息错误
2销案
3外地异地出险
4拒访
5重复信息
6车无损伤
ZTCI_NOSTORE车险送修平台未到店原因
字段名
主键
必输项
描述
数据类型
长度
值域列表
MANDT
是
是
集团
CLNT
3
BUSINESS_ID
是
是
业务ID
CHAR
36
MARK_DATE
是
是
标记日期
DATS
8
MARK_TIME
是
是
标记时间
TIMS
6
NO_REASON
未到店原因
CHAR
2
7距离远
8损失小没时间
9个案原因
10店面服务差
11店面时效性
12非本店购车
13单位车他人推荐维修点
14非本店保险
15店面价格高
16个案原因去修理厂
字段名
主键
必输项
描述
数据类型
长度
值域列表
字段名
主键
必输项
描述
数据类型
长度
值域列表
字段名
主键
必输项
描述
数据类型
长度
值域列表
第四部分:
开发设计
开发工具
ABAP
主要技术实现方法或开发逻辑
INBOUND处理
首先创建代理激活CI000共用消息,INBOUND创建代理CII001(车险送修平台短信接收),CII002(车险送修平台无效标记原因),CII003(未到店原因)。
创建保险公司表(ZTCI_INSURANCE),维护TCODE:
ZINSRC
短信接收数据写入SAP数据库,共三种业务建三个表存储,车险送修平台短信接收表(ZTCAR_INSURANCE),车险送修平台无效标记原因表(ZTCI_NOMARKS),未到店原因表(ZTCI_NOSTORE)。
在INBOUND写逻辑存入数据库
CII001
DATA:
lv_bukrs TYPE t001-bukrs.
DATA:
lt_tab TYPE TABLE OF ztcar_insurance,
ls_tab TYPE ztcar_insurance.
DATA:
lv_msg TYPE string.
DATA:
lv_len TYPE i,
lv_len_msg TYPE i,
lv_len_tmp TYPE i.
DATA:
lv_str1 TYPE c LENGTH 255,
lv_str2 TYPE c LENGTH 255,
lv_str3 TYPE c LENGTH 255,
lv_str4 TYPE c LENGTH 255,
lv_str5 TYPE c LENGTH 255,
lv_str TYPE string.
CLEAR:
lt_tab,ls_tab.
***检查工厂
SELECT SINGLE bukrs INTO lv_bukrs FROM t001 WHERE bukrs = input-mt_car_insurance_req_in-record-werks.
IF sy-subrc <> 0.
output-mt_car_insurance_resq-record-status = 'E'.
MESSAGE e002(zci01) WITH input-mt_car_insurance_req_in-record-werks INTO lv_msg.
output-mt_car_insurance_resq-record-description = lv_msg .
EXIT.
ENDIF.
***检查保险公司
SELECT SINGLE insurance_id
INTO ls_tab-insurance_id
FROM ztci_insurance
WHERE insurance_company = input-mt_car_insurance_req_in-record-insurance_company.
IF sy-subrc <> 0.
output-mt_car_insurance_resq-record-status = 'E'.
MESSAGE e003(zci01) WITH input-mt_car_insurance_req_in-record-insurance_company INTO lv_msg.
output-mt_car_insurance_resq-record-description = lv_msg .
EXIT.
ENDIF.
***检查手机位数
lv_len = strlen( input-mt_car_insurance_req_in-record-phone ).
IF lv_len <> 11.
output-mt_car_insurance_resq-record-status = 'E'.
MESSAGE e005(zci01) WITH input-mt_car_insurance_req_in-record-phone INTO lv_msg.
output-mt_car_insurance_resq-record-description = lv_msg .
EXIT.
ENDIF.
***消息
lv_str = input-mt_car_insurance_req_in-record-message.
lv_len_msg = strlen( lv_str ).
IF lv_len_msg <= 255.
ls_tab-message1 = lv_str.
ELSEIF lv_len_msg > 255 AND lv_len_msg <= 510.
CLEAR:
lv_len_tmp.
lv_len_tmp = lv_len_msg - 255.
ls_tab-message1 = lv_str+0(255).
ls_tab-message2 = lv_str+255(lv_len_tmp).
ELSEIF lv_len_msg > 510 AND lv_len_msg <= 765.
CLEAR:
lv_len_tmp.
lv_len_tmp = lv_len_msg - 510.
ls_tab-message1 = lv_str+0(255).
ls_tab-message2 = lv_str+255(255).
ls_tab-message3 = lv_str+510(lv_len_tmp).
ELSEIF lv_len_msg > 765 AND lv_len_msg <= 1020.
CLEAR:
lv_len_tmp.
lv_len_tmp = lv_len_msg - 765.
ls_tab-message1 = lv_str+0(255).
ls_tab-message2 = lv_str+255(255).
ls_tab-message3 = lv_str+510(255).
ls_tab-message4 = lv_str+765(lv_len_tmp).
ELSE.
CLEAR:
lv_len_tmp.
lv_len_tmp = lv_len_msg - 1020.
ls_tab-message1 = lv_str+0(255).
ls_tab-message2 = lv_str+255(255).
ls_tab-message3 = lv_str+510(255).
ls_tab-message4 = lv_str+765(255).
ls_tab-message5 = lv_str+1020(lv_len_tmp).
ENDIF.
ls_tab-business_id = input-mt_car_insurance_req_in-record-business_id.
ls_tab-mark_date = input-mt_car_insurance_req_in-record-mark_date.
ls_tab-mark_time = input-mt_car_insurance_req_in-record-mark_time.
ls_tab-werks = input-mt_car_insurance_req_in-record-werks.
ls_tab-report_id = input-mt_car_insurance_req_in-record-report_id.
ls_tab-policy_id = input-mt_car_insurance_req_in-record-policy_id.
ls_tab-licpl = input-mt_car_insurance_req_in-record-car_id.
ls_tab-mob_number = input-mt_car_insurance_req_in-record-phone.
ls_tab-business_date = input-mt_car_insurance_req_in-record-business_date.
ls_tab-business_time = input-mt_car_insurance_req_in-record-business_time.
TRANSLATE ls_tab-business_id TO UPPER CASE .
TRANSLATE ls_tab-report_id TO UPPER CASE .
TRANSLATE ls_tab-policy_id TO UPPER CASE .
TRANSLATE ls_tab-licpl TO UPPER CASE .
APPEND ls_tab TO lt_tab.
INSERT ztcar_insurance FROM TABLE lt_tab ACCEPTING DUPLICATE KEYS.
IF sy-subrc = 0.
output-mt_car_insurance_resq-record-status = 'S'.
ELSE.
output-mt_car_insurance_resq-record-status = 'E'.
MESSAGE e004(zci01) INTO lv_msg.
output-mt_car_insurance_resq-record-description = lv_msg .
ENDIF.
CII002
DATA:
ls_reason TYPE ztci_nomarks,
lt_reason TYPE TABLE OF ztci_nomarks.
DATA:
lt_zunreason TYPE TABLE OF dd07v,
ls_zunreason TYPE dd07v,
lv_message TYPE string.
CLEAR:
ls_reason,lt_reason,lt_zunreason.
CHECK
input-mt_no_marks_req_in-record-business_id IS NOT INITIAL.
CHECK
input-mt_no_marks_req_in-record-mark_date IS NOT INITIAL.
CHECK
input-mt_no_marks_req_in-record-mark_time IS NOT INITIAL.
CHECK
input-mt_no_marks_req_in-record-cause IS NOT INITIAL.
CALL FUNCTION 'DD_DOMVALUES_GET'
EXPORTING
domname ='ZUNREASON'
text = 'X'
langu = sy-langu
* BYPASS_BUFFER = ' '
* IMPORTING
* RC =
TABLES
dd07v_tab = lt_zunreason
EXCEPTIONS
wrong_textflag = 1
OTHERS = 2.
READ TABLE lt_zunreason INTO ls_zunreason WITH KEY domvalue_l = input-mt_no_marks_req_in-record-cause.
IF sy-subrc = 0.
ls_reason-un_reason = ls_zunreason-domvalue_l.
ls_reason-business_id = input-mt_no_marks_req_in-record-business_id.
ls_reason-mark_date = input-mt_no_marks_req_in-record-mark_date.
ls_reason-mark_time = input-mt_no_marks_req_in-record-mark_time.
TRANSLATE ls_reason-business_id TO UPPER CASE.
APPEND ls_reason TO lt_re
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 广汇项目技术设计说明书车险送修平台短信接收 副本 项目 技术设计 说明书 车险 平台 短信 接收