POS数据收集WebService方式开发示例V10解读.docx

资源描述

POS数据收集WebService方式开发示例V10解读.docx

《POS数据收集WebService方式开发示例V10解读.docx》由会员分享，可在线阅读，更多相关《POS数据收集WebService方式开发示例V10解读.docx（38页珍藏版）》请在冰豆网上搜索。

POS数据收集WebService方式开发示例V10解读.docx

POS数据收集WebService方式开发示例V10解读

销售数据采集开发示例

WebService

一、概述

以下是在PowerBuilder8.0.3环境下编写的用webservice发送销售数据的开发示例。

二、开发实现

1）当一笔交易完成后，把生成的销售数据写成标准的XML文件格式，然后连接webserviceserver端，把XML文件发送到webserviceserver端。

代码说明：

1.交易处理过程中，先把交易数据保存到用户对象里面，这里调用了函数uo_sendsalesws.uf_setstruct（lstr_saleswsdata,lstr_TxSalesTotal,lstr_TxSalesItem_ws[],lstr_TxSalesTender_ws[]）

详细代码：

publicsubroutineuf_setstruct（struct_saleswsdataastr_saleswsdata,struct_txsalestotalastr_txsalestotal,struct_txsalesitemastr_txsalesitem[],struct_txsalestenderastr_txsalestender[]）;

istr_saleswsdata=istr_saleswsdata_null

istr_txsalestotal=istr_txsalestotal_null

istr_txsalesitem[]=istr_txsalesitem_null[]

istr_txsalestender[]=istr_txsalestender_null[]

istr_saleswsdata=astr_saleswsdata

istr_txsalestotal=astr_txsalestotal

istr_txsalesitem[]=astr_txsalesitem[]

istr_txsalestender[]=astr_txsalestender[]

endsubroutine

istr_saleswsdata保存的是销售数据的唯一标示

istr_TxSalesTotal保存的是销售数据的抬头信息

istr_TxSalesItem_ws[]保存的是销售数据的明细信息

istr_TxSalesTender_ws[]保存的是销售数据的是付款方式信息

2.在交易完成后，再调用函数

ls_Request=uo_sendsalesws.uf_buildxml（）

创建标准的XML文件。

详细代码：

publicfunctionstringuf_buildxml（）;stringls_Request=""

longll_row

struct_saleswsdatalstr_salesdata

struct_txsalestotallstr_total

struct_txsalesitemlstr_item[]

struct_txsalestenderlstr_tender[]

lstr_salesdata=istr_saleswsdata

lstr_total=istr_txsalestotal

lstr_item[]=istr_txsalesitem_null[]

lstr_item[]=istr_txsalesitem[]

lstr_tender[]=istr_txsalestender_null[]

lstr_tender[]=istr_txsalestender[]

ls_Request='

xmlversion="1.0"encoding="utf-8"?

>'+'~r~n'

ls_Request+='

Envelopexmlns:

xsi="http:

//www.w3.org/2001/XMLSchema-instance"xmlns:

xsd="http:

//www.w3.org/2001/XMLSchema"xmlns:

soap12="http:

//www.w3.org/2003/05/soap-envelope">'+'~r~n'

ls_Request+='

Body>'+'~r~n'

ls_Request+='

//tempurl.org">'+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+='

'+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+lstr_salesdata.s_localstorecode+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+is_pagerecords+''+'~r~n'

ls_Request+=''+is_pageno+''+'~r~n'

ls_Request+='0'+'~r~n'

ls_Request+=''+is_messagetype+''+'~r~n'

ls_Request+=''+is_messageid+''+'~r~n'

ls_Request+=''+is_version+''+'~r~n'

ls_Request+='

'+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+lstr_salesdata.s_localstorecode+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+STRING（lstr_salesdata.DT_TXDATE,'YYYYMMDD'）+''+'~r~n'

ls_Request+=''+lstr_salesdata.s_txtime+''+'~r~n'

ifisnull（lstr_salesdata.s_mallid）thenlstr_salesdata.s_mallid=''

