HOME HELP 新規作成 新着記事 ツリー表示 スレッド表示 トピック表示 ファイル一覧 検索 過去ログ

《 桐質問以外の話題は、「のほか掲示板」からどうぞ 》
■ 24時間以内に作成されたスレッドは New で表示されます。
■ 24時間以内に更新されたスレッドは UpDate で表示されます。
記事リスト ( )内の数字はレス数
Nomal表引きについて(12) | Nomal超初心者です。桐の変数代入について教えて下さい。(2) | Nomal区分ごとに行で色を付けたい(4) | Nomal絞り込み式(6) | Nomal連番を入れたら、その日の年月を自動で入れたい(6) | Nomal併合の絞り込みについて(8) | Nomalライブラリが読み込まれない(1) | Nomal絞り込み：比較式での日時値絞り込みの相談(12) | Nomal常時「訂正」モードにしたい(20) | Nomal桐s-2024 LTへのバージョンアップ(16) | Nomalテキスト読み込み(3) | Nomal一括処理でテキストを選択したい(8) | Nomal課税、非課税(8) | Nomalビルド番号について(4) | Nomal１２ヶ月分のレコードを一度に作成する方法について(5) | Nomal一括処理で集計したい(2) | Nomalハンドルとは？(31) | Nomal帳票印刷(7) | Nomalメール送信(9) | Nomal拡張子CSVで項目間をカンマで区切り書き出したい(32) | Nomal正か負かで区分を付けたい(4) | Nomal項目計算式にメモ(4) | Nomal連番を自動入力したい(8) | Nomal項目別　連番生産(9) | Nomalイベントでフォームをまとめて開く(8) | Nomal9000バイトの出力(4) | Nomal一括処理書き方(7) | Nomal印字コマンド(13) | Nomal状態表示について(3) | NomalTXTファイルからDATファイルに変更(4) | Nomalテーブルの項目を整理する際の影響確認(5) | Nomalフォームの閉じ方について(18) | Nomalレポートにつきまして(5) | Nomal【アイデア募集】スケジュール表示(2) | Nomal表番号の謎(16) | Nomal主ウィンドウ　と　補助ウィンドウについて(42) | Nomalチェックボックスの動作(8) | Nomal文字列中に、４桁以上の数字が含まれているか検査したい(8) | Nomal変数値の取得方法について(16) | Nomal行制約について(31) | Nomal比較式の書き方について(28) | Nomal期間絞込でのエラー時対応について(31) | Nomalarm版Windows での桐の使用(4) | Nomal月毎の日数端数を切り捨てた月期間の計算について(10) | Nomal保存した条件における読み込み元表のパスが変更されている場合(4) | Nomalレポートでページごとの合計を表示(2) | Nomal一覧表(tbx)を開いた状態での複合レポート(1) | Nomal会話で開かれていない為継承できません(1) | Nomal加工開始日を求めたい(32) | Nomal文字置換(5) | Nomal（削除）(4) | Nomalタイルを2つ(3) | Nomalレポートで明細末尾に以下余白と表示させたいです(2) | Nomal桐レポートCond関数で(2) | Nomalフォームのコマンドボタンについて(18) | Nomal特定箇所の計算(2) | Nomalエクセル1900基準にしたい(4) | Nomalレポート印刷(5) | Nomal桐レポート若しくは一覧表印刷で作成可能かどうか(3) |


■記事リスト / ▼下のスレッド
■14641 / 親記事) 　正か負かで区分を付けたい
□投稿者/ キリマンジャロ -(2024/10/31(Thu) 10:35:21)
    WIN11、桐10S使用です。

    項目[生産数].[在庫数].[引当数].[生産区分]があります。
    データ型は[生産数].[在庫数].[引当数].が数値で、[生産区分]
    が文字列になっています。


    [生産数]-[在庫数]=[引当数]
    となっていて、[引当数]がマイナスの時に、[生産区分]に1がたち、
    [引当数]がプラスの時に、[生産区分]に0が入るようにたいです。

    どのようにしたら出来るか教えて頂きたいです。お忙しいと思いますが、是非とも宜しくお願いいたします！

引用返信 [メール受信/ON]
▽[全レス4件(ResNo.1-4 表示)]
■14643 / ResNo.1) 　Re[1]: 正か負かで区分を付けたい
□投稿者/ Dita -(2024/10/31(Thu) 14:32:01)
    > 項目[生産数].[在庫数].[引当数].[生産区分]があります。
    > データ型は[生産数].[在庫数].[引当数].が数値で、[生産区分]
    > が文字列になっています。

    > [生産数]-[在庫数]=[引当数]
    > となっていて、[引当数]がマイナスの時に、[生産区分]に1がたち、
    > [引当数]がプラスの時に、[生産区分]に0が入るようにたいです。

    境界値ゼロの取り扱いが不明ですが、細かいこと抜きで安直に書けば、

    　　#条件選択( [引当数]<0, #文字列(1), 1, #文字列(0) )

    になろうかと思います.
    しかし平易過ぎて、こういう質問では無いような気がしています。

    こういうことではないのであれば、どこで躓いているのかをもう少々具体的にお書きになられた方が良いかと。
