on subFavs(callback_port, callback_path) { local (urls={}, ct = 0, idx=0 ); ct = sizeof(weblogsComData.favorites) ; while ( ct >=0 ) { local ( blogname = nameof(weblogsComData.favorites[ct]) ) ; local ( weblog = @weblogsComData.weblogs.[blogname]); if defined (weblog^) { local( url = weblog^.url ); urls[idx] = url ; idx = idx + 1 ; }; ct = ct - 1 ; }; local (retval, params={"urls": urls, "callback_port": callback_port, "callback_path": callback_path}); retval = soap.rpc.client ( soapAction: "http://soap.pocketsoap.com/weblogs.com/Subscribe", rpcServer: "soap.4s4c.com", rpcPort: 80, actionURI: "/weblogs/subscribe.asmx", methodName: "Subscribe", adrParams: @params, methodNamespace: "m", methodNamespaceURI: "http://soap.pocketsoap.com/weblogs.com/" ); return "subscribed to " + sizeof(urls) + " weblogs" ; }