1

このコードを tcl で書かなければならず、tcl を使うのはこれが初めてなので、本当にイライラしています。次のようなものを表示する必要があります。ここに画像の説明を入力

私は tcl/informix を使用しており、上記を達成する方法として少し苦労しています。ここに私が書いた疑似コードがあります

    select event_date,attempts_cnt,success_cnt,fail_cnt from cc_web_ppv_counts WHERE 
        event_id='123' 
    {
        get $sd_attempt_cnt
        get $sd_success_cnt
        get $sd_fail_cnt
            get event_date




        select event_date,attempts_cnt,success_cnt,fail_cnt from cc_web_ppv_counts WHERE 
            event_id='125' 
        {
            get $hd_attempt_cnt
            get $hd_success_cnt
            get $hd_fail_cnt

            $total_attempts=$sd_attempt_cnt + $hd_attempt_cnt;
            $total_success=$sd_success_cnt + $hd_success_cnt;
            $total_fail=$total_attempts -$total_success;
            $success_rate=($total_success/$total_attempts)*100;
            $hd_success_rate=($hd_success_cnt/total_success)*100;
            $sd_success_rate=($sd_success_cnt/total_success)*100;
        }
    }

注 各 event_date (たとえば今日) には、それぞれ sd と hd の 2 つのレコードしかありません。そのため、日付は出力に動的に表示する必要があります。

上記のようにデータを取得して表示する tcl の例をいくつか指摘していただければ幸いです。

4

1 に答える 1

1

おそらく、適切な ODBC ドライバーを備えたtclodbcが道のりです。

質問の 2 番目の部分については、答えは「表示」をどのように定義するかによって大きく異なります。

于 2012-04-12T23:10:02.220 に答える