| 1 | <?php |
|---|
| 2 | /* |
|---|
| 3 | * Copyright(c) 2000-2006 LOCKON CO.,LTD. All Rights Reserved. |
|---|
| 4 | * |
|---|
| 5 | * http://www.lockon.co.jp/ |
|---|
| 6 | */ |
|---|
| 7 | require_once(DATA_PATH . "include/csv_output.inc"); |
|---|
| 8 | /*------ /admin/contents/inpuiry.php ¤«¤é¤â¸Æ¤Ó½Ð¤·¤Þ¤¹¡£(11/18 fukuda) ---*/ |
|---|
| 9 | |
|---|
| 10 | // CSV½ÐÎϥǡ¼¥¿¤òºîÀ®¤¹¤ë¡£ |
|---|
| 11 | function lfGetCSV($from, $where, $option, $arrval, $arrCsvOutputCols = "") { |
|---|
| 12 | global $arrCVSCOL; |
|---|
| 13 | |
|---|
| 14 | //$cols = sfGetCommaList($arrCVSCOL); |
|---|
| 15 | $cols = sfGetCommaList($arrCsvOutputCols); |
|---|
| 16 | |
|---|
| 17 | $objQuery = new SC_Query(); |
|---|
| 18 | $objQuery->setoption($option); |
|---|
| 19 | |
|---|
| 20 | $list_data = $objQuery->select($cols, $from, $where, $arrval); |
|---|
| 21 | |
|---|
| 22 | $max = count($list_data); |
|---|
| 23 | for($i = 0; $i < $max; $i++) { |
|---|
| 24 | // ³Æ¹àÌܤòCSV½ÐÎÏÍѤËÊÑ´¹¤¹¤ë¡£ |
|---|
| 25 | $data .= lfMakeCSV($list_data[$i]); |
|---|
| 26 | } |
|---|
| 27 | return $data; |
|---|
| 28 | } |
|---|
| 29 | |
|---|
| 30 | // ³Æ¹àÌܤòCSV½ÐÎÏÍѤËÊÑ´¹¤¹¤ë¡£ |
|---|
| 31 | function lfMakeCSV($list) { |
|---|
| 32 | global $arrPref; |
|---|
| 33 | global $arrJob; |
|---|
| 34 | global $arrORDERSTATUS; |
|---|
| 35 | |
|---|
| 36 | $line = ""; |
|---|
| 37 | |
|---|
| 38 | foreach($list as $key => $val) { |
|---|
| 39 | $tmp = ""; |
|---|
| 40 | switch($key) { |
|---|
| 41 | case 'order_pref': |
|---|
| 42 | $tmp = $arrPref[$val]; |
|---|
| 43 | break; |
|---|
| 44 | case 'order_job': |
|---|
| 45 | $tmp = $arrJob[$val]; |
|---|
| 46 | break; |
|---|
| 47 | case 'status': |
|---|
| 48 | $tmp = $arrORDERSTATUS[$val]; |
|---|
| 49 | break; |
|---|
| 50 | default: |
|---|
| 51 | $tmp = $val; |
|---|
| 52 | break; |
|---|
| 53 | } |
|---|
| 54 | |
|---|
| 55 | $tmp = ereg_replace("[\",]", " ", $tmp); |
|---|
| 56 | $line .= "\"".$tmp."\","; |
|---|
| 57 | } |
|---|
| 58 | // ʸËö¤Î","¤òÊÑ´¹ |
|---|
| 59 | $line = ereg_replace(",$", "\n", $line); |
|---|
| 60 | return $line; |
|---|
| 61 | } |
|---|
| 62 | |
|---|
| 63 | ?> |
|---|