引用返信 [メール受信/OFF]
■14645 / ResNo.2) 　Re[2]: 正か負かで区分を付けたい
□投稿者/ キリマンジャロ -(2024/11/01(Fri) 09:37:28)
    ■No14643に返信(Ditaさんの記事)
    >>項目[生産数].[在庫数].[引当数].[生産区分]があります。
    >>データ型は[生産数].[在庫数].[引当数].が数値で、[生産区分]
    >>が文字列になっています。
    >
    >>[生産数]-[在庫数]=[引当数]
    >>となっていて、[引当数]がマイナスの時に、[生産区分]に1がたち、
    >>[引当数]がプラスの時に、[生産区分]に0が入るようにたいです。
    >
    > 境界値ゼロの取り扱いが不明ですが、細かいこと抜きで安直に書けば、
    >
    > 　　#条件選択( [引当数]<0, #文字列(1), 1, #文字列(0) )
    >
    > になろうかと思います.
    > しかし平易過ぎて、こういう質問では無いような気がしています。
    >
    > こういうことではないのであれば、どこで躓いているのかをもう少々具体的にお書きになられた方が良いかと。


    ご連絡ありがとうございます。
    丁寧な文章でとても分かりやすく参考になりました。
    ありがとうございます！

    実際に行いたいのは、ここに追加で[基準在庫]という数値の項目を追加し
    その項目の値より、[引当数]が多ければ、[生産区分]に1がたち、
    [引当数]が少なければ、[生産区分]に0が入るようにたいです。
    お忙しいと思いますが、宜しくお願い致します。
引用返信 [メール受信/OFF]
■14649 / ResNo.3) 　Re[3]: 正か負かで区分を付けたい
□投稿者/ hiro -(2024/11/01(Fri) 23:53:10)
    ■No14645に返信(キリマンジャロさんの記事)
    > ■No14643に返信(Ditaさんの記事)
    > >>項目[生産数].[在庫数].[引当数].[生産区分]があります。
    > >>データ型は[生産数].[在庫数].[引当数].が数値で、[生産区分]
    > >>が文字列になっています。
    >>
    > >>[生産数]-[在庫数]=[引当数]
    > >>となっていて、[引当数]がマイナスの時に、[生産区分]に1がたち、
    > >>[引当数]がプラスの時に、[生産区分]に0が入るようにたいです。
    >>
    >>境界値ゼロの取り扱いが不明ですが、細かいこと抜きで安直に書けば、
    >>
    >>　　#条件選択( [引当数]<0, #文字列(1), 1, #文字列(0) )
    >>
    >>になろうかと思います.
    >>しかし平易過ぎて、こういう質問では無いような気がしています。
    >>
    >>こういうことではないのであれば、どこで躓いているのかをもう少々具体的にお書きになられた方が良いかと。
    >
    >
    > ご連絡ありがとうございます。
    > 丁寧な文章でとても分かりやすく参考になりました。
    > ありがとうございます！
    >
    > 実際に行いたいのは、ここに追加で[基準在庫]という数値の項目を追加し
    > その項目の値より、[引当数]が多ければ、[生産区分]に1がたち、
    > [引当数]が少なければ、[生産区分]に0が入るようにたいです。
    > お忙しいと思いますが、宜しくお願い致します。
    横から失礼します。
    [生産区分]は文字列と言う事で、その項目計算式に
    #文字列（#条件選択（[基準在庫]＜[引当数],1,1,0））で良いかと思います
    ただ同数の場合もあると思うのでその場合≦にするのか、あるいは0、1、2の3種類に分けるのかとか考えないといけないですね
引用返信 [メール受信/OFF]
■14680 / ResNo.4) 　Re[4]: 正か負かで区分を付けたい
□投稿者/ キリマンジャロ -(2024/11/04(Mon) 21:59:42)
    ■No14649に返信(hiroさんの記事)
    > ■No14645に返信(キリマンジャロさんの記事)
    >>■No14643に返信(Ditaさんの記事)
    >>>>項目[生産数].[在庫数].[引当数].[生産区分]があります。
    >>>>データ型は[生産数].[在庫数].[引当数].が数値で、[生産区分]
    >>>>が文字列になっています。
    > >>
    >>>>[生産数]-[在庫数]=[引当数]
    >>>>となっていて、[引当数]がマイナスの時に、[生産区分]に1がたち、
    >>>>[引当数]がプラスの時に、[生産区分]に0が入るようにたいです。
    > >>
    > >>境界値ゼロの取り扱いが不明ですが、細かいこと抜きで安直に書けば、
    > >>
    > >>　　#条件選択( [引当数]<0, #文字列(1), 1, #文字列(0) )
    > >>
    > >>になろうかと思います.
    > >>しかし平易過ぎて、こういう質問では無いような気がしています。
    > >>
    > >>こういうことではないのであれば、どこで躓いているのかをもう少々具体的にお書きになられた方が良いかと。
    >>
    >>
    >>ご連絡ありがとうございます。
    >>丁寧な文章でとても分かりやすく参考になりました。
    >>ありがとうございます！
    >>
    >>実際に行いたいのは、ここに追加で[基準在庫]という数値の項目を追加し
    >>その項目の値より、[引当数]が多ければ、[生産区分]に1がたち、
    >>[引当数]が少なければ、[生産区分]に0が入るようにたいです。
    >>お忙しいと思いますが、宜しくお願い致します。
    > 横から失礼します。
    > [生産区分]は文字列と言う事で、その項目計算式に
    > #文字列（#条件選択（[基準在庫]＜[引当数],1,1,0））で良いかと思います
    > ただ同数の場合もあると思うのでその場合≦にするのか、あるいは0、1、2の3種類に分けるのかとか考えないといけないですね

    解決しました！ありがとうございました。
