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 (記載なし)
Copyright © 2013 Power Future Co., Ltd.