PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
20224 03/09/01 15:25:16 RE(6):解決しました。 By かおりゅ
20209 03/08/28 12:02:46 ODBC接続時のAS/400への更新について By かおりゅ
20171 03/08/25 10:57:15 RE(4):AS/400のRollBackについて By かおりゅ
20166 03/08/22 11:53:31 RE(3):AS/400のRollBackについて By hirotyan
20165 03/08/22 08:33:59 RE(2):AS/400のRollBackについて By かおりゅ
20163 03/08/21 18:05:44 RE(1):AS/400のRollBackについて By hirotyan
20162 03/08/21 17:49:38 AS/400のRollBackについて By かおりゅ

カテゴリ:PowerBuilderの開発環境
日付:2003年08月21日 17:49 発信者:かおりゅ
題名:AS/400のRollBackについて

ODBC接続でAS/400に接続しています。

DWでUpdate()を使って更新時に戻り値がエラーだったら、RollBackしたいのですが、
更新されてしまい、うまくできません。

スクリプトは以下の通りです。
l_return  = dw_1.update(TRUE, FALSE)
if l_return  = 1 then
    // AAA カラムに対する更新をオフにします。
        dw_1.Modify(\"AAA_CD1.Update = No\")
    // BBB テーブルを更新可能にします。
        dw_1.Modify( \"DataWindow.Table.UpdateTable = ~\"BBB~\"\")
    // 必要な SHB カラムに対する更新をオンにします。
        dw_1.Modify(\"BBB_CD1.Update = Yes\")
        dw_1.Modify(\"BBB_CD0.Key = Yes\")
    // 次に、BBB テーブルを更新します。
        l_return = dw_1.Update()
        IF l_return = 1 THEN
            COMMIT USING SQLCA;
        ELSE
            ROLLBACK USING SQLCA;
        END IF
else
        ROLLBACK USING SQLCA;
end if

どなたか、AS/400に接続している方、教えてください。
よろしくお願いします。


PB 8.0
DBMS ODBC


付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows 2000
DBMS その他
Browser (記載なし)

Server SoftWare

OS (記載なし)
DBMS その他
WebServer (記載なし)

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