解決済み!
引用返信 [メール受信/OFF]
■記事リスト / レス記事表示 → [親記事-4]


■記事リスト / ▼下のスレッド / ▲上のスレッド
■14644 / 親記事) 　項目計算式にメモ
□投稿者/ ポーラン -(2024/11/01(Fri) 07:15:44)
    2024/11/01(Fri) 07:17:58 編集(投稿者)
    2024/11/01(Fri) 07:17:55 編集(投稿者)

    桐10sです
    項目計算式にメモを付加したいのですが、可能でしょうか？
    計算式が長くなってくると、メモがあったほうが間違いに気づきやすいので。
    よろしくお願いします。

    TBX事にテキストファイルに保存してます。
    もし上記が不可能であるなら、こうすればいいとかの案もあればお願いします。
引用返信 [メール受信/OFF]
▽[全レス4件(ResNo.1-4 表示)]
■14646 / ResNo.1) 　Re[1]: 項目計算式にメモ
□投稿者/ うにん -(2024/11/01(Fri) 09:38:55)
    式内で改行ができないので、かえってわかりにくいかも？

    #条件選択(0,"これはコメントです",1,"")
    を連結することで代用はできますね。
    ""の代りにコメントを付けたい部分の実際の計算式を入れればいいかな。
引用返信 [メール受信/OFF]
■14647 / ResNo.2) 　Re[2]: 項目計算式にメモ
□投稿者/ ポーラン -(2024/11/01(Fri) 10:34:40)
    2024/11/01(Fri) 10:41:15 編集(投稿者)

    #cond (
    [月日]="01-01", "元旦",
    [西暦]>=1973 .and [月日]="01-02"　.and　[曜]="月", "振替休日",

    [西暦]>=1967 .and [月日]="02-11", "建国記念の日",
    [西暦]>=1973 .and [月日]="02-12" .and [曜]="月", "振替休日",
    [西暦]>=2007 .and [月日]="05-04", "みどりの日",
    [月日]="05-05", "こどもの日",
    [西暦]>=1973 .and [西暦]<=2007 .and [月日]="05-04" .and [曜]="月", "振替休日",


    　　　　（中略）


    [年月日]=d"1959-04-10", "皇太子明仁親王の結婚の儀",
    [年月日]=d"1989-02-24", "昭和天皇の大喪の礼",
    [年月日]=d"1990-11-12", "即位礼正殿の儀",
    [年月日]=d"1993-06-09", "皇太子徳仁親王の結婚の儀",

    [西暦]>=1948 .and [西暦]<=1999 .and [月日]="01-15",　 "成人の日",
    [西暦]>=1973 .and [西暦]<=1999 .and [月日]="01-16" .and [曜]="月", "振替休日",

    [西暦]>=1995 .and [西暦]<=2002 .and [月日]="07-20", 　 "海の日",
    [西暦]>=1995 .and [西暦]<=2002 .and [月日]="07-21" .and [曜]="月", "振替休日",

    [西暦]>=1966 .and [西暦]<=2002 .and [月日]="09-15",　 "敬老の日",
    [西暦]>=1973 .and [西暦]<=2002 .and [月日]="09-16" .and [曜]="月", "振替休日",

    [西暦]>=1966 .and [西暦]<=1999 .and [月日]="10-10",　 "体育の日",
    [西暦]>=1973 .and [西暦]<=1999 .and [月日]="10-11" .and [曜]="月", "振替休日",

    1,#未定義
    )


    説明の仕方が悪くすみません。
    ①エディタで編集してそれをコピペしていますので、改行は可能です。またそのテキストファイルは、TBXと同じファイル名.txt にて保存しています
    ②戻り値？返り値？　でコメントを付けるのではなく、例えば行末に補足文を付けられないか？
    という意味です。


    https://eng-entrance.com/commentout
    上記リンクでの「//」みたいなやつです


引用返信 [メール受信/OFF]
■14657 / ResNo.3) 　Re[3]: 項目計算式にメモ
□投稿者/ うにん -(2024/11/02(Sat) 10:59:28)
    コメントの書式はないので、（私は古いバージョンを使ってますが、10sでもないですよね？）

    #cond (
    [月日]="01-01", "元旦", 0, "1/1は無条件に元旦",

    のようにしたらどうか、という代案です。
    0,
    の代りに
    "//",
    で試してみたら、これは真になってしまいますね。
引用返信 [メール受信/OFF]
■14658 / ResNo.4) 　Re[4]: 項目計算式にメモ
□投稿者/ ポーラン -(2024/11/02(Sat) 11:23:19)
    あー、なるほど。
    仰ってることが理解できました。
    ありがとうございました。
解決済み!
引用返信 [メール受信/OFF]
■記事リスト / レス記事表示 → [親記事-4]


