C#调用SAP函数，传入参数为表
//using SAP.Middleware.Connector;
//private RfcConfigParameters _params = new RfcConfigParameters();
//private RfcDestination _rfcDest;
//RfcConfigParameters parms = new RfcConfigParameters();
// parms.Add(RfcConfigParameters.Name, "xxx");
// parms.Add(RfcConfigParameters.AppServerHost, "xxx");
// parms.Add(RfcConfigParameters.SystemNumber, "00");
// parms.Add(RfcConfigParameters.Client, "900");
// parms.Add(RfcConfigParameters.User, "xxx");
// parms.Add(RfcConfigParameters.Password, "xxxxx");
// parms.Add(RfcConfigParameters.Language, "EN");
// parms.Add(RfcConfigParameters.PoolSize, "5");
// parms.Add(RfcConfigParameters.MaxPoolSize, "10");
// parms.Add(RfcConfigParameters.IdleTimeout, "600");
// return parms;
//_rfcDest = RfcDestinationManager.GetDestination(_params);
public DataTable GetSAPData(DataTable dt)
{
DataTable dtSAPData = new DataTable();
try
{
dtSAPData.Columns.Add("DATA1", typeof(string));
dtSAPData.Columns.Add("DATA2", typeof(string));
dtSAPData.Columns.Add("DATA3", typeof(string));
string strOrder = null;
RfcRepository rfcRep = _rfcDest.Repository;
IRfcFunction func = rfcRep.CreateFunction("Z_RFC_XXXX");
IRfcTable tSAP = func.GetTable("INPUT_TABLE");
for (int i = 0; i < dt.Rows.Count; i++)
{
str1 = dt.Rows[i][0].ToString();
str2 = dt.Rows[i][1].ToString();
str3 = dt.Rows[i][2].ToString();
IRfcStructure struSAP = tSAP.Metadata.LineType.CreateStructure();
struSAP.SetValue("str1", str1);
struSAP.SetValue("str2", str2);
struSAP.SetValue("str3", str3);
tSAP.Append(struSAP);
}
func.SetValue("INPUT_TABLE", tSAP); //table 参数
func.SetValue("WERKS", "A"); //单个参数
func.SetValue("STATUS", "B"); //单个参数
func.Invoke(_rfcDest);
IRfcTable SAPDataTable = func.GetTable("RETURN_TABLE");
for (int i = 0; i < SAPDataTable.RowCount; i++)
{
IRfcStructure stru = SAPDataTable[i];
DataRow dr = dtSAPData.NewRow();
dr["DATA1"] = stru.GetValue("X").ToString();
dr["DATA2"] = stru.GetValue("Y").ToString();
dr["DATA3"] = stru.GetValue("Z").ToString();
dtSAPData.Rows.Add(dr);
}
}
catch(Exception ex)
{
string strcatch = ex.Message;
}
return dtSAPData;
}
以上是传入传出都为table的情况。
还有一种直接传入一条数据的情况，当然，SAP函数里面的接收参数还是table
代码如下：
var rfcDestination = SAPUtility.GetDestination(SapDestionation.PRD_800, SapUsers.PRD_IT06);
BAPI_USER_GETLIST
RfcRepository rfcrep = rfcDestination.Repository;
IRfcFunction myfun = rfcrep.CreateFunction("Z_MISGETTEXT");//调用的SAP函数
var table = myfun.GetTable("ZOBJTEXT");//SAP函数的table
//设置传入参数
table.Insert();
table.CurrentIndex = 0;
var currentRow = table.CurrentRow;
currentRow.SetValue("TDOBJECT", "测试OBJ");
currentRow.SetValue("TDNAME", "测试NAME");
currentRow.SetValue("TDID", "测试ID");
currentRow.SetValue("LANGUAGE", "测试语言");
myfun.Invoke(rfcDestination); //提交调用BAPI
//取得返回值，这里的TEXT项目也是SAP函数table【ZOBJTEXT】中的字段
for (int i = 0; i < table.RowCount; i++)
{
table.CurrentIndex = i;
var currentRow2 = table.CurrentRow;
Console.WriteLine(currentRow2.GetString("TEXT"));
}
Console.Read();