//=========================================================================================== // gruptype_func.js //------------------------------------------------------------------------------------------- // description : 存放 ASP 的 javascript functions // used in : A ( word ) // B ( order ) // C ( mgroup , group ) // D ( gcntl ) // H ( user ) // begin : January 5, 2003 // copyright : (C) 2003 COWELL // author : locust@cowell.com.tw // 2003/04/14 : 修改 SELCITYINOUT_onclick 將進出點城市名稱改為帶入進出點城市代號 By 阿光 // 2003/04/15 : 新增 sel_itnlist_search() 在新增共用行程時加入搜尋關鍵字功能 By 阿光 // 新增自費項目勾選檢查Function (chkGrupBuyFG()) By 阿光 // 修改sel_local() -->修正編輯Local時如代理公司沒有聯絡人資料就無法儲存Local的問題 // 2003/04/23 : [Locust]修改sel_src() -->處理價格等級amrnk // 2003/04/24 : [Locust]修改cls_fields() -->增加取消 checkbox 選取 // 2003/04/25 : [Locust]修改sel_acct_no2() -->新增 acct_dr_tel 傳回 // 2003/04/28 : [阿光]修改sel_itnhotel() -->以關鍵字搜尋 // 2003/04/28 : [Locust]修改sel_src() -->修改 form name and 員工搜尋方式 // 2003/04/29 : [阿 光]新增sel_city_search() -->以關鍵字搜尋城市 // 2003/04/29 : [阿 光]修改sel_itnhotel() -->搜尋飯店時如果未輸入搜尋條件則不顯示飯店資料 // 2003/04/29 : [阿 光]修改sel_itnhotel() -->移除搜尋飯店時必須要先輸入城市的限制 // 2003/05/02 : [阿 光]新增convTime(欲分割的值) -->將帶入值分割為xx:xx的格式。 // 2003/05/06 : [阿 光]修改sel_itnhotel() -->搜尋飯店時如無城市，則以該團旅遊國家為範圍 // 2003/05/07 : [阿 光]新增sel_acct_nop(編號表單欄位, 名稱表單欄位) -->搜尋機票進票作業裡的應付帳號輔助選單 // 2003/05/13 : [阿 光]新增sel_acct_nor(編號表單欄位, 名稱表單欄位) -->搜尋機票進票作業裡的應收帳號輔助選單 // 2003/05/15 : [阿 光]新增sel_grup(編號表單欄位, 名稱表單欄位) -->搜尋團體 // 2003/05/19 : [阿 光]修改sel_local() --> 可依關鍵字搜尋LOCAL // 2003/05/23 : [阿 光]修改sel_acct_no2() -->新增 部門(P)搜尋 // 2003-05-30 : [Locust]修改sel_order_visa(), sel_order_msln(), sel_order_mchg() // --> 新增參數 modify, 若 modify='' 則回填金額 // 2003-06-07 : 新增帳款科目搜尋 // 2003-06-16 : 新增文字編輯器Function (sel_htmlEditor(), previewHTML()) By 阿光 // 2003-06-26 : [Locust]新增 sel_order_car(), sel_order_cruise(), sel_cartp(), sel_croomtp() // 2003-07-03 : [阿光]新增 sel_airp_search() (機場搜尋功能)sel_zone_city()(票價區域搜尋功能) // 2003-07-07 : [Locust]新增 sel_mgrup() 搜尋團型清單 // 2003-07-15 : [locust]新增 reins_itn() 回建共用行程 // 2003-07-16 : [locust]新增 chkFG2() 取消交易確認 // 2003-07-25 : [locust]新增 show_reclog() 顯示訂單紀錄 // 2003-08-27 : [阿光]修改 sel_zone_city() 取消zone的選取 // 2003-09-09 : [阿光]新增getCD_NM() 可代入CD取得名稱 // 2003-09-22 : [阿光]新增upd_trans_cnfm_aram() 交易確認後修改應收額 // 2003-09-25 : [Locust]新增sel_dord_tp() 新增交易明細流程變更 // 2003-10-03 : [阿光]修改upd_trans_cnfm_aram() 交易確認後修改應收額函數新增機票處理 // 2003/10/06 : [阿光]修改sel_acct_no2，新增sel_acct_clsV2可直接在選擇客戶類別上輸入關鍵字 // 2003/10/06 : [阿光]修改sel_userpax，可搜尋英文姓名與身份證字號 // 2003/10/08 : [阿光]新增get_nm，可取得CODE對應的中英文名稱 // 2003/10/08 : [阿光]新增get_acct_nm1，可取得ACCT_NO對應的中文名稱 // 2003/10/09 : [阿光]修改sel_acct_no2，直接跳至sel_acct_noV2的Function // 2003/11/10 : [阿光]修改sel_acct_no2，新增直客EMP_CD的搜尋條件 // 2003-11-30 : [Locust]新增 jsIsDate() 檢查日期格式 js version ( chkform.js ) // 2003-11-30 : [Locust]新增 sel_longdate() 傳回完整的日期 // 2003-12-09 : [阿光]新增 sel_zone_search() ZONE選取 // 2003-12-28 : [Locust]新增 Calc_PGQT() 合併計算自由行機位 // 2003-12-29 : [Locust]修改 自由行飯店選取 sel_pshotel() , 可單選, 新增 HTL_CL, HTL_CL_NM // 2003-12-30 : [Locust]新增 sel_htl_areatp() 選擇飯店分區 // 2004-01-04 : [Locust]新增 get_pack_am() 處理自由行價格 // 2004-01-04 : [Locust]修改 chgOrderPrice() 增加判斷自由行訂單處理: 使用 get_pack_am // 2004-02-02 : [Locust]處理單一欄位輸入日期 // 2004-02-18 : [Locust]新增 ChkStrLength(formitem, maxLen, alertword) : 檢查欄位的長度(中文*2 , 英文*1) // 2004-02-20 : [Locust]新增 get_msln_nm(cd, nm) : 取出其他商品對應的Cd,nm // 2004-03-05 : [阿 光]新增 reset_grup_seatCnt(grup_cd, reset_fg)重算機位 // 2004-03-05 : [Locust]修改 sel_order_visa(grup_cd, amrnk, modify)新增價格等級參數 // 2004-03-15 : [阿 光]新增get_pax_dtl(pax_cd, id_no)取得旅客相關資料並傳回陣列(資料欄位名稱即為陣列名稱) // 2004-03-24 : [Locust]新增get_acct_stus()往來狀態判斷 // 2004-03-25 : [阿 光]修改reset_grup_seatCnt(grup_cd, reset_fg)重算機位/新增自動遞補機制 // 2004-03-30 : [Ｂrian]新增sel_dord_tpd()訂金單列表專用函數 // 2004-04-20 : [阿 光]新增add_iFrm(url, w, h)動態產生iFrame的函數 // 2004-04-20 : [阿 光]新增sel_tarea_cd，可搜尋路線 // 2004-04-20 : [阿 光]新增split_date，可分割日期格式 // 2004-04-26 : [阿 光]新增open_tkt_desc(tsubd_sq, sel_cty_cd1, sel_cty_cd2, amrnk, manager_fg)跳出機票資訊視窗 // 2004-04-26 : [阿 光]新增open_flt_search(url)開啟機位預查視窗 // 2004-04-27 : [帥 哥]新增sel_sarea()搜尋國家分區 // 2004-04-30 : [帥 哥]新增sel_city_htl()搜尋城市推薦旅館 // 2004-04-30 : [阿 光]修改open_flt_search()開啟機位預查視窗 // 2004-04-30 : [Locust]修改 sel_dord_tp() 傳回trans_str空字串處理 // 2004-07-29 : [帥 堡]新增團體自由行行程複製控制程式 // 2004-08-05 : [㊣神光]新增cal_curr_am(成本金額, 稅額, 匯率, 欲更新之成本金額(單價)欄位)成本計算程式 // 2004-09-02 : [Locust]新增 split_paxinfo(), 修改 show_pax(), getRecpInf() 引用方式 // 2004-09-10 : [Locust]修改 sel_order_visa(), 增加 visa_cd 參數 // 2004-09-15 : [Locust]修改 sel_order_msln(), 增加 amrnk, msln_cd 參數 // 2004-09-15 : [阿 光]新增 sel_hotel_searh, sel_hotel、修改sel_itnhotel, sel_pshotel // 2004-09-30 : [Locust]修改 sel_itnlist() 配合團體自由行調整 // 2004-10-12 : [阿 光]將選擇國家函式'SELNATN2_onclick'、'sel_city_click'從東南搬過來 // 2004-10-12 : [Locust]新增 chgOrderPGSUBD() 處理團體自由行價格 // 2004-10-15 : [阿 光]新增 open_win() 開啟新視窗(由東南移植) // 2004-10-15 : [阿 光]新增Table切割函式 get_scroll_table(tableNM_ID, split_col_pos, lW, rW) // 2004-10-15 : [阿 光]新增 show_room_photo() 為 前台訂房顯示房間資料 // 2004/03/05 : [Locust]新增 get_city_info() 取得洲別國家城市相關資料 // 2004/03/13 : [Locust]新增sel_natn_cd()取得國家資訊, 新增sel_htl_cd()取得旅館資訊 // 2004-10-23 : [Locust]新增 show_packpg() 顯示團體自由行資料 // 2004-10-27 : [Locust]修改 split_paxinfo() // 2004-11-04 : [阿 光]新增 get_opt_item() 階層式 select bar Function // 2004-11-11 : [阿 光]新增 sel_city_search_s() 城市限定單選 // 2004-11-19 : [阿 光]新增 chkFITN_DR_Length() 檢查開票交易或更換票號時的長度，超過則警示 // 2004-11-26 : [阿 光]修正 sel_acct_no2() 選取機關行號客戶時，價格等級的判斷問題 // 2004-11-29 : [阿 光]新增pblDialogHeight、pblDialogHeightB兩個參數，部分 Dialog輔助選單高度的設定 // 2005-01-28 : [阿 光]新增setFocus控制focus移到想要的表單欄位 // 2005-03-24 : [Locust]修改 sel_longdate() 處理日曆欄位傳入方式 // 2005-04-14 : [阿 光]新增 clearForm() 清除表單'SEL'開頭的Function // 2005-04-18 : [Steve ]修改 chkFG() 交易確認後座開方塊做利潤檢查 // 2005-04-14 : [阿 光]新增 calFreePoint() 計算買幾送幾的function // 2005-05-05 : [brian]判斷統一編號是否正確 chknum() // 2005-04-14 : [阿 光]新增 showCrsTax() 線上稅額查詢 function // 2005-05-20 : [阿　光]新增removeElement(id)移除某個ID (ex:移除 '
'則下 removeElement('AAA') 即可 // 2005-10-28 : [阿　光]新增sendFormToFrame(frmItem, frameName, width, height)指定表單的Target到由此Function產生的Frame， // 2005-11-06 : [ Rebo ]新增 get_acct_nm2() 與get_acct_nm1()同功能 // 額外加入Acct_TP_A_Not_View_Sel_FG參數 // 若帳號為同業且未指定聯絡人 則 變數指定為1時不會顯示選取聯絡人介面 // 2005-12-06 : [ Afon ]修改input_itnhotel()飯店名稱長度改為500 // 2006-01-16 : [阿　光]新增 getAreaNatnCityInfo() 取得地區或國家代碼陣列 // 2006-01-26 : [阿　光]修改 sel_city_search() 依表單內洲別國家的值帶入sel_city_search.asp內作為搜尋條件 // 2006-02-07 : [ Rebo ]新增 sel_general(sURL) 綜合快選介面 // 2006-03-06 : [Steve ]修改 sel_trpax() 使用輔助查詢公用程式版面 // 2006-03-09 : [ Afon ]splitDate()判別排除年份為0000 // 2006-03-10 : [ Afon ]split_paxinfo() 如果有第十二碼為護照效期不足六個月(/include/sel_recp.asp) // 2006-03-22 : [Steve ]修改 jsIsDate() 把 0000/01/01 視為正確日期格式 // 2006-03-22 : [Steve ]修改 sel_longdate() 無法顯示的日期點開應設定為今日 // 2006-03-28 : [Steve ]將使用輔助查詢公用程式的 function 集中 // 2006-04-06 : [Steve ]修改 sel_emp() 使用輔助查詢公用程式版面 // 2006-04-26 : [ Afon ]調整show_group() 團體旅遊 / 國民旅遊 / 團體自由行 // 2006-05-03 : [Steve ]修改 sel_subcd() 使用輔助查詢公用程式版面 // 2006-05-04 : [Steve ]新增 get_select_iframe() 取得欄位的公用程式 // 2006-05-04 : [Steve ]新增 get_emp_nm_dept_comp() 取得業務員姓名部門[使用取得欄位的公用程式] // 2006-05-05 : [Steve ]新增 get_garea_bitn() 取得系列別[使用取得欄位的公用程式] // 2006-05-11 : [Steve ]回到 2006-05-05的版本 // 2006-05-12 : [Steve ]新增 sel_city() 城市輔助查詢視窗 [公用程式介面] // 2006-05-12 : [Steve ]修改 SELCITY_onclick() 改為呼叫城市輔助查詢視窗 [公用程式介面] // 2006-05-15 : [Steve ]修改 sel_city_search() 改為呼叫城市輔助查詢視窗 [公用程式介面] // 2006-05-15 : [Steve ]修改 訂單檢視頁面客戶聯絡資料跳出視窗的大小 // 2006-05-19 : [Steve ]新增 get_htl_checkti() 取得旅館支票抬頭 // 2006-05-19 : [Steve ]新增 get_rest_checkti() 取得餐廳支票抬頭 // 2006-05-23 : [阿光 ]新增 sel_ltkt_No() 票號快速選單 // 2006-05-24 : [Win ]新增 sel_trpax_wonder() 查詢原系統編號 for 我的旅行社 // 2006-05-25 : [Steve ]修改 get_rest_checkti() JS錯誤 // 2006-05-25 : [Steve ]修改 sel_subcd() 判斷所屬部門的分公司科目檔 (/include/sel_help_pop_subcd.asp) // 2006-05-26 : [Steve ]修改 sel_grup() 若有輸入搜尋代碼或名稱則尋找所有的團號(sel_all=Y) // 2006-06-28 : [ Afon ]國家輔助查詢SELNATN_onclick()改為公用視窗方式處理 // 2006-06-29 : [Steve ]新增 ListSelected() 超好用的啦 . 選取 (selected) 指定值的 // 2006-06-29 : [Steve ]新增 BoxChecked() 超好用的啦 . 選取 (checked ) 指定值的 // 2006-06-29 : [Steve ]修改 ListSelected() // 2006-06-29 : [Steve ]修改 BoxChecked() // 2006-07-06 : [Steve ]修改 sel_acct_nop() 應付帳號公用輔助查詢視窗頁面 直客(D) -> 使用選擇旅客公用查詢頁面 // 2006-07-06 : [阿光 ]修改 clearForm() // 2006-07-11 : [ Afon ]修改 convTime()檢查convTime()小時，分鐘數字是否正確 // 2006-07-12 : [Steve ]修改 sel_acct_nop() 使用公用輔助查詢視窗 // 2006-07-12 : [Steve ]修改 split_paxinfo() 傳回滑雪團相關欄位資訊 // 2006-07-17 : [ Afon ]修改 sel_acct_nop() // 新增 getopt(是否預設，無預設的話執行帳號類別輔助查詢) // addTit(N:不加帳號類別，例如 機關行號 0212==> addTit='N', 則 回傳 0212, 否則回傳 C0212) // 2006-07-24 : [ Afon ]新增 sel_help_pack() // 2006-07-24 : [ Afon ]調整 BITN_CD_onchange()，排除 沒有 MGRUP_CD2 此物件時，出現script 錯誤 // 2006-07-25 : [ Afon ]排除 SELNATN_onclick() 出錯 sql條件值需要單引號 // 2006-08-09 : [ Afon ]新增 CheckVisaDT() 檢查 證照 效期 // 新增 證照 公用輔助查詢 // 2006-08-10 : [ Afon ]調整 sel_trpax()原視窗 高為540 改為 500 // 2006-08-11 : [ Afon ]調整 getRecpInfo() 為共用輔助查詢視窗 // 2006-08-16 : [ Afon ]調整 SELNATN_onclick()，排除複選時找不到資料 // SELAREA_onclick()，subcd_area , stop_next 無任何值時，執行 洲別 輔助查詢 // 2006-08-17 : [ Afon ]調整 SELNATN_onclick()，排除複選時，洲別資料只回傳一筆資料 // 調整 split_paxinfo()，排除 生日為一個欄位時，出現錯誤 // 2006-08-25 : [ Afon ]調整 SELNATN_onclick() 複選時不清除原本資料 // 2006-08-30 : [ Afon ]調整 CheckVisaDT() 排除回傳 00 月 // 2006-09-01 : [ Afon ]調整 sel_acct_nop()，新增 checkti_Frm ，若 checkti_Frm為一物件，則需回傳支票抬頭 // 調整 get_htl_checkti()，無支票抬頭時，回傳中文名稱 // 調整 get_rest_checkti()，無支票抬頭時，回傳中文名稱 // 2006-09-05 : [ Afon ]調整 CheckVisaDT() 排除回傳 00 月 // 2006-09-07 : [ Afon ]調整 CheckVisaDT() 排除日期計算錯誤 // 2006-09-29 : [Sam ]調整 sel_gchgitn() 的開啟方式 // -11-09 將國旅團的Function 與團體共用 // 2006-10-02 : [ Afon ]調整 CheckVisaDT() 判別欲修改之效期欄位 // 2006-10-03 : [ Afon ]調整 sel_trpax() 排除 SQL 2005 不支援 *=、=*，調整為 LEFT JOIN、RIGHT JOIN // 2006-10-14 : [ Afon ]調整 get_nm() 若代碼為空值時，中英文名稱也要清空 // 2006-10-23 : [Sam ]越南簽証 增加簽證效期輸入 sel_order_visa() // 2006-10-23 : [Sam ]增加檢查數值型態Function FunChkNumber() // 2006-11-02 : [ Afon ]排除 Calc_PGQT()無物件時，出現錯誤 // 2006-11-09 : [阿 光]修正 getRecpInfo() 在 SQL2005產生的SQL語法有誤的問題(使用了 xxx =* xxx 的語法) // 2006-11-17 : [ Afon ]調整 getRecpInfo()，split_paxinfo() // 1.新增回傳 護照效期(起~迄)及發照地(無資料時，預設為TPE) // 2.若護照號碼為空值或null時，則回傳空值 // 3.顯示/隱藏 效期不足字樣 // 2006-11-20 : [ Afon ]調整 sel_acct_nop() 新增 Tit_P(有值時，不允許使用 P 部門帳號) // 2006-11-21 : [ Rebo ]新增 sel_emp_multi 使用輔助查詢公用程式版面(可複選員工) // 2006-11-21 : [ Afon ]調整 get_emp_nm_dept_comp()代碼為空值時，亦清除名稱 // 2006-12-04 : [ Leon ]調整 split_paxinfo()多傳警示訊息 // 2006-12-04 : [ Leon ]調整 getRecpInfo()多傳警示訊息 // 2006-12-11 : [Locust]調整 sel_longdate(dt) 新版日曆程式 // 2006-12-26 : [ Rebo ]新增 get_Rate_Nt(CURR_CD, RATE_NT)取得幣別設定的稅率 // 2007-01-04 : [ Afon ]調整 sel_acct_noV2()、get_acct_nm1() 新增 Tit_P(有值時，不允許使用 P 部門帳號) // 2007-01-16 : [ Leon ]調整 sel_acct_noV2()新增FACT_TP ，有傳入時 會顯示廠商 // 2007-01-16 : [ Leon ]調整 sel_acct_no2() src_cls='F'時會呼叫廠商輔助查詢功能 // 2006-11-09 : [阿 光]將 sel_longdate 改為使用 showModalDialog 的方法呼叫 (原來為 window.open) 以避免script執行的順序問題 // 2007-02-07 : [ Afon ]調整 sel_acct_no2()保留機位報名時，點選領隊、導遊保留位時，全部的團費都清空，所以不回寫價格 // 調整 cls_fields()需名稱為fieldnm時，才要將checked 取消 // 2007-03-01 : [ Afon ]排除Calc_PGQT()無物件時，計算會出現NaN // 2007-03-08 : [ Leon ]修正sel_trpax 排除暫停往來旅客 // 2007-03-22 : [ Sam ]修改應收應付帳號均用 sel_acct_nop() // 2007-04-04 : [ 漢堡 ]修改城市搜尋清單sel_city: 參數未定義時預設為空值 // 2007-04-10 : [ Sam ]增加 往來狀態搜尋 - '含暫停交易' // 2007-04-18 : [ Sam ]sel_acct_nop() 增加參數 emp_cd,emp_cnm,amrnk // 2007-04-18 : [ Leon ]getRecpInfo() 增加判斷旅客是否為役男 // 2007-04-24 : [ Sam ]sel_acct_nop() 直客,同業,公司 沒有設定業務員 使用登入者為業務員 // 2007-04-25 : [ Sam ]sel_acct_nop() 同業,公司 訂單 ACCT_DR 用簡稱 帳單用全名 // 2007-04-27 : [ 阿光 ]upd_trans_cnfm_aram() 修改開啟的視窗大小，以容納TRTRANS.Q_AM欄位(iWeb_ID = 良友時會看到Q) // 2007-05-03 : [ Sam ]sel_hotel_search 飯店查詢增加搜尋條件 高度需增加10 // 2007-05-25 : [ leon ]sel_acct_nop() 增加導遊 員工選項 // 2007-06-28 : [ leon ]checkPax() 增加傳入參數BRTH_NM 傳入後端 依照旅客生日判斷旅客身分 // 2007-07-23 : [ Sam ]upd_trans_aram() ,upd_trans_cnfm_aram() 修改傳送參數 // 2007-07-25 : [ leon ]sel_acct_nop() 增加臨時帳號選項 // 2007-07-26 : [ Sam ]upd_trans_aram() ,upd_trans_cnfm_aram() 修改傳送參數 // 2007-08-01 : [ Leon ]sel_subcd() 增加判斷 應付憑單時判斷應付憑單可用科目 // 2007-08-01 : [ Leon ]sel_subcd() 增加判斷 繳款單時判斷應付憑單可用科目 // 2007-10-16 : [Feels] 檢查sel_htmlEditor()關鍵特色不能超過100字元 // 2007-11-22 : [Sam ] 修正 sel_longdate() 傳入物件時錯誤 // 2007-12-14 : [Sam ] 新增 國家代碼查詢新版 sel_natn_search(), sel_natn() // 2007-12-24 : [Ham] 修改 sel_order_msln() 增加判斷 產品代碼 不變時, 產品名稱不更新 // 2008-01-09 : [Sam ] 修改 getCD_NM(); get_nm() 如果itemCD 為readOnly 則不動作 // 2008-01-14 : [Calvin] 修改 sel_order_msln 如果myprodcd 為 A0001 則readOnly (for 喜美喜泰) // 2008-02-25 : [poison]sel_rct() 增加收文選項 // 2008-04-02 : [Ham] CheckVisaDT() 修改 效期(迄)的計算方式 // 2008-05-06 : [poison] 新增get_checkti(),判斷應付帳號不同,所取得的支票抬頭亦不同 // 2008-05-13 : [Mary] sel_trpax(cd, nm, s_title,emp_cd,emp_cnm,amrnk,acct_dr) height 500 -> 505 // 2008-05-20 : [Mary] sel_help_fact() width 500->550 // 2008-05-30 : [Sam ] 新增證件交易 輔助查尋 sel_order_visa(), 增加回傳成本應付帳號 // 2008-08-28 : [Ham] 選擇航空公司--新版 sel_carr_new(cd, nm) // 2008-08-29 : [Ham] sel_order_visa() 無證照代碼時, 不再出現 sel_search() 查詢視窗 // sel_order_cruise() 不再顯示 sel_search(), 改為在 sel_order_cruise1.asp 中可輸入查詢條件 // sel_order_car() 不再顯示 sel_search(), 改為在 sel_order_car1.asp 中可輸入查詢條件 // sel_order_msln() 不再顯示 sel_search(), 改為在 sel_order_msln1.asp 中可輸入查詢條件 // 2008-09-03 : [Ham] 修改 輔助查詢視窗的高度 // 2008-09-05 : [Sam ] 修改show_group() 個團寬度 // 2008-09-09 : [Sam ] sel_order_visa() 辦件資料不設定ACCT_NOP // sel_order_car() 增加 Amrnk判斷顯示同業價 // 2008-09-16 : [Sam ] sel_order_visa() 沒有設定成本時可以使用新增成本功能 // sel_order_car() 沒有設定成本時可以使用新增成本功能 // 2008-09-24 : [Ham] 修改 sel_help_htl()飯店輔助查詢視窗的寬度 530-->600 // 2008-10-22 : [Sam ] 修正 get_garea_bitn() 國旅團線別 TRWORD.CLS_CD = 'BITN_GD' // 2008-12-10 : [Ham][v708.259.B] 修正 sel_local() 改用旅遊地區抓資料 // 2008-12-25 : [Ham][v708.300.B] 修正 upd_trans_cnfm_aram() 及 upd_trans_aram() 增加判斷, 避免銷售金額更新之後導回錯誤的頁面 // 2009-04-21 : [Ham][v806.029.U] 應收帳號為直客時 sel_trpax() 無中文姓名則改抓英文姓名 // 2009-07-06 : [Gary][V8.06.129.N]尋找城市or 國家代碼 並帶入城市代碼、區域代碼、國家代碼 // 2009-08-21 : [Vanessa][v806.224.U]加上emp_cd值判斷是否為應收/應付憑單頁面 // 2009-09-04 : [Vanessa][v806.225.U]get_nm()加上TP值，為應付憑單手動輸入業務員時使用 // 2009-09-18 : [poison][ew.v803.234B] 新增函式SearchWinNew()以排除GET參數夾帶部分資料會被URL SCAN阻擋的問題 // 2009-10-02 : [Vanessa][v806.348.U]get_emp_nm_dept_comp()加上sTYPE值， for 創造BD項目手動輸入業務員時判斷是否有勾反向權限(HC項目的群組權限BD第三項)，有勾則只能選同公司業務 // 2009-10-23 : [AndyHsu][]CheckisNaN(pInput)判斷輸入的值是否為數值 // 2009-11-19 : [Ham][v806.429.U] getRecpInfo() 新增抓出 自備雪具 欄位 // 2009-12-02 : [Vanessa][v902.033.B]修正國旅連回個團檢視頁 // 2009-12-18 : [Ham][v806.487.B] sel_order_cruise()增加參數 用來判斷是由 輸入框 或是 點？ 查詢名稱價錢; 點？查詢時, 不帶入輸入的條件 // 2010-02-11 : [Flynn][標準版] 增加預設搜索字段(中文名稱)acct_dr_value // 涉及方法：SearchWin(); sel_trpax(); sel_acct_nop(); sel_help_comp(); sel_help_dept(); // 2010-03-17 : [Roy] [V8.06_620.U] BB&BE調整請款單明細摘要欄由四欄合併為一欄，增加ChkStrLength2函數，不顯示警示，直接不能輸入 // 2010-04-21 : [Roy] [wm.v806.741.N]AAA&BA&BB 增加旅客異動記錄及名單鎖定后更改的處理，選擇旅客后判斷是否已建檔 起 // 2010-04-27 : [poison] [ew.v806.277U] 新增編輯器預覽前台樣式的function previeweWebHTML // 2010-08-05 : [Flynn] [wm.v806.980.u][標準版] 團型及個團『行程資料維護』，從現行一次修改一天，改為一次可修改多天 // 2010-09-01 : [Gary][wm.v806.1072.B] 團體整批調整價錢時中心價的金額不會改變 // 2010-10-25 : [Roy][wm.v902.138.U]入境團調整訂單參團交易，JDA修改人數時，需刷新JDA // 2010-11-18 : [Flynn] wm.v902.224.U交易成本應付帳號判斷獨立總帳P部門 // 2011-02-11 : [Sabrina][wm.v902.410.B]執行租車後修改補上租車公司出出現SCRIP錯誤 // 2011-07-01 : [Ham][wm.v902.427.U] sel_ltkt_no() 增加參數 機票來源(TKT_SRC_TP) // 2011-09-08 : [Sabrina][wm.v902.680.B]設定滑雪類別級數 // 2011-09-22 : [Sabrina][wm.v902.695.U][永盛]交易確認且為開票交易時，地區和艙等為必填欄位 // 2011-11-02 : [sunyaru] [喜美] wm.v902.434.U BA&BB訂單旅客需檢查役男及出國日護照效期 // 2011-11-23 : [Jack][wm.v902.429.U][BA&BB調整訂單應收帳號更換後處理流程] // 2011-12-20 :[ Kevin ] 顯示增加新增旅客警示訊息 // 2011-12-28 :[art] [wm.v1010.0146U] 調整SELAREAonclick(),SELNATNonclick()增加參數COUNT_RD給CAD 跟 CAB的修改功能的選擇旅遊國家使用，限制搜尋筆數。 // 2011-12-29 :[art] [wm.v1010.0146U] 調整sel_nata(),sel_natn_search() //=========================================================================================== //----------------------------------------------------------------- // 表單執行 //----------------------------------------------------------------- if(!pblDialogHeight){ var pblDialogHeight = 310; } if(!pblDialogHeightB){ var pblDialogHeightB = 330; } function toSend_onclick() { document.FORM1.submit(); } function toSend_me() { document.FORM1.submit(); } function toSubmit_form(frm_action) { if (frm_action!=''){ document.FORM1.action= frm_action } document.FORM1.submit(); } function toCancel_me() { window.history.go(-1); } //----------------------------------------------------------------- // 僅選擇(國外)地區 (only area) //----------------------------------------------------------------- function SELAREA2_onclick(cd, nm) { var myarea var str_area_cd='' var str_area_nm='' myarea = showModalDialog('/include/sel_area.asp?aa='+FORM1.elements(cd).value,'','dialogWidth=210pt;dialogHeight=300pt'); if (myarea) { ary_area = myarea.split('/'); for(var i=0;i100){alert("關鍵特色長度超過100字元");FORM1.ITN_RK2.focus();}else{ myrk = showModalDialog("/include/sel_itnrk.asp?aa="+FORM1.ITN_RK2.value+"&sub_cd="+FORM1.SEL_SUB_CD.value,"","dialogWidth=300pt;dialogHeight=310pt"); if(myrk) { if(myrk.length>100){ alert("關鍵特色長度超過100字元");FORM1.ITN_RK2.focus();} else{ FORM1.ITN_RK2.value=myrk;} } FORM1.ITN_RK2.focus(); } } //----------------------------------------------------------------- // 選擇費用說明 //----------------------------------------------------------------- function SELFEERK_onclick(yn) { var strfeerk=""; var myfeerk if (yn=='Y') { strfeerk = FORM1.ITN_DY953_Y.value; myfeerk = showModalDialog("/include/sel_feerk.asp?aa="+FORM1.ITN_DY953_Y.value+"&yn=Y","dialogWidth=300pt;dialogHeight=310pt"); if(myfeerk != undefined) { strfeerk = myfeerk; } FORM1.ITN_DY953_Y.value=strfeerk; } else { strfeerk = FORM1.ITN_DY953_N.value; myfeerk = showModalDialog("/include/sel_feerk.asp?aa="+FORM1.ITN_DY953_N.value+"&yn=N","dialogWidth=300pt;dialogHeight=310pt"); if(myfeerk != undefined) { strfeerk = myfeerk; } FORM1.ITN_DY953_N.value=strfeerk; } return true; } //----------------------------------------------------------------- // 線別 Combo Bar Onchange //----------------------------------------------------------------- function GAREA_CD_onchange() { var garea garea = FORM1.SEL_GAREA_CD.value; FORM1.MGRUP_CD1.value = FORM1.SEL_GAREA_CD.value; } //----------------------------------------------------------------- // 系列別 Combo Bar Onchange //----------------------------------------------------------------- function BITN_CD_onchange() { var bitn bitn = FORM1.SEL_BITN_CD.value; //2006-07-24 [Afon] 排除 沒有 MGRUP_CD2 此物件時，出現script 錯誤 if(FORM1.MGRUP_CD2){ FORM1.MGRUP_CD2.value = FORM1.SEL_BITN_CD.value; } if(document.FORM1.contel){ var myfeerk = window.open("/include/get_emptel.asp?cd="+FORM1.SEL_BITN_CD.value,'',"width=0,height=0;"); } } //----------------------------------------------------------------- // 機位數計算 //----------------------------------------------------------------- function Calc_QT(a,tp,d) { var estm, foc1, foc2, keep, subtot, subtot_tp, done estm = FORM1.elements(a+'_YQT').value; foc1 = FORM1.elements(a+'_CQT').value; foc2 = FORM1.elements(a+'_FQT').value; keep = FORM1.elements(a+'_EDQT').value; if (estm=="") { estm = 0; } if (foc1=="") { foc1 = 0; } if (foc2=="") { foc2 = 0; } if (keep=="") { keep = 0; } subtot = eval(estm)+eval(foc1)+eval(foc2)+eval(keep); FORM1.elements(a+'_TOTQT').value = eval(estm)+eval(foc1)+eval(foc2)+eval(keep); estm = FORM1.elements('ESTM_'+tp+'QT').value; foc1 = FORM1.elements('FOC1_'+tp+'QT').value; foc2 = FORM1.elements('FOC2_'+tp+'QT').value; keep = FORM1.elements('KEEP_'+tp+'QT').value; if (d){ done= FORM1.elements(d+'_'+tp+'QT').value; } else { done=0; } if (estm=="") { estm = 0; } if (foc1=="") { foc1 = 0; } if (foc2=="") { foc2 = 0; } if (keep=="") { keep = 0; } if (d) { FORM1.elements(tp+'_TOTQT').value = eval(estm)-eval(foc1)-eval(foc2)-eval(keep)-eval(done); } else { FORM1.elements(tp+'_TOTQT').value = eval(estm)-eval(foc1)-eval(foc2)-eval(keep); } } function Calc_PGQT(a,tp,d) { // 2006-11-02 : [ Afon ]排除Calc_PGQT()無物件時，出現錯誤 // 2007-03-01 : [ Afon ]排除Calc_PGQT()無物件時，計算會出現NaN var yqt, cqt, fqt, edqt var estm, foc1, foc2, keep, focg, subtot, subtot_tp, done if(FORM1.elements(a+'_YQT')){ yqt = FORM1.elements(a+'_YQT').value; }else{ yqt = 0; } if(FORM1.elements(a+'_CQT')){ cqt = FORM1.elements(a+'_CQT').value; }else{ cqt = 0; } if(FORM1.elements(a+'_FQT')){ fqt = FORM1.elements(a+'_FQT').value; }else{ fqt = 0; } if(FORM1.elements(a+'_EDQT')){ edqt = FORM1.elements(a+'_EDQT').value; }else{ edqt = 0; } if (yqt=="") { yqt = 0; } if (cqt=="") { cqt = 0; } if (fqt=="") { fqt = 0; } if (edqt=="") { edqt = 0; } subtot = eval(yqt)+eval(cqt)+eval(fqt)+eval(edqt); if(FORM1.elements(a+'_TOTQT')){ FORM1.elements(a+'_TOTQT').value = eval(yqt)+eval(cqt)+eval(fqt)+eval(edqt); } if(FORM1.elements('ESTM_'+tp+'QT')){ estm = FORM1.elements('ESTM_'+tp+'QT').value; }else{ estm = 0; } if(FORM1.elements('FOC1_'+tp+'QT')){ foc1 = FORM1.elements('FOC1_'+tp+'QT').value; }else{ foc1 = 0; } if(FORM1.elements('FOC2_'+tp+'QT')){ foc2 = FORM1.elements('FOC2_'+tp+'QT').value; }else{ foc2 = 0; } if(FORM1.elements('KEEP_'+tp+'QT')){ keep = FORM1.elements('KEEP_'+tp+'QT').value; }else{ keep = 0; } if(FORM1.elements('FOCG_'+tp+'QT')){ focg = FORM1.elements('FOCG_'+tp+'QT').value; }else{ focg = 0; } if (d){ if(FORM1.elements(d+'_'+tp+'QT')){ done= FORM1.elements(d+'_'+tp+'QT').value; }else{ done = 0; } } else { done=0; } if (estm=="") { estm = 0; } if (foc1=="") { foc1 = 0; } if (foc2=="") { foc2 = 0; } if (keep=="") { keep = 0; } if (focg=="") { focg = 0; } if(FORM1.elements(tp+'_TOTQT')){ if (d) { FORM1.elements(tp+'_TOTQT').value = eval(estm)-eval(foc1)-eval(foc2)-eval(keep)-eval(done)-eval(focg); } else { FORM1.elements(tp+'_TOTQT').value = eval(estm)-eval(foc1)-eval(foc2)-eval(keep)-eval(focg); } } } //----------------------------------------------------------------- // 限制只能輸入阿拉伯數字 : onkeypress() //----------------------------------------------------------------- function isno_onkeypress() { if ((event.keyCode < 48) || (event.keyCode > 57)) { event.returnValue = false; alert("請輸入阿拉伯數字!"); } } //----------------------------------------------------------------- // 限制只能輸入英文字母 : onkeypress() //----------------------------------------------------------------- function iseng_onkeypress() { if ( (event.keyCode < 65) || ((event.keyCode > 90) && (event.keyCode < 97)) || (event.keyCode > 123 ) ) { event.returnValue = false; alert("只限輸入英文!"); } } //----------------------------------------------------------------- // 限制只能輸入英文字母或數字或減號 //----------------------------------------------------------------- function isnoeng_onkeypress() { if ((event.keyCode < 45) || ((event.keyCode > 57) && (event.keyCode < 65)) || ((event.keyCode > 90) && (event.keyCode < 97)) || (event.keyCode > 123 ) ) { event.returnValue = false; alert("只限輸入英文或數字或減號!"); } } //----------------------------------------------------------------- // 限制只能輸入英文字母或數字 //----------------------------------------------------------------- function isnoeng_onkeypress1() { if ( (event.keyCode < 48) || ((event.keyCode > 57) && (event.keyCode < 65)) || ((event.keyCode > 90) && (event.keyCode < 97)) || (event.keyCode > 123 ) ) { event.returnValue = false; alert("只限輸入英文或數字!"); } } //----------------------------------------------------------------- // 限制只能輸入英文字母或數字或星號 //----------------------------------------------------------------- function isnoeng_onkeypressX() { if ( (event.keyCode < 42) || ((event.keyCode > 42) && (event.keyCode < 48)) || ((event.keyCode > 57) && (event.keyCode < 65)) || ((event.keyCode > 90) && (event.keyCode < 97)) || (event.keyCode > 123 ) ) { event.returnValue = false; alert("只限輸入英文或數字或星號!"); } } //----------------------------------------------------------------- // 限制只能輸入數字或減號 //----------------------------------------------------------------- function isnominus_onkeypress() { if ((event.keyCode < 45) || ((event.keyCode > 57)) ) { event.returnValue = false; alert("只限輸入數字或減號!"); } } //----------------------------------------------------------------- // 限制只能輸入英文字母或數字或減號 或底線 chr(95) //----------------------------------------------------------------- function isnoeng_onkeypress2() { if ((event.keyCode < 45) || ((event.keyCode > 57) && (event.keyCode < 65)) || ((event.keyCode > 90) && (event.keyCode < 95)) || (event.keyCode > 123 ) ) { event.returnValue = false; alert("只限輸入英文或數字或減號!"); } } //----------------------------------------------------------------- // 限制只能輸入英文字母或數字或減號或冒號 chr(58) == ":" //----------------------------------------------------------------- function istime_onkeypress() { if ((event.keyCode < 48) || (event.keyCode > 58)) { event.returnValue = false; alert("時間格式不符!"); } } //----------------------------------------------------------------- // 清空 欄位 資料 fieldnm(欄位名稱) : 搜尋使用 //----------------------------------------------------------------- function cls_fields(fieldnm, fg) { var i if (fg=='1') { if (confirm('確定清空所有價格？') ) { for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf(fieldnm) == 0) { document.FORM1.elements[i].value = ''; } } } } else { for(i = 0 ; i < document.FORM1.elements.length ; i++) { //<%'// 2007-02-07 : [ Afon ]調整 cls_fields()需名稱為fieldnm時，才要將checked 取消%> if (document.FORM1.elements[i].name.indexOf(fieldnm) == 0) { document.FORM1.elements[i].value = ''; if (document.FORM1.elements[i].checked == true) { document.FORM1.elements[i].checked = false; } } } } } //----------------------------------------------------------------- // 不選 欄位 資料 fieldnm(欄位名稱) //----------------------------------------------------------------- function unchk_fields(fieldnm) { var i for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf(fieldnm) == 0) { document.FORM1.elements[i].checked = false; } } } function check_fields(fieldnm, iflag) { var i for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf(fieldnm) == 0) { if (iflag == 'T') { document.FORM1.elements[i].checked = true; } else { document.FORM1.elements[i].checked = false; } } } } //----------------------------------------------------------------- // 選取 共用行程 N_mgitn.asp , U_mgitn.asp , N_gitn.asp , U_gitn.asp //----------------------------------------------------------------- function sel_itnlist(ifile, tp, itn_natn, extraParam) { var itncd; itncd = showModalDialog("/include/sel_itnlist.asp?itn_natn="+itn_natn,"dialogWidth=450pt;dialogHeight=350pt"); if (itncd){ if (tp=='mgroup') { switch(ifile) { case 'N_mgitn.asp': location=(ifile+'?MGRUP_CD='+ document.FORM1.MGRUP_CD.value +'&cpyfrom='+itncd + extraParam); break; case 'U_mgitn.asp': location=(ifile+'?MGRUP_CD='+ document.FORM1.MGRUP_CD.value +'&ITN_SQ='+ document.FORM1.ITN_SQ.value +'&cpyfrom='+itncd+ extraParam); break; default: break; } } else { switch(ifile) { case 'N_gitn.asp': location=(ifile+'?GRUP_CD='+ document.FORM1.GRUP_CD.value +'&cpyfrom='+itncd+ extraParam); break; case 'U_gitn.asp': location=(ifile+'?GRUP_CD='+ document.FORM1.GRUP_CD.value +'&ITN_SQ='+ document.FORM1.ITN_SQ.value +'&cpyfrom='+itncd+ extraParam); break; default: break; } } } return; } //----------------------------------------------------------------- // 選取 共用行程 可輸入關鍵字搜尋版 N_mgitn.asp , U_mgitn.asp , N_gitn.asp , U_gitn.asp //----------------------------------------------------------------- function sel_itnlist_search(ifile, tp, itn_natn, extraParam) { var searchVal = sel_search(); var sel_itn_cd = "", sel_itn_nm = ""; if (!extraParam) { extraParam = ''; } if(searchVal) { valueArray = searchVal.split("，"); sel_itn_cd = valueArray[1]; sel_itn_nm = valueArray[2]; } sel_itnlist(ifile, tp, itn_natn + "&itn_cd=" + sel_itn_cd + "&itn_nm=" + sel_itn_nm , extraParam ); } //----------------------------------------------------------------- // 選取 共用行程 可輸入關鍵字搜尋版 N_mgitn.asp , U_mgitn.asp , N_gitn.asp , U_gitn.asp // 2010-08-05 : [Flynn] [wm.v806.980.u][標準版] 團型及個團『行程資料維護』，從現行一次修改一天，改為一次可修改多天 //----------------------------------------------------------------- function sel_itnlist_search2(ifile, tp, itn_natn, extraParam, num) { var searchVal = sel_search(); var sel_itn_cd = "", sel_itn_nm = ""; if (!extraParam) { extraParam = ''; } if(searchVal) { valueArray = searchVal.split("，"); sel_itn_cd = valueArray[1]; sel_itn_nm = valueArray[2]; } sel_itnlist_all(ifile, tp, itn_natn + "&itn_cd=" + sel_itn_cd + "&itn_nm=" + sel_itn_nm , extraParam, num ); } //----------------------------------------------------------------- // 選取 共用行程 N_mgitn.asp , U_mgitn.asp , N_gitn.asp , U_gitn.asp // 2010-08-05 : [Flynn] [wm.v806.980.u][標準版] 團型及個團『行程資料維護』，從現行一次修改一天，改為一次可修改多天 //----------------------------------------------------------------- function sel_itnlist_all(ifile, tp, itn_natn, extraParam, num) { var itncd; var itninfo; itncd = showModalDialog("/include/sel_itnlist.asp?itn_natn="+itn_natn,"dialogWidth=450pt;dialogHeight=350pt"); if (itncd){ if (tp=='mgroup') { switch(ifile) { case 'N_mgitn.asp': location=(ifile+'?ITN_ALL=Y&ITNrowNum='+num+'&MGRUP_CD='+ document.FORM1.MGRUP_CD.value +'&cpyfrom='+itncd + extraParam); break; case 'U_mgitn.asp': //location=(ifile+'?ITN_ALL=Y&ITNrowNum='+num+'&MGRUP_CD='+ document.FORM1.MGRUP_CD.value +'&ITN_SQ='+ document.FORM1.elements("ITN_SQ"+num).value +'&cpyfrom='+itncd+ extraParam); itninfo = showModalDialog("/C/func_get_mgitn.asp?num="+num+"&cpyfrom="+itncd+'&MGRUP_CD='+document.FORM1.MGRUP_CD.value+'&ITN_SQ='+document.FORM1.elements("ITN_SQ"+num).value,"dialogWidth=0;dialogHeight=0"); break; default: break; } if(itninfo){ var item = document.FORM1; var reg = new RegExp("
", "g"); var reg2 = new RegExp("&N&", "g"); //itninfo["ITN_Class"]; //itninfo["ITN_Serial"]; item.elements("ITN_CD").value = itninfo["ITN_CD"]; item.elements("ITN_MEAL"+num).innerText = itninfo["ITN_MEAL"].replace(reg, "\r\n"); if (itninfo["ITN_BR"] != "0"){ item.elements("ITN_BR"+num).checked = true; }else{ item.elements("ITN_BR"+num).checked = false; } if (itninfo["ITN_LU"] != "0"){ item.elements("ITN_LU"+num).checked = true; }else{ item.elements("ITN_LU"+num).checked = false; } if (itninfo["ITN_DI"] != "0"){ item.elements("ITN_DI"+num).checked = true; }else{ item.elements("ITN_DI"+num).checked = false; } item.elements("ITNBR_DR"+num).innerText = itninfo["ITNBR_DR"].replace(reg, "\r\n"); item.elements("ITNLU_DR"+num).innerText = itninfo["ITNLU_DR"].replace(reg, "\r\n"); item.elements("ITNDI_DR"+num).innerText = itninfo["ITNDI_DR"].replace(reg, "\r\n"); item.elements("ITN_AREA"+num).value = itninfo["ITN_AREA"]; item.elements("ITN_AREA_NM"+num).value = itninfo["ITN_AREA_NM"]; item.elements("ITN_NATN"+num).value = itninfo["ITN_NATN"]; item.elements("ITN_NATN_NM"+num).value = itninfo["ITN_NATN_NM"]; item.elements("GRUP_ITN_NATN"+num).value = itninfo["grpITN_NATN"]; item.elements("ITN_CITY"+num).value = itninfo["ITN_CITY"]; item.elements("ITN_CITY_NM"+num).innerText = itninfo["ITN_CITY_NM"].replace(reg, "\r\n"); item.elements("ITN_DR"+num).value = itninfo["ITN_DR"].replace(reg2, "\r\n"); item.elements("ITN_NM"+num).innerText = itninfo["ITN_NM"].replace(reg, "\r\n"); item.elements("ITN_HTL"+num).innerText = itninfo["ITN_HTL"].replace(reg, "\r\n"); item.elements("TMP_HTL_NM"+num).value = itninfo["TMP_HTL_NM"]; item.elements("TMP_HTL_CD_NM"+num).value = itninfo["TMP_HTL_CD_NM"]; if (itninfo["SAMEHTL_FG"] != "0"){ item.elements("SAMEHTL_FG"+num).checked = true; }else{ item.elements("SAMEHTL_FG"+num).checked = false; } item.elements("HTL_CD"+num).value = itninfo["HTL_CD"]; if (itninfo["has_ITN_IMG"] == "1"){ document.getElementById("IMG_DTDIV"+num).innerHTML = ""; }else{ var tempstr = "
尚無圖片