■記事リスト / ▼下のスレッド / ▲上のスレッド
■14522 / 親記事) 　連番を自動入力したい
□投稿者/ キリマンジャロ -(2024/07/17(Wed) 11:07:37)
    [A]　[NO]
    a　 　1
    a　 　2
    b　 　1
    a　 　3
    c　 　1
    b　 　2

    [A]を並び替えれば[NO]に項目名毎に連番を付与（下記）できますが、並び替えないで上記のように項目名毎に最大値+１したい


    という質問があり、［フォーム＋イベント処理］で解決されていたので参考にして作ったのですが動きません。
    サンプルになるフォームを見せて頂きたいと思い投稿しました。よろしくお願いいたします。

    https://tayu.o0o0.jp/bbs/kiri/cbbs.cgi?mode=al2&namber=13544&rev=&no=0&KLOG=91
    参考にしたURLです。
引用返信 [メール受信/OFF]
▽[全レス8件(ResNo.4-8 表示)]
■14534 / ResNo.4) 　Re[2]: 連番を自動入力したい
□投稿者/ キリマンジャロ -(2024/08/06(Tue) 10:51:15)
    ■No14523に返信(ONnojiさんの記事)
    > 2024/07/17(Wed) 18:09:48 編集(投稿者)
    >
    >>サンプルになるフォームを見せて頂きたいと思い投稿しました。よろしくお願いいたします。
    >>https://tayu.o0o0.jp/bbs/kiri/cbbs.cgi?mode=al2&namber=13544&rev=&no=0&KLOG=91
    >>参考にしたURLです。
    >
    > たぶん私でしょうね。
    >
    > 　■13552 / inTopicNo.8) 　Re[2]: 連番の自動付与
    > 　□投稿者/ ONnoji -(2022/09/01(Thu) 18:09:57)
    >
    > サンプルはすでに削除していますのでありません。ご了承ください。
    >
    > 参考にしたツリーの内容と、貴殿が行いたい内容が一致しているのか否か疑問です。
    >
    >>という質問があり、［フォーム＋イベント処理］で解決されていたので参考にして作ったのですが動きません。
    >
    > 貴殿が作られたものを添付していただくと、この掲示板を見ている人から回答があると思いますよ。
    >
    > ｐ．ｓ．
    >
    > 質問の際には、桐のバージョンを提示してください。桐9-2012？、桐9s？、桐10ｓ？、桐ｓ？
    >
    > ｐ．ｐ．ｓ．
    >
    > 当方のサンプルの表の定義、フォームの定義、イベント処理の定義は、過去ログにすべて掲載されているので、
    >
    > 一覧表形式のフォームを作れば、そのまま動くはずです。
    >
    > しかし、サンプルの一部分を切り取って使うという目的には適していませんよ。
    >
    > 以下に再掲載（■13552　Re[2]: 連番の自動付与　2022/09/01(Thu)）します。
    >
    > ■グループ毎の連番を振る.wfm
    >
    > 　ﾌｫｰﾑ
    > 　├ ﾌｧﾐﾘ
    > 　├ ﾜｰｸｽﾍﾟｰｽ
    > 　│　└ cmdStartup
    > 　├ ﾌｫｰﾑ操作ﾊﾞｰ
    > 　├ ﾌｫｰﾑﾍｯﾀﾞ部
    > 　│　├ a
    > 　│　├ lblA
    > 　│　└ lblNO
    > 　└ ﾌｫｰﾑ明細部
    > 　　　├ 行ｾﾚｸﾀ
    > 　　　├ txtA
    > 　　　└ txtNO
    >
    > 　グループ毎の連番を振る.wfm の開始時実行ｺﾏﾝﾄﾞﾎﾞﾀﾝ
    >
    > 　オブジェクト名： cmdStartup
    > 　標題　　　　　： cmdStartup
    >
    > 　　機能名　　　　機能パラメータリスト
    > 　1 表示
    > 　2 手続き実行　　cmdStartupClick
    > 　3 なし
    > 　4 なし
    >
    > ■グループ毎の連番を振る.tbl
    >
    > 項目番号　項目名　データ型
    > 1　　　　 A　　　　文字列　　　　　　　　
    > 2　　　　 NO　　 　長整数　　　　　　　　
    > 　　　　　　　　　　　　　　　　
    >
    > ■グループ毎の連番を振る.kev
    >
    > 名札　　メイン
    > 　変数宣言　局所，整数　｛ &mMultiTblNum ｝
    >
    > ＊
    >
    > 手続き定義開始　cmdStartupClick( )
    > 　変数宣言　自動，文字列｛ &icon, &title = "cmdStartupClick( )", &msg ｝
    > 　変数宣言　自動，整数　｛ &traceON ｝
    > 　変数宣言　自動，整数　｛ &multiTblNum ｝
    >
    > 　&traceON = 0
    > 　条件 ( &traceON )　トレース出力　&title + "を実行開始しました"
    >
    > 　編集表　&hwindow
    > 　多重化
    > 　&mMultiTblNum = #is表
    >
    > 　**if ( &mMultiTblNum )
    > 　**　終了　表　&multiTblNum
    > 　**end
    > 　編集表　&hwindow
    >
    > 　&msg =　　　　 "done"
    > 　**メッセージボックス　&title, &msg, アイコン = i, ボタン指定 = 1, 制御文字展開 = する
    >
    > 　条件 ( &traceON )　トレース出力　&title + "を実行終了しました"
    > 手続き定義終了
    >
    > 手続き定義開始　ﾌｫｰﾑ::行挿入終了前(長整数　&明細番号，長整数　&モード，参照　長整数　&行挿入継続)
    > 　変数宣言　自動，文字列｛ &icon, &title = "ﾌｫｰﾑ::行挿入終了前( )", &msg ｝
    > 　変数宣言　自動，文字列｛ &objectName ｝
    > 　変数宣言　自動，文字列｛ &string ｝
    > 　変数宣言　自動，文字列｛ &expression ｝
    > 　変数宣言　自動，文字列｛ &WQ = #jis( #hex("22") ) ｝
    > 　変数宣言　自動，整数　｛ &return ｝
    > 　変数宣言　自動，長整数｛ &NO ｝
    > 　変数宣言　自動，整数　｛ &traceON ｝
    >
    > 　&traceON = 1
    > 　条件 ( &traceON )　トレース出力　&title + "を実行開始しました"
    >
    > 　条件 ( &traceON )　トレース出力　_&モード
    > 　if ( &モード )
    > 　　&string = [A]
    > 　　条件 ( &traceON )　トレース出力　_&string
    > 　
    > 　　編集表　&mMultiTblNum
    > 　　&expression = &WQ + &string + &WQ
    > 　　解除　*
    > 　　絞り込み　[A]_&expression
    > 　　if ( .not #eof )
    > 　　
    > 　　　並べ替え　｛ [NO]降順 ｝
    > 　　　ジャンプ　行番号 = 先頭
    > 　　　&NO = [NO]
    > 　　　条件 ( &traceON )　トレース出力　_&NO
    > 　　
    > 　　　編集表　&hwindow
    > 　　　項目値代入　[NO] = &NO + 1
    > 　　　**&msg =　　　　 "[NO] = " + #str( [NO] )
    > 　　　**メッセージボックス　&title, &msg, アイコン = i, ボタン指定 = 1, 制御文字展開 = する
    > 　　else
    > 　　
    > 　　　編集表　&hwindow
    > 　　　項目値代入　[NO] = 1
    > 　　end
    > 　end
    >
    >
    > 　条件 ( &traceON )　トレース出力　&title + "を実行終了しました"
    > 手続き定義終了

    返信遅れて申し訳ありません。
    再度チャレンジしたいとおもいます！
    > またなにかあれば報告させていただきます。
引用返信 [メール受信/OFF]
■14535 / ResNo.5) 　Re[2]: 連番を自動入力したい
□投稿者/ キリマンジャロ -(2024/08/06(Tue) 10:55:17)
    ■No14524に返信(ななーしさんの記事)
    > 返信遅くなって申し訳ありません。
    様々なことをやってみたくなってしまって、、、また一度考えていきたいと思います。アドバイスありがとうございます。