ls_Request+=''+lstr_salesdata.s_mallid+''+'~r~n'

ls_Request+=''+lstr_salesdata.s_storecode+''+'~r~n'

ls_Request+=''+lstr_salesdata.s_tillid+''+'~r~n'

ls_Request+=''+is_salestype+''+'~r~n'

ls_Request+=''+lstr_salesdata.s_docno+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+lstr_total.s_cashier+''+'~r~n'

ifisnull（lstr_total.s_clientcode）thenlstr_total.s_clientcode=''

ls_Request+=''+lstr_total.s_clientcode+''+'~r~n'

ifisnull（lstr_total.s_salesman）thenlstr_total.s_salesman=''

ls_Request+=''+lstr_total.s_salesman+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+string（lstr_total.dec_NetQty,"###########0.00"）+''+'~r~n'

ls_Request+=''+string（lstr_total.dec_OriginalAmount,"###########0.00"）+''+'~r~n'

ls_Request+=''+string（lstr_total.dec_SellingAmount,"###########0.00"）+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+='0'+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+='0'+'~r~n'

ls_Request+=''+string（lstr_total.dec_NetAmount,"###########0.00"）+''+'~r~n'

ls_Request+=''+string（lstr_total.dec_PaidAmount,"###########0.00"）+''+'~r~n'

ls_Request+=''+string（lstr_total.dec_ChangeAmount,"###########0.00"）+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+lstr_total.s_cashier+''+'~r~n'

ls_Request+=''+string（today（）,'yyyymmdd'）+''+'~r~n'

ls_Request+=''+string（now（）,'hhmmss'）+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+is_status+''+'~r~n'

ls_Request+=''+'~r~n'

forll_row=1tolstr_total.i_NumOfItem

ls_Request+=''+'~r~n'

ls_Request+=''+is_iscounteritemcode+''+'~r~n'

ls_Request+=''+string（ll_row）+''+'~r~n'

ls_Request+=''+lstr_salesdata.s_storecode+''+'~r~n'

ls_Request+=''+lstr_item[ll_row].s_PluCode+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+lstr_item[ll_row].s_ItemLotNum+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+lstr_item[ll_row].s_IsDeposit+''+'~r~n'

ls_Request+=''+lstr_item[ll_row].s_IsWholeSale+''+'~r~n'

ls_Request+=''+string（ii_invttype）+''+'~r~n'

ls_Request+=''+string（lstr_item[ll_row].dec_qty,"###########0.00"）+''+'~r~n'

ls_Request+=''+string（lstr_item[ll_row].dec_ExStk2Sales,"###########0.00"）+''+'~r~n'

ls_Request+=''+string（lstr_item[ll_row].dec_OriginalPrice,"###########0.00"）+''+'~r~n'

ls_Request+=''+'~r~n'

ifisnull（lstr_item[ll_row].s_PriceApprove）thenlstr_item[ll_row].s_PriceApprove=''

ls_Request+=''+lstr_item[ll_row].s_PriceApprove+''+'~r~n'

ifisnull（lstr_item[ll_row].s_CouponNumber）thenlstr_item[ll_row].s_CouponNumber=''

ls_Request+=''+lstr_item[ll_row].s_CouponNumber+''+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+='0'+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+='0'+'~r~n'

ls_Request+=''+'~r~n'

ls_Request+=''+string（lstr_item[ll_row].dec_NetAmount,"###########0.00"）+''+'~r~n'

ls_Request+='0'+'~r~n'

ifisnull（lstr_item[ll_row].s_SalesItemRemark）thenlstr_item[ll_row].s_SalesItemRemark=''

ls_Request+=''+lstr_item[ll_row].s_SalesItemRemark+''+'~r~n'

ls_Request+=''+'~r~n'

forll_row=1tolstr_total.i_NumOftender

ls_Request+=''+'~r~n'

ls_Request+=''+string（ll_row）+''+'~r~n'

ls_Request+=''+lstr_tender[ll_row].s_TenderCode+'

展开阅读全文