| ■3115 / ) |
Re[7]: 現在の表に読み込みたい
|
□投稿者/ アックン -(2007/10/23(Tue) 11:20:41)
| 同じ電話番号で異なる顧客名が複数存在したら、その顧客をメニューに表示して、その中から１人選ぶようにしてはどうでしょう。
#2935のイベント(見本ファイルは#2947)に、処理を書き足すだけでいいです。
下の例は、[顧客名]が複数存在する場合を想定してあります。
手続き定義開始 g電話::ｿｰｽ値更新() /* 変更なし */
編集表 "注文請書.tbl" /* 変更なし */
絞り込み [請求電話番号]=&電話 /* 変更なし */
/* （↓）書き足す処理 */
絞り込み 単一化={ [請求電話番号] , [得意先名] , [顧客名] }
if( &選択件数>1 )
var 文字列{ &str }
while( .not#eof )
&str = &str+","+[顧客名]
ジャンプ 行番号=+1
end
&str = #sstr( &str , 2 )
メニュー２ &秒 , 1 , (10,40) , "１人選べます。キャンセルは Esc" , &str ,
cond( &秒<>0 ) &str = #対応文字列( &str , &秒 )
絞り込み解除 1
cond( &str ) 絞り込み [顧客名]=&str
else
絞り込み解除 1
end
/* （↑）書き足す処理 */
if (&選択件数>0) /* 以下、変更なし。 */
アックン(=^･^=)
|
|