引用返信 [メール受信/OFF]
■14536 / ResNo.6) 　Re[3]: 連番を自動入力したい
□投稿者/ キリマンジャロ -(2024/08/06(Tue) 10:56:57)
    ■No14525に返信(ONnojiさんの記事)
    > 2024/07/17(Wed) 20:12:00 編集(投稿者)
    >
    桐は10ｓを使用しています。
    今週中に一度試して見ようと思います。
    アドバイスありがとうございます！

引用返信 [メール受信/OFF]
■14571 / ResNo.7) 　Re[3]: 連番を自動入力したい
□投稿者/ 緒方 -(2024/09/18(Wed) 11:20:28)
    ■No14535に返信(キリマンジャロさんの記事)
    もう解決ずみでしたらすみません
    NOの項目に下記の計算式ではだめですかね
    #条件選択(#直前値([A],"")<>[A],1,1,#直前値([NO],0)+1)
    皆さんが言っておられるように{A]を並び替えして[no]を項目置換すると希望の連番になりますよ
引用返信 [メール受信/OFF]
■14642 / ResNo.8) 　Re[4]: 連番を自動入力したい
□投稿者/ キリマンジャロ -(2024/10/31(Thu) 10:38:25)
    ■No14571に返信(緒方さんの記事)
    > ■No14535に返信(キリマンジャロさんの記事)
    > もう解決ずみでしたらすみません
    > NOの項目に下記の計算式ではだめですかね
    > #条件選択(#直前値([A],"")<>[A],1,1,#直前値([NO],0)+1)
    > 皆さんが言っておられるように{A]を並び替えして[no]を項目置換すると希望の連番になりますよ

    ありがとうございます。解決することが出来ました！

解決済み!
引用返信 [メール受信/OFF]
■記事リスト / レス記事表示 → [親記事-8]


■記事リスト / ▼下のスレッド / ▲上のスレッド
■14617 / 親記事) 　項目別　連番生産
□投稿者/ たいむ -(2024/10/12(Sat) 11:18:26)
    お世話になっております。
    大変参考になり助かっております。


    初歩的な質問で恐縮ですが、よろしくお願いします。

    一つの表で複数の項目別それぞれに、連番を自動生産したい。
    （データ型：カウンタの様に）
    開始番号がＡＢＣ・ＤＥの様に、同番号となるものがある


    Ａ項目：0001から始まる連番　これを更に年度別・年別にそれぞれ生産をしたい。
    Ｂ項目：0001から始まる連番　　以下同じ
    Ｃ項目：0001から始まる連番
    Ｄ項目：2001から始まる連番
    Ｅ項目：2001から始まる連番　　　　　・　　
    　　　　・
    　　　　・
    　　　　・
    Ｌ項目：9001から始まる連番　これを更に年度別・年別に生産したい。

