| ■2935 / ) |
Re[1]: 現在の表に読み込みたい
|
□投稿者/ アックン -(2007/09/18(Tue) 20:05:42)
| 電話番号が同じ過去データを読み込みたいとのことですが、グループ値と明細部を同時に入力すればいいのでしょうか。
もしそうなら、ソース値更新イベントを下のようにすればできます。
グループ値代入コマンドと行挿入モードを利用します。
テストのために項目を少なくしてあります。
フォーム開始イベントで、"注文請書.tbl"を開いておいてください。
何度も開いたり閉じたりするのが面倒なので。
編集表 "注文請書.tbl"
絞り込み [請求電話番号]=&電話
if (&選択件数>0)
var 文字列{ &顧客名,&得意先名,&届ふり,&届会社名 }
&顧客名=[顧客名],&得意先名=[得意先名]
編集表 "新規注文請書.tbl"
グループ値代入 [顧客名]=&顧客名,[得意先名]=&得意先名
メソッド呼び出し @ﾌｫｰﾑ.更新モード設定( 0 )
メソッド呼び出し @t届氏名.フォーカス設定()
メソッド呼び出し @ﾌｫｰﾑ.更新モード設定( 4 )
loop
編集表 "注文請書.tbl"
cond( #eof ) break
&届ふり=[届ふり],&届会社名=[届会社名]
ジャンプ 行番号=+1
編集表 "新規注文請書.tbl"
メソッド呼び出し @ﾌｫｰﾑ.更新モード設定( 4 )
項目値代入 [届ふり]=&届ふり,[届会社名]=&届会社名
メソッド呼び出し @ﾌｫｰﾑ.更新モード設定( 0 )
ジャンプ 行番号=+1
end
else
&件数電話 = 0 /* この行は意味不明なので元のままにしてあります。 */
end
絞り込み解除 *
ループの内と周辺の記述をだらだらと書いておりまして、不要な行があるかもしれませんけど、ご勘弁ください。アックン(=^･^=)
|
|
