benchmark DOTNETBenchmarkName
use "dotnetapi.bdh"
dcluser
user
VUser
transactions
VUser_TInit : begin;
VUser_TMain : 1;
VUser_TEnd : end;
var
hVUser : number;
dcltrans
transaction VUser_TInit
begin
hVUser:= DotNetLoadObject("\\SPProject1\\bin\\release\\SPProject1.dll", "SPProject1.VUser");
MeasureStart("TInit");
DotNetCallMethod(hVUser, "TInit");
MeasureStop("TInit");
end VUser_TInit;
transaction VUser_TMain
begin
MeasureStart("TMain");
DotNetCallMethod(hVUser, "TMain");
MeasureStop("TMain");
AttributeSetString("Attr1", "DefaultValue1");
MeasureStart("TestMethod1");
DotNetCallMethod(hVUser, "TestMethod1");
MeasureStop("TestMethod1");
end VUser_TMain;
transaction VUser_TEnd
begin
MeasureStart("TEnd");
DotNetCallMethod(hVUser, "TEnd");
MeasureStop("TEnd");
DotNetFreeObject(hVUser);
end VUser_TEnd;