引用返信 [メール受信/OFF]
▽[全レス9件(ResNo.5-9 表示)]
■14630 / ResNo.5) 　Re[1]: 項目別　連番生産
□投稿者/ ONnoji -(2024/10/16(Wed) 16:04:37)
    2024/10/19(Sat) 11:17:22 編集(投稿者)
    2024/10/17(Thu) 09:04:41 編集(投稿者)

    正直に言ってデータベース的な感覚からすると、同じ値の項目（[A][B][C], [D][E]）が出現することに強い違和感がありました。

    ｐ．ｓ．

    当方が添付ファイルを添付した提案に対して、一瞥もない貴殿の返答をいただき非常に残念な結果でありました。(－－〆)

引用返信 [メール受信/OFF]
■14631 / ResNo.6) 　Re[2]: 項目別　連番生産
□投稿者/ たいむ -(2024/10/19(Sat) 00:44:52)
    お世話になっております。
    少々構成が変わったように思われますが、よろしく願いします。
    【顧客予約表】
    [申込年]　[申込月]　[申込日]　[氏名]　[生年月日]　[住所]　[その他情報]・・・
    顧客予約表から以下の条件で「顧客実績表」に書き出し
    　[申込年]・[申込月]・[申込日]
    ↓
    【顧客実績表】
    1　[1氏名]　[住所]･･･[Ａ作業]　[Ａ評価]　[Ａ証明番号]　[Ｂ作業]　[Ｂ評価]　[Ｂ証明番号]
    先頭の[Ａ証明番号]に初期値（2001）を手入力
    　　　　　　　　　2以下の[Ａ証明番号]以降が「2002」、「2003」と番号が自動生成される。
    　　　　　　　　　先頭の[Ｂ証明番号]に初期値（0001）を手入力
    　　　　　　　　　2以下の　[Ｂ証明番号]以降が「0002、「0003」と番号が自動生成される。
    2　[2氏名]　[住所]　[Ａ作業]　[Ａ評価]　[Ａ証明番号]　[Ｂ作業]　[Ｂ評価]　[Ｂ証明番号]
    3　[3氏名]　[住所]　[Ａ作業]　[Ａ評価]　[Ａ証明番号]　[Ｂ作業]　[Ｂ評価]　[Ｂ証明]
    ・
    ・
    10 [10氏名]　[住所]　[Ａ作業]　[Ａ評価]　[Ａ証明番号]　[Ｂ作業]　[Ｂ評価]　[Ｂ証明]

引用返信 [メール受信/OFF]
■14633 / ResNo.7) 　Re[3]: 項目別　連番生産
□投稿者/ ONnoji -(2024/10/19(Sat) 11:39:49)
    > 先頭の[Ａ証明番号]に初期値（2001）を手入力
    > 2以下の[Ａ証明番号]以降が「2002」、「2003」と番号が自動生成される。

    表(.tbx)の編集作業だけで行うのならば、

    先頭行の任意項目に初期値（2001）を手入力 → すでに存在する２行め以降のレコードに連番が附番される

    ↑このようなことは出来ませんよ。

    なぜならば、手入力可能な項目は、計算項目にはならないからです。
    　　　　　　・・・・・・・・・・・・・・・・・・・・

    また、計算出来る項目（計算項目）は、手入力が不可能だからです。
    　　　・・・・・・・・・・・・・・・・・・・・・・

    従って、手入力→自動附番というのは、表のままではどう頑張っても出来ないですよ。

    というわけで、

    全行（レコード）に連番を振りたいのであれば、［置換］操作で行うのが一般的なアプローチですよ。

    置換の計算式は、

    　"2" + #文字列( #連番, 3 ) → "2001" ～ "2999"

    　#文字列( #連番, 4 )　　　 → "0001" ～ "9999"

    です。
引用返信 [メール受信/OFF]
■14634 / ResNo.8) 　Re[4]: 項目別　連番生産
□投稿者/ たいむ -(2024/10/19(Sat) 16:30:49)
    皆様　ありがとうございます。
    何をしているのか、自分は。計算式の入った項目には､､､､でした（忘れ）（恥）
    やはりこの項目構成では「採番」は無理でした。
    再度、表作り直しをしたいと思います。
    お世話になりました。
    あらためまして、お時間いただき
    ありがとうございました。
    たいむ

