PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
722 98/03/02 13:42:54 RE(3):アップデートキーのところ、改良させてもらいました By ふくちゃん
718 98/03/02 09:12:34 RE(2):アップデートキーのところ、改良させてもらいました By てとらぽっと
691 98/02/26 17:45:08 RE(1):動的に作成したDWで更新したい By ふくちゃん
687 98/02/26 13:16:12 動的に作成したDWで更新したい By kamogari

カテゴリ:旧電子会議室
日付:1998年02月26日 17:45 発信者:ふくちゃん
題名:RE(1):動的に作成したDWで更新したい

>SyntaxFromSQL関数とCreate関数を使って動的に作成したデータウィンドウに、タブ区切りテキストファイルからイ

こんにちは、こんな答えでよいのかわかりませんが、
そのデータウインドウにアップデート機能を追加しなくては行けないと思います。

「例」
ちょっとかっこ悪いですが・・・誰かもっといい方法教えてください。

ちなみにDW_1がアップデートするDWです。
DW_2がテーブル\"SYS\".\"USER_TAB_COLUMNS\" のDWです。
ls_fromはアップデートするテーブル名称です。

//該当テーブルをアップデート可能にする
dw_1.Modify(\"DataWindow.Table.UpdateTable = \'\"+ ls_from +\"\'\")
dw_2.SetFilter(\"\")
dw_2.Filter()
l_kcnt = dw_2.Retrieve(ls_from)
//該当テーブルの全カラムをアップデート可能にする
For ll_cn = 1 To ll_kcnt
 ls_cname = dw_2.GetItemString(ll_cn,\"column_name\")
 dw_1.Modify(ls_cname + \".Update = Yes\")
Next
//該当テーブルのnullableの項目にアップデートキーを設定する
dw_2.SetFilter( \"nullable = \'N\' \")
dw_2.Filter()
ll_kcnt2 = dw_2.RowCount()
For ll_k = 1 To ll_kcnt2
  ls_k = dw_2.GetItemString(ll_k,\"column_name\")
  dw_1.Modify(ls_k + \".KEY = YES\")
Next

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS (記載なし)
DBMS (記載なし)
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)

PowerSpaceの運営は、パワーフューチャー株式会社が行っております。
Copyright © 2013 Power Future Co., Ltd.