REM ***** BASIC *****
Sub Main
Dim DatabaseContext as object
Dim DataSource as Object
Dim Connection as Object
Dim Statement as Object
Dim ResultSet as Object
REM ***** データベースのコネクション *****
DatabaseContext=createUnoService("com.sun.star.sdb.DatabaseContext")
DataSource=DatabaseContext.getByName("テスト用")
REM ***** SQLの実行 *****
Connection = DataSource.GetConnection("","")
Statement = Connection.createStatement()
ResultSet= Statement.executeQuery("Select * From 顧客テーブル")
REM ***** レコードの表示 *****
If IsNull(ResultSet) Then
MsgBox("レコードがありません")
Else
While ResultSet.next
MsgBox(ResultSet.getString(1))
Wend
End If
End Sub
|
（あ）まず、外部に対して出力になっているものを取り上げます。 （い）その外部出力の具体的内容を考えます（というか、帳票・画面なら入手します） （う）その外部出力を出すために必要な情報が、入力されているかどうか、確認します。 （え）出力をもとに、出力するイベントを順番に並べます （お）それに、データ入力のイベントを加えていき、入力する前に出力することが ないかどうか確認する。 |
（１）利用者を体系づけて分けます （２）今回対象の利用者について、システム利用（入出力）場面を考えます ●ToBeモデルの場合は、ここで利用者の入出力の最適化を考えます。 （３）利用者が利用する一場面をとって、入出力を、まず出力から確認します （４）利用者からの入力を受け取ってから、利用者への出力まで、システム内のプロセスを考える ●ToBeモデルの場合、４は、外部入出力をかえずに、システム内の最適化をします。 （５）利用者への出力ごとに、シナリオをつくる （６）利用者の範囲を広げていく |
（１）利用者を体系づけて分けます （２）今回対象の利用者について、システム利用（入出力）場面を考え、業務シート作成 →入出力を集め、その場面を考えていきます →入力や場面はある程度適当でも大丈夫、まちがっていたら、あとで直せます →出力は要求として確定しているはず。そうでないと困ります →利用する場面で１シート、具体的な入出力画面１つにつき、１シートとなります。 （３）利用者が利用する一場面をとって、入出力を、まず出力から確認します ここから、DFDの考え方が入ります （３－あ）まず、外部に対して出力になっているものを取り上げます。 （３－い）その外部出力の具体的内容を考え、入出力のシートに書きます。 （３－う）その外部出力を出すために必要な情報が、入力されているかどうか、確認 →（２）で、入力場面の業務シートは作成しているはず。 なかったら、追加します。 また、入力を、入出力のシートに書きます。 （３－えお）（３－う）までで、入出力のシートはできているので、それに対応する 業務シートがなかったら追加、完成させます。 そして、（２）で、利用する場面の子アクティビティとして、入出力の業務を 入れます。 ＊あ～おは、「DFDの確認手順」のあ～おに相当します （４）利用者からの入力を受け取ってから、利用者への出力まで、 システム内の業務を追加します →モデル部分を追加します （５）利用者への出力ごとに、シナリオをつくります →シナリオ上、各利用場面をまとめた上位のシートができてきます。 （６）利用者の範囲を広げていきます。 |
 アクセス |
|||
|---|---|---|---|
| 閲覧 | 1,484 | PV |  |
| 訪問者 | 889 | IP | |
 トータル |
|||
| 閲覧 | 34,814,817 | PV | |
| 訪問者 | 8,679,691 | IP | |
 ランキング |
|||
| 日別 | 483 | 位 | |
| 週別 | 493 | 位 | |
