Web サービス呼び出しの複雜性を表に出ないようにし、再利用を促すために、自身の translate コードを自己完結型の再利用可能パーツに移動させます。
GoogleTranslateWebService という名前の新しい再利用パーツを作成します。
ターゲット・プラットフォームを Windows/IBM i/Linux に設定します。
前回のセクションで作成したコードを再利用可能パーツに移動させます。
Begin_Com Role(*EXTENDS #PRIM_OBJT)Mthroutine Name(Translate) Define_Map For(*RESULT) Class(#PRIM_DC.UnicodeString) Name(#TranslatedText) Define_Map For(*INPUT) Class(#PRIM_DC.UnicodeString) Name(#SourceLanguage) Define_Map For(*INPUT) Class(#PRIM_DC.UnicodeString) Name(#TargetLanguage) Define_Map For(*INPUT) Class(#PRIM_DC.UnicodeString) Name(#SourceText) Define_Map For(*OUTPUT) Class(#PRIM_BOLN) Name(#OK) Define_Map For(*OUTPUT) Class(#PRIM_DC.UnicodeString) Name(#ErrorCode) Define_Map For(*OUTPUT) Class(#PRIM_DC.UnicodeString) Name(#ErrorMessage) * 前のセクションで作成したコードをここに挿入 * ... * ... Endroutine
これで、Google 翻訳 Web サービス起動の詳細を理解していなくても、他の開発者が GoogleTranslateWebService を簡単に利用することができます。