Siebel -- EAI Siebel Adapter

var bsEAI = TheApplication().GetService("EAI Siebel Adapter");
var psInSet = TheApplication().NewPropertySet();
var psOutSet = TheApplication().NewPropertySet();

var iomsg = TheApplication().NewPropertySet();
var sblmsg = TheApplication().NewPropertySet();
iomsg = Inputs.GetChild(0).GetChild(0);

sblmsg.SetType("SiebelMessage");
sblmsg.SetProperty("MessageType","Integration Object");
sblmsg.SetProperty("IntObjectName","Quota Management EAI");
sblmsg.SetProperty("IntObjectFormat","Siebel Hierarchical");
sblmsg.SetProperty("IntegrationObject","Quota Management EAI");
sblmsg.AddChild(iomsg);
psInSet.AddChild(sblmsg);
bsEAI.InvokeMethod("Upsert",psInSet,psOutSet);

function QuotaQuery(Inputs, Outputs)
{
    try{
        var objId = Inputs.GetProperty("Object Id");
        var intObjectName = Inputs.GetProperty("IntObjectName");
        var searchExpr = Inputs.GetProperty("SearchExpr");
        var bs = TheApplication().GetService("EAI Siebel Adapter");
        var psInputs = TheApplication().NewPropertySet();
        var psOutputs = TheApplication().NewPropertySet();
        if(objId != "")
        {
            psInputs.SetProperty("PrimaryRowId",objId);
        }
        psInputs.SetProperty("OutputIntObjectName",intObjectName);
        if(searchExpr != "")
        {
            psInputs.SetProperty("SearchSpec",searchExpr);
        }
        psInputs.SetProperty("ExecutionMode", "ForwardOnly");
        bs.InvokeMethod("Query", psInputs, psOutputs);
        Outputs.InsertChildAt(psOutputs.GetChild(0),0);
    }
    catch(e){
        throw(e.message);
    }
    finally{
        psOutputs = null;
        psInputs = null;
        bs = null;
    }
}