初心者のFileMaker pro Q&A (旧掲示板)

初心者0070

Guest

重複を調べる（空白を除外する）方法

よろしくお願いいたします。

ファイルメーカーの１８を使っています。

さっそく
人物を入力するフィールドが４つあります。

フィールド１：太郎
フィールド２：太郎
フィールド３：一郎
フィールド４：三郎

となった時 重複を教えてくれるようにカスタムダイアログを出したいです。

作ったやつが
Case (
フィールド１ = フィールド２ ;
"重複しています。" ;
フィールド１ = フィールド３ ;
"重複しています。" ;
フィールド１ = フィールド４ ;
"重複しています。" ;
フィールド２ = フィールド３ ;
"重複しています。" ;
フィールド２ = フィールド４ ;
"重複しています。" ;
フィールド３ = フィールド４ ;
"重複しています。" ;
"重複なし"
)

と書きました。４人全てにデータが入っていると成功するのですが、

フィールド１：太郎
フィールド２：一郎
フィールド３：
フィールド４：

と空白が入っていても重複と捉えられてしまいます。

うまく空白を回避して重複していることを通知したいです。

加えて、スマートじゃないので、もう少し関数がスマートになら無いかと思っています。

どうぞよろしくお願いいたします。

チポ

Member

Re: 重複を調べる（空白を除外する）方法

方法はいろいろ考えられますが、

計算だけで・・
Let ( [ $f1 = Case ( IsEmpty ( フィールド1 ) ; "1" ; フィールド1 ) ;
          $f2 = Case ( IsEmpty ( フィールド2 ) ; "2" ; フィールド2 ) ;
          $f3 = Case ( IsEmpty ( フィールド3 ) ; "3" ; フィールド3 ) ;
          $f4 = Case ( IsEmpty ( フィールド4 ) ; "4" ; フィールド4 ) ] ;
          Case ( ( $f1 = $f2 ) + ( $f1 = $f3 ) + ( $f1 = $f4 ) + ( $f2 = $f3 ) + ( $f2 = $f4 ) + ( $f3 = $f4 ) ; "重複" ; "OK" ) )

1,2,3,4はフィールド値に使われない固有値なら何でも可です。

あまりスマートとは言えないかな、、

入力してから重複を見るより、重複の入力ができない様にしたほうがいいのでは。

xyz

Member

Re: 重複を調べる（空白を除外する）方法

チポ様
ありがとうございます。Letをつかえばいいとは思ったのですが、いまいち使い方がわからず躊躇していました。

恥ずかしながら重複を許可しないようするにはどうしたら良いのでしょうか？
現在、人物名を値一覧に書いており、ドロップダウンリストで選択するようにしております。

ご教示いただければ幸いです。

qb_dp

Member

Re: 重複を調べる（空白を除外する）方法

こんな感じとか。

Let([
¢LIST=List ( f1;f2;f3;f4 )
;¢UniqueValues=UniqueValues (¢LIST)
];
ValueCount ( ¢LIST ) ≠ ValueCount ( ¢UniqueValues )
)

※1レコードに人物フィールドが4っつと言うのがちょっと気になりますが.....

xyz

Member

Re: 重複を調べる（空白を除外する）方法

qb_dp様

ありがとうございます。
１レコードに人物フィールドが４つというのは、レコードごとに業務が違っていて各業務ごとの担当職員の仕事量を出したくてレコードを分けています。
スマートにやる方法がわからずレコードばかり増えています。ちなみに実際は６フィールドあります。。。

お恥ずかしい限りです。

xyz

Member

Re: 重複を調べる（空白を除外する）方法

途中からアカウント名がxyzになってしまっていますが、ログインしないで投稿してしまったためです。
投稿者と同一人物です。

qb_dp

Member

Re: 重複を調べる（空白を除外する）方法

「各業務ごとの担当職員の仕事量を出す」
ざっと考えた場合、
フィールドは、以下のような感じが良いような.....

業務種別｜担当者｜工数

xyz

Member

Re: 重複を調べる（空白を除外する）方法

qb_dp様
たしかにですね。。。もう少しシステムを考えてみます。
なかなかスマートに作ることができず、苦労しています。

上記の関数はスッキリして見やすいですね。参考にさせていただきます。

チポ様qb_dp様
早い回答誠にありがとうございます。