(可由此新增圖形)"; document.getElementById("IMG_DTDIV"+num).innerHTML = tempstr; document.getElementById("img_onclick"+num).onclick = function(){Sel_IMG('MGRUP', document.FORM1.MGRUP_CD.value, itninfo['ITN_Class'], itninfo['ITN_Serial'], itninfo["ITN_NATN"], itninfo["ITN_CITY"])}; } } } else { switch(ifile) { case 'N_gitn.asp': location=(ifile+'?ITN_ALL=Y&ITNrowNum='+num+'&GRUP_CD='+ document.FORM1.GRUP_CD.value +'&cpyfrom='+itncd+ extraParam); break; case 'U_gitn.asp': //location=(ifile+'?ITN_ALL=Y&ITNrowNum='+num+'&GRUP_CD='+ document.FORM1.GRUP_CD.value +'&ITN_SQ='+ document.FORM1.elements("ITN_SQ"+num).value +'&cpyfrom='+itncd+ extraParam); itninfo = showModalDialog("/C/func_get_mgitn.asp?num="+num+"&cpyfrom="+itncd+'&GRUP_CD='+document.FORM1.GRUP_CD.value+'&ITN_SQ='+document.FORM1.elements("ITN_SQ"+num).value,"dialogWidth=0;dialogHeight=0"); break; default: break; } if(itninfo){ var item = document.FORM1; var reg = new RegExp("
", "g"); var reg2 = new RegExp("&N&", "g"); //itninfo["ITN_Class"]; //itninfo["ITN_Serial"]; item.elements("ITN_CD").value = itninfo["ITN_CD"]; item.elements("ITN_MEAL"+num).innerText = itninfo["ITN_MEAL"].replace(reg, "\r\n"); if (itninfo["ITN_BR"] != "0"){ item.elements("ITN_BR"+num).checked = true; }else{ item.elements("ITN_BR"+num).checked = false; } if (itninfo["ITN_LU"] != "0"){ item.elements("ITN_LU"+num).checked = true; }else{ item.elements("ITN_LU"+num).checked = false; } if (itninfo["ITN_DI"] != "0"){ item.elements("ITN_DI"+num).checked = true; }else{ item.elements("ITN_DI"+num).checked = false; } item.elements("ITNBR_DR"+num).innerText = itninfo["ITNBR_DR"].replace(reg, "\r\n"); item.elements("ITNLU_DR"+num).innerText = itninfo["ITNLU_DR"].replace(reg, "\r\n"); item.elements("ITNDI_DR"+num).innerText = itninfo["ITNDI_DR"].replace(reg, "\r\n"); item.elements("ITN_AREA"+num).value = itninfo["ITN_AREA"]; item.elements("ITN_AREA_NM"+num).value = itninfo["ITN_AREA_NM"]; item.elements("ITN_NATN"+num).value = itninfo["ITN_NATN"]; item.elements("ITN_NATN_NM"+num).value = itninfo["ITN_NATN_NM"]; item.elements("GRUP_ITN_NATN"+num).value = itninfo["grpITN_NATN"]; item.elements("ITN_CITY"+num).value = itninfo["ITN_CITY"]; item.elements("ITN_CITY_NM"+num).innerText = itninfo["ITN_CITY_NM"].replace(reg, "\r\n"); item.elements("ITN_DR"+num).value = itninfo["ITN_DR"].replace(reg2, "\r\n"); item.elements("ITN_NM"+num).innerText = itninfo["ITN_NM"].replace(reg, "\r\n"); item.elements("ITN_HTL"+num).innerText = itninfo["ITN_HTL"].replace(reg, "\r\n"); item.elements("TMP_HTL_NM"+num).value = itninfo["TMP_HTL_NM"]; item.elements("TMP_HTL_CD_NM"+num).value = itninfo["TMP_HTL_CD_NM"]; if (itninfo["SAMEHTL_FG"] != "0"){ item.elements("SAMEHTL_FG"+num).checked = true; }else{ item.elements("SAMEHTL_FG"+num).checked = false; } item.elements("HTL_CD"+num).value = itninfo["HTL_CD"]; if (itninfo["has_ITN_IMG"] == "1"){ document.getElementById("IMG_DTDIV"+num).innerHTML = ""; }else{ var tempstr = "
尚無圖片

