Skip to main content

This is documentation for Caché & Ensemble. See the InterSystems IRIS version of this content.Opens in a new tab

For information on migrating to InterSystems IRISOpens in a new tab, see Why Migrate to InterSystems IRIS?

演習 5

generated description: handson.gif

ここでは mylookup ルーチンを使用します。このルーチンは、名前、電話番号、誕生日を検索します。以下に、記述が必要なプロシージャの名前と用途を示しています。

  • 新規にルーチンを作成します。データ入力ルーチンと同様に、最初に main セクション (プロシージャではなく) を使用します。残りのコードは、getsubmithelpdob、および display の 4 つの部分で構成します。

  • main セクションには getsubmit を呼び出すループがあり、ユーザに文字入力を要求します。このバージョンでは、ユーザが ? を入力するとヘルプが表示され、誕生日を入力するか、あるいは Enter を押して終了します。$$validDOB^mydatent() を使用して誕生日を検証します。ユーザが ? を入力すると help プロシージャにより、他の検索データ (ここでは誕生日のみ) を表示します。

  • ユーザが有効な誕生日を入力すると、dob プロシージャは誕生日の内部形式が ^PersonI に存在するかどうかを検証し、インデックスをループして、同じ誕生日を持つ個人 ID すべてを検索します。個人データは display プロシージャで表示されます。このプロシージャはパラメータとして ID を受け入れ、個人データをすべて表示します。

詳細を表示するには、下記をクリックします。

generated description: stepbystep.gif

FeedbackOpens in a new tab