Web サービス・メソッドの実装

次に Web サービス・メソッドに実際のコードを提供します。2 つの Web サービス・メソッドを以下のとおり編集します。

Class CInfo.WebService Extends %SOAP.WebService
{
Parameter NAMESPACE = "http://tempuri.org";
Parameter SERVICENAME = "CompanyInfo";
Parameter USECLASSNAMESPACES = 1;

Method GetCompanyInfo(id As %Integer) As CInfo.Company [ WebMethod ]
{
    Quit ##class(CInfo.Company).%OpenId(id)
}

Method CreateCompanies(count As %Integer) As %Integer [ WebMethod ]
{
    Quit ##class(CInfo.Company).Populate(count)
}

}

変更の詳細は後のページで解説します。