データベースと対話する perltk gui を作成しています。myo_maps_study
myo_maps_study が存在する場合、フィールドが正規表現 MYO[0-9]*\$ と一致する必要があるというクエリの特定の条件が必要です。一部の行では存在しない場合があります。myo_maps_study が存在しない場合でも、結果を取得したいと思います
これは、MYO[0-9]*\$ 正規表現のみをチェックする現在のクエリです。
my $query = "
SELECT wtg_uid, pat_first_name, pat_last_name, pat_chi_no,
wtg_scantype, wtg_confirmed,
std_in_out_patient,
inc_uid, wtg_appeared,
myo_maps_study, myx_event,
inc_incident_required, inc_incident_done,
inc_gp_letter_required, inc_gp_letter_done,
inc_reappt_required, inc_reappt_done,
inc_comment
FROM ((waiting INNER JOIN patients ON (wtg_pat_uid = pat_uid))
LEFT OUTER JOIN studies ON (wtg_uid = std_wtg_uid)
LEFT OUTER JOIN myx ON (std_uid = myx_std_uid)
LEFT OUTER JOIN myo on (std_uid = myo_std_uid))
LEFT OUTER JOIN incidents ON (wtg_uid = inc_wtg_uid)
WHERE wtg_scan_date = '$date' AND myo_maps_study ~ 'MYO[0-9]*\$'
ORDER BY pat_last_name;";
戻り値
17291 | AR | MAX | 1609 | E-R AND RNVG | | O | | Y | MYO130430 |
| | | | | | |
17201 | ANN | MCK | 3011 | E-R AND RNVG | | O | | Y | MYO134416 |
| | | | | | |
myo_maps_study 条件を削除すると
SELECT wtg_uid, pat_first_name, pat_last_name, pat_chi_no,wtg_scantype, wtg_confirmed, std_in_out_patient, inc_uid, wtg_appeared, myo_maps_study, myx_event,inc_incident_required, inc_incident_done,inc_gp_letter_required, inc_gp_letter_done,inc_reappt_required, inc_reappt_done,inc_comment FROM ((waiting INNER JOIN patients ON (wtg_pat_uid = pat_uid)) LEFT OUTER JOIN studies ON (wtg_uid = std_wtg_uid) LEFT OUTER JOIN myx ON (std_uid = myx_std_uid) LEFT OUTER JOIN myo on (std_uid = myo_std_uid)) LEFT OUTER JOIN incidents ON (wtg_uid = inc_wtg_uid) WHERE wtg_scan_date = '19/08/13' ORDER BY pat_last_name;
私は得る
17264 | KIS | ASH | 150 | E-R AND RNVG | | | | Y | |
| | | | | | |
17262 | WIL | BE | 1301 | E-R AND RNVG | | | | | |
| | | | | | |
17268 | ELI | HAR | 2105 | E-R AND RNVG | | | | | |
| | | | | | |
17291 | AR | MAX | 1609 | E-R AND RNVG | | O | | Y | MYO130430T |
| | | | | | |
17291 | AR | MAX | 1609 | E-R AND RNVG | | O | | Y | MYO130430 |
| | | | | | |
17201 | ANN | MCK | 3011 | E-R AND RNVG | | O | | Y | MYO134416T |
| | | | | | |
17201 | ANN | MCK | 3011 | E-R AND RNVG | | O | | Y | MYO134416 |
| | | | | | |
17351 | SHI | MUL | 2907 | R-R ONLY | | | | | |
| | | |
2 番目のクエリでは、AR MAX と ANN MCK が 2 回表示されていることに注意してください。私の望む出力はその中間です。各クエリで各人が 1 回だけ表示されるようにします。つまり、myo_maps_study が存在する場合、それはフォーマットを持つものでなければなりませんMYO[0-9]*\$
。行を空欄myo_maps_study
で出力したい
これどうやってするの?