我的要求如下。
在第1步中,我的业务服务将从文本文件中读取记录。 在第2步中,他们根据值创建记录。 在步骤3中,它必须在相应记录的末尾附加成功/失败消息。
文本文件将包含多个记录,每个字段用“|”分隔。所以我的要求是在记录的最后一个值之后附加成功/失败。
请帮忙。
答案 0 :(得分:0)
可能你可以看一下这段代码。 此代码从Excel工作表中读取数据并在Siebel BC中创建记录。您可以将其作为BS的一部分来实现。您还可以对此进行扩展并添加逻辑,以在每条记录中包含“成功”或“失败”消息。
if (MethodName == "ImportRecords")
{
var i =2;
var ExcelApp = COMCreateObject("Excel.Application");
ExcelApp.Workbooks.Open("C:\\***\\***\\Desktop\\LoadTest.xlsx");
ExcelApp.Visible = false;
var oBOLdVal = TheApplication().GetBusObject("Dummy BO");
var oBCLdVal = oBOLdVal.GetBusComp("Dummy BC");
while(ExcelApp.ActiveSheet.Cells(i,1).Value!= null)
{
var A= ExcelApp.ActiveSheet.Cells(i,1).Value;
var B= ExcelApp.ActiveSheet.Cells(i,2).Value;
var C= ExcelApp.ActiveSheet.Cells(i,3).Value;
var D= ExcelApp.ActiveSheet.Cells(i,4).Value;
var E= ExcelApp.ActiveSheet.Cells(i,5).Value;
with(oBCLdVal)
{
ActivateField("A");
ActivateField("B");
ActivateField("C");
ActivateField("D");
ActivateField("E");
ClearToQuery();
InvokeMethod("SetAdminMode","TRUE");
NewRecord(NewAfter);
SetFieldValue("A",A);
SetFieldValue("B",B);
SetFieldValue("C",C);
SetFieldValue("D",D);
SetFieldValue("E",E);
SetFieldValue("Status","Success");
WriteRecord();
} i=i+1;
} ExcelApp.Quit();
ExcelApp = null;
oBOLdVal = null;
oBCLdVal = null;
TheApplication().RaiseErrorText("Load Success");
return(CancelOperation);
}
希望这有帮助!