(可由此新增圖形)"; document.getElementById("IMG_DTDIV"+num).innerHTML = tempstr; document.getElementById("img_onclick"+num).onclick = function(){Sel_IMG('GRUP', document.FORM1.GRUP_CD.value, itninfo['ITN_Class'], itninfo['ITN_Serial'], itninfo["ITN_NATN"], itninfo["ITN_CITY"])}; } } } } return; } //----------------------------------------------------------------- // 個團選取 共用行程 N_gitn.asp , U_gitn.asp //----------------------------------------------------------------- function sel_itnlist2(tp) { var itncd itncd = showModalDialog("/include/sel_itnlist.asp","dialogWidth=450pt;dialogHeight=350pt"); if (itncd){ switch(tp) { case 'N': location=('N_gitn.asp?MGRUP_CD='+document.FORM1.GRUP_CD.value+'&cpyfrom='+itncd); break; case 'U': location=('U_gitn.asp?MGRUP_CD='+document.FORM1.GRUP_CD.value+'&ITN_SQ='+document.FORM1.ITN_SQ.value+'&cpyfrom='+itncd); break; case 'C': location=('C_gitn.asp?MGRUP_CD='+document.FORM1.GRUP_CD.value+'&ITN_SQ='+document.FORM1.ITN_SQ.value+'&cpyfrom='+itncd); break; default: break; } } } //----------------------------------------------------------------- // 選取 飯店資料 : 行程中使用 //----------------------------------------------------------------- function sel_itnhotel() { var htlcd if ((document.FORM1.ITN_CITY.value=='') && (1 + 1 != 2)) { alert("請先輸入旅遊城市"); return false; } else { //---------2003_04_28 by andois----------------------- var shtlCD = "", shtlCNM = "" //var searchStr = sel_search(); //if((searchStr) || (FORM1.HTL_CD.value != "")) if(1 == 1) { /* if(searchStr) { var sArray; sArray = searchStr.split('，'); shtlCD = sArray[1]; shtlCNM = sArray[2]; } */ //--------------------------------------------------- //---------2003_05_06 by andois----------------------- if(document.FORM1.G_ITN_NATN) { selnatn = document.FORM1.G_ITN_NATN.value; } else { selnatn = ""; } //---------------------------------------------------- //htlcd = showModalDialog("../include/sel_itnhotel.asp?city="+FORM1.ITN_CITY.value+"&HTL_CD="+FORM1.HTL_CD.value + "&shtl_cd=" + shtlCD + "&shtl_cnm=" + shtlCNM + (selnatn==""?"":("&natn=" + selnatn)),"","dialogWidth=360pt;dialogHeight=300pt"); htlcd = sel_hotel_search('', FORM1.HTL_CD.value, FORM1.ITN_CITY.value, selnatn) if (htlcd) { var aryHTL = htlcd.split('/'); var strHTLCD=''; var strHTLNM=''; for(var i=0;i0){ val = v1 + v2 ; } else { val = v1 - v2 ; } if (val< 0) { val=0;} document.FORM1.elements[k].value = val; } } } } } return true; } //----------------------------------------------------------------- // 選擇 部門員工( 使用者帳號 ) //----------------------------------------------------------------- function sel_deptemp2(usrid) { var usr_id = FORM1.elements(usrid).value; var dept_cd = showModalDialog("/include/sel_dept.asp?usr_id="+usr_id,"dialogWidth=250pt;dialogHeight=310pt"); if(dept_cd) { var emp_cd = showModalDialog("/include/sel_emp.asp?dept_cd="+dept_cd+"&usr_id="+usr_id,"dialogWidth=300pt;dialogHeight=310pt"); if (emp_cd) { FORM1.elements(usrid).value=emp_cd; return true; } } } //----------------------------------------------------------------- // 選擇員工編號 ( 先選部門, 再選員工 ) //----------------------------------------------------------------- function sel_deptemp(cd, nm) { var usr_id = FORM1.elements(cd).value; var dept_cd = showModalDialog("/include/sel_dept.asp?usr_id="+usr_id,"dialogWidth=250pt;dialogHeight=310pt"); if(dept_cd) { var ary_dept = dept_cd.split('，'); if (ary_dept.length > 1 ){ dept_cd = ary_dept[0]; } var emp_cd = showModalDialog("/include/sel_emp.asp?dept_cd="+dept_cd+"&usr_id="+usr_id,"dialogWidth=300pt;dialogHeight=310pt"); if (emp_cd) { var ary_emp = emp_cd.split('，'); if (ary_emp.length > 1 ){ FORM1.elements(cd).value = ary_emp[0]; FORM1.elements(nm).value = ary_emp[1]; return true; } } } } //----------------------------------------------------------------- // 選擇所屬分公司, 所屬部門資料 //carol 2003/11/27 新增edit_fg3,comped2 //判斷獨立總帳是否可以修改部門 //----------------------------------------------------------------- function sel_dept(deptcd, deptnm, compcd, compnm, edit_fg3, compcd2) { var old_compcd = ""; var old_deptcd = ""; var mycompcd = ""; var mycompnm = ""; if (compcd) { old_compcd = FORM1.elements(compcd).value; } if (deptcd) { old_deptcd = FORM1.elements(deptcd).value; } var str_dsys = showModalDialog("/include/sel_dsys.asp?comp_cd="+old_compcd+'&chice=H&edit_fg3='+edit_fg3+'&compcd2='+compcd2,"department","dialogWidth=230pt;dialogHeight=350pt;"); if (str_dsys){ var ary_dsys = str_dsys.split('，'); if (ary_dsys.length > 1 ){ mycompcd = ary_dsys[0]; mycompnm = ary_dsys[1]; }//2004-11-09 }//2004-11-09 var str_dept = showModalDialog("/include/sel_dept.asp?comp_cd="+mycompcd+"&chice=H","department","dialogWidth=200pt;dialogHeight=310pt;"); if (str_dept){ var ary_dept = str_dept.split('，'); if (ary_dept.length > 1 && deptcd ){ if(compcd) { FORM1.elements(compcd).value = mycompcd; } if(compnm) { FORM1.elements(compnm).value = mycompnm; } FORM1.elements(deptcd).value = ary_dept[0]; FORM1.elements(deptnm).value = ary_dept[1]; } } return true; //}2004-11-09 //}2004-11-09 } //----------------------------------------------------------------- // 選擇所屬分公司, 所屬部門, 與員工資料 //----------------------------------------------------------------- function sel_emp2(empcd, empnm, deptcd, deptnm, compcd, compnm) { var old_compcd = ""; var old_deptcd = ""; var mycompcd = ""; var mycompnm = ""; var mydeptcd = ""; var mydeptnm = ""; if (compcd) { old_compcd = FORM1.elements(compcd).value; } if (deptcd) { old_deptcd = FORM1.elements(deptcd).value; } var str_dsys = showModalDialog("/include/sel_dsys.asp?comp_cd="+old_compcd+'&chice=H',"dialogWidth=200pt;dialogHeight=310pt"); if (str_dsys){ var ary_dsys = str_dsys.split('，'); if (ary_dsys.length > 1 && compcd ){ mycompcd = ary_dsys[0]; mycompnm = ary_dsys[1]; //FORM1.elements(compcd).value = ary_dsys[0]; //FORM1.elements(compnm).value = ary_dsys[1]; var str_dept = showModalDialog("/include/sel_dept.asp?comp_cd="+mycompcd+"&chice=H","dialogWidth=200pt;dialogHeight=310pt"); if (str_dept){ var ary_dept = str_dept.split('，'); if (ary_dept.length > 1 && deptcd ){ mydeptcd = ary_dept[0]; mydeptnm = ary_dept[1]; //FORM1.elements(deptcd).value = ary_dept[0]; //FORM1.elements(deptnm).value = ary_dept[1]; var str_emp = showModalDialog("/include/sel_emp.asp?dept_cd="+mydeptcd+'&chice=H',"dialogWidth=200pt;dialogHeight=310pt"); if (str_emp){ var ary_emp = str_emp.split('，'); if (ary_emp.length > 1 && empcd ){ // 全部一起填入 FORM1.elements(empcd).value = ary_emp[0]; FORM1.elements(empnm).value = ary_emp[1]; FORM1.elements(compcd).value = mycompcd; FORM1.elements(compnm).value = mycompnm; FORM1.elements(deptcd).value = mydeptcd; FORM1.elements(deptnm).value = mydeptnm; } } } } } } return true; } //----------------------------------------------------------------- // 找日期配對日期(萬年曆ocx) //----------------------------------------------------------------- function sel_date(yf,mf,df) { var adate adate = showModalDialog("/include/sel_cal.asp?ayear="+FORM1.elements(yf).value+"&amonth="+FORM1.elements(mf).value+"&aday="+FORM1.elements(df).value,"","dialogTop=10pt;dialogWidth=275pt;dialogHeight=180pt;status=no;help=no"); if(adate) { var yy = adate[0].toString(); var mm = adate[1].toString(); var dd = adate[2].toString(); if (mm.length==1) mm = '0'+mm if (dd.length==1) dd = '0'+dd FORM1.elements(yf).value=yy; FORM1.elements(mf).value=mm; FORM1.elements(df).value=dd; } } //----------------------------------------------------------------- // 找日期配對日期(萬年曆ocx) //----------------------------------------------------------------- function sel_date_text(txtfld) { var adate = showModalDialog("/include/sel_cal.asp","","dialogTop=10pt;dialogWidth=275pt;dialogHeight=180pt;status=no;help=no"); if(adate) { var yy = adate[0].toString(); var mm = adate[1].toString(); var dd = adate[2].toString(); if (mm.length==1) mm = '0'+mm if (dd.length==1) dd = '0'+dd FORM1.elements(txtfld).value=yy+'/'+mm+'/'+dd; } } //----------------------------------------------------------------- // 格式化 時間字串 0900 --> 09:00 //----------------------------------------------------------------- function FormateStrToTime(nm) { var str=FORM1.elements(nm).value; var strlen = str.length; var strlen2 = strlen - 2 var aa = str.substr(0,2) var bb = str.substr(2,strlen2) if ((FORM1.elements(nm).value.indexOf(':') == -1) && (FORM1.elements(nm).value !='' ) ) { FORM1.elements(nm).value=aa+':'+bb; } } //----------------------------------------------------------------- // 團控管理 顯示 個團資訊 ( new window ) // f_ShowS = "" 團體旅遊 // f_ShowS = "Y" 國民旅遊 // f_ShowS = "GO" 團體自由行 // f_ShowS = "VGO" 團體自由行純顯示 //----------------------------------------------------------------- function show_group(grup_cd, f_ShowS) { var mywin if (f_ShowS) { if(f_ShowS=="Y"){ mywin = window.open("/include/show_group.asp?GRUP_CD="+grup_cd+"&f_ShowS="+f_ShowS,"show_group","resizable=yes,scrollbars=yes,width=750,height=480"); } if(f_ShowS=="GO"){ mywin = window.open("/C/V_packpg1.asp?GRUP_CD="+grup_cd+"&PACKAGE_CD="+grup_cd+"&SUB_CD="+f_ShowS+"&f_Edit=N","show_group","resizable=yes,scrollbars=yes,width=640,height=480"); } if(f_ShowS=="VGO"){ mywin = window.open("/C/V_packpg1.asp?GRUP_CD="+grup_cd+"&PACKAGE_CD="+grup_cd+"&SUB_CD="+f_ShowS+"&f_Edit=N","show_group","resizable=yes,scrollbars=yes,width=640,height=480"); } //2009-11-16 Gary 國旅-中青旅使用 //2009-12-02 Vanessa 修正連回國旅個團檢視頁 if(f_ShowS=="GDT"){ mywin = window.open("/I/V_group.asp?GRUP_CD="+grup_cd+"&f_ShowS="+f_ShowS,"show_group","resizable=yes,scrollbars=yes,width=800,height=550"); } //mywin = window.open("/include/show_groupgd_new.asp?GRUP_CD="+grup_cd+"&f_ShowS="+f_ShowS,"show_group","resizable=yes,scrollbars=yes,width=750,height=480"); } } else { mywin = window.open("/include/show_group.asp?GRUP_CD="+grup_cd,"show_group","resizable=yes,scrollbars=yes,width=750,height=480"); } } //----------------------------------------------------------------- // 顯示簽證辦證須知 ( Modal window ) //----------------------------------------------------------------- function sel_visark2(visa_cd) { var mywin mywin = showModalDialog("/include/show_visark2.asp?visa_cd="+visa_cd,"","dialogTop=10pt;dialogWidth=400pt;dialogHeight=250pt;status=no;help=no"); return; } //=========================================================================================== // B 訂單管理 //=========================================================================================== //----------------------------------------------------------------- // 新增訂單 : 計算訂單人數是否超過 limit 值 //----------------------------------------------------------------- function cnt_Members(idxname, objname, limit){ var membercnt=0; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf(idxname) == 0) { membercnt+=eval(document.FORM1.elements[i].value); } } if(membercnt>limit){ document.FORM1.elements(objname).value = '0'; return ("警告!!人數超過"+limit+"位\n\n請修正人數!!"); return false; } } //----------------------------------------------------------------- // 新增訂單 : 檢查訂單總人數是否為零 ( 有機位 ) //----------------------------------------------------------------- function check_pax(){ var membercnt=0; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf('SEL_Y_QT') == 0 || document.FORM1.elements[i].name.indexOf('SEL_ED_QT') == 0 || document.FORM1.elements[i].name.indexOf('SEL_C_QT') == 0 || document.FORM1.elements[i].name.indexOf('SEL_F_QT') == 0) membercnt+=eval(document.FORM1.elements[i].value); } if(membercnt == 0) return ("警告!! 旅客人數為0 !!"); else return ""; } //----------------------------------------------------------------- // 新增訂單 : 檢查訂單總人數是否為零 ( 無機位 ) //----------------------------------------------------------------- function check_pax2(){ var membercnt=0; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf('SEL_PAX_QT') == 0) { if (document.FORM1.elements[i].value =='' ) document.FORM1.elements[i].value = 0 membercnt+=eval(document.FORM1.elements[i].value); } } if(membercnt == 0) return ("警告!! 旅客人數為0 !!"); else return ""; } //----------------------------------------------------------------- // 將數字轉換成適當的 金錢字串 //----------------------------------------------------------------- function conv_CurrencyToStr(str) { var ary_myval=str.split(''); var new_str=''; ary_myval.reverse(); for (var i=ary_myval.length-1;i>=0;i--) { if (i%3 == 0 && i != 0) { ary_myval[i]+=','; } new_str += ary_myval[i] ; } return new_str; } //----------------------------------------------------------------- // 依數量 計算訂單中 附加項目的金額 //----------------------------------------------------------------- function cal_Gopitem(selobj, opitem_am, att_am){ var val_selobj=0; var membercnt=0; val_selobj = parseInt(document.FORM1.elements(selobj).value); document.FORM1.elements(opitem_am).value = eval(val_selobj * att_am); var totExtra_optbuy_am = 0; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf('SEL_GCHG_AM') == 0 || document.FORM1.elements[i].name.indexOf('SEL_GOPITEM_AM') == 0) { membercnt+=eval(document.FORM1.elements[i].value); } } document.FORM1.elements('totExtra_optbuy_am').value = membercnt; var tot_curr_am = eval(document.FORM1.elements('old_totCURR_AM').value); document.FORM1.elements('totCURR_AM').value = eval(tot_curr_am + membercnt); return true; } //================================================================================ // 輔助查詢視窗 公用程式區 //================================================================================ //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value function SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures, acct_dr_value) { if ( ! SEL_FRM ) return false; if ( ! RTN_FLD ) RTN_FLD = ""; if ( ! SEL_FLD ) SEL_FLD = "*"; if ( ! SEL_WHR ) SEL_WHR = ""; if ( ! SEL_ORD ) SEL_ORD = ""; if ( ! Multi ) Multi = ""; if ( ! Title ) Title = ""; if ( ! sFeatures ) sFeatures = ""; if ( ! Action || Action == "") Action = "/include/sel_help_main.asp"; // 沒有搜尋介面的輔助視窗 //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value var sURL = ""; if(acct_dr_value == undefined){ sURL = "/include/sel_help_pop.asp?Multi=" + Multi + "&Action=" + Action + "&Title=" + Title + "&RTN_FLD=" + RTN_FLD + "&SEL_FLD=" + SEL_FLD + "&SEL_FRM=" + SEL_FRM + "&SEL_WHR=" + SEL_WHR + "&SEL_ORD=" + SEL_ORD; }else{ sURL = "/include/sel_help_pop.asp?Multi=" + Multi + "&Action=" + Action + "&Title=" + Title + "&RTN_FLD=" + RTN_FLD + "&SEL_FLD=" + SEL_FLD + "&SEL_FRM=" + SEL_FRM + "&SEL_WHR=" + SEL_WHR + "&SEL_ORD=" + SEL_ORD + "&acct_dr_value=" + encodeURI(acct_dr_value); } //window.open(sURL, "", sFeatures); return showModalDialog(sURL, "", sFeatures); } function sel_help_agt(acct_dr_value) { //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=600px;dialogHeight=490px"; var sFeatures = "dialogWidth=600px;dialogHeight=640px"; //window.open("/include/sel_help_pop_agt.asp"); if(acct_dr_value == undefined){ return showModalDialog("/include/sel_help_pop_agt.asp", "", sFeatures); }else{ return showModalDialog("/include/sel_help_pop_agt.asp?acct_dr_value=" + encodeURI(acct_dr_value), "", sFeatures); } } function sel_help_apun() { var RTN_FLD = "TRAPUN.APUN_CD, TRAPUN.APUN_NM, TRAPUN.APUN_ANM"; var SEL_FLD = "TRAPUN.APUN_CD AS '編號', TRAPUN.APUN_NM AS '名稱', TRAPUN.APUN_ANM AS '簡稱'"; var SEL_FRM = "TRAPUN"; var SEL_WHR = ""; var SEL_ORD = "TRAPUN.APUN_CD"; var Action = "/include/sel_help_apun.asp"; var Multi = ""; var Title = "辦證單位" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_car() { var RTN_FLD = "TRCAR.CAR_CD, TRCAR.CAR_CNM, TRCAR.CAR_ANM"; var SEL_FLD = "TRCAR.CAR_CD AS '編號', TRCAR.CAR_CNM AS '名稱', TRCAR.CAR_ANM AS '簡稱'"; var SEL_FRM = "TRCAR"; var SEL_WHR = ""; var SEL_ORD = "TRCAR.CAR_CD"; var Action = "/include/sel_help_car.asp"; var Multi = ""; var Title = "租車公司" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_carr() { var RTN_FLD = "TRCARR.CARR_CD, TRCARR.CARR_NM, TRCARR.CARR_ANM, TRCARR.CARR_ENM"; var SEL_FLD = "TRCARR.CARR_CD AS '編號', TRCARR.CARR_NM AS '名稱', TRCARR.CARR_ANM AS '簡稱', TRCARR.CARR_ENM AS '英文名稱'"; var SEL_FRM = "TRCARR"; var SEL_WHR = ""; var SEL_ORD = "TRCARR.CARR_CD"; var Action = "/include/sel_help_carr.asp"; var Multi = ""; var Title = "航空公司" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=600px;dialogHeight=490px"; var sFeatures = "dialogWidth=600px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value function sel_help_comp(acct_dr_value) { var RTN_FLD = "TRCOMP.COMP_CD, TRCOMP.COMP_NM, TRCOMP.COMP_ANM, TRCOMP.COMP_ENM,TRCOMP.emp_cd,TREMP.emp_cnm,TRCOMP.amrnk"; var SEL_FLD = "TRCOMP.COMP_CD AS '編號', TRCOMP.COMP_NM AS '名稱', TRCOMP.COMP_ANM AS '簡稱', TRCOMP.COMP_ENM AS '英文名稱',(case TRCOMP.STUS_CD when 'N' then '暫停' else '' end) as '往來' "; var SEL_FRM = "TRCOMP left join TREMP on TRCOMP.emp_cd = TREMP.emp_cd"; //2007-03-08 leon add 排除往來狀態=暫停 var SEL_WHR = '';//" TRCOMP.STUS_CD <> 'N' "; //if(acct_dr_value != undefined){ // SEL_WHR = " TRCOMP.COMP_NM like '%"+acct_dr_value+"%' ";//" TRCOMP.STUS_CD <> 'N' "; //} var SEL_ORD = "TRCOMP.COMP_CD"; var Action = "/include/sel_help_comp.asp"; var Multi = ""; var Title = "公司客戶" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=600px;dialogHeight=490px"; var sFeatures = "dialogWidth=600px;dialogHeight=640px"; //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value if(acct_dr_value == undefined){ return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); }else{ return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures, acct_dr_value); } } function sel_help_cruise() { var RTN_FLD = "TRCRUISE.CRUISE_CD, TRCRUISE.CRUISE_CNM, TRCRUISE.CRUISE_ENM"; var SEL_FLD = "TRCRUISE.CRUISE_CD AS '編號', TRCRUISE.CRUISE_CNM AS '名稱', TRCRUISE.CRUISE_ENM AS '英文名稱'"; var SEL_FRM = "TRCRUISE"; var SEL_WHR = ""; var SEL_ORD = "TRCRUISE.CRUISE_CD"; var Action = "/include/sel_help_cruise.asp"; var Multi = ""; var Title = "輪船" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value function sel_help_dept(acct_dr_value) { var RTN_FLD = "TRDEPT.DEPT_CD, TRDEPT.DEPT_NM"; var SEL_FLD = "TRDEPT.DEPT_CD AS '編號', TRDEPT.DEPT_NM AS '名稱'"; var SEL_FRM = "TRDEPT"; var SEL_WHR = ""; //if(acct_dr_value != undefined){ // SEL_WHR = " TRDEPT.DEPT_NM like '%"+acct_dr_value+"%' " //} var SEL_ORD = "TRDEPT.DEPT_CD"; var Action = "/include/sel_help_dept.asp"; var Multi = ""; var Title = "部門" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=500px;dialogHeight=490px"; var sFeatures = "dialogWidth=500px;dialogHeight=640px"; //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value if(acct_dr_value == undefined){ return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); }else{ return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures, acct_dr_value); } } function sel_help_fact() { var RTN_FLD = "TRFACT.FACT_CD, TRFACT.FACT_NM, TRFACT.FACT_ANM"; var SEL_FLD = "TRFACT.FACT_CD AS '編號', TRFACT.FACT_NM AS '名稱', TRFACT.FACT_ANM AS '簡稱'"; var SEL_FRM = "TRFACT"; var SEL_WHR = ""; var SEL_ORD = "TRFACT.FACT_CD"; var Action = "/include/sel_help_fact.asp"; var Multi = ""; var Title = "廠商" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=550px;dialogHeight=490px"; //2008-05-20 Mary sel_help_fact() width 500->550 var sFeatures = "dialogWidth=550px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_htl() { var RTN_FLD = "TRHTL.HTL_CD, TRHTL.HTL_CNM, TRHTL.HTL_ANM, TRHTL.HTL_ENM"; var SEL_FLD = "TRHTL.HTL_CD AS '編號', TRHTL.HTL_CNM AS '名稱', TRHTL.HTL_ANM AS '簡稱', TRHTL.HTL_ENM AS '英文名稱'"; var SEL_FRM = "TRHTL"; var SEL_WHR = ""; var SEL_ORD = "TRHTL.HTL_CD"; var Action = "/include/sel_help_htl.asp"; var Multi = ""; var Title = "飯店" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=600px;dialogHeight=490px"; var sFeatures = "dialogWidth=600px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_locl() { var RTN_FLD = "TRLOCL.LOCL_CD, TRLOCL.LOCL_NM, TRLOCL.LOCL_ANM"; var SEL_FLD = "TRLOCL.LOCL_CD AS '編號', TRLOCL.LOCL_NM AS '名稱', TRLOCL.LOCL_ANM AS '簡稱'"; var SEL_FRM = "TRLOCL"; var SEL_WHR = ""; var SEL_ORD = "TRLOCL.LOCL_CD"; var Action = "/include/sel_help_locl.asp"; var Multi = ""; var Title = "代理公司" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_rest() { var RTN_FLD = "TRREST.REST_CD, TRREST.REST_CNM, TRREST.REST_ENM"; var SEL_FLD = "TRREST.REST_CD AS '編號', TRREST.REST_CNM AS '名稱', TRREST.REST_ENM AS '英文名稱'"; var SEL_FRM = "TRREST"; var SEL_WHR = ""; var SEL_ORD = "TRREST.REST_CD"; var Action = "/include/sel_help_rest.asp"; var Multi = ""; var Title = "餐廳" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_scen() { var RTN_FLD = "TRSCEN.SCEN_CD, TRSCEN.SCEN_CNM, TRSCEN.SCEN_ENM"; var SEL_FLD = "TRSCEN.SCEN_CD AS '編號', TRSCEN.SCEN_CNM AS '名稱', TRSCEN.SCEN_ENM AS '簡稱'"; var SEL_FRM = "TRSCEN"; var SEL_WHR = ""; var SEL_ORD = "TRSCEN.SCEN_CD"; var Action = "/include/sel_help_scens.asp"; var Multi = ""; var Title = "景點" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_pack() { var RTN_FLD = "TRPACK.PACKAGE_CD, TRPACK.PACKAGE_NM"; var SEL_FLD = "TRPACK.PACKAGE_CD AS '編號', TRPACK.PACKAGE_NM AS '名稱'"; var SEL_FRM = "TRPACK"; var SEL_WHR = ""; var SEL_ORD = "TRPACK.PACKAGE_CD"; var Action = "/include/sel_help_pack.asp"; var Multi = ""; var Title = "套旅" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } function sel_help_visa() { var RTN_FLD = " TRVISA.VISA_CD, TRVISA.VISA_NM, TRVISA.NATN_CD, TRVISA.HOLDNATN_CD, (CASE TRVISA.APPLY_TP WHEN 1 THEN '簽證' ELSE (CASE TRVISA.APPLY_TP WHEN '2' THEN '護照' ELSE '' END ) END ) AS APPLY_TP, (CAST(VLDE_YY AS nvarchar(2)) + '/' + CAST(VLDE_MM AS nvarchar(2)) +'/' + CAST(VLDE_DD AS nvarchar(3))) AS VLDE_DT " ; var SEL_FLD = " TRVISA.VISA_CD AS '代碼', TRVISA.VISA_NM AS '名稱', (Select TRNATN.NATN_CD + ' ' + (Case NATN_CNM When '' Then NATN_ENM Else NATN_CNM End) From TRNATN Where TRNATN.NATN_CD = TRVISA.NATN_CD) AS '所屬國家', (CASE VLDE_DD WHEN 0 THEN (CASE VLDE_YY WHEN 0 THEN '' ELSE CAST(VLDE_YY AS nvarchar(2)) + '年' END) + (CASE VLDE_MM WHEN 0 THEN '' ELSE CAST(VLDE_MM AS nvarchar(2)) + '月' END) ELSE CAST(VLDE_DD AS nvarchar(3)) + '天' END ) AS '簽證效期' " ; var SEL_FRM = "TRVISA"; var SEL_WHR = ""; var SEL_ORD = "TRVISA.VISA_CD"; var Action = "/include/sel_help_visa.asp"; var Multi = ""; var Title = "證照" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } //2007-06-08 leon add 搜尋導遊 function sel_help_tldr() { var RTN_FLD = "TRTLDR.TLDR_CD, TRTLDR.TLDR_CNM"; var SEL_FLD = "TRTLDR.TLDR_CD AS '編號', TRTLDR.TLDR_CNM AS '名稱'"; var SEL_FRM = "TRTLDR"; var SEL_WHR = ""; var SEL_ORD = "TRTLDR.TLDR_CD"; var Action = "/include/sel_help_tldr.asp"; var Multi = ""; var Title = "導遊" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=530px;dialogHeight=490px"; var sFeatures = "dialogWidth=530px;dialogHeight=640px"; return SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); } //2007-07-24 leon add 新增臨時帳號 function sel_help_tmpacct() { return showModalDialog("/include/search_help.asp?strURL=/include/N_tmpacct.asp", "search", "dialogWidth=200pt;dialogHeight=230pt;scroll:-Off;status:-Off;help:no"); } //----------------------------------------------------------------- //20070321 Sam 增加往來狀態搜尋 //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value function sel_trpax(cd, nm, s_title,emp_cd,emp_cnm,amrnk,acct_dr,acct_dr_value) { //2009-04-21 [Ham] 修改 抓不到中文姓名時, 改抓英文姓名 //var RTN_FLD = "TRPAX.PAX_CD, ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, ''),TRPAX.EMP_CD, TREMP.EMP_CNM, TRPAX.AMRNK"; var RTN_FLD = "TRPAX.PAX_CD, (case ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '') when '' then ISNULL(TRPAX.PAX_ENML, '') + ' ' + ISNULL(TRPAX.PAX_ENMF, '') else ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '') end),TRPAX.EMP_CD, TREMP.EMP_CNM, TRPAX.AMRNK"; var SEL_FLD = "'' + TRPAX.PAX_CD + '' AS '旅客編號', TRPAX.ID_NO AS '證號', ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '') AS '中文姓名', PAX_TI AS '稱謂', ISNULL(TRPAX.PAX_ENML, '') + ' ' + ISNULL(TRPAX.PAX_ENMF, '') AS '英文姓名', TRPAX.BRTH_DT AS '出生日期', TREMP.EMP_CNM '業務員', TRCOMP.COMP_NM AS '公司全名'"; SEL_FLD += ",(case TRPAX.stus_cd when 'N' then '暫停' else '' end) as '往來'"; // 2006-10-03 [Afon] 調整sel_trpax() 排除 SQL 2005 不支援 *=、=*，調整為 LEFT JOIN、RIGHT JOIN // var SEL_FRM = "TRPAX, TREMP, TRCOMP"; // var SEL_WHR = "TRPAX.EMP_CD *= TREMP.EMP_CD AND TRPAX.COMP_CD *= TRCOMP.COMP_CD"; var SEL_FRM = "TRPAX LEFT JOIN TREMP ON TRPAX.EMP_CD = TREMP.EMP_CD LEFT JOIN TRCOMP ON TRPAX.COMP_CD = TRCOMP.COMP_CD " ; // 2007-03-08 [Leon] 調整排除往來狀態=暫停的旅客 var SEL_WHR = '';//"TRPAX.STUS_CD<>'N' " ; //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value //if(acct_dr_value != undefined){ // SEL_WHR = " (isnull(TRPAX.PAX_CNML,'') + isnull(TRPAX.PAX_CNMF,'')) like '%" + acct_dr_value + "%' " //} var SEL_ORD = "TRPAX.PAX_CD"; var Action = "/include/sel_help_pax.asp"; var Multi = ""; var Title = "旅客"; //2006-08-10 [Afon] 原視窗 高為540 改為 500 //2008-05-13 Mary height 500 -> 505 //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=750px;dialogHeight=510px"; var sFeatures = "dialogWidth=750px;dialogHeight=660px"; //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value var strpax; if(acct_dr_value == undefined){ strpax = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); }else{ strpax = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures, acct_dr_value); } if (strpax) { //20070426 Sam if (typeof(cd) != 'undefined') document.FORM1.elements(cd).value = strpax[0][0]; //20070426 Sam if (typeof(nm) != 'undefined') document.FORM1.elements(nm).value = strpax[0][1]; //20070417 業務代碼 if (typeof(emp_cd) != 'undefined' && strpax[0][2].replace(' ','') != '') { emp_cd.value = strpax[0][2]; } //20070417 業務名稱 if (typeof(emp_cnm) != 'undefined' && strpax[0][2].replace(' ','') != '') { emp_cnm.value = strpax[0][3]; } //20070417 價格等級 if (typeof(amrnk) != 'undefined') { valAmrnk = eval(strpax[0][4]); if (eval(amrnk.length) >= valAmrnk && valAmrnk > 0) { amrnk[valAmrnk-1].checked = true; amrnk[valAmrnk-1].onclick(); } } //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = strpax[0][1]; } } /* ----------------------------------------------------------------------------------- var search = sel_search(s_title); if (search) { var ary_search = search.split('，'); var strpax = ''; if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; strpax = sel_userpax('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; strpax = sel_userpax('S', sh_name, sh_code); } if (strpax) { var ary_userpax= strpax.split('，'); if (ary_userpax.length > 0) { pax_cd = ary_userpax[0]; pax_cnm = ary_userpax[1]; document.FORM1.elements(cd).value=pax_cd; document.FORM1.elements(nm).value=pax_cnm; } } } } return; ----------------------------------------------------------------------------------- */ } //==================2006.05.23 查詢原系統編號， for 我的旅行社================ function sel_trpax_wonder(cd, nm, s_title) { var RTN_FLD = "TRPAX.OPAX_CD, ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '')"; var SEL_FLD = "TRPAX.OPAX_CD AS '旅客編號', TRPAX.ID_NO AS '證號', ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '') AS '中文姓名', PAX_TI AS '稱謂', ISNULL(TRPAX.PAX_ENML, '') + ' ' + ISNULL(TRPAX.PAX_ENMF, '') AS '英文姓名', TRPAX.BRTH_DT AS '出生日期', TREMP.EMP_CNM AS '業務員', TRCOMP.COMP_NM AS '公司全名'"; var SEL_FRM = "TRPAX, TREMP, TRCOMP"; var SEL_WHR = "TRPAX.EMP_CD *= TREMP.EMP_CD AND TRPAX.COMP_CD *= TRCOMP.COMP_CD AND TRPAX.OPAX_CD IS NOT NULL AND TRPAX.OPAX_CD <> ''"; var SEL_ORD = "TRPAX.OPAX_CD"; var Action = "/include/wonder_sel_help_pax.asp"; var Multi = ""; var Title = "旅客"; var sFeatures = "dialogWidth=750px;dialogHeight=540px"; var strpax = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); if (strpax) { document.FORM1.elements(cd).value = strpax[0][0]; document.FORM1.elements(nm).value = strpax[0][1]; } } //===================================================================================================== function sel_emp(empcd, empnm, deptcd, deptnm, compcd, compnm, s_title) // 選擇員工清單(新版 2006-03-28) { var RTN_FLD = "TREMP.EMP_CD, TREMP.EMP_CNM, TRDEPT.DEPT_CD, TRDEPT.DEPT_NM, TRDSYS.COMP_CD, TRDSYS.COMP_ANM"; var SEL_FLD = "'' + TREMP.EMP_CD + '' AS '員工代碼', TRDSYS.COMP_ANM AS '分公司', TRDEPT.DEPT_NM AS '部門', TREMP.EMP_CNM AS '員工姓名', "; SEL_FLD += "(CASE ISNULL( (SELECT TREMP.OUT_DT WHERE LTRIM(REPLACE(ISNULL(TREMP.OUT_DT, ''), '/', '')) <> '' AND TREMP.OUT_DT < (CONVERT(CHAR(4), YEAR(GETDATE())) + '/' + RIGHT('0' + RTRIM(CONVERT(CHAR(2), MONTH(GETDATE()))), 2) + '/' + RIGHT('0' + RTRIM(CONVERT(CHAR(2), DAY(GETDATE()))), 2))) , '') WHEN '' THEN '' ELSE '' END) AS '已離職'"; var SEL_FRM = "TREMP, TRDSYS, TRDEPT"; var SEL_WHR = "TREMP.COMP_CD = TRDSYS.COMP_CD AND TREMP.DEPT_CD = TRDEPT.DEPT_CD"; var SEL_ORD = "TREMP.EMP_CD" var Action = "/include/sel_help_emp.asp"; var Multi = ""; var Title = "員工"; //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=520px;dialogHeight=490px"; var sFeatures = "dialogWidth=520px;dialogHeight=640px"; var ary_emp = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); if (ary_emp) { if(empcd){FORM1.elements(empcd).value = ary_emp[0][0];} if(empnm){FORM1.elements(empnm).value = ary_emp[0][1];} if(deptcd){FORM1.elements(deptcd).value = ary_emp[0][2];} if(deptnm){FORM1.elements(deptnm).value = ary_emp[0][3];} if(compcd){FORM1.elements(compcd).value = ary_emp[0][4];} if(compcd){FORM1.elements(compnm).value = ary_emp[0][5];} } /* ----------------------------------------------------------------------------------- var search = sel_search(s_title); if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var stremp = sel_emplist('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var stremp = sel_emplist('S', sh_name, sh_code); } if (stremp) { //alert(stremp); var ary_emp= stremp.split('，'); if (ary_emp.length > 0) { FORM1.elements(empcd).value = ary_emp[0]; FORM1.elements(empnm).value = ary_emp[1]; FORM1.elements(deptcd).value = ary_emp[2]; FORM1.elements(deptnm).value = ary_emp[3]; FORM1.elements(compcd).value = ary_emp[4]; FORM1.elements(compnm).value = ary_emp[5]; } } } } ----------------------------------------------------------------------------------- */ } //===================================================================================================== function sel_emp_multi(empcd, empnm, deptcd, deptnm, compcd, compnm, s_title) // 選擇員工清單(新版 2006-03-28) { var RTN_FLD = "TREMP.EMP_CD, TREMP.EMP_CNM, TRDEPT.DEPT_CD, TRDEPT.DEPT_NM, TRDSYS.COMP_CD, TRDSYS.COMP_ANM"; var SEL_FLD = "'' + TREMP.EMP_CD + '' AS '員工代碼', TRDSYS.COMP_ANM AS '分公司', TRDEPT.DEPT_NM AS '部門', TREMP.EMP_CNM AS '員工姓名', "; SEL_FLD += "(CASE ISNULL( (SELECT TREMP.OUT_DT WHERE LTRIM(REPLACE(ISNULL(TREMP.OUT_DT, ''), '/', '')) <> '' AND TREMP.OUT_DT < (CONVERT(CHAR(4), YEAR(GETDATE())) + '/' + RIGHT('0' + RTRIM(CONVERT(CHAR(2), MONTH(GETDATE()))), 2) + '/' + RIGHT('0' + RTRIM(CONVERT(CHAR(2), DAY(GETDATE()))), 2))) , '') WHEN '' THEN '' ELSE '' END) AS '已離職'"; var SEL_FRM = "TREMP, TRDSYS, TRDEPT"; var SEL_WHR = "TREMP.COMP_CD = TRDSYS.COMP_CD AND TREMP.DEPT_CD = TRDEPT.DEPT_CD"; var SEL_ORD = "TREMP.EMP_CD" var Action = "/include/sel_help_emp.asp"; var Multi = "1"; var Title = "員工"; //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=520px;dialogHeight=490px"; var sFeatures = "dialogWidth=520px;dialogHeight=640px"; var ary_emp = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); if (ary_emp) { if(empcd){FORM1.elements(empcd).value = ary_emp[0][0];} if(empnm){FORM1.elements(empnm).value = ary_emp[0][1];} if(deptcd){FORM1.elements(deptcd).value = ary_emp[0][2];} if(deptnm){FORM1.elements(deptnm).value = ary_emp[0][3];} if(compcd){FORM1.elements(compcd).value = ary_emp[0][4];} if(compcd){FORM1.elements(compnm).value = ary_emp[0][5];} } } function sel_subcd(valsubcd, subcd, subdr, compcd, seltype) // 選擇帳款科目清單(新版 2006-05-03) { var RTN_FLD = " SUB_CD, SUB_DR "; var SEL_FLD = " '
' + SUB_CD + '
' AS '帳款科目', '
' + SUB_DR + '
' AS '摘要'"; // var SEL_FRM = ""; ' (sel_help_pop_subcd.asp ) 判斷所屬部門的分公司科目檔 var SEL_WHR = ""; var SEL_ORD = " SUB_CD " var Action = "/include/sel_help_subcd.asp"; var Title = "帳款科目"; var Multi = ""; //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=490px;dialogHeight=490px"; var sFeatures = "dialogWidth=490px;dialogHeight=640px"; if ( ! valsubcd) valsubcd = ""; if ( ! subdr ) subdr = ""; if ( ! compcd ) compcd = ""; if ( seltype ) seltype = seltype.toUpperCase(); else seltype = ""; switch (seltype) { case "K": SEL_WHR = " CORD_SUB_FG = 1 " break; case "C": SEL_WHR = " KORD_FG = 1 " break; case "KETRY": SEL_WHR = " KORD_FG IS NOT NULL AND KORD_FG = 1 " break; default: if ( subcd ) subcd = subcd.toUpperCase(); else subcd = ""; switch (subcd) { case "C": SEL_WHR = " ( SUB_CD NOT LIKE 'Z%' OR SUB_CD = (SELECT CRECFEE_SUB_CD FROM TRSYS) ) "; break; default: SEL_WHR = " SUB_CD NOT LIKE 'Z%' "; break; } } var sURL = "/include/sel_help_pop_subcd.asp?Action=" + Action + "&Title=" + Title + "&Multi=" + Multi + "&COMP_CD=" + compcd + "&RTN_FLD=" + RTN_FLD + "&SEL_FLD=" + SEL_FLD + "&SEL_WHR=" + SEL_WHR + "&SEL_ORD=" + SEL_ORD; var ary_subcd = showModalDialog(sURL, "", sFeatures); if (ary_subcd) { document.FORM1.elements(subcd).value = ary_subcd[0][0]; document.FORM1.elements(subdr).value = ary_subcd[0][1]; } /* ----------------------------------------------------------------------------------- var getResult = sel_search(); if(getResult) { rsArray = getResult.split('，'); sub_cd = rsArray[1]; sub_dr = rsArray[2]; mysubcd = showModalDialog("/include/sel_subcd.asp?subcd="+sub_cd+"&subdr="+sub_dr+"&compcd="+compcd+"&seltype="+seltype+"&chice=H","","dialogWidth=260pt;dialogHeight=" + pblDialogHeight + "pt"); if (mysubcd) { var ary_subcd = mysubcd.split('，'); document.FORM1.elements(subcd).value = ary_subcd[0]; document.FORM1.elements(subdr).value = ary_subcd[1]; } } ----------------------------------------------------------------------------------- */ } //------------------------------------------------------------------------------------ // 2001214 Sam 新增 // 國家搜尋 新版 配合 sel_natn_search() 使用, 可複選, 可單搜尋已選國家 //------------------------------------------------------------------------------------ //2011-12-29 [art] 新增限制參數回傳資料 //function sel_natn(areacd, natncd, Multi) // 選擇 function sel_natn(areacd, natncd, Multi,count_rd) // 選擇 { var Action = "/include/sel_help_natn.asp"; var sFeatures; if (! Multi) Multi = "" if(!areacd){areacd="";} if (areacd != "") { while (areacd.indexOf("/") > 0) areacd = areacd.replace("/", "','"); areacd = "'" + areacd + "'"; } if(!natncd){natncd="";} if (natncd != "") { while (natncd.indexOf("/") > 0) natncd = natncd.replace("/", "','"); natncd = "'" + natncd + "'"; } Multi = Multi.toUpperCase(); if (Multi == "Y") //2008-09-03 [Ham] 修改高度 //sFeatures = "dialogWidth=530px;dialogHeight=520px"; sFeatures = "dialogWidth=530px;dialogHeight=670px"; else //2008-09-03 [Ham] 修改高度 //sFeatures = "dialogWidth=530px;dialogHeight=490px"; sFeatures = "dialogWidth=530px;dialogHeight=640px"; //2011-12-29 [art] 新增判斷有無限制參數，帶入連結 if (count_rd!="") { var sURL = "/include/sel_help_pop_natn.asp?COUNT_RD=" + count_rd + "&Multi=" + Multi + "&Action=" + Action + "&NATN_CD=" + natncd + "&AREA_CD=" + areacd; } else { var sURL = "/include/sel_help_pop_natn.asp?Multi=" + Multi + "&Action=" + Action + "&NATN_CD=" + natncd + "&AREA_CD=" + areacd; } //var sURL = "/include/sel_help_pop_natn.asp?Multi=" + Multi + "&Action=" + Action + "&NATN_CD=" + natncd + "&AREA_CD=" + areacd; return showModalDialog(sURL, "", sFeatures); } //--------------------------------------------------------------------------------- // 2007-04-04 Hamburger 修改城市搜尋清單sel_city: 參數未定義時預設為空值 //--------------------------------------------------------------------------------- function sel_city(areacd, natncd, citycd, Multi) // 選擇城市清單(新版 2006-05-12) { var Action = "/include/sel_help_city.asp"; var sFeatures; if (! Multi) Multi = "" //=== 2007-04-04 hamburger 新增判斷 === if(!areacd){areacd="";} //===================================== if (areacd != "") { while (areacd.indexOf("/") > 0) areacd = areacd.replace("/", "','"); areacd = "'" + areacd + "'"; } //=== 2007-04-04 hamburger 新增判斷 === if(!natncd){natncd="";} //===================================== if (natncd != "") { while (natncd.indexOf("/") > 0) natncd = natncd.replace("/", "','"); natncd = "'" + natncd + "'"; } if (citycd != "") { while (citycd.indexOf("/") > 0) citycd = citycd.replace("/", "','"); citycd = "'" + citycd + "'"; } Multi = Multi.toUpperCase(); if (Multi == "Y") //2008-09-03 [Ham] 修改高度 //sFeatures = "dialogWidth=530px;dialogHeight=520px"; sFeatures = "dialogWidth=530px;dialogHeight=670px"; else //2008-09-03 [Ham] 修改高度 //sFeatures = "dialogWidth=530px;dialogHeight=490px"; sFeatures = "dialogWidth=530px;dialogHeight=640px"; var sURL = "/include/sel_help_pop_city.asp?Multi=" + Multi + "&Action=" + Action + "&CITY_CD=" + citycd + "&NATN_CD=" + natncd + "&AREA_CD=" + areacd; return showModalDialog(sURL, "", sFeatures); } // ================================================================================ // 新增 IFRAME 取得欄位的公用程式區 // ================================================================================ // // 2009-10-02 Vanessa 加上sTYPE,usrCOMP_CD(登入者的分公司代碼) function get_select_iframe(SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, RTN_JSC, FORM_NM,sTYPE,usrCOMP_CD) { var FORMHTML = ""; var FORMNAME, IFRAMENM; if ( ! SEL_FRM ) return false; if ( ! SEL_FLD ) SEL_FLD = "*"; if ( ! SEL_WHR ) SEL_WHR = ""; if ( ! SEL_ORD ) SEL_ORD = ""; if ( ! RTN_JSC ) RTN_JSC = ""; FORMNAME = FORM_NM + "_FORM"; IFRAMENM = FORM_NM + "_IFRAME"; var objForm = document.forms[FORMNAME]; if ( objForm ) { objForm.SEL_FLD.value = SEL_FLD; objForm.SEL_FRM.value = SEL_FRM; objForm.SEL_WHR.value = SEL_WHR; objForm.SEL_ORD.value = SEL_ORD; objForm.RTN_JSC.value = RTN_JSC; } else { FORMHTML += "
"; FORMHTML += ""; FORMHTML += ""; FORMHTML += ""; FORMHTML += ""; FORMHTML += ""; // 2009-10-01 Vanessa FORMHTML += ""; FORMHTML += ""; // ------------------------------------------------------------------------ FORMHTML += "
"; } if ( ! self.frames[IFRAMENM]) { FORMHTML += ""; } //[Jack][wm.v902.429.U] submit之前,要先清空所有 iframe(tmpIframeID_開頭的divNM) 的 innerHTML ! lo_div=document.getElementsByTagName("DIV"); //alert(lo_div.length); for (i=0;i"; } document.forms[FORMNAME].submit(); } // ----------------------------------------------------------------------------------- // 取得系列別 [使用取得欄位的公用程式] // ----------------------------------------------------------------------------------- //2008-10-22 Sam 修正國旅團線別 TRWORD.CLS_CD = 'BITN_GD' function get_garea_bitn(GAREA_CD_VAL, SEL_BITN_CD, BITN_CD_DEF) { var objElement = document.FORM1.elements(SEL_BITN_CD); if ( ! BITN_CD_DEF ) BITN_CD_DEF = ""; for (var i=objElement.options.length-1; i>0; i--) objElement.options[i] = null; if (GAREA_CD_VAL == "") { objElement.options[0] = new Option(" -- -- ", ""); } else { var FORM_NM = SEL_BITN_CD; objElement.options[0] = new Option("Loading ..", ""); var SEL_FLD = "TRWORD.CHIN_WD, TRWORD.DATA_VALUE"; var SEL_FRM = "TRWORD, TRGAREABITN"; //var SEL_WHR = "TRWORD.DATA_VALUE = TRGAREABITN.BITN_CD AND ISNULL(TRWORD.VALID_FG, 0) = 1 AND TRWORD.CLS_CD = 'BITN_GO' AND TRGAREABITN.GAREA_CD = '" + GAREA_CD_VAL + "'"; var SEL_WHR = "TRWORD.DATA_VALUE = TRGAREABITN.BITN_CD AND ISNULL(TRWORD.VALID_FG, 0) = 1 AND TRWORD.CLS_CD = 'BITN_'+ TRGAREABITN.SUB_CD AND TRGAREABITN.GAREA_CD = '" + GAREA_CD_VAL + "'"; var SEL_ORD = "TRWORD.DATA_VALUE"; var FORM_NM = SEL_BITN_CD; var RTN_JSC; RTN_JSC = " var objElement = parent.document.FORM1.elements('" + SEL_BITN_CD + "'); \n"; RTN_JSC += " \n"; RTN_JSC += " objElement.options[0] = new Option('-- --', ''); \n"; RTN_JSC += " \n"; RTN_JSC += " if (RecAry) \n"; RTN_JSC += " { \n"; RTN_JSC += " for (var i=0; i10) return "您的身分證字號超過10個字 !\n"; if(myid.length<10) return "您的身分證字號不滿10個字 !\n"; var c = myid.charAt(0); if(c<"A" || c> "Z") return "您的身分證字號第一碼必須是大寫的英文字母 !\n"; c = myid.charAt(1); if(c!="1" && c!="2") return "您的身分證字號第二碼有問題 !\n"; for(i=1;i<10;i++) if(isNaN(parseFloat(myid.charAt(i)))) return "您的身分證字號第二到十碼有問題 !\n"; var alph = new Array("A","B","C","D","E","F","G","H","J","K","L","M","N","P","Q","R","S","T","U","V","X","Y","W","Z","I","O"); var num = new Array("10","11","12","13","14","15","16","17","18","19","20","21","22","23","24","25","26","27","28","29","30","31","32","33","34","35"); var n=0; for(i=0;i 1 ){ mypaxinfocd = ary_paxinfo[0]; mypaxinfonm = ary_paxinfo[1]; } document.FORM1.PAX_SQ.value = mypaxinfocd; document.FORM1.PAX_CNM.value = mypaxinfonm; } return; } //----------------------------------------------------------------- // 選取 訂單中之 交易 //----------------------------------------------------------------- function sel_order_trans(op_sq, bed_tp) { var pax_sq = document.FORM1.PAX_SQ.value; trans_str = showModalDialog("/include/sel_order_trans.asp?pax_sq="+pax_sq+"&op_sq="+op_sq+"&bed_tp="+bed_tp+"&chice=H","","dialogTop=10pt;dialogWidth=350pt;dialogHeight=400pt;status=no;help=no"); if (trans_str) { var ary_trans_str = trans_str.split('，'); if (ary_trans_str.length > 1 ){ mypax_sq = ary_trans_str[0]; mypax_cd = ary_trans_str[1]; mypax_cnm = ary_trans_str[2]; mytrans_sq = ary_trans_str[3]; mysub_dr = ary_trans_str[4]; mytrans_tp = ary_trans_str[5]; mytrans_tpnm = ary_trans_str[6]; mytrans_am = ary_trans_str[7]; } document.FORM1.PAX_SQ.value = mypax_sq; document.FORM1.PAX_CD.value = mypax_cd; document.FORM1.PAX_CNM.value = mypax_cnm; document.FORM1.TRANS_SQ.value = mytrans_sq; document.FORM1.SUB_DR.value = mysub_dr; document.FORM1.TRANS_TP.value = mytrans_tp; document.FORM1.TRANS_TP_NM.value = mytrans_tpnm; document.FORM1.AR_AM.value = mytrans_am; } return; } //----------------------------------------------------------------- // 選取 訂單中之 附加項目 ( TRANS_TP = M ) //----------------------------------------------------------------- function sel_order_msln(grup_cd, tp, modify, amrnk, msln_cd) { var prodcd = document.FORM1.PROD_CD.value; if (!modify || modify == undefined) { modify == '' ; } if (!amrnk || amrnk == 'undefined') { amrnk == '' ; } //2008-08-29 [Ham] 修改流程, 不再顯示 sel_search(), 改為在 sel_order_msln1.asp 中可輸入查詢條件 /*if (msln_cd) { searchStr = '，' + msln_cd + '，'; } else { searchStr = sel_search(); } if(searchStr) { searchStrArray = searchStr.split('，'); searchCD = searchStrArray[1]; searchCNM = searchStrArray[2]; */ searchCD = ""; searchCNM = ""; //prod = showModalDialog("/include/sel_order_msln.asp?prod_cd="+searchCD+"&prod_nm="+searchCNM+"&grup_cd="+grup_cd+"&amrnk="+amrnk+"&tp="+tp+"&chice=H","","dialogTop=10pt;dialogWidth=400pt;dialogHeight=330pt;status=no;help=no"); prod = showModalDialog("/include/sel_order_msln1.asp?prod_cd="+searchCD+"&prod_nm="+searchCNM+"&grup_cd="+grup_cd+"&amrnk="+amrnk+"&tp="+tp+"&chice=H","","dialogTop=10pt;dialogWidth=400pt;dialogHeight=425pt;status=no;help=no"); if (prod) { var ary_prod = prod.split('，'); if (ary_prod.length > 1 ){ myprodcd = ary_prod[0]; myprodnm = ary_prod[1]; myprodam = ary_prod[2]; } // '20080114 By Calvin 指定"A0001"可輸入 if (document.all("iWeb_ID")) { if (document.all("iWeb_ID").value=="goto"||document.all("iWeb_ID").value=="gloriatour") { //var tmpval = itemCD.value; if (myprodcd == 'A0001') { document.all("PROD_NM").readOnly = false; } else { document.all("PROD_NM").readOnly = true; } } } document.FORM1.PROD_CD.value = myprodcd; //2007-12-24 [Ham] 產品代碼不變時, 產品名稱不更新 if(myprodcd != prodcd){ document.FORM1.PROD_NM.value = myprodnm; } if (modify == '') { document.FORM1.AR_AM.value = myprodam; } } return; //} } //----------------------------------------------------------------- // 選取 訂單中之 自費行程 ( TRANS_TP = P ) //----------------------------------------------------------------- function sel_order_mchg(grup_cd, bed_tp, modify) { var prodcd = document.FORM1.PROD_CD.value; if (modify == undefined) { modify == '' ; } searchStr = sel_search(); if(searchStr) { searchStrArray = searchStr.split('，'); searchCD = searchStrArray[1]; searchCNM = searchStrArray[2]; prod = showModalDialog("/include/sel_order_mchg.asp?prod_cd="+searchCD+"&prod_nm="+searchCNM+"&grup_cd="+grup_cd+"&bed_tp="+bed_tp+"&chice=H","","dialogTop=10pt;dialogWidth=300pt;dialogHeight=250pt;status=no;help=no"); if (prod) { var ary_prod = prod.split('，'); if (ary_prod.length > 1 ){ myprodcd = ary_prod[0]; myprodnm = ary_prod[1]; myprodam = ary_prod[2]; } document.FORM1.PROD_CD.value = myprodcd; document.FORM1.PROD_NM.value = myprodnm; if (modify == '') { document.FORM1.AR_AM.value = myprodam; } if (document.FORM1.PROD_NM2) { document.FORM1.PROD_NM2.value = myprodcd + " " + myprodnm ; } } return; } } //----------------------------------------------------------------- // 選取 訂單中之 簽證資料 ( TRANS_TP = V ) , add visa_cd //2008-05-30 Sam 成本增加應付帳號參數 //2008-08-29 [Ham] 無證照代碼時, 不再出現 sel_search() 查詢視窗 //2008-09-09 Sam 訂單應收帳號 判斷同業價顯示 //2008-09-16 Sam 沒有設定成本時可以使用新增成本功能 //----------------------------------------------------------------- function sel_order_visa(grup_cd, amrnk, modify, visa_cd) { var prodcd = document.FORM1.PROD_CD.value; // 選洲別 var myarea; var str_area_cd=''; var str_area_nm=''; //2008-08-29 [Ham] 修改 //if (!modify || modify == 'undefined') { modify == '' ; } //if (!amrnk || amrnk == 'undefined') { amrnk == '' ; } if (!modify || modify == 'undefined') { modify = '' ; } if (!amrnk || amrnk == 'undefined') { amrnk = '' ; } //2008-08-29 [Ham] 無證照代碼時, 不再出現 sel_search() 查詢視窗 if (!visa_cd || visa_cd == 'undefined') { visa_cd = '' ; } //if (visa_cd) { // searchStr = '，' + visa_cd + '，'; //} else { // searchStr = sel_search(); //} //if(searchStr) { //searchStrArray = searchStr.split('，'); //searchCD = searchStrArray[1]; //searchCNM = searchStrArray[2]; searchCD = visa_cd; searchCNM = ''; var url = "/include/sel_order_visa.asp?prod_cd=" + searchCD + "&grup_cd=" + grup_cd + "&prod_nm=" + searchCNM + "&amrnk=" + amrnk + "&chice=H"; //2008-09-03 [Ham] 修改高度 //prod = window.showModalDialog("/include/sel_order_visa.asp?prod_cd="+searchCD+"&grup_cd="+grup_cd+"&prod_nm="+searchCNM+"&amrnk="+amrnk+"&chice=H","visa","dialogTop=10pt;dialogWidth=380pt;dialogHeight=350pt;status=no;help=no"); prod = window.showModalDialog(url, "visa", "dialogLeft=300pt;dialogTop=20pt;dialogWidth=450pt;dialogHeight=440pt;status=no;help=no"); //prod = window.open(url, "visa", ""); if (prod) { var ary_prod = prod.split('，'); if (ary_prod.length > 1 ){ myprodcd = ary_prod[0]; myprodnm = ary_prod[1]; myprodam = ary_prod[2]; myprodsq = ary_prod[3]; mynatncd = ary_prod[4]; myvldeyy = ary_prod[5]; myvldemm = ary_prod[6]; myvldedd = ary_prod[7]; myacct_nop = ary_prod[8]; //2008-05-30 Sam 增加回傳ACCT_NOP //2008-09-08 Sam 新增辦件 成本資料 myacct_nm = ary_prod[9]; myap_am = ary_prod[10]; mycurr_cd = ary_prod[11]; mycurr_nm = ary_prod[12]; myrate_nt = ary_prod[13]; } //2008-05-30 Sam 增加件查藍位是否存在 if (typeof(document.FORM1.PROD_CD) != 'undefined') document.FORM1.PROD_CD.value = myprodcd; if (typeof(document.FORM1.PROD_NM) != 'undefined') document.FORM1.PROD_NM.value = myprodnm; if (typeof(document.FORM1.NATN_CD) != 'undefined') document.FORM1.NATN_CD.value = mynatncd; if (typeof(document.FORM1.VLDE_YY) != 'undefined') document.FORM1.VLDE_YY.value = myvldeyy; if (typeof(document.FORM1.VLDE_MM) != 'undefined') document.FORM1.VLDE_MM.value = myvldemm; if (typeof(document.FORM1.VLDE_DD) != 'undefined') document.FORM1.VLDE_DD.value = myvldedd; if (modify == '') { if (typeof(document.FORM1.AR_AM) != 'undefined') document.FORM1.AR_AM.value = myprodam; //2008-05-30 Sam 增加 ACCT_NOP if (typeof(document.FORM1.SUBD_SQ) != 'undefined') document.FORM1.SUBD_SQ.value = myprodsq; //if (typeof(document.FORM1.ACCT_NOP) != 'undefined') document.FORM1.ACCT_NOP.value = myacct_nop; //2008-09-16 Sam 有成本才停用新增成本功能 if (myprodsq == '' || myprodsq == '0') { document.getElementById("TAB_order_cst_all").style.display = ''; } else { if (typeof(document.FORM1.NET_ACCT_NO) != 'undefined') document.FORM1.NET_ACCT_NO.value =''; if (typeof(document.FORM1.NET_DEPT_COST_AM) != 'undefined') document.FORM1.NET_DEPT_COST_AM.value =''; document.getElementById("TAB_order_cst_all").style.display = 'none'; } } //只有越南簽證需要先輸入效期 if (document.FORM1.NATN_CD.value == 'VI' && document.FORM1.PAX_DR.value !='') { VLD.style.display = 'block'; //簽證效期起日 = 入境日期 if (document.FORM1.ARR_DT.value != '' && document.FORM1.VLDB_DT.value == '') document.FORM1.VLDB_DT.value = document.FORM1.ARR_DT.value; //如過有帶入效期 自動計算迄日 var vDate = new Date(document.FORM1.VLDB_DT.value); var vYear = vDate.getFullYear(); var vMonth = vDate.getMonth()+1; var vDay = vDate.getDate(); if (document.FORM1.VLDE_YY.value != '') vYear += FunChkNumber(document.FORM1.VLDE_YY.value); if (document.FORM1.VLDE_MM.value != '') vMonth += FunChkNumber(document.FORM1.VLDE_MM.value); if (document.FORM1.VLDE_DD.value != '') vDay += FunChkNumber(document.FORM1.VLDE_DD.value); var vDate = new Date(vYear +'/' + vMonth + '/' + vDay); document.FORM1.VLDE_DT.value = vDate.getFullYear() + '/' + (vDate.getMonth()+1) + '/' + vDate.getDate(); document.FORM1.VLDE_DT.value = splitDate(document.FORM1.VLDE_DT); } else { VLD.style.display = 'none'; } } return; //} } //----------------------------------------------------------------- // 檢查數字型態 Yes 轉成數字型態 No = 0 //----------------------------------------------------------------- function FunChkNumber(val) { if (!isNaN(val)) val = parseInt(val); else val = 0 ; return val; } //----------------------------------------------------------------- // 選取 訂單中之 機位 ( TRANS_TP = M ) //----------------------------------------------------------------- function sel_order_qt(grup_cd) { var prodcd = document.FORM1.PROD_CD.value; prod = showModalDialog("/include/sel_order_qt.asp?prod_cd="+prodcd+"&grup_cd="+grup_cd+"&chice=H","","dialogTop=10pt;dialogWidth=400pt;dialogHeight=250pt;status=no;help=no"); if (prod) { var ary_prod = prod.split('，'); if (ary_prod.length > 1 ){ myprodcd = ary_prod[0]; myprodnm = ary_prod[1]; myprodam = ary_prod[2]; } document.FORM1.PROD_CD.value = myprodcd; document.FORM1.PROD_NM.value = myprodnm; document.FORM1.AR_AM.value = myprodam; } return; } //----------------------------------------------------------------- // 選取 訂單中之 租車公司名稱 //2008-09-09 Sam 增加傳入訂單應收判斷是否為同業 //2008-09-16 Sam 沒有設定成本時可以使用新增成本功能 //----------------------------------------------------------------- function sel_order_car(grup_cd, modify, amrnk, car_cd) { var prodcd = document.FORM1.PROD_CD.value; if (modify == undefined) { modify == '' ; } //2008-08-29 [Ham] 修改流程, 不再顯示 sel_search(), 改為在 sel_order_car1.asp 中可輸入查詢條件 //searchStr = sel_search(); if (!car_cd || car_cd == 'undefined') { car_cd = '' ; } //if(searchStr) //{ searchStrArray = searchStr.split('，'); // searchCD = searchStrArray[1]; // searchCNM = searchStrArray[2]; searchCD = car_cd; searchCNM = ''; var url = "/include/sel_order_car1.asp?prod_cd="+searchCD+"&prod_nm="+searchCNM+"&grup_cd="+grup_cd+"&chice=H&amrnk="+ amrnk; // prod = showModalDialog("/include/sel_order_car.asp?prod_cd="+searchCD+"&prod_nm="+searchCNM+"&grup_cd="+grup_cd+"&chice=H","","dialogTop=10pt;dialogWidth=300pt;dialogHeight=250pt;status=no;help=no"); prod = showModalDialog(url,"","dialogLeft=300pt;dialogTop=20pt;dialogWidth=500pt;dialogHeight=430pt;status=no;help=no"); //prod = window.open(url,"","dialogTop=10pt;dialogWidth=600pt;dialogHeight=430pt;status=no;help=no"); if (prod) { var ary_prod = prod.split('，'); if (ary_prod.length > 1 ){ myprodcd = ary_prod[0]; myprodnm = ary_prod[1]; myprodam = ary_prod[2]; myacctnop = ary_prod[3]; mysubdsq = ary_prod[4]; mycartp = ary_prod[5]; mycounttp = ary_prod[6]; mycountnm = ary_prod[7]; mybacktp = ary_prod[8]; mybacknm = ary_prod[9]; } document.FORM1.PROD_CD.value = myprodcd; document.FORM1.PROD_NM.value = myprodnm; if (modify == '') { if (typeof(document.FORM1.AR_AM) != 'undefined') document.FORM1.AR_AM.value = myprodam; if (typeof(document.FORM1.SUBD_SQ) != 'undefined') document.FORM1.SUBD_SQ.value = mysubdsq; //有成本費用資料 則停用新增成本功能 if (mysubdsq == '' || mysubdsq == '0') { //[2011-02-11][Sabrina][wm.v902.410.B]執行租車後修改補上租車公司出出現SCRIP錯誤 if (document.getElementById("TAB_order_cst_all") != null && typeof(document.getElementById("TAB_order_cst_all")) != 'undefined') document.getElementById("TAB_order_cst_all").style.display = ''; } else { if (typeof(document.FORM1.NET_ACCT_NO) != 'undefined') document.FORM1.NET_ACCT_NO.value =''; if (typeof(document.FORM1.NET_DEPT_COST_AM) != 'undefined') document.FORM1.NET_DEPT_COST_AM.value =''; //[2011-02-11][Sabrina][wm.v902.410.B]執行租車後修改補上租車公司出出現SCRIP錯誤 if (document.getElementById("TAB_order_cst_all") != null && typeof(document.getElementById("TAB_order_cst_all")) != 'undefined') document.getElementById("TAB_order_cst_all").style.display = 'none'; } } if (typeof(document.FORM1.CAR_TP) != 'undefined') document.FORM1.CAR_TP.value = mycartp; if (typeof(document.FORM1.COUNT_TP) != 'undefined') { for(i=0; i< document.FORM1.COUNT_TP.length; i++) { if (mycounttp == document.FORM1.COUNT_TP[i].value) document.FORM1.COUNT_TP[i].selected = true; } } if (typeof(document.FORM1.BACK_TP) != 'undefined') { for(i=0; i< document.FORM1.BACK_TP.length; i++) { if (mybacktp == document.FORM1.BACK_TP[i].value) document.FORM1.BACK_TP[i].selected = true; } } } return; //} } //----------------------------------------------------------------- // 選取 訂單中之 輪船公司名稱 //----------------------------------------------------------------- //2009-12-18 [Ham] 增加參數 用來判斷式由 輸入框 或是 點？ 查詢名稱價錢 //function sel_order_cruise(grup_cd, modify) { function sel_order_cruise(grup_cd, modify, act) { var prodcd = document.FORM1.PROD_CD.value; if (modify == undefined) { modify == '' ; } //2008-08-29 [Ham] 修改流程, 不再顯示 sel_search(), 改為在 sel_order_cruise1.asp 中可輸入查詢條件 //searchStr = sel_search(); //if(searchStr) //{ searchStrArray = searchStr.split('，'); // searchCD = searchStrArray[1]; // searchCNM = searchStrArray[2]; //2009-12-18 [ham] 修正規則 點"?"查詢時, 不帶入輸入的條件 //searchCD = ''; if (act == 'Text') { searchCD = prodcd; } else { searchCD = ""; } searchCNM = ''; // prod = showModalDialog("/include/sel_order_cruise.asp?prod_cd="+searchCD+"&prod_nm="+searchCNM+"&grup_cd="+grup_cd+"&chice=H","","dialogTop=10pt;dialogWidth=300pt;dialogHeight=250pt;status=no;help=no"); prod = showModalDialog("/include/sel_order_cruise1.asp?prod_cd="+searchCD+"&prod_nm="+searchCNM+"&grup_cd="+grup_cd+"&chice=H","","dialogTop=10pt;dialogWidth=380pt;dialogHeight=420pt;status=no;help=no"); if (prod) { var ary_prod = prod.split('，'); if (ary_prod.length > 1 ){ myprodcd = ary_prod[0]; myprodnm = ary_prod[1]; // myprodam = ary_prod[2]; //2009-12-18 [Ham] 修改 輪船這邊沒有售價 } document.FORM1.PROD_CD.value = myprodcd; document.FORM1.PROD_NM.value = myprodnm; //2009-12-18 [Ham] 修改 輪船這邊沒有售價 //if (modify == '') //{ document.FORM1.AR_AM.value = myprodam; } } return; //} } //----------------------------------------------------------------- // 新增交易 檢查 旅客勾選狀態 //----------------------------------------------------------------- function new_trans(trans_tp) { var op_sq = document.FORM1.OP_SQ.value; var process_sq = document.FORM1.PROCESS_SQ.value; var process_bed = document.FORM1.PROCESS_BED.value; var sub_cd = document.FORM1.SUB_CD.value; if (process_sq !='') { switch(trans_tp) { case 'P': aa=('N_order_trans_p.asp?op_sq='+op_sq+'&process_sq='+process_sq+'&sub_cd='+sub_cd+'&bed_tp='+process_bed); break; case 'V': aa=('N_order_trans_v.asp?op_sq='+op_sq+'&process_sq='+process_sq+'&sub_cd='+sub_cd+'&bed_tp='+process_bed); break; case 'M': aa=('N_order_trans_m.asp?op_sq='+op_sq+'&process_sq='+process_sq+'&sub_cd='+sub_cd+'&bed_tp='+process_bed); break; default: break; } if (aa !='') location.href=(aa); } else { alert('請先勾選要辦理交易的旅客!!') } } //----------------------------------------------------------------- // 新增機位交易 檢查 旅客勾選狀態 //----------------------------------------------------------------- function new_trans_qt() { var op_sq = document.FORM1.OP_SQ.value; var aa=''; if (op_sq !='') { for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf('ORDER_SQ') == 0) { if (document.FORM1.elements[i].checked == true) { aa += document.FORM1.elements[i].value + '/' ; } } } if (aa=='') { alert('請先勾選要辦理艙等加價的旅客!!') } else { var tolink = ('N_order_trans_qt.asp?op_sq='+op_sq+'&pax_sq='+aa); if (tolink !='') location.href=(tolink); } } else { alert('訂單不存在!!') } } //----------------------------------------------------------------- // 新增訂金單 檢查 交易勾選狀態 //----------------------------------------------------------------- function new_trans_list() { var op_sq = document.FORM1.TOP_SQ.value; var sub_cd = document.FORM1.TSUB_CD.value; var process_sq = ''; var myname =''; var aa = ''; var bb = ''; document.FORM1.TPROCESS_TP.value = ''; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf('TRANSQ_') == 0) { if (document.FORM1.elements[i].checked == true) { aa += document.FORM1.elements[i].value + '/' ; } } } if (aa != '') { process_sq = aa; if (process_sq !='') { var bb = ('N_order_deposit.asp?op_sq='+op_sq+'&process_sq='+process_sq+'&sub_cd='+sub_cd); location.href=(bb); } } else { alert('請先勾選要產生訂金單的交易資料!!'); } } //----------------------------------------------------------------- // 新增折讓 檢查 交易勾選狀態 //----------------------------------------------------------------- function new_trans_u() { var op_sq = document.FORM1.TOP_SQ.value; var sub_cd = document.FORM1.TSUB_CD.value; var process_sq = document.FORM1.TPROCESS_SQ.value; var process_tp=''; var myname =''; var aa=''; var bb=''; var iflag = true; document.FORM1.TPROCESS_TP.value = ''; for(i = 0 ; i < document.FORM1.elements.length && iflag ; i++) { if (document.FORM1.elements[i].name.indexOf('TRANSQ_') == 0) { if (document.FORM1.elements[i].checked == true) { myname = document.FORM1.elements[i].name; process_tp = document.FORM1.TPROCESS_TP.value; if (process_tp == '') { document.FORM1.TPROCESS_TP.value = myname; process_tp = myname; } if ((process_tp != '') && (process_tp != myname)) { alert('請選擇相同交易類別!!'); iflag = false; } else { aa += document.FORM1.elements[i].value + '/' ; } } } } if (aa !='') { if (iflag) { if (myname == 'TRANSQ_U') { alert('請選擇非折讓之交易類別!!'); } else { process_sq = aa; process_tp = myname; if (process_sq !='' && process_tp !='') { var bb = ('N_order_trans_u.asp?op_sq='+op_sq+'&process_sq='+process_sq+'&sub_cd='+sub_cd+'&process_tp='+process_tp); location.href=(bb); } } } } else { alert('請先勾選要辦理折讓的交易!!'); } } //----------------------------------------------------------------- // 檢查 交易旅客勾選狀態 //----------------------------------------------------------------- function sel_trans_pax(obj, mybed) { var process_sq = document.FORM1.PROCESS_SQ.value; var process_bed = document.FORM1.PROCESS_BED.value; var aa = ''; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf(obj) == 0) { if (document.FORM1.elements[i].checked == true) { if (( process_bed != mybed ) && (process_bed !='') ) { alert('請選擇相同旅客類別!!'); document.FORM1.elements[i].checked = false; document.FORM1.PROCESS_SQ.value = process_sq; document.FORM1.PROCESS_BED.value = process_bed; } else { aa += document.FORM1.elements[i].value + '/' ; document.FORM1.PROCESS_SQ.value = aa; document.FORM1.PROCESS_BED.value = mybed; } } } } var iflag = false; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf('ORDER_SQ') == 0) { if (document.FORM1.elements[i].checked == true ) iflag = true; } } if (!iflag) { document.FORM1.PROCESS_SQ.value = ''; document.FORM1.PROCESS_BED.value = ''; } } //----------------------------------------------------------------- // 檢查 折讓旅客勾選狀態 //----------------------------------------------------------------- function sel_trans_upax(obj, mytranstp) { var tprocess_sq = document.FORM1.TPROCESS_SQ.value; var tprocess_tp = document.FORM1.TPROCESS_TP.value; var aa = ''; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf(obj) == 0) { if (document.FORM1.elements[i].checked == true) { if (( tprocess_tp != mytranstp ) && (tprocess_tp !='') ) { alert('請選擇相同旅客類別!!'); document.FORM1.elements[i].checked = false; document.FORM1.TPROCESS_SQ.value = tprocess_sq; document.FORM1.TPROCESS_TP.value = tprocess_tp; } else { aa += document.FORM1.elements[i].value + '/' ; document.FORM1.TPROCESS_SQ.value = aa; document.FORM1.TPROCESS_TP.value = mytranstp; } } } } var iflag = false; for(i = 0 ; i < document.FORM1.elements.length ; i++) { if (document.FORM1.elements[i].name.indexOf('TRANSQ_') == 0) { if (document.FORM1.elements[i].checked == true ) iflag = true; } } if (!iflag) { document.FORM1.TPROCESS_SQ.value = ''; document.FORM1.TPROCESS_TP.value = ''; } } //----------------------------------------------------------------- // 刪除訂金單明細 ( 提示確認視窗 ) //----------------------------------------------------------------- function del_depositd(dordd_sq) { if (confirm('確定刪除此項訂金單交易？')) { document.FORM1.action = ('D_order_depositd.asp?dordd_sq='+dordd_sq); document.FORM1.submit(); } } //----------------------------------------------------------------- // 客戶帳號選取 //----------------------------------------------------------------- function sel_acct_no2(src_cls, acct_no, fld_acct_no, fld_acct_dr, aryParameter, showNext, fitemp_fg) { if(!showNext) { sel_acct_noV2(src_cls, acct_no, fld_acct_no, fld_acct_dr); return; } itemform = document.FORM1 ; var ary_search; var acct_cls_cd = ""; var acct_cls_nm = ""; var acct_emp_cd = ""; var acct_cd = ""; var acct_nm = ""; var paxPASS_NO = ""; var paxENM = ""; var paxEMP_CD = ""; var paxID_NO = ""; var amrnk = ""; if(aryParameter) { ary_search = new Array(); acct_cls_cd = aryParameter["CLS_CD"]; acct_cls_nm = aryParameter["CLS_NM"]; acct_emp_cd = aryParameter["EMP_CD"]; acct_cd = aryParameter["ACCT_CD"]; acct_nm = aryParameter["ACCT_NM"]; paxPASS_NO = ""; paxENM = ""; paxEMP_CD = ""; paxID_NO = ""; amrnk = ""; if(aryParameter["PAX_ENM"]) { paxENM = aryParameter["PAX_ENM"]; } if(aryParameter["PASS_NO"]) { paxPASS_NO = aryParameter["PASS_NO"]; } if(aryParameter["ID_NO"]) { paxID_NO = aryParameter["ID_NO"]; } if(aryParameter["EMP_CD"]) { paxEMP_CD = aryParameter["EMP_CD"]; } var search = "S，" + acct_cd + "，" + acct_nm } switch (src_cls) { case 'A': if(!aryParameter){ var search = sel_search(); } if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var stragt = sel_useragt('A', sh_name, sh_code, acct_emp_cd); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var stragt = sel_useragt('S', sh_name, sh_code, acct_emp_cd); } if (stragt) { var ary_agt = stragt.split('，'); if (ary_agt.length > 1) { agt_cd = ary_agt[0]; agt_anm = ary_agt[1]; amrnk = ary_agt[2]; // 價格等級 agt_emp_cd = ary_agt[3]; // 業務 var stragtc=sel_useragtc(agt_cd); if(stragtc) { var ary_agtc = stragtc.split('，'); if (ary_agtc.length > 1) { agtc_cd = ary_agtc[0]; agtc_nm = ary_agtc[1]; agtc_tel = ary_agtc[2]; // 聯絡電話 itemform.elements(fld_acct_no).value=src_cls+agt_cd+agtc_cd; itemform.elements(fld_acct_dr).value=agt_anm+'-'+agtc_nm; if ((itemform.AMRNK) && (!isNaN(itemform.AMRNK.length))) { if (amrnk) { amrnk = eval(amrnk); itemform.AMRNK[amrnk-1].checked = true; } else { itemform.AMRNK[0].checked = true; // default } } //alert(fitemp_fg); if(itemform.EMP_CD && fitemp_fg != '1') { if(agt_emp_cd) { itemform.EMP_CD.value = agt_emp_cd; if(itemform.EMP_CNM) { get_nm('FORM1.EMP_CD', 'FORM1.EMP_CNM', '', 'emp_cd'); } } } if (itemform.ACCT_DR_TEL) { if (agtc_tel) { itemform.ACCT_DR_TEL.value = agtc_tel; } } } } } } } } break; case 'C': if(!aryParameter){ var search = sel_search(); } if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var strcomp = sel_usercomp('A', sh_name, sh_code, acct_emp_cd); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var strcomp = sel_usercomp('S', sh_name, sh_code, acct_emp_cd); } if (strcomp) { var ary_comp = strcomp.split('，'); if (ary_comp.length > 1) { comp_cd = ary_comp[0]; comp_anm = ary_comp[1]; amrnk = ary_comp[2]; // 價格等級 acct_dr_tel = ary_comp[3]; // 聯絡電話 comp_emp_cd = ary_comp[4]; // 業務員 if ((itemform.AMRNK) && (!isNaN(itemform.AMRNK.length))) { if (amrnk) { amrnk = eval(amrnk); itemform.AMRNK[amrnk-1].checked = true; } else { itemform.AMRNK[0].checked = true; // default amrnk = 1; } } if (itemform.ACCT_DR_TEL) { if (acct_dr_tel) { itemform.ACCT_DR_TEL.value = acct_dr_tel; } } if(itemform.EMP_CD && fitemp_fg != '1') { if(comp_emp_cd) { itemform.EMP_CD.value = comp_emp_cd; if(itemform.EMP_CNM) { get_nm('FORM1.EMP_CD', 'FORM1.EMP_CNM', '', 'emp_cd'); } } } itemform.elements(fld_acct_no).value=src_cls+comp_cd; itemform.elements(fld_acct_dr).value=comp_anm; } } } } break; case 'D': if(!aryParameter){ var search = sel_search(); } if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var strpax = sel_userpax('A', sh_name, sh_code, paxENM, paxID_NO, paxPASS_NO, paxEMP_CD); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var strpax = sel_userpax('S', sh_name, sh_code, paxENM, paxID_NO, paxPASS_NO, paxEMP_CD); } if (strpax) { var ary_userpax= strpax.split('，'); if (ary_userpax.length > 0) { pax_cd = ary_userpax[0]; pax_cnm = ary_userpax[1]; amrnk = ary_userpax[2]; // 價格等級 acct_dr_tel = ary_userpax[3]; // 聯絡電話 pax_emp_cd = ary_userpax[4]; // 業務員 if ((itemform.AMRNK) && (!isNaN(itemform.AMRNK.length))) { if (amrnk) { amrnk = eval(amrnk); itemform.AMRNK[amrnk-1].checked = true; } else { itemform.AMRNK[0].checked = true; // default amrnk = 1; } } if (itemform.ACCT_DR_TEL) { if (acct_dr_tel) { itemform.ACCT_DR_TEL.value = acct_dr_tel; } } if(itemform.EMP_CD && fitemp_fg != '1') { if(pax_emp_cd) { itemform.EMP_CD.value = pax_emp_cd; if(itemform.EMP_CNM) { get_nm('FORM1.EMP_CD', 'FORM1.EMP_CNM', '', 'emp_cd'); } } } itemform.elements(fld_acct_no).value=src_cls+pax_cd; itemform.elements(fld_acct_dr).value=pax_cnm; } } } } break; case 'P': var old_compcd = ""; var old_deptcd = ""; var mycompcd = ""; var mycompnm = ""; var str_dsys = showModalDialog("/include/sel_dsys.asp?comp_cd="+old_compcd+'&chice=H',"dialogWidth=200pt;dialogHeight=310pt"); if (str_dsys) { var ary_dsys = str_dsys.split('，'); if (ary_dsys.length > 1 ){ mycompcd = ary_dsys[0]; mycompnm = ary_dsys[1]; }//2004-11-09 }//2004-11-09 var str_dept = showModalDialog("/include/sel_dept.asp?comp_cd="+mycompcd+"&chice=H","dialogWidth=200pt;dialogHeight=310pt"); if (str_dept){ var ary_dept = str_dept.split('，'); //if (ary_dept.length > 1 && deptcd ){ itemform.elements(fld_acct_no).value = "P" + ary_dept[0]; itemform.elements(fld_acct_dr).value = ary_dept[1]; //} } return true; //} 2004-11-09 //} 2004-11-09 break; case 'F': var RTN_FLD = "TRFACT.FACT_CD, TRFACT.FACT_NM"; var SEL_FLD = "TRFACT.FACT_CD AS '編號', TRFACT.FACT_NM AS '名稱'"; var SEL_FRM = "TRFACT"; var SEL_WHR = ""; var SEL_ORD = "TRFACT.FACT_CD"; var Action = "/include/sel_help_fact.asp?FACT_ARR="+acct_cd + "|;|" + acct_nm; var Multi = ""; var Title = "廠商" //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=500px;dialogHeight=490px"; var sFeatures = "dialogWidth=500px;dialogHeight=640px"; FACT_ARY = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); if (FACT_ARY) { var valCD = FACT_ARY[0][0]; var valNM = FACT_ARY[0][1]; itemform.elements(fld_acct_no).value = "F" + valCD; itemform.elements(fld_acct_dr).value = valNM; } break; default: var acctcls = showModalDialog("/include/sel_acct_cls.asp","","dialogTop=10pt;dialogWidth=280pt;dialogHeight=170pt;status=no;help=no"); if (acctcls) { var ary_acctcls= acctcls.split('，'); if (ary_acctcls.length > 1) { acct_cls_cd = ary_acctcls[0]; acct_cls_nm = ary_acctcls[1]; sel_acct_no(acct_cls_cd,'',fld_acct_no,fld_acct_dr); } } break; } if((itemform.GRUP_CD) && (amrnk != '')) { //<%'// 2007-02-07 : [ Afon ]調整 sel_acct_no2()保留機位報名時，點選領隊、導遊保留位時，全部的團費都清空，所以不回寫價格%> if(itemform.SEAT_TP4){ if(!(itemform.SEAT_TP4.checked || itemform.SEAT_TP5.checked)){ chgOrderPrice(itemform.GRUP_CD.value, amrnk); } }else{ chgOrderPrice(itemform.GRUP_CD.value, amrnk); } } return; } //----------------------------------------------------------------- // 檢視訂單 : 客戶選取視窗 //----------------------------------------------------------------- function sel_acct_no(src_cls, acct_no, fld_acct_no, fld_acct_dr) { sel_acct_noV2(src_cls, acct_no, fld_acct_no, fld_acct_dr); return; var acctcls = showModalDialog("/include/sel_acct_cls.asp","","dialogTop=10pt;dialogWidth=280pt;dialogHeight=180pt;status=no;help=no"); if (acctcls) { var ary_acctcls= acctcls.split('，'); if (ary_acctcls.length > 1) { acct_cls_cd = ary_acctcls[0]; acct_cls_nm = ary_acctcls[1]; sel_acct_no2(acct_cls_cd,'',fld_acct_no,fld_acct_dr); } } return; } //----------------------------------------------------------------- // 旅客資料管理 : 當頭銜欄位沒有設定時 旅客頭銜欄位 依身分證號顯示 //----------------------------------------------------------------- function show_pax_ti(idno, cnt) { var pax_ti = document.FORM1.elements('PAX_TI'+cnt).value if (idno !='' && pax_ti=='') { idno = idno.toString(); var ary_idno = idno.split(''); if (ary_idno.length > 2) { var myid = ary_idno[1]; switch (myid) { case '1': document.FORM1.elements('PAX_TI'+cnt).value = 'Mr'; break; case '2': document.FORM1.elements('PAX_TI'+cnt).value = 'Mrs'; break; default: break; } } } } //----------------------------------------------------------------- // 顯示對應之訂單聯絡資訊 //----------------------------------------------------------------- function show_contact(acct_no) { if (acct_no != '') { var acct_contact = showModalDialog("/include/show_acct_cnta.asp?acct_no="+acct_no,"","dialogTop=10pt;dialogWidth=350pt;dialogHeight=350pt;status=no;help=no"); return true; } } //=========================================================================================== // 依客戶來源( SRC_CLS )選擇對應之使用者 ID ( SRC_ID ) // // (A) 同業客戶 (C) 機關行號客戶 (D) 直客 (E) 員工 //=========================================================================================== //-------------------------------------------------------- // 依來源類別 選擇適當的資料表資料 //-------------------------------------------------------- function sel_src(mycls, myid) { var myitem = document.FORM1; src_cls = myitem.elements(mycls).value; src_id = myitem.elements(myid).value; switch (src_cls) { case 'E': var search = sel_search(); if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var stremp = sel_emplist('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var stremp = sel_emplist('S', sh_name, sh_code); } if (stremp) { //alert(stremp); var ary_emp= stremp.split('，'); if (ary_emp.length > 0) { emp_cd = ary_emp[0]; emp_cnm = ary_emp[1]; dept_cd = ary_emp[2]; dept_nm = ary_emp[3]; dsys_cd = ary_emp[4]; dsys_fnm = ary_emp[5]; myitem.USR_ID.value=emp_cd; myitem.SRC_ID.value=emp_cd; myitem.SRC_NM.value=dsys_fnm+' '+dept_nm+' '+emp_cnm; myitem.USR_CNM.value=emp_cnm; } } } } break; case 'A': var search = sel_search(); if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var stragt = sel_useragt('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var stragt = sel_useragt('S', sh_name, sh_code); } if (stragt) { var ary_agt = stragt.split('，'); if (ary_agt.length > 1) { agt_cd = ary_agt[0]; agt_anm = ary_agt[1]; var stragtc=sel_useragtc(agt_cd); if(stragtc) { var ary_agtc = stragtc.split('，'); if (ary_agtc.length > 1) { agtc_cd = ary_agtc[0]; agtc_nm = ary_agtc[1]; tmpagt_cd = StrToReplace(agt_cd+agtc_cd,' ','-') myitem.SRC_ID.value=agt_cd+agtc_cd; myitem.SRC_NM.value=agt_anm+' '+agtc_nm; myitem.USR_ID.value= src_cls+tmpagt_cd; myitem.USR_CNM.value = agtc_nm; } } } } } } break; case 'C': var search = sel_search(); if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var strcomp = sel_usercomp('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var strcomp = sel_usercomp('S', sh_name, sh_code); } if (strcomp) { var ary_comp = strcomp.split('，'); if (ary_comp.length > 1) { comp_cd = ary_comp[0]; comp_anm = ary_comp[1]; myitem.SRC_ID.value=comp_cd; myitem.SRC_NM.value=comp_anm; myitem.USR_CNM.value=comp_anm; myitem.USR_ID.value=src_cls+comp_cd; } } } } break; case 'D': var search = sel_search(); if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var strpax = sel_userpax('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var strpax = sel_userpax('S', sh_name, sh_code); } if (strpax) { var ary_userpax= strpax.split('，'); if (ary_userpax.length > 0) { pax_cd = ary_userpax[0]; pax_cnm = ary_userpax[1]; myitem.SRC_ID.value=pax_cd; myitem.SRC_NM.value=pax_cnm; myitem.USR_ID.value=pax_cd; } } } } break; default: break; } } //-------------------------------------------------------- // 將字串中的 字元 置換成 另一字元 //-------------------------------------------------------- function StrToReplace(ss, re, r) { if (ss) { for (i=1; i'+str_tldr); var ary_str_tldr = str_tldr.split('，'); if (ary_str_tldr.length > 1) { tldr_cd = ary_str_tldr[0]; tldr_nm = ary_str_tldr[1]; FORM1.elements(cd).value=tldr_cd; FORM1.elements(nm).value=tldr_nm; str_mobile = sel_tldr_mobile(tldr_cd, tel1, tel2) } } } //-------------------------------------------------------- // 選擇領隊或導遊 cd, nm = 顯示欄位, tp = 領隊或導遊 , bdt = 開始日, edt = 結束日 //-------------------------------------------------------- function sel_tldr_mobile(cd, tel1, tel2) { var str_mobile = showModalDialog("/include/sel_tldr_mobile.asp?tldr_cd="+cd,"sel_tldr_mobile","dialogWidth=300pt;dialogHeight=310pt"); if (str_mobile) { var ary_str_mobile = str_mobile.split('，'); if (ary_str_mobile.length > 1) { tldr_tel1 = ary_str_mobile[0].replace('/',''); tldr_tel2 = ary_str_mobile[1].replace('/',''); FORM1.elements(tel1).value=tldr_tel1; FORM1.elements(tel2).value=tldr_tel2; } } } //-------------------------------------------------------- // 輸入搜尋條件 顯示視窗 //-------------------------------------------------------- function sel_search(s_title) { var strsearch = showModalDialog("/include/sel_search.asp?s_title="+s_title,"sel_search","dialogWidth=300pt;dialogHeight=180pt"); if (strsearch) { return strsearch; } } function sel_searchs(s_title) { var strsearch = showModalDialog("/include/sel_search.asp?s_title="+s_title,"sel_search","dialogWidth=300pt;dialogHeight=180pt"); if (strsearch) { return strsearch; } } //-------------------------------------------------------- // 選擇收費四聯單套表列印方式 //-------------------------------------------------------- function sel_order_bill(op_sq, usr_id) { if ((op_sq !='') && (usr_id !='')) { var str_order_bill_tp = showModalDialog("/include/sel_order_bill.asp","order_bill_tp","dialogWidth=180pt;dialogHeight=200pt"); if (str_order_bill_tp) { var ary_order_bill_tp = str_order_bill_tp.split('，'); switch (ary_order_bill_tp[0]) { // 套表 case "1": if (ary_order_bill_tp[1]=='1_PAX') { // 以旅客明細排序 mywin = window.open("L_RCVD_P1.asp?OP_SQ="+op_sq+"&USR_ER="+usr_id,"pdfBill","resizable=yes,scrollbars=yes,width=640,height=480"); } else { // 以交易類別排序 mywin = window.open("L_RCVD_P4.asp?OP_SQ="+op_sq+"&USR_ER="+usr_id,"pdfBill","resizable=yes,scrollbars=yes,width=640,height=480"); } break; // 不套表 case "2": if (ary_order_bill_tp[1]=='2_PAX') { // 以旅客明細排序 mywin = window.open("L_RCVD_P2.asp?OP_SQ="+op_sq+"&USR_ER="+usr_id,"pdfBill","resizable=yes,scrollbars=yes,width=640,height=480"); } else { // 以交易類別排序 mywin = window.open("L_RCVD_P3.asp?OP_SQ="+op_sq+"&USR_ER="+usr_id,"pdfBill","resizable=yes,scrollbars=yes,width=640,height=480"); } break; default: break; } } } } //-------------------------------------------------------- // 選擇列印訂單(內部與外部訂單) //-------------------------------------------------------- function sel_order_prn(op_sq, usr_id) { if ((op_sq !='') && (usr_id !='')) { var str_order_prn= showModalDialog("/include/sel_order_prn.asp","order_prn_tp","dialogWidth=180pt;dialogHeight=160pt"); if (str_order_prn) { var ary_str_tp = str_order_prn.split('，'); switch (ary_str_tp[0]) { case "I": if (ary_str_tp[1]=='PAX') { // 以旅客明細排序 mywin = window.open("L_REC_P3.asp?OP_SQ="+op_sq+"&USR_ER="+usr_id,"pdfOrder","resizable=yes,scrollbars=yes,width=640,height=480"); } else { // 以旅客交易類別排序 mywin = window.open("L_REC_P2.asp?OP_SQ="+op_sq+"&USR_ER="+usr_id,"pdfOrder","resizable=yes,scrollbars=yes,width=640,height=480"); } break; case "O": mywin = window.open("L_REC_P1.asp?OP_SQ="+op_sq+"&USR_ER="+usr_id,"pdfOrder","resizable=yes,scrollbars=yes,width=640,height=480"); break; default: break; } } } } //-------------------------------------------------------- // 選擇列印訂金單 //-------------------------------------------------------- function sel_dord_prn(dord_no, usr_id) { if ((dord_no !='') && (usr_id !='')) { var todo = showModalDialog("V_dord_rk_conf.asp?dord_no="+dord_no,"deposit_rk","dialogWidth=350pt;dialogHeight=400pt"); if (todo=='PRINT') { mywin = window.open("L_DORD_P1.asp?DORD_NO="+dord_no+"&USR_ER="+usr_id,"pdfDord","resizable=yes,scrollbars=yes,width=640,height=480"); } } } //-------------------------------------------------------- // 選擇員工 tp = (A:全部,S:依條件) 顯示方式 , sh_name = 名稱條件, sh_code = 代碼條件 //-------------------------------------------------------- function sel_emplist(tp, sh_name, sh_code) { var emplist = showModalDialog("/include/sel_emplist.asp?tp="+tp+"&sh_code="+sh_code+"&sh_name="+sh_name+"&chice=H","emp","dialogWidth=250pt;dialogHeight=310pt;"); if (emplist) { return emplist; } } //-------------------------------------------------------- // 選擇員工清單 //-------------------------------------------------------- function sel_usr(grp_id, Old_StrUsrId) { var search = sel_search(); var StrUsrId = ""; if (search) { var ary_search = search.split('，'); if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; var strusr = sel_usrlist('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; var strusr = sel_usrlist('S', sh_name, sh_code); } if (strusr) { if (Old_StrUsrId != '' && Old_StrUsrId !='NaNA' ) { StrUsrId = Old_StrUsrId+"/"+strusr; } else { StrUsrId = strusr;} window.location = "N_grpuser.asp?GRP_ID="+grp_id+"&StrUsrId="+StrUsrId; } } } } function sel_usrlist(tp, sh_name, sh_code) { var usrlist = showModalDialog("/include/sel_usr.asp?tp="+tp+"&sh_code="+sh_code+"&sh_name="+sh_name,"dialogWidth=200pt;dialogHeight=310pt"); if (usrlist) { return usrlist; } } //-------------------------------------------------------- // //-------------------------------------------------------- function show_dtgrup(leav_dt, mgrup_cd) { var dtgrup = showModalDialog("/include/show_dtgrup.asp?leav_dt="+leav_dt+"&mgrup_cd="+mgrup_cd,"dtgrup","dialogWidth=320pt;dialogHeight=200pt"); } //-------------------------------------------------------- // 手動輸入飯店名稱 //-------------------------------------------------------- function input_itnhotel(item) { var val_default = FORM1.elements(item).value ; if(FORM1.TMP_HTL_NM) { val_default = FORM1.TMP_HTL_NM.value; } var itnhotel = window.prompt("★請輸入飯店名稱★\n多家飯店時請以斜線 / 分隔，輸入的文字將取代現有資料。",val_default); if (itnhotel != null) { if(FORM1.TMP_HTL_NM) { FORM1.TMP_HTL_NM.value = itnhotel; } if (itnhotel.length > 500) //長度改為500 by Afon 2005-12-06 { alert("飯店名稱需小於500個字!!"); return false; } else { FORM1.elements(item).value = itnhotel; if((FORM1.TMP_HTL_NM) && (FORM1.TMP_HTL_CD_NM)) { var tmp_HtlNm = FORM1.TMP_HTL_CD_NM.value + "/" + itnhotel; if(FORM1.TMP_HTL_CD_NM.value == '') //如果沒從資料庫選取飯店資料 { tmp_HtlNm = itnhotel; } if(itnhotel == '') { tmp_HtlNm = FORM1.TMP_HTL_CD_NM.value; } FORM1.elements(item).value = tmp_HtlNm; } } } } //-------------------------------------------------------- // 手動輸入飯店名稱 // 2010-08-05 : [Flynn] [wm.v806.980.u][標準版] 團型及個團『行程資料維護』，從現行一次修改一天，改為一次可修改多天 //-------------------------------------------------------- function input_itnhotel2(item, num) { var val_default = FORM1.elements(item).value ; if(FORM1.elements("TMP_HTL_NM"+num)) { val_default = FORM1.elements("TMP_HTL_NM"+num).value; } var itnhotel = window.prompt("★請輸入飯店名稱★\n多家飯店時請以斜線 / 分隔，輸入的文字將取代現有資料。",val_default); if (itnhotel != null) { if(FORM1.elements("TMP_HTL_NM"+num)) { FORM1.elements("TMP_HTL_NM"+num).value = itnhotel; } if (itnhotel.length > 500) //長度改為500 by Afon 2005-12-06 { alert("飯店名稱需小於500個字!!"); return false; } else { FORM1.elements(item).value = itnhotel; if((FORM1.elements("TMP_HTL_NM"+num)) && (FORM1.elements("TMP_HTL_CD_NM"+num))) { var tmp_HtlNm = FORM1.elements("TMP_HTL_CD_NM"+num).value + "/" + itnhotel; if(FORM1.elements("TMP_HTL_CD_NM"+num).value == '') //如果沒從資料庫選取飯店資料 { tmp_HtlNm = itnhotel; } if(itnhotel == '') { tmp_HtlNm = FORM1.elements("TMP_HTL_CD_NM"+num).value; } FORM1.elements(item).value = tmp_HtlNm; } } } } //-------------------------------------------------------- // 自費項目驗證檢查 // 如勾選團費已含，則隨團銷售、必須購買、與定金同繳不可勾選 // 如勾選隨團銷售，則團費已含、必須購買不可勾選 //-------------------------------------------------------- function chkGrupBuyFG(gchg_FG, olsale_FG, mustBUY, payFST_FG ) { gchg_FG.disabled = false; olsale_FG.disabled = false; mustBUY.disabled = false; payFST_FG.disabled = false; if(gchg_FG.checked) { olsale_FG.checked = false; olsale_FG.disabled = true; mustBUY.checked = false; mustBUY.disabled = true; payFST_FG.checked = false; payFST_FG.disabled = true; } if(olsale_FG.checked) { gchg_FG.checked = false; gchg_FG.disabled = true; mustBUY.checked = false; mustBUY.disabled = true; } } //-------------------------------------------------------- // 尋找城市並帶入城市代碼、區域代碼、國家代碼 // s_mode 參數：'s'->單選；'m'->多選 // sel_city_search_s()與 sel_city_search()相同，但sel_city_search_s()限定單選 //-------------------------------------------------------- function sel_city_search_s(city_CCD, areaCDitem, areaCNMitem, natnCDitem, natnCNMitem, cityCDitem, cityCNMitem) { sel_city_search(city_CCD, areaCDitem, areaCNMitem, natnCDitem, natnCNMitem, cityCDitem, cityCNMitem, 's') } function sel_city_search(city_CCD, areaCDitem, areaCNMitem, natnCDitem, natnCNMitem, cityCDitem, cityCNMitem, s_mode) { var areacd = "/"; var areanm = "/"; var natncd = "/"; var natnnm = "/"; var citycd = ""; var citynm = ""; var symbol = ""; var ary_city; switch (s_mode) { case "s": ary_city = sel_city(areaCDitem.value, natnCDitem.value, cityCDitem.value, ""); break; default: ary_city = sel_city(areaCDitem.value, natnCDitem.value, cityCDitem.value, "Y"); break; } if (ary_city) { if (areaCDitem.value != "") areacd += areaCDitem.value + "/"; if (areaCNMitem.value != "") areanm += areaCNMitem.value + "/"; if (natnCDitem.value != "") natncd += natnCDitem.value + "/"; if (natnCNMitem.value != "") natnnm += natnCNMitem.value + "/"; for (var i=0; i 2){ valArr[1] = valArr[1].substr(0,2); } if(valArr[0]>23){ alert("小時只能輸入0~23"); return ""; }else{ if(valArr[1]>60){ alert("分鐘只能輸入0~59"); return ""; }else{ return valArr[0] + ":" + valArr[1]; } } } //================================================================ // 2006-07-17 [Afon] // 新增 getopt(是否預設，無預設的話執行帳號類別輔助查詢) // addTit(N:不加帳號類別，例如 機關行號 0212==> addTit='N', 則 回傳 0212, 否則回傳 C0212) // 2006-11-20 [Afon] // Tit_P(有值時，不允許使用 P 部門帳號) // getopt D直客 U辦證單位 C公司客戶 B租車公司 A同業 G輪船 P部門 // R餐廳 E員工 T航空公司 F廠商 H飯店 Y景點 L代理公司 N導遊 X臨時帳號 // 20070321 Sam 將應收應付帳號輔助視窗查詢 都用這個公用程式處理 // 增加參數 mode 傳入 sel_acct_nop_opt.asp Tit_P='NOP' 只顯示 D,C,A(t4u-不顯示)) // 20070417 Sam 直客 同業 公司 增加回傳資料(業務代碼,業務名稱,價格等級) 在報名時需要用, 其他地方可以不用傳參數 // 20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value //================================================================ //搜尋機票進票作業的應付帳號 function sel_acct_nop(acct_no_cdFrm, acct_no_nmFrm, getopt, addTit, checkti_Frm, Tit_P, emp_cd, emp_cnm, amrnk, acct_dr, acct_dr_value) { //2009-08-21 Vanessa 加上emp_cd值判斷是否為應收/應付憑單頁面 if(! getopt){ getopt = showModalDialog("/include/sel_acct_nop_opt.asp?mode="+Tit_P+ "&emp_cd=" + emp_cd, "", "dialogWidth=200pt;dialogHeight=230pt");} var searchCD = ""; var searchNM = ""; var searchStrArray; var valCD, valNM; if (getopt) { getopt = getopt.toUpperCase(); if(addTit){ addTit = addTit.toUpperCase(); }else{ addTit = "Y"; } switch (getopt) { case "D"://直客 valCD = acct_no_cdFrm.value; //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value if(acct_dr_value == undefined){ sel_trpax(acct_no_cdFrm.name, acct_no_nmFrm.name, "旅客",emp_cd,emp_cnm,amrnk,acct_dr); }else{ sel_trpax(acct_no_cdFrm.name, acct_no_nmFrm.name, "旅客",emp_cd,emp_cnm,amrnk,acct_dr, acct_dr_value); } if (valCD != acct_no_cdFrm.value) if(addTit=='N'){ acct_no_cdFrm.value = acct_no_cdFrm.value; }else{ acct_no_cdFrm.value = getopt + acct_no_cdFrm.value; } //2006-09-01 [Afon] 需回傳支票抬頭 if(checkti_Frm){ checkti_Frm.value = acct_no_nmFrm.value } break; case "A"://同業 var AGT_ARY; //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value if(acct_dr_value == undefined){ AGT_ARY = sel_help_agt(); }else{ AGT_ARY = sel_help_agt(acct_dr_value); } if (AGT_ARY) { valCD = AGT_ARY[0][0]; if (AGT_ARY[0][1] != "") valNM = AGT_ARY[0][1]; else valNM = AGT_ARY[0][2]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 if(checkti_Frm){ checkti_Frm.value = acct_no_nmFrm.value } //20070417 業務代碼 if (typeof(emp_cd) != 'undefined' && AGT_ARY[0][3].replace(' ','') != '') { emp_cd.value = AGT_ARY[0][3]; } //20070417 業務名稱 if (typeof(emp_cnm) != 'undefined' && AGT_ARY[0][3].replace(' ','') != '') { emp_cnm.value = AGT_ARY[0][4]; } //20070417 價格等級 if (typeof(amrnk) != 'undefined') { valAmrnk = eval(AGT_ARY[0][5]); if (eval(amrnk.length) >= valAmrnk && valAmrnk > 0) { amrnk[valAmrnk-1].checked = true; amrnk[valAmrnk-1].onclick(); } } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (AGT_ARY[0][6].replace(' ','') != '') acct_dr.value = AGT_ARY[0][6]; else acct_dr.value = valNM; } } break; case "B": var CAR_ARY = sel_help_car(); if (CAR_ARY) { valCD = CAR_ARY[0][0]; if (CAR_ARY[0][1] != "") valNM = CAR_ARY[0][1]; else valNM = CAR_ARY[0][2]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //checkti_Frm.value = acct_no_nmFrm.value get_checkti(getopt,valCD); } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (CAR_ARY[0][2].replace(' ','') != '') acct_dr.value = CAR_ARY[0][2]; else acct_dr.value = valNM; } } break; case "C": var COMP_ARY; //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value if(acct_dr_value == undefined){ COMP_ARY = sel_help_comp(); }else{ COMP_ARY = sel_help_comp(acct_dr_value); } if (COMP_ARY) { valCD = COMP_ARY[0][0]; if (COMP_ARY[0][1] != "") { valNM = COMP_ARY[0][1]; } else if (COMP_ARY[0][2] != "") { valNM = COMP_ARY[0][2]; } else { valNM = COMP_ARY[0][3]; } if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //checkti_Frm.value = acct_no_nmFrm.value get_checkti(getopt,valCD); } //20070417 業務代碼 if (typeof(emp_cd) != 'undefined' && COMP_ARY[0][4].replace(' ','') != '') { emp_cd.value = COMP_ARY[0][4]; } //20070417 業務名稱 if (typeof(emp_cnm) != 'undefined' && COMP_ARY[0][4].replace(' ','') != '') { emp_cnm.value = COMP_ARY[0][5]; } //20070417 價格等級 if (typeof(amrnk) != 'undefined') { valAmrnk = eval(COMP_ARY[0][6]); if (eval(amrnk.length) >= valAmrnk && valAmrnk > 0) { amrnk[valAmrnk-1].checked = true; amrnk[valAmrnk-1].onclick(); } } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (COMP_ARY[0][2].replace(' ','') != '') { acct_dr.value = COMP_ARY[0][2];//簡稱 } else if (COMP_ARY[0][1].replace(' ','') != '') { acct_dr.value = COMP_ARY[0][1];//全名 } else { acct_dr.value = COMP_ARY[0][3];//英文 } } } break; case "F": var FACT_ARY = sel_help_fact(); if (FACT_ARY) { valCD = FACT_ARY[0][0]; valNM = FACT_ARY[0][1]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //checkti_Frm.value = acct_no_nmFrm.value get_checkti(getopt,valCD); } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (FACT_ARY[0][2].replace(' ','') != '') acct_dr.value = FACT_ARY[0][2]; else acct_dr.value = valNM; } } break; case "G": var CRUISE_ARY = sel_help_cruise(); if (CRUISE_ARY) { valCD = CRUISE_ARY[0][0]; if (CRUISE_ARY[0][1] != "") valNM = CRUISE_ARY[0][1]; else valNM = CRUISE_ARY[0][2]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //checkti_Frm.value = acct_no_nmFrm.value get_checkti(getopt,valCD); } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } break; case "H": var HTL_ARY = sel_help_htl(); if (HTL_ARY) { valCD = HTL_ARY[0][0]; if (HTL_ARY[0][1] != "") { valNM = HTL_ARY[0][1]; } else if (HTL_ARY[0][2] != "") { valNM = HTL_ARY[0][2]; } else { valNM = HTL_ARY[0][3]; } if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //get_htl_checkti(valCD); get_checkti(getopt,valCD); } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (HTL_ARY[0][2].replace(' ','') != '') acct_dr.value = HTL_ARY[0][2]; else acct_dr.value = valNM; } } break; case "L": var LOCL_ARY = sel_help_locl(); if (LOCL_ARY) { valCD = LOCL_ARY[0][0]; if (LOCL_ARY[0][1] != "") valNM = LOCL_ARY[0][1]; else valNM = LOCL_ARY[0][2]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 if(checkti_Frm){ checkti_Frm.value = acct_no_nmFrm.value } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (LOCL_ARY[0][2].replace(' ','') != '') acct_dr.value = LOCL_ARY[0][2]; else acct_dr.value = valNM; } } break; case "P": // 2006-11-20 [Afon] // Tit_P(N:不允許使用 P 部門帳號) // Tit_R(NOR:允許使用 P 部門帳號, 只顯示DCAP) // Tit_P(NOP:不允許使用 P 部門帳號, 只顯示DCA) if(Tit_P=='N'){ alert('應'+ Tit_P +'帳號不可使用 P 部門帳號。\n請重新輸入!!') break; } var DEPT_ARY;// = sel_help_dept(); //20100211 Flynn 增加預設搜索字段(中文名稱)acct_dr_value if(acct_dr_value == undefined){ DEPT_ARY = sel_help_dept(); }else{ DEPT_ARY = sel_help_dept(acct_dr_value); } if (DEPT_ARY) { valCD = DEPT_ARY[0][0]; valNM = DEPT_ARY[0][1]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 if(checkti_Frm){ checkti_Frm.value = acct_no_nmFrm.value } //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } break; case "R": var REST_ARY = sel_help_rest(); if (REST_ARY) { valCD = REST_ARY[0][0]; if (REST_ARY[0][1] != "") valNM = REST_ARY[0][1]; else valNM = REST_ARY[0][2]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //get_rest_checkti(valCD) get_checkti(getopt,valCD); } //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } break; case "T": var CARR_ARY = sel_help_carr(); if (CARR_ARY) { valCD = CARR_ARY[0][0]; if (CARR_ARY[0][1] != "") { valNM = CARR_ARY[0][1]; } else if (COMP_ARY[0][2] != "") { valNM = CARR_ARY[0][2]; } else { valNM = CARR_ARY[0][3]; } if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //checkti_Frm.value = acct_no_nmFrm.value get_checkti(getopt,valCD); } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (CARR_ARY[0][2].replace(' ','') != '') acct_dr.value = CARR_ARY[0][2]; else acct_dr.value = valNM; } } break; case "U": var APUN_ARY = sel_help_apun(); if (APUN_ARY) { valCD = APUN_ARY[0][0]; if (APUN_ARY[0][1] != "") valNM = APUN_ARY[0][1]; else valNM = APUN_ARY[0][2]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //checkti_Frm.value = acct_no_nmFrm.value get_checkti(getopt,valCD); } //20070425 訂單 ACCT_DR if (typeof(acct_dr) != 'undefined') { if (APUN_ARY[0][2].replace(' ','') != '') acct_dr.value = APUN_ARY[0][2]; else acct_dr.value = valNM; } } break; case "Y": var SCEN_ARY = sel_help_scen(); if (SCEN_ARY) { valCD = SCEN_ARY[0][0]; if (SCEN_ARY[0][1] != "") valNM = SCEN_ARY[0][1]; else valNM = SCEN_ARY[0][2]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } // acct_no_cdFrm.value = getopt + valCD; acct_no_nmFrm.value = valNM; //2006-09-01 [Afon] 需回傳支票抬頭 //2008-05-06 [poison] 調整支票抬頭改由公用函式get_checkti()取得 if(checkti_Frm){ //checkti_Frm.value = acct_no_nmFrm.value get_checkti(getopt,valCD); } //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } break; //個人自由行，當地套件&自費活動 case "K": var PACK_ARY = sel_help_pack(); if (PACK_ARY) { valCD = PACK_ARY[0][0]; valNM = PACK_ARY[0][1]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } acct_no_nmFrm.value = valNM; //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } break; //證照資料 case "V": var VISA_ARY = sel_help_visa(); if (VISA_ARY) { valCD = VISA_ARY[0][0]; valNM = VISA_ARY[0][1]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } acct_no_nmFrm.value = valNM; if(document.FORM1.NATN_CD) { document.FORM1.NATN_CD.value = VISA_ARY[0][2]; } if(document.FORM1.HOLDNATN_CD) { document.FORM1.HOLDNATN_CD.value = VISA_ARY[0][3]; } if(document.FORM1.APPLY_TP) { document.FORM1.APPLY_TP.value = VISA_ARY[0][4]; } if(document.FORM1.VLDE_DATE) { document.FORM1.VLDE_DATE.value = VISA_ARY[0][5]; } //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } CheckVisaDT(document.FORM1) ; break; //導遊 //2007-06-08 LEON ADD 增加導遊選項 case "N": var TLDR_ARY = sel_help_tldr(); if (TLDR_ARY) { valCD = TLDR_ARY[0][0]; valNM = TLDR_ARY[0][1]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } acct_no_nmFrm.value = valNM; //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } break; //臨時帳號 //2007-07-24 LEON ADD 增加臨時帳號選項 case "X": var ACCT_ARY = sel_help_tmpacct(); if (ACCT_ARY) { valCD = ACCT_ARY[0]; valNM = ACCT_ARY[1]; if(addTit=='N'){ acct_no_cdFrm.value = valCD; }else{ acct_no_cdFrm.value = getopt + valCD; } acct_no_nmFrm.value = valNM; //20070425 ACCT_DR if (typeof(acct_dr) != 'undefined') { acct_dr.value = valNM; } } break; default: // 2004-11-09 Ham var searchStr = sel_search(); if (searchStr) { searchStrArray = searchStr.split('，'); searchCD = searchStrArray[1]; searchNM = searchStrArray[2]; } var getoptInfo = showModalDialog("/include/sel_acct_nop.asp?opt=" + getopt + "&scd=" + searchCD + "&snm=" + searchNM, "", "dialogWidth=300pt;dialogHeight=380pt"); if (getoptInfo) { acct_no_cdFrm.value = getoptInfo[0]; acct_no_nmFrm.value = getoptInfo[1]; } break; // 2004-11-09 Ham } } } //================================================================ //搜尋機票進票作業的應收帳號 function sel_acct_nor(acct_no_cdFrm, acct_no_nmFrm) { var getopt = showModalDialog("/include/sel_acct_nop_opt.asp?mode=nor", "", "dialogWidth=200pt;dialogHeight=210pt"); var searchCD= "", searchNM = ""; if(getopt) { var searchStr = sel_search() if(searchStr) { searchStrArray = searchStr.split('，'); searchCD = searchStrArray[1]; searchNM = searchStrArray[2]; var getoptInfo = showModalDialog("/include/sel_acct_nop.asp?opt=" + getopt + "&scd=" + searchCD + "&snm=" + searchNM, "", "dialogWidth=300pt;dialogHeight=380pt"); if(getoptInfo) { acct_no_cdFrm.value = getoptInfo[0]; acct_no_nmFrm.value = getoptInfo[1]; } } } } //============================================================================= function sel_grup(frmGRUPCD, frmGRUPNM) { var searchStr = sel_search(); if(searchStr) { searchArray = searchStr.split('，'); var grupCD, grupNM, leavDT; var urlstr = ""; grupCD = searchArray[1]; grupNM = searchArray[2]; if (grupCD != "" || grupNM != "") urlstr = "&sel_all=Y"; var getGrupInfo = showModalDialog("/include/sel_grup.asp?grup_cd=" + grupCD + "&grup_nm=" + grupNM + urlstr, "", "dialogWidth=360pt;dialogHeight=" + pblDialogHeight + "pt"); if(getGrupInfo) { frmGRUPCD.value = getGrupInfo[0]; frmGRUPNM.value = getGrupInfo[1]; leavDT = getGrupInfo[2]; } } } //============================================================================= // Locust Test // 新曾訂單時選取客戶名稱與價格等級 function sel_order_acct_no(val_src_cls, val_acct_no, fld_acct_no, fld_acct_dr) { sel_acct_no(val_src_cls,val_acct_no,fld_acct_no,fld_acct_dr); var grup_cd = FORM1.GRUP_CD.value; for(i=0;i<5;i++) { if (FORM1.AMRNK[i].checked) { var amrnk = FORM1.AMRNK[i].value; chgOrderPrice(grup_cd, amrnk); return; } } } // 指定價格等級 function setAmrnk(amrnk) { var grup_cd = document.FORM1.GRUP_CD.value; var jointp = document.FORM1.JOIN_TP.value ; var bedtp = document.FORM1.BED_TP.value ; document.FORM1.AMRNK[amrnk-1].checked = true; chgOrderPrice(grup_cd, amrnk, jointp, bedtp); } // 訂單參團類別變更時, 旅客類別欄位值變更 function chgJointp(tp) { var jointp = document.FORM1.JOIN_TP.value ; var subcd = document.FORM1.SUB_CD.value ; var sHTML = ""; mylen = document.FORM1.elements.length; for(var i=0;i大人" break; } document.getElementById("bedtp").innerHTML = tableHTML; if (tp=='') { setAmrnk(amrnk); } } // 訂單價格等級變更時, 價格欄位值變更 function chgOrderPrice(grup_cd, amrnk, join_tp, bed_tp) { // 如果是團體自由行用 if (document.FORM1.SUB_FG) { chgOrderPGSUBD(document.FORM1.GRUP_CD, document.FORM1.AMRNK); return; } var frmitem = eval("self.iframe1") if(!frmitem) { return; } if (!join_tp) { join_tp = ''; } if (!bed_tp) { bed_tp = ''; } frmitem.location.href = "/include/get_grup_am.asp?GRUP_CD="+grup_cd+"&amrnk="+amrnk+"&join_tp="+join_tp+"&bed_tp="+bed_tp; } // 團體自由行訂單價格等級變更時, 價格欄位值變更 function chgOrderPGSUBD(grup_cd, amrnk) { var divNM = "iFrmID_" + (Math.round(new Date().getMilliseconds()) + Math.floor(Math.random() * 9999)); var val_grup_cd = grup_cd.value; for(i=0;i\n" + " \n" + "\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); } //新增選取旅客 傳回相關資訊 function getRecpInfo(frmItem, cntPax, extnm) { //2006-08-11 [Afon] 調整為共用程式 //2006-12-04 [leon] 新增警示訊息 var RTN_FLD = " ISNULL(TRPAX.VLDE_DT, '') AS VLDE_DT "; RTN_FLD+= " , ISNULL(TRPAX.PAX_CD, '') AS PAX_CD "; RTN_FLD+= " , TRPAX.BRTH_DT " ; RTN_FLD+= " , TRPAX.PAX_TI " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_CNML, '') AS PAX_CNML " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_CNMF, '') AS PAX_CNMF " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_ENML, '') AS PAX_ENML " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_ENMF, '') AS PAX_ENMF " ; RTN_FLD+= " , TRPAX.PASS_NO " ; RTN_FLD+= " , TRPAX.ID_NO " ; RTN_FLD+= " , 'Y' " ; RTN_FLD+= " , TRPAX.SKI_CLS " ; RTN_FLD+= " , TRPAX.SKI_CLS_LVL " ; RTN_FLD+= " , (CASE TRPAX.SKI_SHOES WHEN 1 THEN 'Y' ELSE 'N' END) AS SKI_SHOES " ; RTN_FLD+= " , TRPAX.HIGH_CM " ; RTN_FLD+= " , TRPAX.WEIT_KG " ; RTN_FLD+= " , TRPAX.FOOT_SIZE_CM " ; RTN_FLD+= " , TRPAX.ISSU_DT " ; RTN_FLD+= " , TRPAX.ISSU_PL " ; RTN_FLD+= " , TRPAX.ALRT_DR " ; //2009-11-19 [Ham] 新增抓出 自備雪具 欄位 RTN_FLD+= " , (CASE TRPAX.SKI_SEATS_FG WHEN 1 THEN 'Y' ELSE 'N' END) AS SKI_SEATS_FG " ; var SEL_FLD = "'' + TRPAX.PAX_CD + '' AS '旅客編號', ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '') AS '中文姓名', ISNULL(TRPAX.PAX_ENML, '') + ' ' + ISNULL(TRPAX.PAX_ENMF, '') AS '英文姓名', TRPAX.ID_NO AS '證號', TRPAX.BRTH_DT AS '出生日期', TREMP.EMP_CNM AS '業務員', TRCOMP.COMP_NM AS '公司全名'"; /* 修正SQL2005不支援 *=、=*寫法的問題 var SEL_FRM = "TRPAX, TREMP, TRCOMP"; var SEL_WHR = "TRPAX.EMP_CD *= TREMP.EMP_CD AND TRPAX.COMP_CD *= TRCOMP.COMP_CD"; */ var SEL_FRM = "TRPAX LEFT OUTER JOIN TREMP ON TRPAX.EMP_CD = TREMP.EMP_CD LEFT OUTER JOIN TRCOMP ON TRPAX.COMP_CD = TRCOMP.COMP_CD " var SEL_WHR = ""; var SEL_ORD = "TRPAX.PAX_CD"; var Action = "/include/sel_help_pax.asp"; var Multi = ""; var Title = "旅客"; //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=750px;dialogHeight=500px"; var sFeatures = "dialogWidth=750px;dialogHeight=650px"; RTN_ARY = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); if (RTN_ARY) { frmItem.elements('PAX_CD'+extnm+cntPax).value = RTN_ARY[0][1]; if(frmItem.elements('BRTH_DT'+extnm+cntPax)) { frmItem.elements('BRTH_DT'+extnm+cntPax).value = RTN_ARY[0][2]; } if(frmItem.elements('BRTH_DT_YY'+extnm+cntPax) && frmItem.elements('BRTH_DT_MM'+extnm+cntPax) && frmItem.elements('BRTH_DT_DD'+extnm+cntPax)){ var brth_dt = ""; brth_dt = split(RTN_ARY[0][2], "/") ; frmItem.elements('BRTH_DT_YY'+extnm+cntPax).value = brth_dt[0]; frmItem.elements('BRTH_DT_MM'+extnm+cntPax).value = brth_dt[1]; frmItem.elements('BRTH_DT_DD'+extnm+cntPax).value = brth_dt[2]; } frmItem.elements('PAX_TI'+extnm+cntPax).value = RTN_ARY[0][3]; frmItem.elements('PAX_CNML'+extnm+cntPax).value = RTN_ARY[0][4]; frmItem.elements('PAX_CNMF'+extnm+cntPax).value = RTN_ARY[0][5]; frmItem.elements('PAX_ENML'+extnm+cntPax).value = RTN_ARY[0][6]; frmItem.elements('PAX_ENMF'+extnm+cntPax).value = RTN_ARY[0][7]; frmItem.elements('PASS_NO'+extnm+cntPax).value = RTN_ARY[0][8]; if (frmItem.elements('ID_NO'+extnm+cntPax)) { frmItem.elements('ID_NO'+extnm+cntPax).value = RTN_ARY[0][9]; } if (frmItem.elements('UPD_FG'+extnm+cntPax)) { frmItem.elements('UPD_FG'+extnm+cntPax).value = RTN_ARY[0][10]; } if (frmItem.elements('SKI_CLS'+extnm+cntPax)) { ListSelected(frmItem.elements('SKI_CLS'+extnm+cntPax), RTN_ARY[0][11]); SetSkiLavel(cntPax, RTN_ARY[0][11]); // [2011-09-08][Sabrina][wm.v902.680.B]設定滑雪類別級數 } if (frmItem.elements('SKI_CLS_LVL'+extnm+cntPax)) { ListSelected(frmItem.elements('SKI_CLS_LVL'+extnm+cntPax), RTN_ARY[0][12]); } if (frmItem.elements('SKI_SHOES'+extnm+cntPax)) { BoxChecked(frmItem.elements('SKI_SHOES'+extnm+cntPax), RTN_ARY[0][13].toUpperCase()); } //2009-11-19 [Ham] 新增抓出 自備雪具 欄位 if (frmItem.elements('SKI_SEATS_FG'+extnm+cntPax)) { BoxChecked(frmItem.elements('SKI_SEATS_FG'+extnm+cntPax), RTN_ARY[0][20].toUpperCase()); } if (frmItem.elements('HIGH_CM'+extnm+cntPax)) { frmItem.elements('HIGH_CM'+extnm+cntPax).value = RTN_ARY[0][14]; } if (frmItem.elements('WEIT_KG'+extnm+cntPax)) { frmItem.elements('WEIT_KG'+extnm+cntPax).value = RTN_ARY[0][15]; } if (frmItem.elements('FOOT_SIZE_CM'+extnm+cntPax)) { frmItem.elements('FOOT_SIZE_CM'+extnm+cntPax).value = RTN_ARY[0][16]; } //2007-03-22 leon add 增加役男判斷 BEGIN PAX_TI = (frmItem.elements('PAX_TI'+extnm+cntPax).value); alert(PAX_TI); if (PAX_TI=="MR") { var BRTH_DT = frmItem.elements('BRTH_DT'+extnm+cntPax).value ; if (BRTH_DT > '0000/01/01') { BRTH_DT = BRTH_DT.split('/') var YY = BRTH_DT[0] ; var MM = BRTH_DT[1] ; var DD = BRTH_DT[2] ; var d = new Date() var NowAge = 0 NowAge = eval(d.getFullYear() - eval(YY)) NowAge = NowAge + ( eval(d.getMonth()+1) - eval(MM) ) / 12 NowAge = Math.round(NowAge * 10) NowAge = Math.round(NowAge) / 10 //17.5-21歲為役男 if (17.4 < NowAge && NowAge < 22) { if (RTN_ARY[0][19] == '') RTN_ARY[0][19] = '\n請注意此旅客可能為役男' else RTN_ARY[0][19] = RTN_ARY[0][19] + '\n請注意此旅客可能為役男' } } } //2007-03-22 leon add 增加役男判斷 END // 2006-11-17 : [ Afon ] 隱藏效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = 'none'; } var VLDE_DT = RTN_ARY[0][0] var sALRT_DR = '' if(VLDE_DT && !(VLDE_DT.substring(0,4)=='0000') && RTN_ARY[0][8] != ''){ var chkDT = new Date(); var newDT = new Date(VLDE_DT); var nowDT = new Date(); chkDT.setYear(newDT.getYear()); chkDT.setMonth(newDT.getMonth()-6); chkDT.setDate(newDT.getDate()); if(chkDT < nowDT) { // 2006-12-04 : [ leon ] 顯示警示訊息 if (RTN_ARY[0][19] != '') sALRT_DR = '\n'+ RTN_ARY[0][19] alert('注意!!護照效期不足六個月!!' + sALRT_DR) // 2006-11-17 : [ Afon ] 顯示效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = ''; } } else if (RTN_ARY[0][19] != '') { alert(RTN_ARY[0][19]) } } else if (RTN_ARY[0][19] != '') { alert(RTN_ARY[0][19]) } // 2006-11-17 : [ Afon ] 新增回傳 護照效期(起~迄)及發照地(無資料時，預設為TPE) // 若護照號碼為空值或null時，則回傳空值 if (RTN_ARY[0][8] != ''){ if (frmItem.elements('VLDE_DT'+extnm+cntPax)) { frmItem.elements('VLDE_DT'+extnm+cntPax).value = VLDE_DT; } if (frmItem.elements('ISSU_DT'+extnm+cntPax)) { frmItem.elements('ISSU_DT'+extnm+cntPax).value = RTN_ARY[0][17]; } if (frmItem.elements('ISSU_PL'+extnm+cntPax)) { if(RTN_ARY[0][18]==''){ frmItem.elements('ISSU_PL'+extnm+cntPax).value = 'TPE'; } }else{ frmItem.elements('ISSU_PL'+extnm+cntPax).value = RTN_ARY[0][18]; } } } /* var search = sel_search(); if (search) { var ary_search = search.split('，'); var strpax = ''; if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; paxinfo = sel_recp('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; paxinfo = sel_recp('S', sh_name, sh_code); } if (paxinfo) { split_paxinfo(cntPax, extnm, paxinfo); // update 040902 } } } */ return; } function getRecpInfoss(frmItem, cntPax, extnm) { //2006-08-11 [Afon] 調整為共用程式 //2006-12-04 [leon] 新增警示訊息 var RTN_FLD = " ISNULL(TRPAX.VLDE_DT, '') AS VLDE_DT "; RTN_FLD+= " , ISNULL(TRPAX.PAX_CD, '') AS PAX_CD "; RTN_FLD+= " , TRPAX.BRTH_DT " ; RTN_FLD+= " , TRPAX.PAX_TI " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_CNML, '') AS PAX_CNML " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_CNMF, '') AS PAX_CNMF " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_ENML, '') AS PAX_ENML " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_ENMF, '') AS PAX_ENMF " ; RTN_FLD+= " , TRPAX.PASS_NO " ; RTN_FLD+= " , TRPAX.ID_NO " ; RTN_FLD+= " , 'Y' " ; RTN_FLD+= " , TRPAX.SKI_CLS " ; RTN_FLD+= " , TRPAX.SKI_CLS_LVL " ; RTN_FLD+= " , (CASE TRPAX.SKI_SHOES WHEN 1 THEN 'Y' ELSE 'N' END) AS SKI_SHOES " ; RTN_FLD+= " , TRPAX.HIGH_CM " ; RTN_FLD+= " , TRPAX.WEIT_KG " ; RTN_FLD+= " , TRPAX.FOOT_SIZE_CM " ; RTN_FLD+= " , TRPAX.ISSU_DT " ; RTN_FLD+= " , TRPAX.ISSU_PL " ; RTN_FLD+= " , TRPAX.ALRT_DR " ; //2009-11-19 [Ham] 新增抓出 自備雪具 欄位 RTN_FLD+= " , (CASE TRPAX.SKI_SEATS_FG WHEN 1 THEN 'Y' ELSE 'N' END) AS SKI_SEATS_FG " ; var SEL_FLD = "'' + TRPAX.PAX_CD + '' AS '旅客編號', ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '') AS '中文姓名', ISNULL(TRPAX.PAX_ENML, '') + ' ' + ISNULL(TRPAX.PAX_ENMF, '') AS '英文姓名', TRPAX.ID_NO AS '證號', TRPAX.BRTH_DT AS '出生日期', TREMP.EMP_CNM AS '業務員', TRCOMP.COMP_NM AS '公司全名'"; /* 修正SQL2005不支援 *=、=*寫法的問題 var SEL_FRM = "TRPAX, TREMP, TRCOMP"; var SEL_WHR = "TRPAX.EMP_CD *= TREMP.EMP_CD AND TRPAX.COMP_CD *= TRCOMP.COMP_CD"; */ var SEL_FRM = "TRPAX LEFT OUTER JOIN TREMP ON TRPAX.EMP_CD = TREMP.EMP_CD LEFT OUTER JOIN TRCOMP ON TRPAX.COMP_CD = TRCOMP.COMP_CD " var SEL_WHR = ""; var SEL_ORD = "TRPAX.PAX_CD"; var Action = "/include/sel_help_pax.asp"; var Multi = ""; var Title = "旅客"; //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=750px;dialogHeight=500px"; var sFeatures = "dialogWidth=750px;dialogHeight=650px"; RTN_ARY = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); //alert(RTN_ARY); if (RTN_ARY) { frmItem.elements('PAX_CD'+extnm+cntPax).value = RTN_ARY[0][1]; if(frmItem.elements('BRTH_DT'+extnm+cntPax)) { frmItem.elements('BRTH_DT'+extnm+cntPax).value = RTN_ARY[0][2]; } if(frmItem.elements('BRTH_DT_YY'+extnm+cntPax) && frmItem.elements('BRTH_DT_MM'+extnm+cntPax) && frmItem.elements('BRTH_DT_DD'+extnm+cntPax)){ var brth_dt = ""; brth_dt = split(RTN_ARY[0][2], "/") ; frmItem.elements('BRTH_DT_YY'+extnm+cntPax).value = brth_dt[0]; frmItem.elements('BRTH_DT_MM'+extnm+cntPax).value = brth_dt[1]; frmItem.elements('BRTH_DT_DD'+extnm+cntPax).value = brth_dt[2]; } frmItem.elements('PAX_TI'+extnm+cntPax).value = RTN_ARY[0][3]; frmItem.elements('PAX_CNML'+extnm+cntPax).value = RTN_ARY[0][4]; frmItem.elements('PAX_CNMF'+extnm+cntPax).value = RTN_ARY[0][5]; frmItem.elements('PAX_ENML'+extnm+cntPax).value = RTN_ARY[0][6]; frmItem.elements('PAX_ENMF'+extnm+cntPax).value = RTN_ARY[0][7]; frmItem.elements('PASS_NO'+extnm+cntPax).value = RTN_ARY[0][8]; if (frmItem.elements('ID_NO'+extnm+cntPax)) { frmItem.elements('ID_NO'+extnm+cntPax).value = RTN_ARY[0][9]; } if (frmItem.elements('UPD_FG'+extnm+cntPax)) { frmItem.elements('UPD_FG'+extnm+cntPax).value = RTN_ARY[0][10]; } if (frmItem.elements('SKI_CLS_LVL'+extnm+cntPax)) { ListSelected(frmItem.elements('SKI_CLS_LVL'+extnm+cntPax), RTN_ARY[0][12]); } if (frmItem.elements('SKI_SHOES'+extnm+cntPax)) { BoxChecked(frmItem.elements('SKI_SHOES'+extnm+cntPax), RTN_ARY[0][13].toUpperCase()); } //2009-11-19 [Ham] 新增抓出 自備雪具 欄位 if (frmItem.elements('SKI_SEATS_FG'+extnm+cntPax)) { BoxChecked(frmItem.elements('SKI_SEATS_FG'+extnm+cntPax), RTN_ARY[0][20].toUpperCase()); } if (frmItem.elements('HIGH_CM'+extnm+cntPax)) { frmItem.elements('HIGH_CM'+extnm+cntPax).value = RTN_ARY[0][14]; } if (frmItem.elements('WEIT_KG'+extnm+cntPax)) { frmItem.elements('WEIT_KG'+extnm+cntPax).value = RTN_ARY[0][15]; } if (frmItem.elements('FOOT_SIZE_CM'+extnm+cntPax)) { frmItem.elements('FOOT_SIZE_CM'+extnm+cntPax).value = RTN_ARY[0][16]; } //2007-03-22 leon add 增加役男判斷 BEGIN PAX_TI = (frmItem.elements('PAX_TI'+extnm+cntPax).value); //alert(PAX_TI); if (PAX_TI=="MR") { var BRTH_DT = frmItem.elements('BRTH_DT'+extnm+cntPax).value ; if (BRTH_DT > '0000/01/01') { BRTH_DT = BRTH_DT.split('/') var YY = BRTH_DT[0] ; var MM = BRTH_DT[1] ; var DD = BRTH_DT[2] ; var d = new Date() var NowAge = 0 NowAge = eval(d.getFullYear() - eval(YY)) NowAge = NowAge + ( eval(d.getMonth()+1) - eval(MM) ) / 12 NowAge = Math.round(NowAge * 10) NowAge = Math.round(NowAge) / 10 //17.5-21歲為役男 if (17.5 < NowAge && NowAge < 22) { if (RTN_ARY[0][19] == '') RTN_ARY[0][19] = '\n請注意此旅客可能為役男' else RTN_ARY[0][19] = RTN_ARY[0][19] + '\n請注意此旅客可能為役男' } } } //2007-03-22 leon add 增加役男判斷 END // 2006-11-17 : [ Afon ] 隱藏效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = 'none'; } var VLDE_DT = RTN_ARY[0][0] var LEAV_DT = document.getElementById('LEAV_DT').value; var sALRT_DR = '' if(VLDE_DT && !(VLDE_DT.substring(0,4)=='0000') && RTN_ARY[0][8] != ''){ var chkDT = new Date(); var newDT = new Date(VLDE_DT); var nowDT = new Date(LEAV_DT); chkDT.setYear(newDT.getYear()); chkDT.setMonth(newDT.getMonth()-6); chkDT.setDate(newDT.getDate()); if(chkDT < nowDT) { // 2006-12-04 : [ leon ] 顯示警示訊息 if (RTN_ARY[0][19] != '') sALRT_DR = '\n'+ RTN_ARY[0][19] alert('注意!!護照效期不足六個月!!' + sALRT_DR) // 2006-11-17 : [ Afon ] 顯示效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = ''; } } else if (RTN_ARY[0][19] != '') { alert(RTN_ARY[0][19]) } } else if (RTN_ARY[0][19] != '') { alert(RTN_ARY[0][19]) } // 2006-11-17 : [ Afon ] 新增回傳 護照效期(起~迄)及發照地(無資料時，預設為TPE) // 若護照號碼為空值或null時，則回傳空值 if (RTN_ARY[0][8] != ''){ if (frmItem.elements('VLDE_DT'+extnm+cntPax)) { frmItem.elements('VLDE_DT'+extnm+cntPax).value = VLDE_DT; } if (frmItem.elements('ISSU_DT'+extnm+cntPax)) { frmItem.elements('ISSU_DT'+extnm+cntPax).value = RTN_ARY[0][17]; } if (frmItem.elements('ISSU_PL'+extnm+cntPax)) { if(RTN_ARY[0][18]==''){ frmItem.elements('ISSU_PL'+extnm+cntPax).value = 'TPE'; } }else{ frmItem.elements('ISSU_PL'+extnm+cntPax).value = RTN_ARY[0][18]; } } } // if (frmItem.elements('SKI_CLS'+extnm+cntPax)) // { // ListSelected(frmItem.elements('SKI_CLS'+extnm+cntPax), RTN_ARY[0][11]); // SetSkiLavel(cntPax, RTN_ARY[0][11]); // [2011-09-08][Sabrina][wm.v902.680.B]設定滑雪類別級數 // } /* var search = sel_search(); if (search) { var ary_search = search.split('，'); var strpax = ''; if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; paxinfo = sel_recp('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; paxinfo = sel_recp('S', sh_name, sh_code); } if (paxinfo) { split_paxinfo(cntPax, extnm, paxinfo); // update 040902 } } } */ return; } function getRecpInfosss(frmItem, cntPax, extnm) { //2006-08-11 [Afon] 調整為共用程式 //2006-12-04 [leon] 新增警示訊息 var RTN_FLD = " ISNULL(TRPAX.VLDE_DT, '') AS VLDE_DT "; RTN_FLD+= " , ISNULL(TRPAX.PAX_CD, '') AS PAX_CD "; RTN_FLD+= " , TRPAX.BRTH_DT " ; RTN_FLD+= " , TRPAX.PAX_TI " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_CNML, '') AS PAX_CNML " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_CNMF, '') AS PAX_CNMF " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_ENML, '') AS PAX_ENML " ; RTN_FLD+= " , ISNULL(TRPAX.PAX_ENMF, '') AS PAX_ENMF " ; RTN_FLD+= " , TRPAX.PASS_NO " ; RTN_FLD+= " , TRPAX.ID_NO " ; RTN_FLD+= " , 'Y' " ; RTN_FLD+= " , TRPAX.SKI_CLS " ; RTN_FLD+= " , TRPAX.SKI_CLS_LVL " ; RTN_FLD+= " , (CASE TRPAX.SKI_SHOES WHEN 1 THEN 'Y' ELSE 'N' END) AS SKI_SHOES " ; RTN_FLD+= " , TRPAX.HIGH_CM " ; RTN_FLD+= " , TRPAX.WEIT_KG " ; RTN_FLD+= " , TRPAX.FOOT_SIZE_CM " ; RTN_FLD+= " , TRPAX.ISSU_DT " ; RTN_FLD+= " , TRPAX.ISSU_PL " ; RTN_FLD+= " , TRPAX.ALRT_DR " ; //2009-11-19 [Ham] 新增抓出 自備雪具 欄位 RTN_FLD+= " , (CASE TRPAX.SKI_SEATS_FG WHEN 1 THEN 'Y' ELSE 'N' END) AS SKI_SEATS_FG " ; var SEL_FLD = "'' + TRPAX.PAX_CD + '' AS '旅客編號', ISNULL(TRPAX.PAX_CNML, '') + ISNULL(TRPAX.PAX_CNMF, '') AS '中文姓名', ISNULL(TRPAX.PAX_ENML, '') + ' ' + ISNULL(TRPAX.PAX_ENMF, '') AS '英文姓名', TRPAX.ID_NO AS '證號', TRPAX.BRTH_DT AS '出生日期', TREMP.EMP_CNM AS '業務員', TRCOMP.COMP_NM AS '公司全名'"; /* 修正SQL2005不支援 *=、=*寫法的問題 var SEL_FRM = "TRPAX, TREMP, TRCOMP"; var SEL_WHR = "TRPAX.EMP_CD *= TREMP.EMP_CD AND TRPAX.COMP_CD *= TRCOMP.COMP_CD"; */ var SEL_FRM = "TRPAX LEFT OUTER JOIN TREMP ON TRPAX.EMP_CD = TREMP.EMP_CD LEFT OUTER JOIN TRCOMP ON TRPAX.COMP_CD = TRCOMP.COMP_CD " var SEL_WHR = ""; var SEL_ORD = "TRPAX.PAX_CD"; var Action = "/include/sel_help_pax.asp"; var Multi = ""; var Title = "旅客"; //2008-09-03 [Ham] 修改高度 //var sFeatures = "dialogWidth=750px;dialogHeight=500px"; var sFeatures = "dialogWidth=750px;dialogHeight=650px"; RTN_ARY = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); //alert(RTN_ARY); if (RTN_ARY) { frmItem.elements('PAX_CD'+extnm+cntPax).value = RTN_ARY[0][1]; if(frmItem.elements('BRTH_DT'+extnm+cntPax)) { frmItem.elements('BRTH_DT'+extnm+cntPax).value = RTN_ARY[0][2]; } if(frmItem.elements('BRTH_DT_YY'+extnm+cntPax) && frmItem.elements('BRTH_DT_MM'+extnm+cntPax) && frmItem.elements('BRTH_DT_DD'+extnm+cntPax)){ var brth_dt = ""; brth_dt = split(RTN_ARY[0][2], "/") ; frmItem.elements('BRTH_DT_YY'+extnm+cntPax).value = brth_dt[0]; frmItem.elements('BRTH_DT_MM'+extnm+cntPax).value = brth_dt[1]; frmItem.elements('BRTH_DT_DD'+extnm+cntPax).value = brth_dt[2]; } frmItem.elements('PAX_TI'+extnm+cntPax).value = RTN_ARY[0][3]; frmItem.elements('PAX_CNML'+extnm+cntPax).value = RTN_ARY[0][4]; frmItem.elements('PAX_CNMF'+extnm+cntPax).value = RTN_ARY[0][5]; frmItem.elements('PAX_ENML'+extnm+cntPax).value = RTN_ARY[0][6]; frmItem.elements('PAX_ENMF'+extnm+cntPax).value = RTN_ARY[0][7]; frmItem.elements('PASS_NO'+extnm+cntPax).value = RTN_ARY[0][8]; if (frmItem.elements('ID_NO'+extnm+cntPax)) { frmItem.elements('ID_NO'+extnm+cntPax).value = RTN_ARY[0][9]; } if (frmItem.elements('UPD_FG'+extnm+cntPax)) { frmItem.elements('UPD_FG'+extnm+cntPax).value = RTN_ARY[0][10]; } if (frmItem.elements('SKI_CLS_LVL'+extnm+cntPax)) { ListSelected(frmItem.elements('SKI_CLS_LVL'+extnm+cntPax), RTN_ARY[0][12]); } if (frmItem.elements('SKI_SHOES'+extnm+cntPax)) { BoxChecked(frmItem.elements('SKI_SHOES'+extnm+cntPax), RTN_ARY[0][13].toUpperCase()); } //2009-11-19 [Ham] 新增抓出 自備雪具 欄位 if (frmItem.elements('SKI_SEATS_FG'+extnm+cntPax)) { BoxChecked(frmItem.elements('SKI_SEATS_FG'+extnm+cntPax), RTN_ARY[0][20].toUpperCase()); } if (frmItem.elements('HIGH_CM'+extnm+cntPax)) { frmItem.elements('HIGH_CM'+extnm+cntPax).value = RTN_ARY[0][14]; } if (frmItem.elements('WEIT_KG'+extnm+cntPax)) { frmItem.elements('WEIT_KG'+extnm+cntPax).value = RTN_ARY[0][15]; } if (frmItem.elements('FOOT_SIZE_CM'+extnm+cntPax)) { frmItem.elements('FOOT_SIZE_CM'+extnm+cntPax).value = RTN_ARY[0][16]; } //2007-03-22 leon add 增加役男判斷 BEGIN PAX_TI = (frmItem.elements('PAX_TI'+extnm+cntPax).value); //alert(PAX_TI); if (PAX_TI=="MR") { var BRTH_DT = frmItem.elements('BRTH_DT'+extnm+cntPax).value ; if (BRTH_DT > '0000/01/01') { BRTH_DT = BRTH_DT.split('/') var YY = BRTH_DT[0] ; var MM = BRTH_DT[1] ; var DD = BRTH_DT[2] ; var d = new Date() var NowAge = 0 NowAge = eval(d.getFullYear() - eval(YY)) NowAge = NowAge + ( eval(d.getMonth()+1) - eval(MM) ) / 12 NowAge = Math.round(NowAge * 10) NowAge = Math.round(NowAge) / 10 //17.5-21歲為役男 if (17.5 < NowAge && NowAge < 22) { if (RTN_ARY[0][19] == '') RTN_ARY[0][19] = '\n請注意此旅客可能為役男' else RTN_ARY[0][19] = RTN_ARY[0][19] + '\n請注意此旅客可能為役男' } } } //2007-03-22 leon add 增加役男判斷 END // 2006-11-17 : [ Afon ] 隱藏效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = 'none'; } var VLDE_DT = RTN_ARY[0][0] var LEAV_DT = document.getElementById('LEAV_DT').value; var sALRT_DR = '' if(VLDE_DT && !(VLDE_DT.substring(0,4)=='0000') && RTN_ARY[0][8] != ''){ var chkDT = new Date(); var newDT = new Date(VLDE_DT); var nowDT = new Date(); chkDT.setYear(newDT.getYear()); chkDT.setMonth(newDT.getMonth()-6); chkDT.setDate(newDT.getDate()); if(chkDT < nowDT) { // 2006-12-04 : [ leon ] 顯示警示訊息 if (RTN_ARY[0][19] != '') sALRT_DR = '\n'+ RTN_ARY[0][19] alert('注意!!護照效期不足六個月!!' + sALRT_DR) // 2006-11-17 : [ Afon ] 顯示效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = ''; } } else if (RTN_ARY[0][19] != '') { alert(RTN_ARY[0][19]) } } else if (RTN_ARY[0][19] != '') { alert(RTN_ARY[0][19]) } // 2006-11-17 : [ Afon ] 新增回傳 護照效期(起~迄)及發照地(無資料時，預設為TPE) // 若護照號碼為空值或null時，則回傳空值 if (RTN_ARY[0][8] != ''){ if (frmItem.elements('VLDE_DT'+extnm+cntPax)) { frmItem.elements('VLDE_DT'+extnm+cntPax).value = VLDE_DT; } if (frmItem.elements('ISSU_DT'+extnm+cntPax)) { frmItem.elements('ISSU_DT'+extnm+cntPax).value = RTN_ARY[0][17]; } if (frmItem.elements('ISSU_PL'+extnm+cntPax)) { if(RTN_ARY[0][18]==''){ frmItem.elements('ISSU_PL'+extnm+cntPax).value = 'TPE'; } }else{ frmItem.elements('ISSU_PL'+extnm+cntPax).value = RTN_ARY[0][18]; } } } // if (frmItem.elements('SKI_CLS'+extnm+cntPax)) // { // ListSelected(frmItem.elements('SKI_CLS'+extnm+cntPax), RTN_ARY[0][11]); // SetSkiLavel(cntPax, RTN_ARY[0][11]); // [2011-09-08][Sabrina][wm.v902.680.B]設定滑雪類別級數 // } /* var search = sel_search(); if (search) { var ary_search = search.split('，'); var strpax = ''; if (ary_search.length > 0) { tp = ary_search[0]; // show all data if (tp=='A') { sh_code = ''; sh_name = ''; paxinfo = sel_recp('A', sh_name, sh_code); } // show match condition data if (tp=='S') { sh_code = ary_search[1]; sh_name = ary_search[2]; paxinfo = sel_recp('S', sh_name, sh_code); } if (paxinfo) { split_paxinfo(cntPax, extnm, paxinfo); // update 040902 } } } */ return; } //-------------------------------------------------------- // 選擇直客 tp = (A:全部,S:依條件) 顯示方式 , sh_name = 名稱條件, sh_code = 代碼條件, 調整視窗大小 //-------------------------------------------------------- // [2011-10-29] sunyaru start function sel_recp(tp, sh_name, sh_code,type) { var paxinfo = showModalDialog("/include/sel_recp.asp?tp="+tp+"&sh_code="+sh_code+"&sh_name="+sh_name+"&type="+type+"&chice=H","pax","dialogWidth=400pt;dialogHeight=310pt"); if (paxinfo) { return paxinfo; } } // [2011-10-29] sunyaru end //選擇幣別 function sel_curr(cd, nm, ratent) { var mycurr var str_curr_cd='' var str_curr_nm='' var str_rate_nt='' if (document.FORM1.elements(cd)) { aa = document.FORM1.elements(cd).value ; } else { aa = cd.value; } mycurr = showModalDialog("/include/sel_curr.asp?aa="+aa+"&chice=H","","dialogWidth=260pt;dialogHeight=" + pblDialogHeight + "pt"); if (mycurr) { //ary_curr = mycurr.split('/'); ary_curr = mycurr; for(var i=0;i 1 else { NewCNFM_TP = '4'; } // CANCEL_FG : 1 --> 0 break; case 'CNFM_FG': if (fldval == '0') { NewCNFM_TP = '1'; } // CNFM_FG : 0 --> 1 else { NewCNFM_TP = '2'; } // CNFM_FG : 1 --> 0 break; default: break; } //2010-11-18 [Flynn] wm.v902.224.U交易成本應付帳號判斷獨立總帳P部門 if (NewCNFM_TP == "1"){ var rtnstr = showModalDialog("/include/func_chk_acctP.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq, "", "dialogWidth=0pt;dialogHeight=0pt"); if (rtnstr == "Y"){ alert("應付部門帳號和訂單部門分屬不同的總帳公司，無法拋帳請檢查並修正！"); return; } } var iflag = showModalDialog("U_order_transflag.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&NewCNFM_TP=" + NewCNFM_TP, "", "dialogWidth=300pt;dialogHeight=120pt"); //while (iflag) // iflag = showModalDialog("U_order_transflag.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&NewCNFM_TP=" + NewCNFM_TP + "&" + iflag, "", "dialogWidth=300pt;dialogHeight=120pt"); // 執行交易確認或取消, 應回到原來頁面 if (asptp == 'U') { URLparent = "U_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } else { URLparent = "V_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } // 2010-10-25 : [Roy][wm.v902.138.U]入境團調整訂單參團交易，JDA修改人數時，需刷新JDA //location.href = URLparent; var str = parent.location.href; if(str.toUpperCase().indexOf("V_TRIP_DISPATCH_ALL") > 0){ URLparent = str if(str.toUpperCase().indexOf("TRANS_SQ") < 0 ){ URLparent = URLparent + "&TRANS_SQ="+trans_sq; }else{ tmp = URLparent.substring(URLparent.indexOf("TRANS_SQ"),URLparent.indexOf("TRANS_SQ")+13); URLparent = URLparent.replace(tmp,"TRANS_SQ="+trans_sq); } if(str.toUpperCase().indexOf("SHOW_ASP") > 0 ){ if (asptp == 'U'){ URLparent = URLparent.replace("SHOW_ASP=V","SHOW_ASP=U") }else{ URLparent = URLparent.replace("SHOW_ASP=U","SHOW_ASP=V") } }else{ if (asptp == 'U'){ URLparent = URLparent + "&SHOW_ASP=U" }else{ URLparent = URLparent + "&SHOW_ASP=V" } } if(NewCNFM_TP == "3"){ URLparent = URLparent.replace("SHOW_ASP=U","SHOW_ASP=V") } parent.location.href = URLparent }else{ window.location.href = URLparent; } } // 取消交易確認 function chkFG2(fldnm, fldval, asptp) { var NewCNFM_TP = ''; var itemform = document.FORM1; op_sq = itemform.OP_SQ.value; trans_sq = itemform.TRANS_SQ.value; trans_tp = itemform.TRANS_TP.value; switch(fldnm) { case 'CANCEL_FG': if (fldval == '0') { NewCNFM_TP = '3'; } // CANCEL_FG : 0 --> 1 else { NewCNFM_TP = '4'; } // CANCEL_FG : 1 --> 0 break; case 'CNFM_FG': if (fldval == '0') { NewCNFM_TP = '1'; } // CNFM_FG : 0 --> 1 else { NewCNFM_TP = '2'; } // CNFM_FG : 1 --> 0 break; default: break; } var iflag = showModalDialog("U_order_transflag2.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&NewCNFM_TP=" + NewCNFM_TP, "", "dialogWidth=300pt;dialogHeight=100pt"); // 執行交易確認或取消, 應回到原來頁面 if (asptp == 'U') { URLparent = "U_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } else { URLparent = "V_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } location.href = URLparent; } // UPDATE TRANS AR_AM function upd_trans_aram(asptp) { var itemform = document.FORM1; op_sq = itemform.OP_SQ.value; trans_sq = itemform.TRANS_SQ.value; trans_tp = itemform.TRANS_TP.value; // 2007-07-23 : [Sam ] 解決內部鎖定時 遇到執行錯誤 跳出程式 未解除鎖定 // 2007-07-26 : [Sam ] 修改版面 var aram = showModalDialog("U_order_trans_aram.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&TRANS_TP=" + trans_tp, "", "dialogWidth=430pt;dialogHeight=146pt;resizable=no"); /* if (aram) { var getVal = showModalDialog("U_order_trans_aram.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&TRANS_TP=" + trans_tp + "&AR_AM=" + aram , "", "dialogWidth=300pt;dialogHeight=100pt"); } */ //2008-12-25 [Ham] 增加判斷, 避免銷售金額更新之後導回錯誤的頁面 if (itemform.iWeb_ID) { if (trans_tp == "N" && itemform.iWeb_ID.value != "GOTS"){ trans_tp = "N_PAX"; } } // 執行交易確認或取消, 應回到原來頁面 if (asptp == 'U') { URLparent = "U_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } else { URLparent = "V_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } location.href = URLparent; } // UPDATE TRANS AR_AM Before Confirmed function upd_trans_cnfm_aram(asptp) { var itemform = document.FORM1; op_sq = itemform.OP_SQ.value; trans_sq = itemform.TRANS_SQ.value; trans_tp = itemform.TRANS_TP.value; //2008-12-25 [Ham] 增加判斷, 避免銷售金額更新之後導回錯誤的頁面 if (trans_tp == "N" && document.all("iWeb_ID").value != "GOTS"){ trans_tp = "N_PAX"; } // 2007-07-23 : [Sam ] 解決內部鎖定時 遇到執行錯誤 跳出程式 未解除鎖定 // 2007-07-26 : [Sam ] 修改版面 var aryAR_AM = showModalDialog("U_order_trans_cnfm_aram.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&TRANS_TP=" + trans_tp, "", "dialogWidth=430pt;dialogHeight=146pt;resizable=no"); //var aryAR_AM = window.open("U_order_trans_cnfm_aram.asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&TRANS_TP=" + trans_tp, "", "Width=550pt;Height=300pt"); /* if (aryAR_AM) { var qStr; qStr = "?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq + "&TRANS_TP=" + trans_tp qStr += ("&AR_AM=" + aryAR_AM["AR_AM"]) if(aryAR_AM["TAX_AM"]) { qStr += ("&TAX_AM=" + aryAR_AM["TAX_AM"]) } if(aryAR_AM["Q_AM"]) { qStr += ("&Q_AM=" + aryAR_AM["Q_AM"]) } if(aryAR_AM["TKT_BAM"]) { qStr += ("&TKT_BAM=" + aryAR_AM["TKT_BAM"]) } if(aryAR_AM["TKT_RAM"]) { qStr += ("&TKT_RAM=" + aryAR_AM["TKT_RAM"]) } var getVal = showModalDialog("U_order_trans_cnfm_aram.asp" + qStr + "&sendFormFG=1" , "", "dialogWidth=300pt;dialogHeight=100pt"); } */ // 執行交易確認或取消, 應回到原來頁面 if (asptp == 'U') { URLparent = "U_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } else { URLparent = "V_order_trans"+ trans_tp +".asp?OP_SQ=" + op_sq + "&TRANS_SQ=" + trans_sq ; } location.href = URLparent; } // get pax information from ID_NO or PAX_CD function checkPax1(tp, cntPax, frameName, extnm,check) { if (!extnm) { extnm=''; } if (tp == 'ID_NO') { var val_id_no = document.FORM1.item('ID_NO'+extnm+cntPax).value; var frmitem = eval("self." + frameName); frmitem.location.href = "/include/get_paxinfo.asp?ch_tp=" + tp + "&ch_val=" + val_id_no + "&ch_cntpax=" + cntPax + "&extnm=" + extnm + "&check=" + check; } if (tp == 'PAX_CD') { var val_id_no = document.FORM1.item('PAX_CD'+extnm+cntPax).value; var frmitem = eval("self." + frameName); frmitem.location.href = "/include/get_paxinfo.asp?ch_tp=" + tp + "&ch_val=" + val_id_no + "&ch_cntpax=" + cntPax + "&extnm=" + extnm+ "&check=" + check; } } //============================================================================= // get pax information from ID_NO or PAX_CD function checkPax(tp, cntPax, frameName, extnm,BRTH_NM,typess,typs,GRUP_CD) { if (!extnm) { extnm=''; } var BRTH_DT = document.FORM1(BRTH_NM).value; if (tp == 'ID_NO') { var val_id_no = document.FORM1.item('ID_NO'+extnm+cntPax).value; var frmitem = eval("self." + frameName); frmitem.location.href = "/include/get_paxinfo.asp?ch_tp=" + tp + "&ch_val=" + val_id_no + "&ch_cntpax=" + cntPax + "&extnm=" + extnm + "&BRTH_DT=" + BRTH_DT+ "&typess=" + typess+ "&typs=" + typs+ "&GRUP_CD=" + GRUP_CD; } if (tp == 'PAX_CD') { var val_id_no = document.FORM1.item('PAX_CD'+extnm+cntPax).value; var frmitem = eval("self." + frameName); frmitem.location.href = "/include/get_paxinfo.asp?ch_tp=" + tp + "&ch_val=" + val_id_no + "&ch_cntpax=" + cntPax + "&extnm=" + extnm + "&BRTH_DT=" + BRTH_DT+ "&typess=" + typess+ "&typs=" + typs+ "&GRUP_CD=" + GRUP_CD; } } //============================================================================= function sel_htmlEditor(frmItem) { //var txtValue = ("/include/sel_htmlEditor.asp?mode=" + mode + qStr,"","dialogWidth=340pt;dialogHeight=330pt"); //if(txtValue) //{ frmItem.value = txtValue; } if(frmItem=="FORM1%2EITN%5FRK2"){ if(FORM1.ITN_RK2.value.length>100){ alert("關鍵特色長度超過100字元");frmItem.focus(); }else{ var id=window.open('/include/sel_htmlEditor.asp?frmname=' + frmItem, 'new', 'resizable=yes, status=yes, width=440, height=460, scrollbars=no, left=' + ((window.screen.width / 2) - (650/2)) + ', top=0 '); //var id=window.open('/fckeditor/_samples/asp/sample02.asp?frmname=' + frmItem , 'new', 'resizable=yes, status=yes, width=550, height=460, scrollbars=no, left=' + ((window.screen.width / 2) - (650/2)) + ', top=0 '); id.focus(); } }else{ var id=window.open('/include/sel_htmlEditor.asp?frmname=' + frmItem, 'new', 'resizable=yes, status=yes, width=440, height=460, scrollbars=no, left=' + ((window.screen.width / 2) - (650/2)) + ', top=0 '); //var id=window.open('/fckeditor/_samples/asp/sample02.asp?frmname=' + frmItem , 'new', 'resizable=yes, status=yes, width=550, height=460, scrollbars=no, left=' + ((window.screen.width / 2) - (650/2)) + ', top=0 '); id.focus(); } } //============================================================================= function previewHTML(item) { var previewWIN = window.open('', 'new', 'resizable=yes, status=yes, width=440, height=460, scrollbars=yes, left=' + ((window.screen.width / 2) - (650/2)) + ', top=0 '); previewWIN.document.writeln(item.value); previewWIN.focus(); } //============================================================================= //2010-04-27 poison [ew.v806.277U] 新增編輯器預覽前台樣式的function previeweWebHTML(起) //參數說明: item --> 欲顯示的欄位 // sub_cd --> 商品類別 // iwebid --> iWeb_ID function previeweWebHTML(item,sub_cd,iwebid) { var itemName = ""; itemName = item.name; var previewWIN = window.open('/include/V_PreviewHtml.asp?iWEB_ID='+iwebid+"&iFieldNM="+itemName+"&iSUB_CD="+sub_cd, 'preview', 'resizable=yes, status=yes, width=440, height=460, scrollbars=yes, left=' + ((window.screen.width / 2) - (650/2)) + ', top=0 '); previewWIN.focus(); } //2010-04-27 poison [ew.v806.277U] 新增編輯器預覽前台樣式的function previeweWebHTML(迄) function sel_cartp(cd, nm) { var getResult = showModalDialog("/include/sel_cartp.asp?chice=H", "", "dialogWidth=200pt;dialogHeight=280pt"); if (getResult) { AryResult = getResult.split('，'); document.FORM1.elements(cd).value=AryResult[0]; document.FORM1.elements(nm).value=AryResult[1]; } } function sel_croomtp(cd, nm) { var getResult = showModalDialog("/include/sel_croomtp.asp?chice=H", "", "dialogWidth=200pt;dialogHeight=280pt"); if (getResult) { AryResult = getResult.split('，'); document.FORM1.elements(cd).value=AryResult[0]; document.FORM1.elements(nm).value=AryResult[1]; } } //======================================================================== function sel_airp_search(frmCDItem, frmCNMItem, frmENMItem) { var searchStr = sel_search(); if(searchStr) { var searchArray = searchStr.split("，"); sel_cd = searchArray[1]; sel_nm = searchArray[2]; var searchAIRP = showModalDialog("/include/sel_airp_search.asp?airp_cd=" + sel_cd + "&airp_cnm=" + sel_nm, "", "dialogWidth=310pt;dialogHeight=300pt"); if(searchAIRP) { frmCDItem.value = searchAIRP[0]; frmCNMItem.value = searchAIRP[1]; if(frmENMItem) { frmENMItem.value = searchAIRP[2]; } } } } //======================================================================== function sel_zone_search(frm_zone_cd, frm_zone_nm, carr_cd) { var def_CARR_CD = ""; var searchStr = sel_search(); if(searchStr) { var searchCD = "", searchCNM = ""; searchStrArray = searchStr.split('，'); searchCD = searchStrArray[1]; searchCNM = searchStrArray[2]; if(carr_cd) { def_CARR_CD = carr_cd; } var getVal = showModalDialog("/include/sel_zone_search.asp?carr_cd=" + def_CARR_CD + "&zone_cd=" + searchCD,"","dialogWidth=350pt;dialogHeight=400pt"); if(getVal) { frm_zone_cd.value = getVal; } } } //======================================================================== function sel_zone_city(def_CARR_CD, zone_cd_frmItem) { //var searchZC = showModalDialog("/include/sel_zone_city.asp?carr_cd=" + def_CARR_CD,"","dialogWidth=230pt;dialogHeight=100pt"); var searchZC = "city"; if(searchZC) { var searchStr = sel_search(); if(searchStr) { var searchCD = "", searchCNM = ""; searchStrArray = searchStr.split('，'); searchCD = searchStrArray[1]; searchCNM = searchStrArray[2]; if(searchZC == 'zone') { var getVal = showModalDialog("/include/sel_zone_search.asp?carr_cd=" + def_CARR_CD + "&zone_cd=" + searchCD,"","dialogWidth=350pt;dialogHeight=400pt"); if(getVal) { zone_cd_frmItem.value = getVal; return searchZC; } } else if(searchZC == 'city') { var getVal = showModalDialog("/include/sel_city_search.asp?city_cd=" + searchCD + "&city_cnm=" + searchCNM + "&s_mode=s","","dialogWidth=350pt;dialogHeight=400pt"); if(getVal) { /* if(areaCDitem) //區域代碼 { areaCDitem.value = getResult[0][0]; } if(areaCNMitem) //區域名稱 { areaCNMitem.value = getResult[0][1]; } if(natnCDitem) //國家代碼 { natnCDitem.value = getResult[1][0]; } if(natnCNMitem) //國家名稱 { natnCNMitem.value = getResult[1][1]; } if(cityCNMitem) //城市名稱 { cityCNMitem.value = getResult[2][1]; } */ if(zone_cd_frmItem) //城市代碼 { zone_cd_frmItem.value = getVal[2][0]; return searchZC; } } } } } } //============================================================================== function sel_mgrup(frmGRUPCD, frmGRUPNM, tp) { var searchStr = sel_search(); if(searchStr) { searchArray = searchStr.split('，'); var grupCD, grupNM, leavDT; grupCD = searchArray[1]; grupNM = searchArray[2]; var getGrupInfo = showModalDialog("/include/sel_mgrup.asp?grup_cd=" + grupCD + "&grup_nm=" + grupNM + "&tp=" + tp , "", "dialogWidth=360pt;dialogHeight=300pt"); if(getGrupInfo) { frmGRUPCD.value = getGrupInfo[0]; frmGRUPNM.value = getGrupInfo[1]; leavDT = getGrupInfo[2]; } } } // 2010-08-05 : [Flynn] [wm.v806.980.u][標準版] 團型及個團『行程資料維護』，從現行一次修改一天，改為一次可修改多天 function reins_itn2(num){ var city_cd = eval("FORM1.ITN_CITY"+num).value ; if (city_cd != "") { var itn_cd = showModalDialog("N_itn.asp","","dialogWidth=300pt;dialogHeight=150pt"); if (itn_cd) { document.FORM1.ITN_CD.value = itn_cd; document.FORM1.elements("Sel_rowNum").value = num; document.FORM1.action="N_itn_su.asp"; document.FORM1.target="_blank"; document.FORM1.submit(); //document.FORM1.action=""; document.FORM1.target=""; } } else { alert("城市必須有資料才能回建!"); } } function reins_itn() { var city_cd = FORM1.ITN_CITY.value ; if (city_cd != "") { var itn_cd = showModalDialog("N_itn.asp","","dialogWidth=300pt;dialogHeight=150pt"); if (itn_cd) { document.FORM1.ITN_CD.value = itn_cd; document.FORM1.action="N_itn_su.asp"; document.FORM1.submit(); } } else { alert("城市必須有資料才能回建!"); } } function show_reclog(op_sq) { var mywin mywin = window.open("/D/L_trreclog.asp?OP_SQ="+op_sq,"show_reclog","resizable=yes,scrollbars=yes,width=640,height=360"); } //=================================================================== //getCD_NM(CODE表單物件, 欲代入的名稱表單物件, 其它額外欲代入直的表單物件, 代號[ex:carrCD, cityCD...]) // 2008/01/09 Sam 如果 frmCD是 readOnly 則不動作 function getCD_NM(cdItem, nmItem, extraItem, chkItem) //2003/09/09阿光重陽節新增 { var chkVal = cdItem.value; if(chkVal == "") { cdItem.value = ""; nmItem.value = ""; if(extraItem){ extraItem.value = ""; } return; } if (typeof(cdItem) != 'undefined') { if (!cdItem.readOnly) { //可新增sel_chk_cd_nm.asp的case取得其它的Name var getRS = showModalDialog("/include/sel_chk_cd_nm.asp?cd=" + chkVal + "&chkitem=" + chkItem,"","dialogWidth=200pt;dialogHeight=50pt"); if(getRS) { if(Number(getRS[0]) == 1) { cdItem.value = getRS[1]; if(nmItem) { nmItem.value = getRS[2]; } if(extraItem) { extraItem.value = getRS[3]; } } else { alert(getRS[3]); //找不到資料時會回傳錯誤訊息，記錄在陣列三 cdItem.select(); return false; } } } } } // 新增訂金單明細 (TRANS:交易方式, PAX:明細方式) function sel_dord_tp(op_sq, dord_no) { var dordtp = showModalDialog("/include/sel_dord_tp.asp?op_sq="+op_sq,"","dialogTop=10pt;dialogWidth=150pt;dialogHeight=120pt;status=no;help=no"); if (dordtp) { // 以交易方式產生明細 if (dordtp == "TRANS") { trans_str = showModalDialog("/include/sel_order_trans.asp?op_sq="+op_sq+"&chice=H","","dialogTop=10pt;dialogWidth=350pt;dialogHeight=400pt;status=no;help=no"); if (trans_str) { var ary_trans_str = trans_str.split('，'); if (ary_trans_str.length > 1 ){ mypax_sq = ary_trans_str[0]; mypax_cd = ary_trans_str[1]; mypax_cnm = ary_trans_str[2]; mytrans_sq = ary_trans_str[3]; mysub_dr = ary_trans_str[4]; mytrans_tp = ary_trans_str[5]; mytrans_tpnm = ary_trans_str[6]; mytrans_am = ary_trans_str[7]; } document.FORM1.PAX_SQ0.value = mypax_sq; document.FORM1.PAX_CD0.value = mypax_cd; document.FORM1.PAX_CNM0.value = mypax_cnm; document.FORM1.TRANS_SQ0.value = mytrans_sq; document.FORM1.SUB_DR0.value = mysub_dr; document.FORM1.TRANS_TP0.value = mytrans_tp; document.FORM1.TRANS_TP_NM0.value = mytrans_tpnm + "("+ mytrans_tp +")"; document.FORM1.AR_AM0.value = mytrans_am; } } else { trans_dr = showModalDialog("/include/sel_dord_bypax.asp?op_sq="+op_sq,"","dialogTop=10pt;dialogWidth=350pt;dialogHeight=400pt;status=no;help=no"); if (trans_dr) { location.href=('N_order_depositd.asp?DORD_NO='+dord_no+"&op_sq="+op_sq+"&PROCESS_STR="+trans_dr); } } } } //選擇旅館特色 030930 add function SELHTLRK_onclick(subcd_htlrk, fldnm) { var myhtlrk myhtlrk = showModalDialog("/include/sel_htl_rk.asp?aa="+FORM1.elements(fldnm).value+"&chice="+subcd_htlrk+"&fldnm="+fldnm,"","dialogWidth=300pt;dialogHeight=" + pblDialogHeight + "pt"); if (myhtlrk) { FORM1.elements(fldnm).value = myhtlrk; return true; } } //----------------------------------------------------------------- // 檢視訂單 : 客戶選取視窗 //----------------------------------------------------------------- function sel_acct_noV2(src_cls, acct_no, fld_acct_no, fld_acct_dr, fitemp_fg, Tit_P,FACT_TP) { //2007-01-16 leon 傳入FACT_TP 會出現 廠商選項 var ary_acctcls = showModalDialog("/include/sel_acct_clsv2.asp?FACT_TP="+FACT_TP,"","dialogTop=10pt;dialogWidth=280pt;dialogHeight=300pt;status=no;help=no"); if (ary_acctcls) { // 2007-01-04 : [ Afon ]調整 sel_acct_noV2() 新增 Tit_P(有值時，不允許使用 P 部門帳號) if(Tit_P && ary_acctcls["CLS_CD"] == 'P'){ alert('應'+ Tit_P +'帳號不可使用 P 部門帳號。\n請重新選擇!!') return false; } //sel_acct_no2V2(ary_acctcls["CLS_CD"],fld_acct_no,fld_acct_dr, ary_acctcls); sel_acct_no2(ary_acctcls["CLS_CD"], acct_no, fld_acct_no, fld_acct_dr, ary_acctcls, true, fitemp_fg) } return; } //----------------------------------------------------------------- // 取得中英文名稱 // get_nm(CD表單名稱, 中文表單名稱, 英文表單名稱, 欲取得的CD資料庫欄位名, 是否顯示錯誤訊息(1/0/或不給) ) // 2008/01/09 Sam 如果 frmCD是 readOnly 則不動作 //----------------------------------------------------------------- //function get_nm(frmCD, frmCNM, frmENM, selCase, no_Err) function get_nm(frmCD, frmCNM, frmENM, selCase, no_Err,TP) // 2009-09-04 Vanessa 加上TP值，為應付憑單手動輸入業務員時使用 { var divNM = "iFrmID_" + (Math.round(new Date().getMilliseconds()) + Math.floor(Math.random() * 9999)); var itemCD = eval("document." + frmCD).value; if (typeof(eval("document." + frmCD)) != 'undefined') { if (!eval("document." + frmCD).readOnly) { //2006-10-14 [Afon] 若代碼為空值時，中英文名稱也要清空 if(itemCD==''){ if(frmCNM){ eval("document." + frmCNM).value ='';} if(frmENM){ eval("document." + frmENM).value ='';} } var url = "/include/get_cd_nm_ifrm.asp?cd=" + itemCD + "&frm_cd=" + frmCD + "&div=" + divNM + "&selcase=" + selCase + "&TP=" + TP if(frmCNM) { url += "&frm_cnm=" + frmCNM; } if(frmENM) { url += "&frm_enm=" + frmENM; } if(no_Err) { if(no_Err == '1') { url += "&no_err=1"; } } var iframeStr = "
\n" + " \n" + "
\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); } } } function get_nm_db(frmCD, frmCNM, frmENM, selCase, prodTP, no_Err, debug) { get_nm(frmCD, frmCNM, frmENM, selCase, '') } //----------------------------------------------------------------- // 取得中英文名稱(當表單名稱欄位當代碼欄位輸入時適用) // get_acct_nm1() // 註：acct_no_srcItem 變數為代入 輸入 ACCT_NO 帳號代碼的表單欄位 ("表單名稱.欄位名稱") //[Jack][wm.v902.429.U] 增加參數 modeJ,以限定只有在修改模式才進行的功能 //----------------------------------------------------------------- function get_acct_nm1(cdItem, nmItem, acct_no_srcItem, empcd, Tit_P,modeJ) { var divNM = "tmpIframeID_" + (Math.round(new Date().getMilliseconds()) + Math.floor(Math.random() * 9999)); var acct_no = eval("document." + acct_no_srcItem).value.toUpperCase(); // 2007-01-04 : [ Afon ]調整 get_acct_nm1) 新增 Tit_P(有值時，不允許使用 P 部門帳號) if(Tit_P && acct_no.substring(0,1) == 'P'){ alert('應' + Tit_P + '帳號不可使用 P 部門帳號。\n請重新輸入!!') eval("document." + acct_no_srcItem).value = '' ; eval("document." + nmItem).value = '' ; return false; } //alert('modeJ='+modeJ) var url = "/include/get_acct_no_nm.asp?acct_no=" + acct_no + "&frm_cd=" + cdItem + "&frm_nm=" + nmItem + "&div=" + divNM + "&srcfrm=" + acct_no_srcItem + "&sel_odr=1" + "&empcd=" + empcd+ "&modeJ=" + modeJ; var iframeStr = "
\n" + " \n" + "
\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); } //----------------------------------------------------------------- // 取得中英文名稱(當表單名稱欄位當代碼欄位輸入時適用) // get_acct_nm2() // 註：acct_no_srcItem 變數為代入 輸入 ACCT_NO 帳號代碼的表單欄位 ("表單名稱.欄位名稱") // 註：Acct_TP_A_Not_View_Sel_FG 若帳號為同業且未指定聯絡人 則 變數指定為1時不會顯示選取聯絡人介面 //----------------------------------------------------------------- function get_acct_nm2(cdItem, nmItem, acct_no_srcItem, empcd, Acct_TP_A_Not_View_Sel_FG) { var divNM = "tmpIframeID_" + (Math.round(new Date().getMilliseconds()) + Math.floor(Math.random() * 9999)); var acct_no = eval("document." + acct_no_srcItem).value if (Acct_TP_A_Not_View_Sel_FG == "") { Acct_TP_A_Not_View_Sel_FG = 0; } else { Acct_TP_A_Not_View_Sel_FG = 1; } var url = "/include/get_acct_no_nm.asp?acct_no=" + acct_no + "&frm_cd=" + cdItem + "&frm_nm=" + nmItem + "&div=" + divNM + "&srcfrm=" + acct_no_srcItem + "&sel_odr=1" + "&empcd=" + empcd + "&Acct_TP_A_Not_View_Sel_FG=" + Acct_TP_A_Not_View_Sel_FG; var iframeStr = "
\n" + " \n" + "
\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); } //============================================================================= function jsIsDate(datevalue) { //請傳入 「年/月/日」 的格式。 if(datevalue.indexOf('/') < 0 ) { //alert("函數無法判定輸入的值。"); return false; } //----------------------------------------------------------------- // 0000/01/01 視為正確日期格式 //----------------------------------------------------------------- if (datevalue.substr(0, 4) == "0000") datevalue = "2000" + datevalue.substr(4, 6); //----------------------------------------------------------------- var datetime,datearry ; datetime = new Date(datevalue) if (isNaN(datetime)) { //alert("輸入的「" + datevalue + "」為錯誤的日期格式。"); return false; } datearry = datevalue.split('/'); if(Number(datetime.getFullYear()) != Number(datearry[0])) { return false; } else if(Number(datetime.getMonth()) != (Number(datearry[1]) - 1)) { return false; } else if(Number(datetime.getDate()) != Number(datearry[2])) { return false; } else { return true; } } //---------------------------------------------------------------- //20071122 Sam 修正傳入為物件時, 發生錯誤 function sel_longdate(dt) { //var datetime = new Date(); if(typeof(dt) == 'object') { var FormName = document.forms[0].name; var dtForm = dt; //var oDoc = dtForm; var oDoc = FormName +'.'+ dtForm.name; } else if(typeof(dt).toString() == 'string') { var dtForm = FORM1.elements(dt); var oDoc = "FORM1." + dt; } var cDate = dtForm.value; //window.open("/include/calendar.asp?backf="+oDoc+"&cDate="+cDate,"window", "height=210, width=300, resizeable=no,",""); var newDate = showModalDialog("/include/calendar.asp?backf=" + oDoc + "&cDate=" + cDate, window, "dialogWidth=220pt;dialogHeight=200pt;status=no;help=no"); } /* function sel_longdate(dt) { var datetime = new Date(); if(typeof(dt) == 'object') { var dtForm = dt; } else if(typeof(dt).toString() == 'string') { var dtForm = FORM1.elements(dt); } var str_dt = dtForm.value; if ( jsIsDate(str_dt) ) { var tyy; tyy = str_dt.split("/")[0]; tyy = Number(tyy); if (tyy < 1900 || tyy > 2100) { str_dt = datetime.getFullYear() + "/" + (datetime.getMonth()+1) + "/" + datetime.getDate(); } } else { str_dt = datetime.getFullYear() + "/" + (datetime.getMonth()+1) + "/" + datetime.getDate(); } var ary_dt = str_dt.split('/'); if (ary_dt.length > 2) { var adate = showModalDialog("/include/sel_cal.asp?ayear="+ary_dt[0]+"&amonth="+ary_dt[1]+"&aday="+ary_dt[2],"","dialogTop=10pt;dialogWidth=275pt;dialogHeight=180pt;status=no;help=no"); if(adate) { var yy = adate[0].toString(); var mm = adate[1].toString(); var dd = adate[2].toString(); if (mm.length==1) mm = '0'+mm if (dd.length==1) dd = '0'+dd dtForm.value=yy + "/" + mm + "/" + dd ; } } } */ //----------------------------------------------------------------- // 選取 飯店資料 : 自由行飯店使用 //----------------------------------------------------------------- function sel_pshotel(tp) { var htlcd if ((document.FORM1.ITN_CITY.value=='') && (1 + 1 != 2)) { alert("請先輸入旅遊城市"); return false; } else { //---------2003_04_28 by andois----------------------- var shtlCD = "", shtlCNM = "" if(1 == 1) { if(document.FORM1.G_ITN_NATN) { selnatn = document.FORM1.G_ITN_NATN.value; } else { selnatn = ""; } htlcd = sel_hotel_search('H', FORM1.HTL_CD.value, FORM1.ITN_CITY.value, selnatn); if (htlcd) { var aryHTL = htlcd.split('/'); var strHTLCD=''; var strHTLNM=''; for(var i=0;i\n" + // var iframeStr = "
\n" + " \n" + "
\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); } // 選擇航班時段標題 function sel_session_sts(cd, nm) { var getResult = showModalDialog("/include/sel_session_sts.asp?chice=H", "", "dialogWidth=200pt;dialogHeight=280pt"); if (getResult) { AryResult = getResult.split('，'); document.FORM1.elements(cd).value=AryResult[0]; document.FORM1.elements(nm).value=AryResult[1]; } } //================================================================= // 處理單一欄位輸入日期 function function splitDate(inputItem) { var val = inputItem.value if(val.length == 0) { return val; } if(val.indexOf('/') == -1) { var valY, valM, valD, valDT; if(val.length == 8) { valY = val.substr(0, 4); valM = val.substr(4, 2); valD = val.substr(6, 2); } else if(val.length == 6) { valY = "20" + val.substr(0, 2); valM = val.substr(2, 2); valD = val.substr(4, 2); } valDT = valY + '/' + valM + '/' + valD; if(valY!='0000'){ if(!jsIsDate(valDT)) { alert("錯誤的日期格式(ex:yyyy/mm/dd)。"); inputItem.select(); return val; } } return valDT; } else { var valArray = val.split('/'); if(valArray.length != 3) { alert("錯誤的日期格式(ex:yyyy/mm/dd)。"); inputItem.select(); return val; } if(valArray[0].length == 2) { valArray[0] = "20" + valArray[0]; } if(valArray[1].length == 1) { valArray[1] = "0" + valArray[1]; } if(valArray[2].length == 1) { valArray[2] = "0" + valArray[2]; } if(!jsIsDate(val)) { alert("錯誤的日期格式(ex:yyyy/mm/dd)。"); inputItem.select(); return val; } return valArray[0] + '/' + valArray[1] + '/' + valArray[2]; } } //================================================================ // ChkStrLength : 檢查欄位的長度(中文*2 , 英文*1) function ChkStrLength(formitem, maxLen ,alertword) { var val = formitem.value; var totallength = 0; for (i = 0; i < val.length; i ++ ) { var tmp_word = val.charAt(i); tmp_word = escape(tmp_word) if (tmp_word.indexOf('%') != -1) { tmp_word = tmp_word.substring(1,tmp_word.length) if (isNaN(Number(tmp_word))) { totallength += 2; } else { totallength ++ ; } } else { totallength ++ ; } } if (totallength > maxLen) { alert(alertword); formitem.focus(); return false; } else { return true; } } //================================================================ //2010-03-17 [Roy] [V8.06_620.U] BB&BE調整請款單明細摘要欄由四欄合併為一欄，增加ChkStrLength2函數，不顯示警示，直接不能輸入 function ChkStrLength2(formitem, maxLen) { var val = formitem.value; var totallength = 0; var rtnVal = ""; for (i = 0; i < val.length; i ++ ){ var tmp_word = val.charAt(i); tmp_word = escape(tmp_word) if (tmp_word.indexOf('%') != -1){ tmp_word = tmp_word.substring(1,tmp_word.length) if (isNaN(Number(tmp_word))){ totallength += 2; }else{ totallength ++ ; } }else{ totallength ++ ; } if (totallength > maxLen) { formitem.value = rtnVal; return; }else{ rtnVal += val.substring(i,i+1); } } } //----------------------------------------------------------------- // 取得中英文名稱 // get_msln_nm(CD表單名稱, 中文表單名稱 ) //----------------------------------------------------------------- function get_msln_nm(frmCD, frmNM, amrnk, modify) { var divNM = "iFrmID_" + (Math.round(new Date().getMilliseconds()) + Math.floor(Math.random() * 9999)); var itemCD = eval("document." + frmCD).value; var itemNM = eval("document." + frmNM).value; if (!modify || modify == 'undefined') { modify == '' ; } if (!amrnk || amrnk == 'undefined') { amrnk == '' ; } var url = "/include/get_msln_nm.asp?prod_cd=" + itemCD + "&prod_nm=" + itemNM + "&div=" + divNM + "&amrnk=" + amrnk + "&modify=" + modify var iframeStr = "
\n" + " \n" + "
\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); } //----------------------------------------------------------------- // 取得中英文名稱 // reset_grup_seatCnt(團號, 是否更新機位不正確('1'/'') ) //----------------------------------------------------------------- function reset_grup_seatCnt(grup_cd, reset_fg) { var autoReNewFG = 0; if(grup_cd == ""){ return; } if(!confirm("重算個團團號「" + grup_cd + "」的機位嗎？")) { return false; } if(confirm("是否自動遞補機位？\n確定：自動遞補；取消：不遞補")) { autoReNewFG = 1; } var resetST = showModalDialog("/D/U_rst_grup_seatcnt.asp?grup_cd=" + grup_cd + "&reset_fg=" + reset_fg + "&autorenew=" + autoReNewFG,"","dialogWidth=350pt;dialogHeight=120pt"); if(resetST) { location.reload(); } } //----------------------------------------------------------------- //取得旅客資料 //----------------------------------------------------------------- function get_pax_dtl(pax_cd, id_no) { if((pax_cd == '') && (id_no == '')) { alert("請輸入身份證字號。"); return false; } var url = "/include/get_pax_dtl.asp?pax_cd=" + pax_cd + "&id_no=" + id_no; return showModalDialog(url, "", "dialogWidth=320pt;dialogHeight=150pt"); } //----------------------------------------------------------------- //客戶往來狀態 //----------------------------------------------------------------- function get_acct_stus(frmCD, frmNM) { var itemCD = eval("document." + frmCD).value; var itemNM = eval("document." + frmNM).value; var getResult = showModalDialog("/include/get_acct_stus.asp?acct_no=" + itemCD ,"","dialogWidth=210pt;dialogHeight=300pt"); if(getResult) { if (getResult[0] == 'N') { alert(getResult[1]); return false; } else { if (getResult[1] != '') { if (confirm(getResult[1]+'\n您是否繼續?')) { return true; } return false; } } return true; } return false; } //-------------------------------------------------------- // 選擇列印訂金單-測試 [2004-03-30] [Brian] //-------------------------------------------------------- function sel_dord_prndd(op_sq,dord_no,usr_id) { if((op_sq != '') && (dord_no != '') && (usr_id !='')) { var dordtp=showModalDialog("/include/sel_dord_prn.asp?op_sq=" + op_sq + "&dord_no=" + dord_no + "&USR_ER=" + usr_id,"","dialogTop=10pt;dialogWidth=150pt;dialogHeight=150pt;status=no;help=no"); window.close();} } function sel_dord_prnd(dord_no, usr_id) { if ((dord_no !='') && (usr_id !='')) { var todo = showModalDialog("V_dord_rk_conf.asp?dord_no="+dord_no,"deposit_rk","dialogWidth=350pt;dialogHeight=400pt"); if (todo=='PRINT') { mywin = window.open("L_DORD_P1.asp?DORD_NO="+dord_no+"&USR_ER="+usr_id,"pdfDord","resizable=yes,scrollbars=yes,width=640,height=480"); } } } //-------------------------------------------------------- //-------------------------------------------------------- // 新增訂金單明細--列表專用 (TRANS:交易方式, PAX:明細方式) //-------------------------------------------------------- function sel_dord_tpd(op_sq, dord_no) { var dordtp = showModalDialog("/include/sel_dord_tp.asp?op_sq="+op_sq,"","dialogTop=10pt;dialogWidth=150pt;dialogHeight=120pt;status=no;help=no"); if (dordtp) { // 以交易方式產生明細 if (dordtp == "TRANS") { trans_str = showModalDialog("/include/sel_order_trans.asp?op_sq="+op_sq+"&chice=H","","dialogTop=10pt;dialogWidth=350pt;dialogHeight=400pt;status=no;help=no"); var ary_trans_str = trans_str.split('，'); if (ary_trans_str.length > 1 ){ mypax_sq = ary_trans_str[0]; mypax_cd = ary_trans_str[1]; mypax_cnm = ary_trans_str[2]; mytrans_sq = ary_trans_str[3]; mysub_dr = ary_trans_str[4]; mytrans_tp = ary_trans_str[5]; mytrans_tpnm = ary_trans_str[6]; mytrans_am = ary_trans_str[7]; } document.FORM1.PAX_SQ0.value = mypax_sq; document.FORM1.PAX_CD0.value = mypax_cd; document.FORM1.PAX_CNM0.value = mypax_cnm; document.FORM1.TRANS_SQ0.value = mytrans_sq; document.FORM1.SUB_DR0.value = mysub_dr; document.FORM1.TRANS_TP0.value = mytrans_tp; document.FORM1.TRANS_TP_NM0.value = mytrans_tpnm + "("+ mytrans_tp +")"; document.FORM1.AR_AM0.value = mytrans_am; } else { trans_dr = showModalDialog("/include/sel_dord_bypax.asp?op_sq="+op_sq,"","dialogTop=10pt;dialogWidth=350pt;dialogHeight=400pt;status=no;help=no"); if (trans_dr) { location.href=('N_order_depositd.asp?DORD_NO='+dord_no+"&op_sq="+op_sq+"&PROCESS_STR="+trans_dr); } } } } //------------------------------------------------- //============================================================================= function add_iFrm(url, w, h, dspStr) { var divNM = "tmpIframeID_" + (Math.round(new Date().getMilliseconds()) + Math.floor(Math.random() * 9999)); if(!dspStr){ dspStr = ""; } if((!w) || (w == "") || (isNaN(w))) { w = "400"; } if((!h) || (h == "") || (isNaN(h))) { h = "200"; } var iframeStr = "
\n" + " \n" + "
\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); return divNM; } //選擇路線 function sel_tarea_cd(cdItem, nmItem, selCD, domestic_fg) { var url = ""; url = "/include/sel_tarea_cd.asp?a=1"; if(selCD) { url += ("&tarea_cd=" + selCD); } if(domestic_fg) { url += "&domestic_fg=1" } else { var domestic_fg = false; } var rs = showModalDialog(url,"","dialogTop=10pt;dialogWidth=280pt;dialogHeight=" + pblDialogHeightB + "pt;status=no;help=no"); if(rs) { if(rs["RESEARCH"]) { sel_tarea_cd(cdItem, nmItem, rs["SEL_TAREA_CD"], domestic_fg); return; } if(cdItem){ cdItem.value = rs["TAREA_CD"]; } if(nmItem){ nmItem.value = rs["TAREA_CNM"]; } } } //------------------------------------------------------- //選擇國內路線 //------------------------------------------------------- function sel_dtarea_cd(cdItem, nmItem, selCD) { sel_tarea_cd(cdItem, nmItem, selCD, true) } //------------------------------------------------------- //分割日期格式 //------------------------------------------------------- function split_date(inputItem) { var val = inputItem.value if(val.length == 0) { return val; } if(val.indexOf('/') == -1) { var valY, valM, valD, valDT; if(val.length == 8) { valY = val.substr(0, 4); valM = val.substr(4, 2); valD = val.substr(6, 2); } else if(val.length == 6) { valY = "20" + val.substr(0, 2); valM = val.substr(2, 2); valD = val.substr(4, 2); } valDT = valY + '/' + valM + '/' + valD; if(!IsDate(valDT)) { alert("錯誤的日期格式(ex:yyyy/mm/dd)。"); inputItem.select(); return val; } return valDT; } else { var valArray = val.split('/'); if(valArray.length != 3) { alert("錯誤的日期格式(ex:yyyy/mm/dd)。"); inputItem.select(); return val; } if(valArray[0].length == 2) { valArray[0] = "20" + valArray[0]; } if(valArray[1].length == 1) { valArray[1] = "0" + valArray[1]; } if(valArray[2].length == 1) { valArray[2] = "0" + valArray[2]; } return valArray[0] + '/' + valArray[1] + '/' + valArray[2]; } } //新增機票資訊顯示視窗 function open_tkt_desc1(tsubd_sq, sel_cty_cd1, sel_cty_cd2, sel_amrnk, manager_fg) { var url = ""; if(manager_fg) { url = "/B/V_tsubd_tkt_desc.asp?tsubd_sq=" + tsubd_sq; } else { url = "/eWeb/TKT/tkt_desc.asp?tsubd_sq=" + tsubd_sq; } if(sel_cty_cd1) { url += "&cty_cd1=" + sel_cty_cd1; } if(sel_cty_cd2) { url += "&cty_cd2=" + sel_cty_cd2; } if(sel_amrnk) { url += "&amrnk=" + sel_amrnk; } var ID = window.open (url, 'web', 'scrollbars=yes,width=545,height=550, statusbar=yes'); ID.focus(); } //新增機票資訊顯示視窗(內部) function open_tkt_desc(url) { var ID = window.open (url, 'intranet', 'scrollbars=yes,width=545,height=550, status=yes'); ID.focus(); } //開啟機位預查視窗 function open_flt_search(url, tsubd_sq, tsubds_sq) { var id = window.open(url + "?tsubd_sq=" + tsubd_sq + "&tsubds_sq=" + tsubds_sq, "WIN", "scrollbars=yes,width=640,height=550, status=yes"); id.focus(); } //搜尋國家分區 function sel_sarea(natn_cd, cd, nm) { if(natn_cd!=""){ var getResult = showModalDialog("/include/sel_sarea.asp?NATN_CD="+natn_cd, "", "dialogWidth=250pt;dialogHeight=300pt;"); if (getResult) { AryResult = getResult.split('，'); document.FORM1.elements(cd).value=AryResult[0]; document.FORM1.elements(nm).value=AryResult[1]; } } } //搜尋城市推薦旅館 function sel_city_htl(city_cd,htl_cd, cd, nm) { var getResult = showModalDialog("/include/sel_city_htl.asp?HTL_CD="+htl_cd+"&CITY_CD="+city_cd, "", "dialogWidth=250pt;dialogHeight=300pt;"); if (getResult) { AryResult = getResult.split('，'); document.FORM1.elements(cd).value=AryResult[0]; document.FORM1.elements(nm).value=AryResult[1]; } } //2008-02-25 poison sel_rct() 增加收文選項 function sel_rct(cd) { var RTN_FLD = "TRRCT.RCT_NO, TRRCT.UPD_EMP+' '+TREMP.EMP_CNM,TRRCT.UPD_DTM"; var SEL_FLD = "TRRCT.RCT_NO AS 收文編號,TRRCT.UPD_EMP+' '+TREMP.EMP_CNM AS 異動人員,TRRCT.UPD_DTM AS 異動時間"; var SEL_FRM = "TRRCT LEFT JOIN TREMP ON TRRCT.RCT_EMP = TREMP.EMP_CD" ; var SEL_WHR = "TRRCT.RCT_SRC <> 'A' AND isNull(TRRCT.SRC_CD,'') = '' AND TRRCT.RCT_NO NOT IN (SELECT RCT_NO FROM TRRCTLOG WHERE LOG_TP IN ('3','9')) AND TRRCT.RCT_NO NOT IN (SELECT RCT_NO FROM TRQTW WHERE S_ST ='N' AND RCT_NO <> '') "; var SEL_ORD = "TRRCT.RCT_NO"; var Action = "/include/sel_help_rct.asp"; var Multi = ""; var Title = "收文"; var sFeatures = "dialogWidth=400px;dialogHeight=500px"; var strrct = SearchWin(RTN_FLD, SEL_FLD, SEL_FRM, SEL_WHR, SEL_ORD, Multi, Action, Title, sFeatures); if (strrct) { //20070426 Sam if (typeof(cd) != 'undefined') document.FORM1.elements(cd).value = strrct[0][0]; } } //團體自由行行程複製控制程式 function CopyITN(COPYTO_TP){ var form=document.FORM1; copy_tp=form.COPY_TP.value; switch(COPYTO_TP){ case "MP": //團體自由行團型 new_MGRUP_CD=form.PACKAGE_CD.value; old_MGRUP_CD=form.src_PACK_CD.value; SUB_CD=form.SUB_CD.value; SUB_FG=form.SUB_FG.value; str_URL = "U_copy_mpgitn.asp?copy_tp="+copy_tp; str_URL+= "&new_MGRUP_CD="+new_MGRUP_CD; str_URL+= "&old_MGRUP_CD="+old_MGRUP_CD; str_URL+= "&SUB_CD="+SUB_CD+"&SUB_FG="+SUB_FG break; case "P": //團體自由行個團 new_GRUP_CD=form.PACKAGE_CD.value; old_GRUP_CD=form.src_PACK_CD.value SUB_CD=form.SUB_CD.value; str_URL = "U_copy_pgitn.asp?copy_tp="+copy_tp; str_URL+= "&new_GRUP_CD="+new_GRUP_CD; str_URL+= "&old_GRUP_CD="+old_GRUP_CD; str_URL+= "&SUB_CD="+SUB_CD; break; } window.location=str_URL; } function cal_curr_am(currAM, taxAM, rateNT, updCol) { if(Number(rateNT) == 0) { alert("匯率為0，無法計算原幣成本單價。"); return false; } currAM = Number(currAM); taxAM = Number(taxAM); rateNT = Number(rateNT); //updCol.value = Math.round((taxAM * rateNT) + currAM); updCol.value = (taxAM) + currAM; } // [2011-10-29] sunyaru start //---------------------------------------------------------------- // 填入旅客相關欄位資料, USE IN show_pax(), getRecpInfo() //---------------------------------------------------------------- function split_paxinfos(cntPax, extnm, tmp_paxinfo) { //alert("split_paxinfos") if (tmp_paxinfo == 'undefined') { return false; } tmp_paxinfo = tmp_paxinfo.toString(); //alert (tmp_paxinfo); var ary_paxinfo = tmp_paxinfo.split('，'); var brth_dt = ''; brth_dt = ary_paxinfo[2]; var ary_brth_dt = brth_dt.split('/'); if (ary_brth_dt.length == 3) { if (ary_brth_dt[1].length == 1) { ary_brth_dt[1] = "0"+ary_brth_dt[1] } if (ary_brth_dt[2].length == 1) { ary_brth_dt[2] = "0"+ary_brth_dt[2] } var brth_dt_yy = ary_brth_dt[0]; var brth_dt_mm = ary_brth_dt[1]; var brth_dt_dd = ary_brth_dt[2]; } else { var brth_dt_yy = ''; var brth_dt_mm = ''; var brth_dt_dd = ''; } if (!extnm) {extnm = ''; } document.FORM1.elements('PAX_CD'+extnm+cntPax).value = ary_paxinfo[1]; // 2006-08-17 [Afon] 調整 split_paxinfo()，排除 生日為一個欄位時，出現錯誤 if(document.FORM1.elements('BRTH_DT_YY'+extnm+cntPax) && document.FORM1.elements('BRTH_DT_MM'+extnm+cntPax) && document.FORM1.elements('BRTH_DT_DD'+extnm+cntPax)){ document.FORM1.elements('BRTH_DT_YY'+extnm+cntPax).value = brth_dt_yy; document.FORM1.elements('BRTH_DT_MM'+extnm+cntPax).value = brth_dt_mm; document.FORM1.elements('BRTH_DT_DD'+extnm+cntPax).value = brth_dt_dd; } if(document.FORM1.elements('BRTH_DT'+extnm+cntPax)){ document.FORM1.elements('BRTH_DT'+extnm+cntPax).value = brth_dt; } document.FORM1.elements('PAX_TI'+extnm+cntPax).value = ary_paxinfo[3]; document.FORM1.elements('PAX_CNML'+extnm+cntPax).value = ary_paxinfo[4]; document.FORM1.elements('PAX_CNMF'+extnm+cntPax).value = ary_paxinfo[5]; document.FORM1.elements('PAX_ENML'+extnm+cntPax).value = ary_paxinfo[6]; document.FORM1.elements('PAX_ENMF'+extnm+cntPax).value = ary_paxinfo[7]; document.FORM1.elements('PASS_NO'+extnm+cntPax).value = ary_paxinfo[8]; if (ary_paxinfo[8] != ''){ if (document.FORM1.elements('ISSU_DT'+extnm+cntPax)) { document.FORM1.elements('ISSU_DT'+extnm+cntPax).value = ary_paxinfo[17]; } if (document.FORM1.elements('VLDE_DT'+extnm+cntPax)) { document.FORM1.elements('VLDE_DT'+extnm+cntPax).value = ary_paxinfo[18]; } if (document.FORM1.elements('ISSU_PL'+extnm+cntPax)) { if(ary_paxinfo[19]==''){ document.FORM1.elements('ISSU_PL'+extnm+cntPax).value = 'TPE'; }else{ document.FORM1.elements('ISSU_PL'+extnm+cntPax).value = ary_paxinfo[19]; } } } if (document.FORM1.elements('ID_NO'+extnm+cntPax)) { document.FORM1.elements('ID_NO'+extnm+cntPax).value = ary_paxinfo[9]; } if (document.FORM1.elements('UPD_FG'+extnm+cntPax)) { document.FORM1.elements('UPD_FG'+extnm+cntPax).value = ary_paxinfo[10]; } if (document.FORM1.elements('SKI_SHOES'+extnm+cntPax)) { BoxChecked(document.FORM1.elements('SKI_SHOES'+extnm+cntPax), ary_paxinfo[13]); } if (document.FORM1.elements('HIGH_CM'+extnm+cntPax)) { document.FORM1.elements('HIGH_CM'+extnm+cntPax).value = ary_paxinfo[14]; } if (document.FORM1.elements('WEIT_KG'+extnm+cntPax)) { document.FORM1.elements('WEIT_KG'+extnm+cntPax).value = ary_paxinfo[15]; } if (document.FORM1.elements('FOOT_SIZE_CM'+extnm+cntPax)) { document.FORM1.elements('FOOT_SIZE_CM'+extnm+cntPax).value = ary_paxinfo[16]; } // 2006-11-17 : [ Afon ] 新增回傳 護照效期(起~迄)及發照地(無資料時，預設為TPE) // 若護照號碼為空值或null時，則回傳空值 // 隱藏效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = 'none'; } var sALRT_DR = '' //alert(sALRT_DR]); if (ary_paxinfo[3]=="MR" ) { if (ary_paxinfo[2] > '0000/01/01') { //alert(ary_paxinfo[2]); BRTH_DT = ary_paxinfo[2].split('/') var YY = BRTH_DT[0] ; var MM = BRTH_DT[1] ; var DD = BRTH_DT[2] ; //2007-03-22 leon add 增加役男判斷 var d = new Date() var NowAge = 0 NowAge = eval(d.getFullYear() - eval(YY)) NowAge = NowAge + ( eval(d.getMonth()+1) - eval(MM) ) / 12 NowAge = Math.round(NowAge * 10) NowAge = Math.round(NowAge) / 10 // alert(NowAge); // alert('AGE' + NowAge) //17.5-21歲為役男 if (17.5 < NowAge && NowAge < 22) { sALRT_DR='請注意此旅客可能為役男' } } } //如果有第十二碼為護照效期不足六個月(/include/sel_recp.asp) // if (ary_paxinfo.length == 21) if (ary_paxinfo[20] != '') { //alert(ary_paxinfo[20]); //alert(ary_paxinfo[21]); //alert("注意!!護照效期不足六個月!! \n" + sALRT_DR) //2011-12-20:[ Kevin ] 顯示警示訊息 if(ary_paxinfo[21] != '') { alert("注意!!護照效期不足六個月!! \n" + ary_paxinfo[21] + "\n" + sALRT_DR) } else { alert("注意!!護照效期不足六個月!! \n" + sALRT_DR) } //2006-11-17: [ Afon ] 顯示效期不足字樣 if(document.FORM1.all.item('SHOW_MS'+extnm+cntPax)){ document.FORM1.all.item('SHOW_MS'+extnm+cntPax).style.display = ''; } } else { if(ary_paxinfo[21] != '') { alert(ary_paxinfo[21] + "\n" + sALRT_DR) } else { if(sALRT_DR != '') { alert(sALRT_DR) } } } if (document.FORM1.elements('SKI_CLS_LVL'+extnm+cntPax)) { ListSelected(document.FORM1.elements('SKI_CLS_LVL'+extnm+cntPax), ary_paxinfo[12]); } if (document.FORM1.elements('SKI_CLS'+extnm+cntPax)) { ListSelected(document.FORM1.elements('SKI_CLS'+extnm+cntPax), ary_paxinfo[11]); SetSkiLavel(cntPax, document.FORM1.elements('SKI_CLS'+extnm+cntPax).value); // [2011-09-08][Sabrina][wm.v902.680.B]設定滑雪類別級數 } } // [2011-10-29] sunyaru end //---------------------------------------------------------------- // 填入旅客相關欄位資料, USE IN show_pax(), getRecpInfo() //---------------------------------------------------------------- function split_paxinfo(cntPax, extnm, tmp_paxinfo) { // alert("split_paxinfo") if (tmp_paxinfo == 'undefined') { return false; } tmp_paxinfo = tmp_paxinfo.toString(); var ary_paxinfo = tmp_paxinfo.split('，'); var brth_dt = ''; brth_dt = ary_paxinfo[2]; var ary_brth_dt = brth_dt.split('/'); if (ary_brth_dt.length == 3) { if (ary_brth_dt[1].length == 1) { ary_brth_dt[1] = "0"+ary_brth_dt[1] } if (ary_brth_dt[2].length == 1) { ary_brth_dt[2] = "0"+ary_brth_dt[2] } var brth_dt_yy = ary_brth_dt[0]; var brth_dt_mm = ary_brth_dt[1]; var brth_dt_dd = ary_brth_dt[2]; } else { var brth_dt_yy = ''; var brth_dt_mm = ''; var brth_dt_dd = ''; } if (!extnm) {extnm = ''; } document.FORM1.elements('PAX_CD'+extnm+cntPax).value = ary_paxinfo[1]; // 2006-08-17 [Afon] 調整 split_paxinfo()，排除 生日為一個欄位時，出現錯誤 if(document.FORM1.elements('BRTH_DT_YY'+extnm+cntPax) && document.FORM1.elements('BRTH_DT_MM'+extnm+cntPax) && document.FORM1.elements('BRTH_DT_DD'+extnm+cntPax)){ document.FORM1.elements('BRTH_DT_YY'+extnm+cntPax).value = brth_dt_yy; document.FORM1.elements('BRTH_DT_MM'+extnm+cntPax).value = brth_dt_mm; document.FORM1.elements('BRTH_DT_DD'+extnm+cntPax).value = brth_dt_dd; } if(document.FORM1.elements('BRTH_DT'+extnm+cntPax)){ document.FORM1.elements('BRTH_DT'+extnm+cntPax).value = brth_dt; } document.FORM1.elements('PAX_TI'+extnm+cntPax).value = ary_paxinfo[3]; document.FORM1.elements('PAX_CNML'+extnm+cntPax).value = ary_paxinfo[4]; document.FORM1.elements('PAX_CNMF'+extnm+cntPax).value = ary_paxinfo[5]; document.FORM1.elements('PAX_ENML'+extnm+cntPax).value = ary_paxinfo[6]; document.FORM1.elements('PAX_ENMF'+extnm+cntPax).value = ary_paxinfo[7]; document.FORM1.elements('PASS_NO'+extnm+cntPax).value = ary_paxinfo[8]; if (document.FORM1.elements('ID_NO'+extnm+cntPax)) { document.FORM1.elements('ID_NO'+extnm+cntPax).value = ary_paxinfo[9]; } if (document.FORM1.elements('UPD_FG'+extnm+cntPax)) { document.FORM1.elements('UPD_FG'+extnm+cntPax).value = ary_paxinfo[10]; } if (document.FORM1.elements('SKI_CLS'+extnm+cntPax)) { ListSelected(document.FORM1.elements('SKI_CLS'+extnm+cntPax), ary_paxinfo[11]); SetSkiLavel(cntPax, document.FORM1.elements('SKI_CLS'+extnm+cntPax).value); // [2011-09-08][Sabrina][wm.v902.680.B]設定滑雪類別級數 } if (document.FORM1.elements('SKI_CLS_LVL'+extnm+cntPax)) { ListSelected(document.FORM1.elements('SKI_CLS_LVL'+extnm+cntPax), ary_paxinfo[12]); } if (document.FORM1.elements('SKI_SHOES'+extnm+cntPax)) { BoxChecked(document.FORM1.elements('SKI_SHOES'+extnm+cntPax), ary_paxinfo[13]); } if (document.FORM1.elements('HIGH_CM'+extnm+cntPax)) { document.FORM1.elements('HIGH_CM'+extnm+cntPax).value = ary_paxinfo[14]; } if (document.FORM1.elements('WEIT_KG'+extnm+cntPax)) { document.FORM1.elements('WEIT_KG'+extnm+cntPax).value = ary_paxinfo[15]; } if (document.FORM1.elements('FOOT_SIZE_CM'+extnm+cntPax)) { document.FORM1.elements('FOOT_SIZE_CM'+extnm+cntPax).value = ary_paxinfo[16]; } // 2006-11-17 : [ Afon ] 新增回傳 護照效期(起~迄)及發照地(無資料時，預設為TPE) // 若護照號碼為空值或null時，則回傳空值 // 隱藏效期不足字樣 if(document.all.item('SHOW_MS'+extnm+cntPax)){ document.all.item('SHOW_MS'+extnm+cntPax).style.display = 'none'; } if (ary_paxinfo[8] != ''){ if (document.FORM1.elements('ISSU_DT'+extnm+cntPax)) { document.FORM1.elements('ISSU_DT'+extnm+cntPax).value = ary_paxinfo[17]; } if (document.FORM1.elements('VLDE_DT'+extnm+cntPax)) { document.FORM1.elements('VLDE_DT'+extnm+cntPax).value = ary_paxinfo[18]; } if (document.FORM1.elements('ISSU_PL'+extnm+cntPax)) { if(ary_paxinfo[19]==''){ document.FORM1.elements('ISSU_PL'+extnm+cntPax).value = 'TPE'; }else{ document.FORM1.elements('ISSU_PL'+extnm+cntPax).value = ary_paxinfo[19]; } } } //如果有第十二碼為護照效期不足六個月(/include/sel_recp.asp) // if (ary_paxinfo.length == 21) if (ary_paxinfo[20] != '') { var sALRT_DR = '' if (ary_paxinfo[21] != '') sALRT_DR = '\n' + ary_paxinfo[21] alert("注意!!護照效期不足六個月!!" + sALRT_DR) // 2006-11-17 : [ Afon ] 顯示效期不足字樣 if(document.FORM1.all.item('SHOW_MS'+extnm+cntPax)){ document.FORM1.all.item('SHOW_MS'+extnm+cntPax).style.display = ''; } } else if (ary_paxinfo[21] != '') { alert(ary_paxinfo[21]) } } function sel_hotel_search(chice, htlFilter, cityFilter, natnFilter, areaFilter) { //chice == 'H' : 單選 if(!chice) { var chice = ''; } var url = "/include/sel_itnhotel.asp?chice=" + chice; var shtlCD = "", shtlCNM = ""; var searchStr = sel_search(); if((searchStr) || (htlFilter)) { if(htlFilter) { if(htlFilter == ""){ return; } } if(searchStr) { var sArray; sArray = searchStr.split('，'); shtlCD = sArray[1]; shtlCNM = sArray[2]; url += ("&shtl_cd=" + shtlCD + "&shtl_cnm=" + shtlCNM); } if(htlFilter) { url += ("&htl_cd=" + htlFilter); } if(cityFilter) { url += ("&city=" + cityFilter); } if(natnFilter) { url += ("&natn=" + natnFilter); } //var id = window.open("", "", "width=600, height=100"); //id.document.write (url); //id.focus(); //20070503 Sam 飯店查詢增加搜尋條件 高度需增加10 return showModalDialog(url,"","dialogWidth=360pt;dialogHeight=" + (pblDialogHeight+10) + "pt"); } } function sel_hotel(itemCD, itemNM) { var htlcd = sel_hotel_search('H'); if (htlcd) { var strHTLCD = htlcd.split('，')[0] ; var strHTLNM = htlcd.split('，')[1]; itemCD.value=strHTLCD; itemNM.value=strHTLNM; } } //----------------------------------------------------------------- // 選擇(國外)國家 //----------------------------------------------------------------- function SELNATN2_onclick(area_cd, cd, nm, choice) { var str_natn_cd='' var str_natn_nm='' var mynatn var str_area_cd = FORM1.elements(area_cd).value; if(!choice) { var choice = 'H'; } if (str_area_cd != "") { mynatn = showModalDialog("/include/sel_natn.asp?aa="+str_area_cd+"&bb="+FORM1.elements(cd).value+"&chice=" + choice ,"","dialogWidth=350pt;dialogHeight=300pt"); if (mynatn){ ary_natn = mynatn.split('/'); for(var i=0;i構成的元素才可使用 set_scroll_table([嵌入Table的 DIV 或 SPAN 標籤的ID], [從第幾格為分界], [左邊TABLE寬度], [右邊TABLE寬度]) */ function get_scroll_table(tableNM_ID, split_col_pos, lW, rW) { var tableIndex = 0; var tableItem; var tableTRItem, tableTDItem; var tW = 0; var divNM = "TABLE_DIV_" + Math.floor(Math.random() * 9999); var tabM_ID = divNM + "_M"; var tabL_ID = divNM + "_L"; var tabR_ID = divNM + "_R"; var selTAB_ID = ""; var reScrollHTML = "\n" + "\n" + "
"; var tabL = "
"; var tabR = "
"; document.getElementById(tableNM_ID).innerHTML = "" + document.getElementById(tableNM_ID).innerHTML + ""; document.getElementById(tableNM_ID).insertAdjacentHTML("BeforeEnd", "
" + tabL + "" + tabR + "
"); document.getElementById(tabL_ID).innerHTML = document.getElementById(tabM_ID).innerHTML document.getElementById(tabR_ID).innerHTML = document.getElementById(tabM_ID).innerHTML for(var myLoop = 1; myLoop <= 2; myLoop ++) { if(myLoop == 1) { selTAB_ID = tabL_ID; tW = lW; } else { selTAB_ID = tabR_ID; tW = rW; } mainItem = document.getElementById(selTAB_ID); for(var i = 0; i < mainItem.all.item.length; i ++) { if(mainItem.all.item(i).tagName.toUpperCase() == "TABLE") { var tableItem = mainItem.all.item(i); break; } } tableItem.style.width = tW; for(var i = 0; i < tableItem.all.item.length; i ++) { if(tableItem.all.item(i).tagName.toUpperCase() == "TR") { for(var j = 0; j < tableItem.all.item(i).parentElement.children.length; j ++) { tableTRItem = tableItem.all.item(i).parentElement.children(j); for(var k = 0; k < tableTRItem.children.length; k ++) { tableTRItem.children.item(k).style.display = ''; //tableTRItem.children.item(k).style.visibility = ''; tableTRItem.children.item(k).innerHTML = "" + tableTRItem.children.item(k).innerHTML + "" tableTRItem.children.item(k).setAttribute ("noWrap", true); } if(myLoop == 1) { hiddenS = Number(split_col_pos); hiddenE = tableTRItem.children.length; } else { hiddenS = 0; hiddenE = (Number(split_col_pos)) } for(var k = hiddenS; k < hiddenE; k ++) { tableTRItem.children.item(k).style.display = 'none'; tableTRItem.children.item(k).innerHTML = ""; //tableTRItem.children.item(k).style.visibility = 'hidden'; } } } } } document.getElementById(tabR_ID).insertAdjacentHTML("BeforeEnd", reScrollHTML); document.getElementById(tabM_ID).innerHTML = ""; } function show_room_photo(htl_cd, room_cd, product) { if((htl_cd == '') || (room_cd == '')) { return; } var id = window.open('show_room.asp?HTL_CD=' + htl_cd + '&ROOM_CD=' + room_cd + '&PRODUCT=' + product,'','width=577,height=377'); id.focus(); } //================================================================================================ function get_city_info(frmAREA_CD, frmAREA_CNM, frmAREA_ENM, frmNATN_CD, frmNATN_CNM, frmNATN_ENM, frmCITY_CD, frmCITY_CNM, frmCITY_ENM, selCase, no_Err, debug) { var divNM = "iFrmID_" + (Math.round(new Date().getMilliseconds()) + Math.floor(Math.random() * 9999)); switch (selCase) { case "area_cd": itemCD = eval("document." + frmAREA_CD).value; break; case "natn_cd": itemCD = eval("document." + frmNATN_CD).value; break; case "city_cd": itemCD = eval("document." + frmCITY_CD).value; break; } var display = 'none'; //debug = true; if(debug) { display = ''; divNM = ''; } var url = "/include/get_city_info.asp?cd=" + itemCD + "&frm_city_cd=" + frmCITY_CD+ "&frm_area_cd=" + frmAREA_CD+ "&frm_natn_cd=" + frmNATN_CD + "&div=" + divNM + "&selcase=" + selCase if(frmCITY_CNM) { url += ("&frm_city_cnm=" + frmCITY_CNM); } if(frmCITY_ENM) { url += ("&frm_city_enm=" + frmCITY_ENM); } if(frmNATN_CNM) { url += ("&frm_natn_cnm=" + frmNATN_CNM); } if(frmNATN_ENM) { url += ("&frm_natn_enm=" + frmNATN_ENM); } if(frmAREA_CNM) { url += ("&frm_area_cnm=" + frmAREA_CNM); } if(frmAREA_ENM) { url += ("&frm_area_enm=" + frmAREA_ENM); } if(no_Err) { if(no_Err == '1') { url += "&no_err=1"; } } var iframeStr = "
\n" + " \n" + "
\n" document.body.insertAdjacentHTML("BeforeEnd", iframeStr); } // 旅館後退款, 利潤, 毛利設定 選擇旅館 function sel_htl_cd_search(cdItem, nmItem, selHTL_CD, selHTL_CNM, selCITY_CD, selNATN_CD, selAREA_CD) { var url = ""; url = "/include/sel_htl_cd.asp?a=1"; if(selHTL_CD) { url += ("&HTL_CD=" + selHTL_CD ); } else { var selHTL_CD = ""; } if(selHTL_CNM) { url += ("&htl_cnm=" + selHTL_CNM ); } else { var selHTL_CNM = ""; } if(selCITY_CD) { url += ("&CITY_CD=" + selCITY_CD ); } else { var selCITY_CD = ""; } if(selNATN_CD) { url += ("&NATN_CD=" + selNATN_CD ); } else { var selNATN_CD = ""; } if(selAREA_CD) { url += ("&AREA_CD=" + selAREA_CD ); } else { var selAREA_CD = ""; } var rs = showModalDialog(url,"","dialogTop=10pt;dialogWidth=280pt;dialogHeight=" + pblDialogHeightB + "pt;status=no;help=no"); if(rs) { if(rs["RESEARCH"]) { sel_htl_cd_search(cdItem, nmItem, rs["SEL_HTL_CD"], rs["SEL_HTL_CNM"], selCITY_CD, selNATN_CD, selAREA_CD); return; } if(cdItem){ cdItem.value = rs["HTL_CD"]; } if(nmItem){ nmItem.value = rs["HTL_CNM"]; } } } function sel_htl_cd(cdItem, nmItem, chkCdItem, selCD, selNM) { var url = ""; url = "/include/sel_htl_cd.asp?a=1"; if(selCD) { url += ("&htl_cd=" + selCD ); } if(selNM) { url += ("&htl_cnm=" + selNM ); } if (chkCdItem) { url += ("&city_cd=" + chkCdItem.value ); } var rs = showModalDialog(url,"","dialogTop=10pt;dialogWidth=280pt;dialogHeight=300pt;status=no;help=no"); if(rs) { if(rs["RESEARCH"]) { sel_htl_cd(cdItem, nmItem, chkCdItem, rs["SEL_HTL_CD"], rs["SEL_HTL_CNM"]); return; } if(cdItem){ cdItem.value = rs["HTL_CD"]; } if(nmItem){ nmItem.value = rs["HTL_CNM"]; } } } //----------------------------------------------------------------- // 選擇(國外)城市 //----------------------------------------------------------------- function sel_city_cd(cdItem, nmItem, natn_item, chice) { var str_city_cd=''; var str_city_nm=''; var mycity; if(!chice) { chice = 'H'; } if (natn_item.value != ""){ mycity = showModalDialog("/include/sel_city.asp?aa="+natn_item.value+"&bb="+cdItem.value+"&chice="+chice,"","dialogWidth=400pt;dialogHeight=300pt"); if (mycity) { ary_city = mycity.split('/'); for(var i=0;i= 0 ; j --) { if(selClearItem.options[j]) { selClearItem.options[j] = null; } } objOpt = new Option(); objOpt.text = "-- --"; objOpt.value = ""; selClearItem.add(objOpt); } if(selParentItem.options[selParentItem.selectedIndex].value == "") { return; } for(var i = 0; i < arySrcItem.length; i ++) { indexStr += ((indexStr != "" ? "_" : "") + eval("document." + frmNM + "." + arySrcItem[i]).options[eval("document." + frmNM + "." + arySrcItem[i]).selectedIndex].value); } if(String(typeof(iframeItem.PBL_aryOPT)) != 'object') { iframeItem.document.writeln(""); iframeItem.document.writeln("var PBL_aryOPT = new Array(); "); iframeItem.document.writeln(""); } if(String(typeof(iframeItem.PBL_aryOPT[indexStr])) != 'object') { if(TreeItem.split("，").length == 4) { if(TreeItem.split("，")[3] = "1") { var url = "/include/get_opt_item.asp?opt_case=" + optCase + "&frm=" + TreeItem + urlQstr; add_iFrm(url, 300, 300, "none"); return; } } url = "/include/get_opt_item.asp?opt_case=" + optCase; if(waitMsg) { url += "&wait_msg=" + waitMsg; } url += urlQstr; var aryRS = showModalDialog(url, "", "dialogWidth=" + dW + "pt;dialogHeight=" + dH + "pt;dialogTop=0pt;dialogLeft=00pt;center=no"); if(aryRS) { iframeItem.document.writeln("\n"); iframeItem.document.writeln("PBL_aryOPT[\"" + indexStr + "\"] = new Array(); "); for(var i = 0; i < aryRS.length; i ++) { iframeItem.document.writeln("PBL_aryOPT[\"" + indexStr + "\"][" + i + "] = new Array(2); "); iframeItem.document.writeln("PBL_aryOPT[\"" + indexStr + "\"][" + i + "][0] = \"" + aryRS[i][0] + "\"; "); iframeItem.document.writeln("PBL_aryOPT[\"" + indexStr + "\"][" + i + "][1] = \"" + aryRS[i][1] + "\"; "); } iframeItem.document.writeln("\n"); } else { return; } } for(var i = 0; i < iframeItem.PBL_aryOPT[indexStr].length; i ++) { selTrgItem.length ++; selTrgItem.options[selTrgItem.length - 1].value = iframeItem.PBL_aryOPT[indexStr][i][0]; selTrgItem.options[selTrgItem.length - 1].text = iframeItem.PBL_aryOPT[indexStr][i][1]; } } //----------------------------------------------------------------- // 檢查開票交易或更換票號時的長度，超過則警示 //----------------------------------------------------------------- function chkFITN_DR_Length(tktTP, fitnDR, lengthLMT) { var intTKT_TP = Number(tktTP); if((intTKT_TP != 1) && (intTKT_TP != 2) && (intTKT_TP != 4)) { if(fitnDR.length > lengthLMT) { if(!confirm("機票明細可容許的行程長度為 " + lengthLMT + " ，超過的行程長度將會被截掉。確定儲存嗎？")) { return false; } } } return true; } //----------------------------------------------------------------- // 控制focus移到想要的表單欄位 //----------------------------------------------------------------- function setFocus(focusFrm) { if(event.shiftKey){ return true; } if(event.keyCode == 9) { focusFrm.select(); return false; } return true; } //----------------------------------------------------------------- // 清除表單函數，將所有"SEL"開頭的表單內容清空 //----------------------------------------------------------------- function clearFORM(frmItem) { clearForm(frmItem); } function clearForm(clrFrm) { var frmType = ""; for(var i = 0; i < clrFrm.length; i ++) { if(clrFrm.elements[i].name) { if(clrFrm.elements[i].name.substr(0, 3) != "SEL"){ continue; } frmType = clrFrm.elements[i].type; if((frmType == 'hidden') || (frmType == 'text')) { clrFrm.elements[i].value = ''; } else if(frmType.indexOf("select") != -1) { clrFrm.elements[i].selectedIndex = 0; } else if((frmType == "radio") || (frmType == "checkbox")) { clrFrm.elements[i].checked = false; } } } } // 買幾送幾 /* example: 設某票價優惠為買2送1，如果大人人數為5人，則共有多少人要付錢？多少人可享受贈票優惠？ X = calFreePoint(5, 2, 1) 共有 X 人要付錢，(5-X)人可享贈票優惠。 */ function calFreePoint(totalQT, payQT, freeQT) { var i, freeCNT, freeP; freeCNT = 0 for(var i = 1; i <= totalQT; i ++) { freeCNT += ((i % payQT) == 0 ? freeQT : 0) if((i + freeCNT) >= totalQT) { return i; } } } // ===== brian 2005-05-05 判斷統一編號是否正確 chknum() ===== /* 例 : 00000108 統一編號檢查方法 1.各數字依序乘以1.2.1.2.1.2.4.1 0*1=00 0*2=00 0*1=00 0*2=00 0*1=00 1*2=02 0*4=00 8*1=08 2.再將等號右邊的十位數與十位數相加.各位數與各位數相加.兩者之和可被10整除,符合邏輯 3.各數字相加後總和為10者,符合邏輯 */ function chknum(){ var cx = new Array; cx[0] = 1; cx[1] = 2; cx[2] = 1; cx[3] = 2; cx[4] = 1; cx[5] = 2; cx[6] = 4; cx[7] = 1; var NO = document.FORM1.PR_NO.value; var SUM = 0; if (NO.length != 8) { alert("統編錯誤，要有 8 個數字"); document.FORM1.reset(); } var cnum = NO.split(""); for (i=0; i<=7; i++) { if (NO.charCodeAt() < 48 || NO.charCodeAt() > 57) { alert("統編錯誤，要有 8 個 0-9 數字組合"); document.FORM1.reset(); } SUM += cc(cnum[i] * cx[i]); } if (SUM % 10 == 0) { alert("統一編號："+NO+" 正確!"); } else if (cnum[6] == 7 && (SUM + 1) % 10 == 0) { alert("統一編號："+NO+" 正確!"); } else { alert("統一編號："+NO+" 錯誤!"); document.FORM1.reset(); } } function cc(n){ if (n > 9) { var s = n + ""; n1 = s.substring(0,1) * 1; n2 = s.substring(1,2) * 1; n = n1 + n2; } return n; } //新增線上稅額查詢Function，傳入TSUBD_SQ、AMRNK(價格等級)即可 function showCrsTax(tsubdSQ, tsubdsSQ, amrnk) { var top, left; var w = 400, h = 300; if(!amrnk) { var amrnk = '1'; } if(!tsubdsSQ) { var tsubdsSQ = ''; } top = (window.screen.availHeight - h) / 2; left = (window.screen.availWidth - w) / 2; var id = window.open("/include/get_crs_tax.asp?tsubd_sq=" + tsubdSQ + "&tsubds_sq=" + tsubdsSQ + "&amrnk=" + amrnk, "CrsTax", "scrollbars=yes, left=" + left + ", top=" + top + ",width=" + w + "px, height=" + h + "px, status=yes"); id.focus(); } //----------------------------------------------------------------- // 移除某個ID //----------------------------------------------------------------- function removeElement(elementsName) { var elementItem = document.getElementsByName(elementsName); var elementLength = elementItem.length; for(var i = 0; i < elementLength; i ++) { var item = elementItem.item(0); item.parentElement.removeChild(item); } } //----------------------------------------------------------------- // 將表單送到Frame(Frame語法由此Function產生) //----------------------------------------------------------------- function sendFormToFrame(frmItem, frameName, width, height) { if(!document.getElementById(frameName)) { var iframeHtml = "
" + "" + "
"; document.body.insertAdjacentHTML("BeforeEnd", iframeHtml); } document.getElementById(frameName).style.position = 'absolute'; document.getElementById(frameName).style.display = ''; document.getElementById(frameName).style.posLeft = ((document.body.clientWidth - document.getElementById("ACTION_FRAME").clientWidth) / 2) + document.body.scrollLeft; document.getElementById(frameName).style.posTop = ((document.body.clientWidth - document.getElementById("ACTION_FRAME").clientHeight) / 2) + document.body.scrollTop - 100; frmItem.target = frameName; frmItem.submit(); } //----------------------------------------------------------------- // 綜合快選介面 //----------------------------------------------------------------- function sel_general(sURL) { var RV = window.showModalDialog("/include/sel_general.asp?" + sURL, "SEL_GENERAL", "dialogHeight:600px; dialogWidth:600px; status:no; scroll:no;"); if (!RV) { RV = ""; } return RV; } //----------------------------------------------------------------- // 取得國家或地區的陣列資料 // selLeavel : "natn_cd"-取國家陣列, "area_cd"-取地區陣列 // ex- 複選： var arynatn = getAreaNatnCityInfo("natn_cd"); myNatnCd = arynatn[0]["NATN_CD"] // ex- 單選： var arynatn = getAreaNatnCityInfo("natn_cd"); myNatnCd = arynatn["NATN_CD"] // 之所以不統一輸出方式原因為有其他程式使用，不想影響到其他程式 //----------------------------------------------------------------- function getAreaNatnCityInfo(selLevel) { var aryArea = new Array(); var aryNatn = new Array(); var sAreaCd, sAreaNm; var sAreaQry, sNatnQry; var iIndex = 0; var selAreaItem = showModalDialog("/include/sel_area.asp" ,"","dialogWidth=210pt;dialogHeight=" + pblDialogHeight + "pt; "); if(selAreaItem) { var aryGetArea = selAreaItem.split('/'); iIndex = 0; for(var i = 0; i < aryGetArea.length; i++) { aryArea[iIndex] = new Array(); aryArea[iIndex]["AREA_CD"] = aryGetArea[i].split("，")[0]; aryArea[iIndex]["AREA_NM"] = aryGetArea[i].split("，")[1]; sAreaQry += (sAreaQry != "" ? "/" : "") + aryGetArea[i].split("，")[0]; iIndex ++; } if(selLevel.toLowerCase() == "area") { return aryArea; } var selNatnItem = showModalDialog("/include/sel_natn.asp?aa=" + sAreaQry + "&max_cnt=100","","dialogWidth=280pt;dialogHeight=300pt; "); if(selNatnItem) { var aryGetNatn = selNatnItem.split("/"); iIndex = 0; for(var i = 0; i < aryGetNatn.length; i++) { aryNatn[iIndex] = new Array(); aryNatn[iIndex]["NATN_CD"] = aryGetNatn[i].split("，")[0]; aryNatn[iIndex]["NATN_NM"] = aryGetNatn[i].split("，")[1]; sNatnQry += (sNatnQry != "" ? "/" : "") + aryGetNatn[i].split("，")[0]; iIndex ++; } if(selLevel.toLowerCase() == "natn") { return aryNatn; } } } } //----------------------------------------------------------------- // 票號快選選單，最後會得到選取的票號後十碼 // sel_ltkt_No([航空公司代碼], [庫存碼], [BSP票Flag(開頭前三碼為000的票)], [頁次，帶1或不給都行], [已選取的票號，帶空或不給都行]) //----------------------------------------------------------------- //2011-07-01 [Ham] 增加參數 機票來源(TKT_SRC_TP) //function sel_ltkt_no(carr_cd, stock_fg, bsp_fg, page, ltkt_no){ function sel_ltkt_no(carr_cd, stock_fg, bsp_fg, page, ltkt_no, tkt_src_tp){ if(!page) { var page = 1; } stock_fg = stock_fg.replace("+", "%2B"); var LTKT_NO = ""; var url = "/include/sel_ltkt_no.asp?carr_cd=" + carr_cd + "&stock_fg=" + stock_fg + "&bsp_fg=" + bsp_fg + "&page=" + page; if(ltkt_no){ url += "&sel_ltkt_no=" + ltkt_no; } //2011-07-01 [Ham] 增加參數 機票來源(TKT_SRC_TP) //2011-08-08 gary //if(tkt_src_tp){ url += "&sel_tkt_src_tp=" + tkt_src_tp; } if(tkt_src_tp != ""){ url += "&sel_tkt_src_tp=" + tkt_src_tp; } var aryRS = showModalDialog(url,"","dialogWidth=350pt;dialogHeight=420pt"); if(aryRS) { if(aryRS["RELOAD"] == "1") { //2011-07-01 [Ham] 增加參數 機票來源(TKT_SRC_TP) //sel_ltkt_no(carr_cd, stock_fg, bsp_fg, aryRS["PAGE"], aryRS["LTKT_NO"]); sel_ltkt_no(carr_cd, stock_fg, bsp_fg, aryRS["PAGE"], aryRS["LTKT_NO"], tkt_src_tp); return; } else { LTKT_NO = aryRS["LTKT_NO"]; LTKT_NO = comboTKT_NO(LTKT_NO); // script/chkTKT_NO.js return LTKT_NO; } } } // ============================================================================================================== // 選取 INPUT 元件 selected // ============================================================================================================== function ListSelected(objElement, SelectedValue) { if (objElement) { for (var i=0; i單選；'m'->多選 // sel_city_search2()與 sel_city_search()相同，但sel_city_search2()可輸入城市條件 //-------------------------------------------------------- function sel_city_search2(city_CCD, areaCDitem, areaCNMitem, natnCDitem, natnCNMitem, cityCDitem, cityCNMitem, s_mode) { var areacd = "/"; var areanm = "/"; var natncd = "/"; var natnnm = "/"; var citycd = ""; var citynm = ""; var symbol = ""; var ary_city; switch (s_mode) { case "s": ary_city = sel_city2(areaCDitem.value, natnCDitem.value, cityCDitem.value, ""); break; default: ary_city = sel_city2(areaCDitem.value, natnCDitem.value, cityCDitem.value, "Y"); break; } if (ary_city) { if (areaCDitem.value != "") areacd += areaCDitem.value + "/"; if (areaCNMitem.value != "") areanm += areaCNMitem.value + "/"; if (natnCDitem.value != "") natncd += natnCDitem.value + "/"; if (natnCNMitem.value != "") natnnm += natnCNMitem.value + "/"; for (var i=0; i 0) areacd = areacd.replace("/", "','"); areacd = "'" + areacd + "'"; } //=== 2007-04-04 hamburger 新增判斷 === if(!natncd){natncd="";} //===================================== if (natncd != "") { while (natncd.indexOf("/") > 0) natncd = natncd.replace("/", "','"); natncd = "'" + natncd + "'"; } if (citycd != "") { while (citycd.indexOf("/") > 0) citycd = citycd.replace("/", "','"); citycd = "'" + citycd + "'"; } Multi = Multi.toUpperCase(); if (Multi == "Y") //2008-09-03 [Ham] 修改高度 //sFeatures = "dialogWidth=530px;dialogHeight=520px"; sFeatures = "dialogWidth=530px;dialogHeight=670px"; else //2008-09-03 [Ham] 修改高度 //sFeatures = "dialogWidth=530px;dialogHeight=490px"; sFeatures = "dialogWidth=530px;dialogHeight=640px"; var sURL = "/include/sel_help_pop_city2.asp?Multi=" + Multi + "&Action=" + Action + "&CITY_CD=" + citycd + "&NATN_CD=" + natncd + "&AREA_CD=" + areacd; return showModalDialog(sURL, "", sFeatures); } //--------------------------------------------------------------------------------- // 判斷輸入的值是否為數值 //--------------------------------------------------------------------------------- function CheckisNaN(pInput) { if (isNaN(parseFloat(pInput.value))) { alert('請輸入數值!'); pInput.value = 0; } } // 2010-04-21 : [Roy] [wm.v806.741.N]AAA&BA&BB 增加旅客異動記錄及名單鎖定后更改的處理，選擇旅客后判斷是否已建檔 起 function chkPaxGrupLK(cntPax,isAllowUpdate){ var PAX_CD = document.getElementById("PAX_CD_"+cntPax).value; if(PAX_CD==null || PAX_CD==""){ document.getElementById("LOCK_IMG_"+cntPax).style.display="none"; document.getElementById("PAX_LOCK_Label_"+cntPax).innerHTML = ""; if(document.getElementById("PAX_CNMF_"+cntPax)){ document.getElementById("PAX_CNMF_"+cntPax).readOnly = false; document.getElementById("PAX_CNMF_"+cntPax).style.color = ""; } if(document.getElementById("PAX_CNML_"+cntPax)){ document.getElementById("PAX_CNML_"+cntPax).readOnly = false; document.getElementById("PAX_CNML_"+cntPax).style.color = ""; } if(document.getElementById("PAX_ENMF_"+cntPax)){ document.getElementById("PAX_ENMF_"+cntPax).readOnly = false; document.getElementById("PAX_ENMF_"+cntPax).style.color = ""; } if(document.getElementById("PAX_ENML_"+cntPax)){ document.getElementById("PAX_ENML_"+cntPax).readOnly = false; document.getElementById("PAX_ENML_"+cntPax).style.color = ""; } if(document.getElementById("BRTH_DT_"+cntPax)){ document.getElementById("BRTH_DT_"+cntPax).readOnly = false; document.getElementById("BRTH_DT_"+cntPax).style.color = ""; } if(document.getElementById("ID_NO_"+cntPax)){ document.getElementById("ID_NO_"+cntPax).readOnly = false; document.getElementById("ID_NO_"+cntPax).style.color = ""; } return ; } var rtnStr = showModalDialog("/include/chk_pax_grup_lk.asp?PAX_CD="+PAX_CD,"","dialogWidth=50px;dialogHeight=50px"); var strDiv = ""; if(rtnStr!=""){ var aRows = rtnStr.split("@$@"); strDiv = "
"; for(var i=0;i"; strDiv = strDiv + ""; strDiv = strDiv + ""; strDiv = strDiv + ""; strDiv = strDiv + ""; } strDiv = strDiv + "
鎖定旅客名單說明
團號："+GRUP_CD+"訂單編號："+OP_SQ+"
"; document.getElementById("LOCK_IMG_"+cntPax).style.display=""; document.getElementById("PAX_LOCK_Label_"+cntPax).innerHTML = strDiv; if(isAllowUpdate=="N"){ //鎖定輸入框，不能輸入 if(document.getElementById("PAX_CNMF_"+cntPax)){ document.getElementById("PAX_CNMF_"+cntPax).readOnly = true; document.getElementById("PAX_CNMF_"+cntPax).style.color = "#c0c0c0"; } if(document.getElementById("PAX_CNML_"+cntPax)){ document.getElementById("PAX_CNML_"+cntPax).readOnly = true; document.getElementById("PAX_CNML_"+cntPax).style.color = "#c0c0c0"; } if(document.getElementById("PAX_ENMF_"+cntPax)){ document.getElementById("PAX_ENMF_"+cntPax).readOnly = true; document.getElementById("PAX_ENMF_"+cntPax).style.color = "#c0c0c0"; } if(document.getElementById("PAX_ENML_"+cntPax)){ document.getElementById("PAX_ENML_"+cntPax).readOnly = true; document.getElementById("PAX_ENML_"+cntPax).style.color = "#c0c0c0"; } if(document.getElementById("PAX_ENM_"+cntPax)){ document.getElementById("PAX_ENM_"+cntPax).readOnly = true; document.getElementById("PAX_ENM_"+cntPax).style.color = "#c0c0c0"; } if(document.getElementById("BRTH_DT_"+cntPax)){ document.getElementById("BRTH_DT_"+cntPax).readOnly = true; document.getElementById("BRTH_DT_"+cntPax).style.color = "#c0c0c0"; } if(document.getElementById("ID_NO_"+cntPax)){ document.getElementById("ID_NO_"+cntPax).readOnly = true; document.getElementById("ID_NO_"+cntPax).style.color = "#c0c0c0"; } } }else{ document.getElementById("LOCK_IMG_"+cntPax).style.display="none"; document.getElementById("PAX_LOCK_Label_"+cntPax).innerHTML = ""; if(isAllowUpdate=="N"){ //鎖定輸入框，還原 if(document.getElementById("PAX_CNMF_"+cntPax)){ document.getElementById("PAX_CNMF_"+cntPax).readOnly = false; document.getElementById("PAX_CNMF_"+cntPax).style.color = ""; } if(document.getElementById("PAX_CNML_"+cntPax)){ document.getElementById("PAX_CNML_"+cntPax).readOnly = false; document.getElementById("PAX_CNML_"+cntPax).style.color = ""; } if(document.getElementById("PAX_ENMF_"+cntPax)){ document.getElementById("PAX_ENMF_"+cntPax).readOnly = false; document.getElementById("PAX_ENMF_"+cntPax).style.color = ""; } if(document.getElementById("PAX_ENML_"+cntPax)){ document.getElementById("PAX_ENML_"+cntPax).readOnly = false; document.getElementById("PAX_ENML_"+cntPax).style.color = ""; } if(document.getElementById("PAX_ENM_"+cntPax)){ document.getElementById("PAX_ENM_"+cntPax).readOnly = false; document.getElementById("PAX_ENM_"+cntPax).style.color = ""; } if(document.getElementById("BRTH_DT_"+cntPax)){ document.getElementById("BRTH_DT_"+cntPax).readOnly = false; document.getElementById("BRTH_DT_"+cntPax).style.color = ""; } if(document.getElementById("ID_NO_"+cntPax)){ document.getElementById("ID_NO_"+cntPax).readOnly = false; document.getElementById("ID_NO_"+cntPax).style.color = ""; } } } } function LOCK_LIST_Show(objThis,cntPax,moveleft){ var objLockDiv = document.getElementById("PAX_LOCK_Label_"+cntPax); objLockDiv.style.left = Position_Left(objThis) - eval(moveleft); objLockDiv.style.top = Position_Top(objThis) + objThis.offsetHeight +0; objLockDiv.style.visibility = "visible"; } function LOCK_LIST_Hidden(cntPax){ var objLockDiv = document.getElementById("PAX_LOCK_Label_"+cntPax); objLockDiv.style.visibility = "hidden"; } function Position_Left(objElement) { //var p = objElement.offsetLeft; var p = objElement.clientWidth; while (objElement=objElement.offsetParent) p += objElement.offsetLeft; return p; } function Position_Top(objElement) { var p = objElement.offsetTop; while (objElement=objElement.offsetParent) p += objElement.offsetTop; return p; } //2010-04-19: [Roy] [wm.v806.741.N]AAA&BA&BB 增加旅客異動記錄及名單鎖定后更改的處理，選擇旅客后判斷是否已建檔 止