PB 電子会議室
発言No. | 更新日 | 題名(クリックすると発言内容と関連するコメントが表示されます) |
---|---|---|
21870 | 05/04/13 17:15:25 | RE(4):PB6.5: ドロップダウンリストの値 By ミュウ |
21869 | 05/04/13 17:01:20 | RE(3):PB6.5: ドロップダウンリストの値 By kmaru |
21868 | 05/04/13 16:18:23 | RE(2):PB6.5: ドロップダウンリストの値 By ミュウ |
21867 | 05/04/13 15:31:26 | RE(1):PB6.5: ドロップダウンリストの値 By kmaru |
21866 | 05/04/13 13:31:29 | PB6.5: ドロップダウンリストの値 By ミュウ |
カテゴリ:スクリプトの記述
日付:2005年04月13日 17:15 発信者:ミュウ
題名:RE(4):PB6.5: ドロップダウンリストの値
kmaruさん、こんにちは。
>ミュウさん、こんにちは。
>
>データベースはORACLEを使用されていると勝手に想像して書いています。
>下記では、配列の変数に値を格納するところまで行います。
>
>根本的な疑問なのですが、retrieveするだけでは駄目だったので
>SQLを使おうとしていたんですよね。
>
>//カーソル宣言
>DECLARE C_INPUT CURSOR FOR
> select kacd,kaname
> from kamst
> order by kacd;
>
>//カーソル実行
>OPEN C_INPUT;
>
>DO WHILE TRUE
> ll_cnt += 1
>
> //カーソル実行結果を取得
> FETCH C_INPUT INTO :cd[ll_cnt],:name[ll_cnt];
>
> CHOOSE CASE sqlca.sqlcode
> CASE 0 //正常
> CASE 100 //レコード無し
> EXIT;
> CASE ELSE //オラクルエラー
> //カーソルを閉じる
> CLOSE C_INPUT ;
> ROLLBACK;
> messagebox(\"\",\"error\")
> END CHOOSE
>LOOP
>
>//カーソルを閉じる
>CLOSE C_INPUT;
>
今までVBをやっていたのですがどうも勝手が違いますね。
まだまだ勉強不足です。ここまで親切に教えていただいたのにまだ分からないところがちらほらあります。
あとは自分でがんばってみたいと思います。ありがとうございました
付加情報:
PowerBuilder Version (記載なし)
Client SoftWare
OS (記載なし)
DBMS (記載なし)
Browser (記載なし)
Server SoftWare
OS (記載なし)
DBMS (記載なし)
WebServer (記載なし)
Copyright © 2013 Power Future Co., Ltd.