ABAP Web服务和表格

2020-09-23 09:37发布

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


大家好,我知道这个主题并不完全与abap有关,但是任何想法都可以被很好地接受。 我制作了一个abap Web服务,并且工作正常,必须对表进行操作,才能将我的 vb.net a>与我的Web服务有关,另一种方法是将sap中处理的数据取入 vb中。 净应用。 sap发送给我的表工作正常,完全没有问题,但是我必须发送到Web服务的表给mi带来了很大的麻烦。 总是通过1条记录,我尝试了所有尝试,但似乎没有任何效果。

有人可以提个主意吗,谢谢

         点击此处--->   EasySAP.com群内免费提供SAP练习系统(在群公告中)

加入QQ群:457200227(SAP S4 HANA技术交流) 群内免费提供SAP练习系统(在群公告中)


大家好,我知道这个主题并不完全与abap有关,但是任何想法都可以被很好地接受。 我制作了一个abap Web服务,并且工作正常,必须对表进行操作,才能将我的 vb.net a>与我的Web服务有关,另一种方法是将sap中处理的数据取入 vb中。 净应用。 sap发送给我的表工作正常,完全没有问题,但是我必须发送到Web服务的表给mi带来了很大的麻烦。 总是通过1条记录,我尝试了所有尝试,但似乎没有任何效果。

有人可以提个主意吗,谢谢

付费偷看设置
发送
4条回答
愤怒的猪头君
1楼 · 2020-09-23 10:23.采纳回答

你好朋友,我终于解决了,所要解决的是使用内部表结构将内部表作为数组放入VB中,并使用相同提示的列表,将其分配给您声明的表并自动获取 行。 我将代码片段放在这里

昏暗列表作为列表(WSREF.ZSINC_CARGA)=新列表(WSREF.ZSINC_CARGA)
     昏暗的CARGAW()为WSREF.ZSINC_CARGA
 

这是我的声明,清单和我告诉您的结构

 CARGAW = list.ToArray()


         货物=货物
 

这是我获取行的地方,首先使用您已经填写的列表中的值加载cargaw,然后将该数组分配给您的表

我希望它能对您有所帮助

SAP小菜
2楼-- · 2020-09-23 10:31

当然我只是这样问,因为我真的很累尝试,因为我说我的Web服务可以正常工作,但是我的vb应用程序有问题 ,只是当我将数据从vb发送到sap时,表仅添加了1条记录

昏暗的CARGAS()为WSREF.ZSINC_CARGA = {新WSREF.ZSINC_CARGA}

Dim RETUR()As WSREF.ZSINC_RETUR = {New WSREF.ZSINC_RETUR}

这是我对适用于我的Web服务的表的声明,对于从SAP到VB的数据,从 vb.net 到SAP,

该Web服务的功能是使用我想要的所有记录来检索CARGAS并对其进行处理,之后我对 vb.net 与表RETUR在一起,并具有相同数量的CARGAS记录,作为日志

问题是,当我尝试将数据放到CARGAS时,我只放了1条记录,RETUR正常工作,因为我放了一个虚拟过程以在表中追加几条记录10 o只是为了探查和何时出现 返回 vb.net 可以毫无问题地在datagridview中显示10行

CPLASF-自律
3楼-- · 2020-09-23 10:08

您好,

您能告诉我们一些SAP Web Service的屏幕快照吗?

您可以显示您的VB源代码吗?

如果您尝试不是从vb测试SAP Web服务,那么您可以在CARGAS中放置多个记录吗?

灬番茄
4楼-- · 2020-09-23 10:19

当然没问题,这是我在中的代码 =" nofollow" hraf=" http://vb.net" target =" _ blank"> vb.net ,我想问的是如何发送超过1条记录的CARGAS,但它需要 填写 vb.net ,如果填写则表示没有问题,实际上我填写了表格 在树液中,他们可以确定 vb.net ,但我需要填写 vb.net 并将其发送到SAP,我的意思是这不是一个SAP问题,而是一个VB问题,我把 此处的vb中的代码

 PWS.PreAuthenticate = True
         PWS.Credentials = CRED


         尝试


             ENTRADA.ZSINC_CARGA =货运
             ENTRADA.ZSINC_RETUR = RETUR


             SALIDA = PWS.ZSINCVENTASPOS(ENTRADA)


         异常捕获
             MsgBox(ex.Message.ToString)
         结束尝试


         fin =新的TimeSpan(DateTime.Now.Ticks)


         tiempo =鳍-inicio


         Label3.Text ="临时工:"&tiempo.TotalSeconds.ToString和" Segundos"
         Label3.Visible = True


         RETUR = SALIDA.ZSINC_RETUR
         DataGridView2.DataSource =重试
 

一周热门 更多>