PB 電子会議室

コメント

発言No. 更新日 題名(クリックすると発言内容と関連するコメントが表示されます)
18155 02/09/18 16:13:39 外部ソースを使用したドロップダウンデータウィンドウ By igosso

カテゴリ:データウィンドウ
日付:2002年09月18日 16:13 発信者:igosso
題名:外部ソースを使用したドロップダウンデータウィンドウ

はじめまして。

外部ソースを使用したドロップダウンデータウィンドウの
使用方法がわからず、困っています。
どなたかご教授ください。
具体的にはドロップダウンデータウィンドウ内の項目を
ウィンドウオープン時に直接値を埋め込み、表示させ
たいのです。

*************************** ここまで作りました ***************************

dw_o07.Dataobject = \"d_siwake_dropdown_for_rate_temp\"
dw_o07.settransobject(sqlca)
dw_o07.insertrow(1)

DatawindowChild dw_xx
dw_o07.GetChild( \'rate\', dw_xx )
dw_xx.SetTransObject( SQLCA )
dw_xx.Retrieve()

dw_rate_temp.Dataobject = \"d_siwake_dropdown_for_rate\"

for ll_rate = 1 to UpperBound(gs_rate_kubun_code)

if gs_rate_kubun_code[ll_rate] <> \"9\" then

dw_xx.SetItem(ll_rate, \"rate_code\", gs_rate_kubun_code[ll_rate])
dw_xx.SetItem(ll_rate, \"rate\", gs_rate_kubun[ll_rate])

// dw_xx.object.rate_code[ll_rate] = gs_rate_kubun_code[ll_rate]
// dw_rate_temp.object.rate[ll_rate] = gs_rate_kubun[ll_rate]
// dd_i0207.AddItem( gs_rate_kubun_code[ll_rate] )

end if

next

//dw_o07.insertrow(1)


dw_o07.Retrieve()
dw_o07.insertrow(1)

*************************** ここまで作りました ***************************

付加情報:

PowerBuilder Version (記載なし)

Client SoftWare

OS Windows98
DBMS Sybase Open Client/C 11
Browser (記載なし)

Server SoftWare

OS Windows NT 4.0
DBMS Sybase SQL Server System 11
WebServer (記載なし)

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