100 likes | 275 Views
病名検索システム. 目的. 不要病名のリストアップ、削除のため 間違った病名の訂正. 間違った病名の訂正. メニエール病 メニエル病、メニエール症候群、メニエル氏病 当科では脳硬塞を初回登録したので数 10 人、間違って入力されていました。. 不要な病名の削除. 治癒した時点で病名を終了することは大事です。 ただ外来で、なかなかこれは困難です。 「異常がなければ来なくていいですよ」 といってもまた来てしまう 無断で病院を代わってしまう 治った喜びで表紙に書き忘れる. 削除すべき病名について. 事故の病名は残す 頸椎挫傷など 長期化することが多いです。
E N D
目的 • 不要病名のリストアップ、削除のため • 間違った病名の訂正
間違った病名の訂正 • メニエール病 • メニエル病、メニエール症候群、メニエル氏病 • 当科では脳硬塞を初回登録したので数10人、間違って入力されていました。
不要な病名の削除 • 治癒した時点で病名を終了することは大事です。 • ただ外来で、なかなかこれは困難です。 • 「異常がなければ来なくていいですよ」 • といってもまた来てしまう • 無断で病院を代わってしまう • 治った喜びで表紙に書き忘れる
削除すべき病名について • 事故の病名は残す • 頸椎挫傷など • 長期化することが多いです。 • 急性期の炎症 • 蜂窩織炎、上気道炎、気管支炎 • 外傷 • 挫傷、切創、挫創、骨折 • はせいぜい2ヶ月で終了 • 疑い病名はその月でほぼ終了
SELECT "tbl_ptbyomei"."byomei", "tbl_ptbyomei"."ptid", "tbl_ptbyomei"."utagaiflg", "tbl_ptbyomei"."sryymd", "tbl_ptbyomei"."tenkikbn", "tbl_ptbyomei"."nyugaikbn", "tbl_ptbyomei"."hkncombi", "tbl_ptbyomei"."hknnum", "tbl_ptbyomei"."manseikbn", "tbl_ptbyomei"."tenkiymd", "tbl_ptnum"."ptnum", "tbl_ptinf"."birthday", "tbl_ptinf"."name" FROM "tbl_ptbyomei","tbl_ptnum","tbl_ptinf" WHERE "tbl_ptbyomei"."utagaiflg"='1' and "tbl_ptbyomei"."hkncombi"='0' and "tbl_ptnum"."ptid" = "tbl_ptbyomei"."ptid" and "tbl_ptinf"."ptid" = "tbl_ptbyomei"."ptid" and "tbl_ptbyomei"."tenkikbn" <1 疑いフラグがついている 事故、労災ではない(保険組合せが0) 転帰が継続である ものを検索するqueryです。 疑い病名を検索する
SELECT "tbl_ptbyomei"."byomei", "tbl_ptbyomei"."ptid", "tbl_ptbyomei"."utagaiflg", "tbl_ptbyomei"."sryymd", "tbl_ptbyomei"."tenkikbn", "tbl_ptbyomei"."nyugaikbn", "tbl_ptbyomei"."hkncombi", "tbl_ptbyomei"."hknnum", "tbl_ptbyomei"."manseikbn", "tbl_ptbyomei"."tenkiymd", "tbl_ptnum"."ptnum", "tbl_ptinf"."birthday", "tbl_ptinf"."name" FROM "tbl_ptbyomei","tbl_ptnum","tbl_ptinf" WHERE "tbl_ptbyomei"."hkncombi"='0' and "tbl_ptnum"."ptid" = "tbl_ptbyomei"."ptid" and "tbl_ptinf"."ptid" = "tbl_ptbyomei"."ptid" and "tbl_ptbyomei"."tenkikbn" <1 and ("tbl_ptbyomei"."byomei" LIKE '%挫傷%' or "tbl_ptbyomei"."byomei" LIKE '%挫創%' or "tbl_ptbyomei"."byomei" LIKE '%切創%' )and "tbl_ptbyomei"."sryymd" 外傷らしき病名(複数可能、orをかっこでくくって連結しました)を曖昧検索。 転帰は継続(転帰区分0)、 労災や、事故ではない(保険組合せ0) 病名の開始日を ファイルメーカーで計算し(次のスライド)、 左のクエリの最後につけます。 外傷query
挫傷query & "< '" & Year(Today-60) & Right("00"&Month(Today-60),2) & Right("00"&Day(Today-60),2) & "'" 現在より2ヶ月程度前のものまでは残し、それ以前の開始日のものは削除すべきと判断します。 2ヶ月前の開始日を計算する式です(ファイルメーカーのスクリプト) ファイルメーカーで計算
FROM "tbl_ptbyomei","tbl_ptnum","tbl_ptinf" WHERE "tbl_ptnum"."ptid" = "tbl_ptbyomei"."ptid" and "tbl_ptinf"."ptid" = "tbl_ptbyomei"."ptid" and "tbl_ptbyomei"."tenkikbn" <1 and "tbl_ptbyomei"."byomei" LIKE & "'" & 接頭語 & 病名 & 接尾語 & "'" 病名検索します。 selectからfrom直前までは同じなので省略 病名の前後に接頭語、接尾語のフィールドを選択して入れます(%)。 病名検索
ファイルメーカースクリプト • 以上、疑い、外傷、病名検索の3つのqueryは後半のfromの違いなので、その用途にしたがってグローバルフィールドの入れておき、必要なものqueryをスクリプトでquery全文に貼り付けて作成。 • Import順は設定するのに面倒くさいので全部共通にします。