引用返信 [メール受信/OFF]
■14635 / ResNo.9) 　Re[5]: 項目別　連番生産
□投稿者/ ONnoji -(2024/10/19(Sat) 17:56:39)
    2024/10/19(Sat) 18:42:53 編集(投稿者)

    > 何をしているのか、自分は。計算式の入った項目には､､､､でした（忘れ）（恥）
    > やはりこの項目構成では「採番」は無理でした。
    > 再度、表作り直しをしたいと思います。

    提示された表(.tbx)の定義内容でも、自動採番は可能ですよ。

    ただし、そのためには

    ・［フォーム＋イベント処理］によるアプリケーション
    　　　　　　　　　　　　　　　　　・・・・・・・・
    ・一括処理によるアプリケーション
    　　　　　　　　・・・・・・・・

    のどちらかのアプローチが必要です。

    私( ONnoji )は、Ｗｉｎ桐では［フォーム＋イベント処理］によるアプリケーションをお勧めしますけれど・・・(^^ok

引用返信 [メール受信/OFF]
■記事リスト / レス記事表示 → [親記事-9]


■記事リスト / ▲上のスレッド
■14610 / 親記事) 　イベントでフォームをまとめて開く
□投稿者/ 桐太郎 -(2024/10/11(Fri) 12:09:53)
    WIN11、桐10S使用です。

    イベントでフォームを普通に開く方法がわからない。
    普通というのが、書いてて初心者丸出し感でてしまっているなと
    自分で思いました笑

    モーダルフォームにしたりとかではなく、コマンドボタンを押したら
    複数のフォームを開きたいです。

    コマンドボタンの
    機能名　機能パラメータリスト
    開く　　フォーム名
    をイベントで指示したいという意味あいです。
    コマンドボタンだと4行分、4フォームまでしか開けませんが、
    もっとたくさんまとめて開きたいのですが、
    いい方法がありましたら教えてください。


    P.S.
    以前表番号の３２のエラーの件で質問させていただきました。
    ONnojiさんからＫ３に報告していただき、桐Sは修正された
    とのことでご対応いただきありがとうございました。


引用返信 [メール受信/OFF]
▽[全レス8件(ResNo.4-8 表示)]
■14614 / ResNo.4) 　Re[2]: イベントでフォームをまとめて開く
□投稿者/ ONnoji -(2024/10/11(Fri) 17:15:15)
    2024/10/12(Sat) 01:36:59 編集(投稿者)

    > 私はもっぱらコマンドボタンでフォーム開きますけど、
    > 「ウィンドウ作成」コマンドじゃできないですか？

    もちろん、［ウィンドウ作成］コマンドでもフォームは開けますよ。

    　　（例）ウィンドウ作成　&targetWfmName, ハンドル = &hdl, 編集表 = 開く

    ちなみに、私( ONnoj )の場合には、

    桐の［以前開いたファイル］のリストにファイル名を保存して欲しくない場合に限って、
    　　・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・
    ［ウィンドウ作成］コマンドでフォームを開いていますよ。

    コマンドボタンの［機能名：開く］と、［ウィンドウ作成］コマンドのどちらを使うかは個人個人の好みが絡んできますが・・・

    私( ONnoj )の場合には、コマンドボタンの［機能名：開く］の方を使います。

    理由は、フォームをローンチしている時に何かしらのエラーが発生した場合に、

    コマンドボタンの［機能名：開く］の方が後処理が簡単だからですよ。


引用返信 [メール受信/OFF]
■14615 / ResNo.5) 　Re[3]: イベントでフォームをまとめて開く
□投稿者/ ONnoji -(2024/10/11(Fri) 17:35:23)
    2024/10/12(Sat) 01:29:40 編集(投稿者)

    > コマンドボタンの機能名　開く　フォーム名に
    > 該当する一括処理コマンドやメソッドがないということが
    > わかってよかったです。
    > コマンドボタンで簡単にできる機能だから
    > きっとあるはずと思い、けっこうな時間ヘルプを見ていたので。

    イベント処理でも、［ウィンドウ作成］コマンドでフォームを開けますよ。

    　　（例）ウィンドウ作成　&targetWfmName, ハンドル = &hdl, 編集表 = 開く

    でも、一括処理の臭いがプンプン漂って、古臭い感じがします。※これは個人の感想です(^^ゞ

    なので、コマンドボタンの［機能名：開く］を使うのがコンテンポラリーな感じがします。※これも個人の感想です(^^ゞ
    　　　　　　　　　　　　　　　　　　　　　　　　　・・・・・・・・・・・

    また、フォームをローンチしている時に何かしらのエラーが発生した場合に、
    　　　・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・

    コマンドボタンの［機能名：開く］の方が後処理が簡単なことがメリットになります。(^^ok
    ・・・・・・・・・・・・・・・・・・・・・・・・・

    さらに、桐の［以前開いたファイル］のリストにファイル名を保存してくれますから便利です。

    > メソッド呼び出し　実行でコマンドボタンを押すのは
    > 理解でき、実際試してみてできました。

    基本はこれだと思いますよ。v(^^)v

    > プログラミングだけでフォームを開く方法は
    > 難しいそうですが、週末試してみます。

    拙作のランチャーは、ワークスペースに配置したコマンドボタンの属性を書き換えて実行しているのでした。

    つまり、［機能名］を "開く" にして、［機能パラメータリスト］にファイル名をセットして、メソッドで実行です。(^^♪

    コマンドボタンの属性を変更して、動的に運用しているということです。
    ・・・・・・・・・・・・・・・・・・・・・・・・・

    ただ、ランチャーというのは、コマンドボタンの［機能名：開く］を使う事のほかに、

    すでに、［フォームのウィンドウ］が開いていないか？、ディスクにファイルが存在しているのかといったチェックが必須になるのです。

    そして、このチェックが非常に面倒なんですよ。(>_<)

    こちら
    　↓
    ７．４　ランチャー｜桐の釣魚大全のトップ > フォームアプリケーション教書　第１部
    http://silicon7565.html.xdomain.jp/guide/guide_Part1.htm#section7-4

    　■ランチャーに関する雑談 ― ブログ版　桐のイベント道場　2007/3/17 INF_Toolsの話　第２９話より
    　※執筆当時の INF_Tools は INF_Framework に置き換えました。

    　　ランチャーというのは案外と面倒なものです。
    　INF_Framework のランチャーは次の順で動作します。

    　　まず、すでにそのファイルのウィンドウが在るか否か調べて
    　　　↓
    　　次に、ウィンドウでなく編集表と開いている表が在るか否か調べて、
    　　　↓
    　　次に、ディスクに目標のファイルが存在するか否か調べて、
    　　　↓
    　　最後に、本当にフォームや表を開きます。

    　　なお、すでにファイルのウィンドウがある場合は、そのウィンドウへフォーカスし、
    　　すでにウィンドウでなく編集表として開いている表がある場合は、メッセージボックスで通知します。

    　　また、すでに開いたウィンドウのハンドルを覚えている方式は具合悪いので、ランチャーは以上の作業をその都度行います。
    　つまり、常に最新のウィンドウハンドルを精査することがランチャーの重要な点です。
    　いうなれば、常にリアルタイムな情報を収集することがランチャーの基本設計になります。

    　　ランチャーの機能は、ミサイルに例えるのが適当です。ミサイルには、無誘導式・誘導式・打ちっ放し式があります。
    　　○無誘導式　　 ― コマンドボタンの［機能名：開く］です。
    　　○誘導式　　　 ― すでに開いたウィンドウのハンドルを覚えている方式ですが、ハンドル情報が実際と食い違うトラブルが発生します。
    　　○打ちっ放し式 ― INF_Framework が採用しているリアルタイムな情報を収集する方式です。

    　　実際の打ちっ放し式のミサイルには、シーカー（探知機）があります。
    　これは、ランチャー機能の
    　　まず、すでにそのファイルのウィンドウが在るか否か調べて
    　　　↓
    　　次に、ウィンドウでなく編集表と開いている表が在るか否か調べて、
    　に相当します。
    　　つまり、目標のウィンドウや、編集表が在るか否か調べる機能です。
    　そして、もしも、目標のウィンドウや、編集表が無ければ、ディスクに目標のファイルが存在するか調査して、ランチャーはフォームや表を本当に開くというわけです。

引用返信 [メール受信/OFF]
■14616 / ResNo.6) 　Re[1]: イベントでフォームをまとめて開く
□投稿者/ 尾形 -(2024/10/11(Fri) 18:06:28)
    どうも、こんにちは

    > イベントでフォームを普通に開く方法がわからない。

    普通に、「ウインドウ作成」コマンドでいいかと思いますが
    4窓も開く処理ってどんな処理ですか

引用返信 [メール受信/OFF]
■14626 / ResNo.7) 　Re[2]: イベントでフォームをまとめて開く
□投稿者/ 桐太郎 -(2024/10/16(Wed) 09:13:31)
    ■No14616に返信(尾形さんの記事)

    > 普通に、「ウインドウ作成」コマンドでいいかと思いますが
    > 4窓も開く処理ってどんな処理ですか
    >

    ウインドウ作成でやりたいことできました。
    ありがとうございます。

    4窓開きたい処理ですが以下のとおりです。

    各銀行のインターネットバンキングからCSVをダウンロードして、
    各銀行のテーブルに転記。
    各銀行の入金データを以下にすべて転記。
    入金.tbx（.wfx）

    業種ごとに売掛金のファイルを分けています。
    A業種売掛金.tbx（.wfx）
    B業種売掛金.tbx（.wfx）
    C業種売掛金.tbx（.wfx）
    D業種売掛金.tbx（.wfx）
    E業種売掛金.tbx（.wfx）

    その際、上記の6個のフォームをまとめて開きたいという用途でした。

    ここから手作業になる作業になるんですが、
    A業種とB業種の売掛金がまとめて入金されたり、
    振込手数料差し引かれたり、
    代理店手数料差し引かれたりと様々なので、
    入金.wfxの内容を目視で確認しながら
    業種売掛金.wfxのファイルに
    入力作業（売掛金の消し込み作業）をしています。

    業種ごとに分けている業種売掛金.tbx（.wfx）を
    業種という項目名をもうけて１つの.tbx（.wfx）にまとめる検討をしたのですが、
    商品のような単純なものではなく、各業種ごと特有の項目名もあり、
    業種ごとの.tbx（.wfx）で管理しています。
解決済み!
引用返信 [メール受信/OFF]
■14627 / ResNo.8) 　Re[4]: イベントでフォームをまとめて開く
□投稿者/ 桐太郎 -(2024/10/16(Wed) 09:17:50)

    > 　　ランチャーの機能は、ミサイルに例えるのが適当です。ミサイルには、無誘導式・誘導式・打ちっ放し式があります。

    ミサイルの説明で、それぞれの違いがなんとなくわかった気がします。
    たぶん半分も理解できていませんが、概略は理解したつもりです。
    ありがとうございました。

解決済み!
引用返信 [メール受信/OFF]
■記事リスト / レス記事表示 → [親記事-8]


1542151

Mode/　 Pass/

HOME HELP 新規作成 新着記事 ツリー表示 スレッド表示 トピック表示 ファイル一覧 検索 過去ログ

- Child Tree -
- Antispam Version -