/** - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì ÀÇ·áÁ¤º¸ - ¿¬±¸¿ë°Ë»ö ( SMMRD01600_¿¬±¸¿ë°Ë»ö.xrw - JScript ) - Version : 1) : Ver.1.00.00 - Author : °­ÁöÈÆ - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì **/ var xDschAnalyListPath = "/root/main/cond"; /** * @ver : 2009-01-02 * @desc : È­¸éÃʱâÈ­ * @ * @by : °­ÁöÈÆ * @param : * @return : * @--------------------------------------------------- */ function fInitialize(){ btn_cond.selected = true; //Åð¿øÀÏÀº ±âº»Á¶°ÇÀ¸·Î 10³âÄ¡ ÃʱâÈ­ ÇÑ´Ù var dschfromdd = (getCurrentDate().substring(0,4) - 10)+getCurrentDate().substring(4,8); //Å×½ºÆ®À§ÇØ ÀӽüöÁ¤ ipt_fromdd.value = dschfromdd; //ipt_fromdd.value = getCurrentDate(); ipt_todd.value = getCurrentDate(); //¿¢¼¿Ãâ·ÂÀ» À§ÇÑ ±â°üÄÚµå ¼³Á¤ model.setValue("/root/main/cond/instcd", getUserInfo("dutplceinstcd")); //Åð¿øº´µ¿ ¼³Á¤ submit("TRMNW00101"); model.removenode("/root/init/init/ward[wardcd = '']"); // ÀÀ±ÞÀÇ·á¼¾ÅÍ Á¦¿Ü //°úÁ¤º¸ ¼³Á¤ mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/orddept", "T"); //°øÅëÄÚµå ¼³Á¤ zbcfGetCodeList(new Array("M0149", "M0070", "M0151", "M0153", "M0155","M0152","M0157","M0156", "M0158","M0159","M0086","M0165", "P0008","M0413","M0484","M0414", "M0433","M0184","M0155","M0500", "M0501","M0502","M0503", "M0415"), new Array("/root/init/jobList", "/root/init/relignList", "/root/init/maryStatList", "/root/init/inPathList", "/root/init/dethTypeList","/root/init/cureRsltList" ,"/root/init/DschTypeList","/root/init/chosProgList", "/root/init/reInResnList","/root/init/reOpResnList","/root/init/partrtntypeList","/root/init/womntypeList", "/root/init/insukindList","/root/init/opDethTypeList","/root/init/infccaselist","/root/init/cmpllist", "/root/init/cncrlist", "/root/init/seer", "/root/init/staging", "/root/init/mdclrsdeptlist", "/root/init/gsclrsdeptlist", "/root/init/gyclrsdeptlist", "/root/init/pdclrsdeptlist", "/root/init/wundcasclslist") , true); // ÁßȯÀÚ½Ç ÄÚµå ¼³Á¤ model.makeValue("/root/send/stnddd", getCurrentDate() ); if(submit("TRMRD00404", false)){ copyNodesetType("/root/init/icudeptlist/icudept","/root/temp/initlist/icudept","replace", model, model); } //ÁöÇ¥°ü¸® ÄÚµå ¼³Á¤ submit("TRMRD01603"); // Ãʱ⠼±Åðª ¼ÂÆÃ addComboItem("cmb_dschclsdept" , "Àüü", "-", "above"); addComboItem("cmb_inclsdept" , "Àüü", "-", "above"); addComboItem("cmb_opclsdept" , "Àüü", "-", "above"); addComboItem("cmb_chngclsdept" , "Àüü", "-", "above"); addComboItem("cmb_dschdeptcd" , "Àüü", "-", "above"); addComboItem("cmb_dschwardnm" , "Àüü", "-", "above"); addComboItem("cmb_religncd" , "Àüü", "-", "above"); addComboItem("cmb_marystatcd" , "Àüü", "-", "above"); addComboItem("cmb_jobcd" , "Àüü", "-", "above"); addComboItem("cmb_insukind" , "Àüü", "-", "above"); addComboItem("cmb_curersltcd" , "Àüü", "-", "above"); addComboItem("cmb_dethtypecd" , "Àüü", "-", "above"); addComboItem("cmb_dschtypecd" , "Àüü", "-", "above"); addComboItem("cmb_opdethtypecd" , "Àüü", "-", "above"); addComboItem("cmb_chosprogcd" , "Àüü", "-", "above"); addComboItem("cmb_reinresncd" , "Àüü", "-", "above"); addComboItem("cmb_inpathcd" , "Àüü", "-", "above"); addComboItem("cmb_reopresncd" , "Àüü", "-", "above"); addComboItem("cmb_infccascd" , "Àüü", "-", "above"); addComboItem("cmb_cmplcd" , "Àüü", "-", "above"); addComboItem("cmb_icuroomcd" , "Àüü", "-", "above"); addComboItem("cmb_infcpartcd" , "Àüü", "-", "above"); addComboItem("cmb_womntypeList" , "Àüü", "-", "above"); addComboItem("cmb_partrtntypeList" , "Àüü", "-", "above"); addComboItem("cmb_seer" , "Àüü", "-", "above"); addComboItem("cmb_cncrflag" , "Àüü", "-", "above"); addComboItem("cmb_wundcasclscd" , "Àüü", "-", "above"); model.setValue("/root/main/cond/dschwardnm" , "-"); model.setValue("/root/main/cond/dschdeptcd" , "-"); model.setValue("/root/main/cond/dschclsdept" , "-"); model.setValue("/root/main/cond/indeptcd" , "-"); model.setValue("/root/main/cond/inclsdept" , "-"); model.setValue("/root/main/cond/opdeptcd" , "-"); model.setValue("/root/main/cond/opclsdept" , "-"); model.setValue("/root/main/cond/chngdeptcd" , "-"); model.setValue("/root/main/cond/chngclsdept" , "-"); model.setValue("/root/main/cond/cnstreqdeptcd" , "-"); model.setValue("/root/main/cond/cnstclsdept" , "-"); model.setValue("/root/main/cond/cnstexecdeptcd" , "-"); model.setValue("/root/main/cond/cnstexeclrsdeptcd" , "-"); model.setValue("/root/main/cond/religncd" , "-"); model.setValue("/root/main/cond/marystatcd" , "-"); model.setValue("/root/main/cond/jobcd" , "-"); model.setValue("/root/main/cond/insukind" , "-"); model.setValue("/root/main/cond/cptrgt" , "-"); model.setValue("/root/main/cond/wundcasclscd" , "-"); model.setValue("/root/main/cond/curersltcd" , "-"); model.setValue("/root/main/cond/dethtypecd" , "-"); model.setValue("/root/main/cond/dschtypecd" , "-"); model.setValue("/root/main/cond/opdethtypecd" , "-"); model.setValue("/root/main/cond/chosprogcd" , "-"); model.setValue("/root/main/cond/reinresncd" , "-"); model.setValue("/root/main/cond/inpathcd" , "-"); model.setValue("/root/main/cond/reopresncd" , "-"); model.setValue("/root/main/cond/infccascd" , "-"); model.setValue("/root/main/cond/cmplcd" , "-"); model.setValue("/root/main/cond/icuroomcd" , "-"); model.setValue("/root/main/cond/reinyn" , "-"); model.setValue("/root/main/cond/infcpartcd" , "-"); model.setValue("/root/main/cond/womntypecd" , "-"); model.setValue("/root/main/cond/partrtnkindcd" , "-"); model.setValue("/root/main/cond/seer" , "-"); model.setValue("/root/main/cond/staging" , "-"); model.setValue("/root/main/cond/cncrflag" , "-"); //±×¸®µåÀÇ ÀνºÅϽº¸¦ »èÁ¦ÇÑ´Ù. model.removeNodeset("/root/main/cclist"); model.removeNodeset("/root/main/diagcdlist"); model.removeNodeset("/root/main/opcdlist"); model.removeNodeset("/root/main/chngcdlist"); model.removeNodeset("/root/main/cnstcdlist"); model.removeNodeset("/root/main/bfcdlist"); model.removeNodeset("/root/main/mdlcdlist"); model.removeNodeset("/root/main/directcdlist"); model.removeNodeset("/root/main/tcdlist"); model.removeNodeset("/root/main/mcdlist"); model.removeNodeset("/root/main/metstascdlist"); model.refresh(); } /** * @desc : ÀÇ»çÁ¶È¸ * @id : * @event : DOMActivate * @return : void * @authur : */ function fDrSearch(drid, drnm){ model.resetInstanceNode("/root/main/userpopupinfo"); model.removeNodeset("/root/main/tempuserinfo"); model.makeNode("/root/main/tempuserinfo"); model.removeNode("/root/send/userinfo/userid"); model.makeNode("/root/send/userinfo/userid"); model.setValue("/root/main/userpopupinfo/param", "_OneS_DD"); modal("SPMRD01601_»ç¿ëÀںμ­¼±ÅÃÁ¶È¸", "", "200", "200", "SPMRD01601","/root/main/userpopupinfo","/root/main/temp"); var iParam = getParameter("SPMRD01601_"); setCSVToNode("/root/main/tempuserinfo", iParam); clearParameter("SPMRD01601_"); var emplno = model.getValue("/root/main/tempuserinfo/list/userid"); var empInm = model.getValue("/root/main/tempuserinfo/list/usernm"); model.setValue("/root/main/cond/" + drid, emplno); model.setValue("/root/main/cond/" + drnm, empInm); model.refresh(); } /** * @desc : Ç׸ñº° ÀÔ·Â ¿©ºÎ üũ * @id : * @event : xforms-select * @return : void * @authur : */ function fCheckItemInputYN(pFlag){ // Ä¡·á°á°ú üũ if(pFlag == "curerslt" || pFlag == null){ var sCureRsltCD = model.getValue(xDschAnalyListPath+"/curersltcd"); if(sCureRsltCD == "07" || sCureRsltCD == "08"){ cmb_dethtypecd.disabled = false; cmb_opdethtypecd.disabled = false; }else{ cmb_dethtypecd.disabled = true; cmb_opdethtypecd.disabled = true; model.makeValue(xDschAnalyListPath+"/dethtypecd","-"); } } // ÀçÀÔ¿ø(Unplan) üũ if(pFlag == "reinresn" || pFlag == null){ var sReInResnCd = model.getValue(xDschAnalyListPath+"/reinresncd"); if(sReInResnCd != ""){ model.setValue(xDschAnalyListPath+"/reinyn","-"); cmb_reinyn.disabled = true; }else{ cmb_reinyn.disabled = false; } } // ÀçÀÔ¿ø(plan) üũ if(pFlag == "reinyn" || pFlag == null){ var ReInYN = model.getValue(xDschAnalyListPath+"/reinyn"); if(ReInYN=="01"){ model.setValue(xDschAnalyListPath+"/reinresncd","-"); cmb_reinresncd.disabled = true; cmb_reinresncd.refresh(); }else{ cmb_reinresncd.disabled = false; cmb_reinresncd.refresh(); } } // °¨¿°Á¾·ù1 ¼±Åà if(pFlag == "infccascd" || pFlag == null){ var code = model.getValue(xDschAnalyListPath+"/infccascd"); fGetInFcCas(code); cmb_infcpartcd.refresh(); addComboItem("cmb_infcpartcd" , "Àüü", "-", "above"); model.setValue(xDschAnalyListPath+"/infcpartcd","-"); model.refresh(); } } /** * @ver : 2009-01-02 * @desc : °¨¿°Á¾·ù1ÀÇ °¨¿°Á¾·ù2ÀÇ ÇϺÎÇ׸ñµé Á¶È¸ * @by : °­ÁöÈÆ * @param : * @return : * @--------------------------------------------------- */ function fGetInFcCas(code){ switch(code){ case "-": model.removeNodeset("/root/init/infdcpartinfo/infdcpartlist"); break; case "01": zbcfGetCodeList(new Array("M0485"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0485"); break; case "02": zbcfGetCodeList(new Array("M0486"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0486"); break; case "03": zbcfGetCodeList(new Array("M0487"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0487"); break; case "04": zbcfGetCodeList(new Array("M0488"),new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0488"); break; case "05": zbcfGetCodeList(new Array("M0489"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0489"); break; case "06": zbcfGetCodeList(new Array("M0490"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0490"); break; case "07": zbcfGetCodeList(new Array("M0491"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0491"); break; case "08": zbcfGetCodeList(new Array("M0492"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0492"); break; case "09": zbcfGetCodeList(new Array("M0493"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0493"); break; case "10": zbcfGetCodeList(new Array("M0494"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0494"); break; case "11": zbcfGetCodeList(new Array("M0495"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0495"); break; case "12": zbcfGetCodeList(new Array("M0496"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0496"); break; case "13": zbcfGetCodeList(new Array("M0497"), new Array("/root/hidden/infdcpartinfo/infdcpartlist")); copyNodeset("/root/init/infdcpartinfo/infdcpartlist", "/root/hidden/infdcpartinfo/infdcpartlist/M0497"); break; } model.removeNodeset("/root/hidden/infdcpartinfo/infdcpartlist"); model.makeNode("/root/hidden/infdcpartinfo/infdcpartlist"); } /** * @ver : 2009-01-08 * @desc : °Ë»öÁ¶°Ç¿¡ ´ëÇÑ °á°ú¸¦ Á¶È¸ * @by : °­ÁöÈÆ * @param : * @return : * @--------------------------------------------------- */ function fSearch(){ if(!doChkSrchCond()){ return; } //¼½¼Ç°ú ±×¸®µåÁ¶°ÇÀ» cond³ëµå¿¡ ¼ÂÆÃ doSetSrchCond(); copyNodeType("/root/main/cond", "/root/main/cond", "replace", iviewer_list.model , ""); if(iviewer_list.window.javascript.fSearchList()){ //Á¶È¸ÈÄ section Data »èÁ¦ doSetNullSrchCond(); grp_cond.visible = false; iviewer_list.visible = true; btn_rlst.selected = true; }; button16.visible=true; model.refresh(); } /** * @ver : 2009-01-02 * @desc : °¨¿°Á¾·ù1ÀÇ °¨¿°Á¾·ù2ÀÇ ÇϺÎÇ׸ñµé Á¶È¸ * @by : °­ÁöÈÆ * @param : * @return : * @--------------------------------------------------- */ function fGetCD(grdNm, colNm){ var instanceNm = grdNm.substr(4); var grdObj = document.all(grdNm); var fstRowStat = ""; //±×¸®µå¿¡ µ¥ÀÌÅͰ¡ ÇѰÇÀ̶óµµÀÖ¾î¾ß µ¹¾Æ°£´Ù var grdObjCnt = grdObj.rows; model.setValue("/root/main/cond/n_"+colNm, ""); if(grdObjCnt > 1){ var sql = ""; var sqlNot = ""; for(var i = 1 ; i < grdObjCnt; i++){ var code1 = model.getValue("/root/main/"+ instanceNm +"/rows["+ i +"]/cdid1"); var code2 = model.getValue("/root/main/"+ instanceNm +"/rows["+ i +"]/cdid2"); var cond = model.getValue("/root/main/"+ instanceNm +"/rows["+ i +"]/cond"); if(colNm == "diagtermcd"){ //20101110-±è¾ç¼öÃß°¡-Áúº´ÄÚµåÀϰæ¿ì R/OÁ¦¿ÜÁ¶°ÇÃß°¡ var exceptro = model.getValue("/root/main/"+ instanceNm +"/rows["+ i +"]/exceptro"); } var code1Ln = code1.length; var code2Ln = code2.length; //µ¥ÀÌÅͰ¡ ¸ðµÎºñ¾úÀ¸¸é ½ºÅ¾~ if(code1 == "" && code2 == "" ){ //ÇÑÁÙµµ ¾Èµé¾î°¡ÀÖÀ¸¸é AND¾ÈÂï±âÀ§Çؼ­... if(i == 1){ fstRowStat = "B"; } else{ //¸¶Áö¸·ÁÙÀÌ ºñ¾îÀÖ°í ¸¶Áö¸·ÀüÁÙ¿¡ COND°¡ ¼³Á¤µÇ¾îÀÖ´Ù¸é »©ÁÖ±âÀ§Çؼ­ var a = i -1; sql = sql.substr(0, sql.length-(model.getValue("/root/main/"+ instanceNm +"/rows["+ a +"]/cond").length)); } break; } //-----SQL GROUP START------- if(i > 1){ if(cond == "NOT"){ sqlNot = " (" + sqlNot; }else{ sql = " (" + sql; } } var sqlHead = ""; if(colNm == "cctermcd"){ sqlHead = "(SELECT 'Y' FROM emr.mrddccindx indx WHERE dsam.instcd = indx.instcd AND dsam.pid = indx.pid AND dsam.dschdd = indx.dschdd"; } else if(colNm == "diagtermcd"){ sqlHead = "(SELECT 'Y' FROM emr.mrdddiagindx indx WHERE dsam.instcd = indx.instcd AND dsam.pid = indx.pid AND dsam.dschdd = indx.dschdd"; } else if(colNm == "optermcd"){ sqlHead = "(SELECT 'Y' FROM emr.mrddopindx indx WHERE dsam.instcd = indx.instcd AND dsam.pid = indx.pid AND dsam.dschdd = indx.dschdd"; } else if(colNm == "chngdeptcd"){ sqlHead = "(SELECT 'Y' FROM emr.mrdddscd dscd WHERE dsam.instcd = dscd.instcd AND dsam.pid = dscd.pid AND dsam.dschdd = dscd.dschdd"; } else if(colNm == "tophcd"){ sqlHead = "(SELECT 'Y' FROM emr.mrdhcncr cncr WHERE dsam.instcd = cncr.instcd AND dsam.pid = cncr.pid AND dsam.dschdd = cncr.dschdd"; } else if(colNm == "morphcd"){ sqlHead = "(SELECT 'Y' FROM emr.mrdhcncr cncr WHERE dsam.instcd = cncr.instcd AND dsam.pid = cncr.pid AND dsam.dschdd = cncr.dschdd"; } else if(colNm == "rerntmetstaspartcd"){ sqlHead = "(SELECT 'Y' FROM emr.mrdhcncr cncr WHERE dsam.instcd = cncr.instcd AND dsam.pid = cncr.pid AND dsam.dschdd = cncr.dschdd"; } else if(colNm == "dethcd"){ //»çÀÎÄÚµå 2009-12-17 Ãß°¡ sqlHead = "(SELECT 'Y' FROM emr.mrdddethindx indx WHERE dsam.instcd = indx.instcd AND dsam.pid = indx.pid AND dsam.dschdd = indx.dschdd"; } var subSql = ""; //2010-01-25 Ãß°¡ if(cond == "NOT" ){ //code1¸¸ Á¶°Ç Ãß°¡µÊ //Äڵ尡 ÇϳªÀϰæ¿ì EQUAL °Ë»ö if(colNm == "morphcd"){ subSql = " AND (morphcd1 = '" + code1 + "' OR morphcd2 = '" + code1 + "') "; } else if(colNm == "rerntmetstaspartcd"){ subSql = " AND (rerntmetstaspartcd1 = '" + code1 + "' OR rerntmetstaspartcd2 = '" + code1 + "' OR rerntmetstaspartcd3 = '" + code1 + "' OR rerntmetstaspartcd4 = '" + code1 + "') "; } else if(colNm == "rectermcd"){//ÇùÁøÄÚµå sqlHead Äõ¸® ¾øÀ½ if(i > 1){ subSql = " AND RPAD(" + colNm +", 10, '0') NOT LIKE '" + code1 + "%' "; }else{ subSql = " RPAD(" + colNm +", 10, '0') NOT LIKE '" + code1 + "%' "; } } else{ if(model.getValue("/root/main/cond/icd10") == "E"){ //ICD10ÄÚµå È®ÀåÄÚµå±îÁö °Ë»ö subSql = " AND " + colNm +" = '" + code1 + "' "; } else{ //ICD10Äڵ常À¸·Î °Ë»ö subSql = " AND RPAD(" + colNm +", 10, '0') LIKE '" + code1 + "%' "; } } //================================================================================== }else{ //Äڵ尡 ÇϳªÀϰæ¿ì EQUAL °Ë»ö if(code1 != "" && code2 == ""){ if(colNm == "morphcd"){ subSql = " AND (morphcd1 = '" + code1 + "' OR morphcd2 = '" + code1 + "') "; } else if(colNm == "rerntmetstaspartcd"){ subSql = " AND (rerntmetstaspartcd1 = '" + code1 + "' OR rerntmetstaspartcd2 = '" + code1 + "' OR rerntmetstaspartcd3 = '" + code1 + "' OR rerntmetstaspartcd4 = '" + code1 + "') "; } else if(colNm == "rectermcd"){//ÇùÁøÄÚµå sqlHead Äõ¸® ¾øÀ½ if(i > 1){ subSql = " AND RPAD(" + colNm +", 10, '0') LIKE '" + code1 + "%' "; }else{ subSql = " RPAD(" + colNm +", 10, '0') LIKE '" + code1 + "%' "; } } else{ if(model.getValue("/root/main/cond/icd10") == "E"){ //ICD10ÄÚµå È®ÀåÄÚµå±îÁö °Ë»ö subSql = " AND " + colNm +" = '" + code1 + "' "; } else{ //ICD10Äڵ常À¸·Î °Ë»ö subSql = " AND RPAD(" + colNm +", 10, '0') LIKE '" + code1 + "%' "; } } } //ÄÚµå 1,2 °¡ ¸ðµÎÀÖÀ»°æ¿ì BETWEEN °Ë»ö else if(code1 != "" && code2 != ""){ if(colNm == "morphcd"){ subSql = " AND ((morphcd1 >= '"+ code1 +"' AND morphcd1 <= '"+ code2 +"') OR (morphcd2 >= '"+ code1 +"' AND morphcd2 <= '"+ code2 +"'))"; } else if(colNm == "rerntmetstaspartcd"){ subSql = " AND ((rerntmetstaspartcd1 >= '"+ code1 +"' AND rerntmetstaspartcd1 <= '"+ code2 +"') OR (rerntmetstaspartcd2 >= '"+ code1 +"' AND rerntmetstaspartcd2 <= '"+ code2 +"') OR (rerntmetstaspartcd3 >= '"+ code1 +"' AND rerntmetstaspartcd3 <= '"+ code2 +"') OR (rerntmetstaspartcd4 >= '"+ code1 +"' AND rerntmetstaspartcd4 <= '"+ code2 +"'))"; }//==2009-12-18 Áúº´ÄÚµå else if(colNm == "diagtermcd"){ //subSql = " AND (RPAD("+ colNm +", "+ code1Ln +", '0') >= '" + code1 + "' AND RPAD("+ colNm +", "+ code2Ln +", 'Z') <= '" + code2 + "') "; //20101123-±è¾ç¼öÁÖ¼®Ã³¸®(¿øº») //subSql = " AND (SUBSTR("+ colNm +", 0, INSTR("+ colNm +", '.', 1, 1)-1) >= '" + code1 + "' AND SUBSTR("+ colNm +", 0, INSTR("+ colNm +", '.', 1, 1)-1) <= '" + code2 + "') "; /* =============20101123-±è¾ç¼ö-M-Code°Ë»ö¾ÊµÇ´Â ¿À·ù·Î ¼öÁ¤½ÃÀÛ.================*/ var code1yn = ""; code2yn = ""; var code1sep = ""; code1opersymbol = ""; code2sep = ""; code2opersymbol = ""; if(code1.substring(0,1) == "M"){ for (var k = 0; k < code1.length; k++) { if (code1.charAt(k) == '/'){ code1yn = "Y"; break; }else{ } } } if(code2.substring(0,1) == "M"){ for (var m = 0; m < code2.length; m++) { if (code2.charAt(m) == '/'){ code2yn = "Y"; break; } else{ } } } if(code1yn == "Y"){//code1ÀÌ M-CodeÀ̸鼭 '/'Á¸Àç½Ã code1sep = "/"; code1opersymbol = "+1"; }else{ code1sep = "."; code1opersymbol = "-1"; } if(code2yn == "Y"){//code2°¡ M-CodeÀ̸鼭 '/'Á¸Àç½Ã code2sep = "/"; code2opersymbol = "+1"; }else{ code2sep = "."; code2opersymbol = "-1"; } subSql = " AND (SUBSTR("+ colNm +", 0, INSTR("+ colNm +", '" + code1sep + "', 1, 1)" + code1opersymbol + ") >= '" + code1 + "' AND SUBSTR("+ colNm +", 0, INSTR("+ colNm +", '" + code2sep + "', 1, 1)" + code2opersymbol + ") <= '" + code2 + "') "; //subSql = " AND (SUBSTR("+ colNm +", 0, 4) >= '" + code1 + "' AND SUBSTR("+ colNm +", 0, 4) <= '" + code2 + "') "; /*==========20101123-±è¾ç¼ö-M-Code°Ë»ö¾ÊµÇ´Â ¿À·ù·Î ¼öÁ¤³¡.===============================*/ } else if(colNm == "rectermcd"){//ÇùÁøÄÚµå if(cond == "NOT"){ if(i > 1){ subSql = " AND (RPAD("+ colNm +", "+ code1Ln +", '0') <> '" + code1 + "' AND RPAD("+ colNm +", "+ code2Ln +", 'Z') <> '" + code2 + "') "; }else{ subSql = " (RPAD("+ colNm +", "+ code1Ln +", '0') <> '" + code1 + "' AND RPAD("+ colNm +", "+ code2Ln +", 'Z') <> '" + code2 + "') "; } }else{ if(i > 1){ subSql = " AND (RPAD("+ colNm +", "+ code1Ln +", '0') >= '" + code1 + "' AND RPAD("+ colNm +", "+ code2Ln +", 'Z') <= '" + code2 + "') "; }else{ subSql = " (RPAD("+ colNm +", "+ code1Ln +", '0') >= '" + code1 + "' AND RPAD("+ colNm +", "+ code2Ln +", 'Z') <= '" + code2 + "') "; } } } else{ //subSql = " AND ("+ colNm +" >= '" + code1 + "' AND "+ colNm +" <= '" + code2 + "') "; //subSql = " AND (RPAD("+ colNm +", "+ code1Ln +", '0') >= '" + code1 + "' AND RPAD("+ colNm +", "+ code2Ln +", 'Z') <= '" + code2 + "') "; subSql = " AND (SUBSTR("+ colNm +", 0, INSTR("+ colNm +", '.', 1, 1)-1) >= '" + code1 + "' AND SUBSTR("+ colNm +", 0, INSTR("+ colNm +", '.', 1, 1)-1) <= '" + code2 + "') "; } } } //NOT Ãß°¡============================================ if(cond == "NOT" && colNm != "rectermcd"){ //SqlÇÕü~ //sqlNot = sqlNot + sqlHead + subSql + " AND ROWNUM = 1) = 'Y'"; --¿øº» if(colNm == "diagtermcd" && exceptro == "Y"){ //20101110-±è¾ç¼ö-Ãß°¡-R/OÁ¦¿Ü sqlNot = sqlNot + sqlHead + subSql + " AND NVL(DIAGKINDCD, 'C') <> 'R' AND ROWNUM = 1) = 'Y'"; //Áúº´ÄÚµå R/OÁ¦¿Üüũ½Ã }else{ sqlNot = sqlNot + sqlHead + subSql + " AND ROWNUM = 1) = 'Y'"; } if(i > 1){ sqlNot = sqlNot + ") "; } //-----SQL GROUP END--------- //¸¶Áö¸·ÁÙÀÌ ¾Æ´Ò°æ¿ì Á¶°Ç¼³Á¤ if(i != grdObjCnt-1){ sqlNot = sqlNot + " OR "; } }else{ //SqlÇÕü~ if(colNm == "rectermcd"){ sql = sql + sqlHead + subSql; }else{ //sql = sql + sqlHead + subSql + " AND ROWNUM = 1) = 'Y'"; --¿øº» if(colNm == "diagtermcd" && exceptro == "Y"){ //20101110-±è¾ç¼ö-Ãß°¡- R/OÁ¦¿Ü sql = sql + sqlHead + subSql + " AND NVL(DIAGKINDCD, 'C') <> 'R' AND ROWNUM = 1) = 'Y'"; //Áúº´ÄÚµå R/OÁ¦¿Üüũ½Ã }else{ sql = sql + sqlHead + subSql + " AND ROWNUM = 1) = 'Y'"; } } if(i > 1){ sql = sql + ") "; } //-----SQL GROUP END--------- //¸¶Áö¸·ÁÙÀÌ ¾Æ´Ò°æ¿ì Á¶°Ç¼³Á¤ if(i != grdObjCnt-1){ sql = sql + " " + cond; } } //==================================================== /* //SqlÇÕü~ sql = sql + sqlHead + subSql + " AND ROWNUM = 1) = 'Y'"; if(i > 1){ sql = sql + ") "; } //-----SQL GROUP END--------- //¸¶Áö¸·ÁÙÀÌ ¾Æ´Ò°æ¿ì Á¶°Ç¼³Á¤ if(i != grdObjCnt-1){ if(cond == "NOT") { sql = sql + " AND "; }else{ sql = sql + " " + cond +" "; } } } //ÇÑÁÙµµ ¾Èµé¾î°¡ÀÖÀ¸¸é AND¾ÈÂï±âÀ§Çؼ­... if(fstRowStat != "B"){ sql = "AND " + sql; }*/ } //end for if(sqlNot != ""){ var iLen = strTrim(sqlNot).length; var rVal = strRight(sqlNot, 3); var rVal2 = strRight(sqlNot, 2); if(rVal == "AND"){ sqlNot = sqlNot.substring(0, iLen - 3); }else if(rVal2 == "OR"){ sqlNot = sqlNot.substring(0, iLen - 2); } model.setValue("/root/main/cond/n_"+colNm, "AND " + sqlNot); } if(sql != ""){ var iLen = strTrim(sql).length; var rVal = strRight(sql, 3); var rVal2 = strRight(sql, 2); if(rVal == "AND"){ sql = sql.substring(0, iLen - 3); }else if(rVal2 == "OR"){ sql = sql.substring(0, iLen - 2); } sql = "AND " + sql; } //ÇÑÁÙµµ ¾Èµé¾î°¡ÀÖÀ¸¸é AND¾ÈÂï±âÀ§Çؼ­... /* if(fstRowStat != "B"){ sql = "AND " + sql; }*/ } //end if return sql; } function strRight(str, n){ var iLen = str.length; var rVal = str.substring(iLen, iLen - n); return rVal; } function strTrim(str){ return str.replace(/\s+$/g, ""); } function doSrchCondCSV(nodeList, sColSep, sRowSep){ if( nodeList.length == 0 ){ return; } var rCSV = ""; var childNodeList = nodeList.item(0).childNodes; var childNodeCnt = childNodeList.length; if( childNodeCnt == 0 ){ return; } var i, j; for( i = 0; i < childNodeCnt - 1; i++) { rCSV += childNodeList.item(i).nodeName + sColSep; } rCSV += childNodeList.item(i).nodeName + sRowSep; var node; while( node = nodeList.nextNode() ) { childNodeList = node.childNodes; for( i = 0; i < childNodeCnt - 1; i++) { rCSV += childNodeList.item(i).text + sColSep; } rCSV += childNodeList.item(i).text + sRowSep; } return rCSV; } function doChkSrchCond(){ var dschfromdd = model.getValue("/root/main/cond/dschfromdd"); // Åð¿øÀÏ var infromdd = model.getValue("/root/main/cond/infromdd"); // ÀÔ¿øÀÏ var inhospfromdd = model.getValue("/root/main/cond/inhospfromdd"); // Àç¿øÀÏ if(dschfromdd == "" && infromdd == "" && inhospfromdd == ""){ messageBox("Åð¿øÀÏ, ÀÔ¿øÀÏ, Àç¿øÀÏ Áß Çϳª´Â ÀÔ·ÂÇÏ¿©¾ß ÇÕ´Ï´Ù.", "I999"); return false; } return true; } function doSetSrchCond(){ //debugger; model.setValue("/root/main/cond/cctermcd", fGetCD("grd_cclist", "cctermcd")); model.setValue("/root/main/cond/diagtermcd", fGetCD("grd_diagcdlist", "diagtermcd")); model.setValue("/root/main/cond/optermcd", fGetCD("grd_opcdlist", "optermcd")); model.setValue("/root/main/cond/chngdeptcdlist", fGetCD("grd_chngcdlist", "chngdeptcd")); model.setValue("/root/main/cond/diagcd", fGetCD("grd_cnstcdlist", "rectermcd")); model.setValue("/root/main/cond/dethcd", fGetCD("grd_directcdlist", "dethcd")); model.setValue("/root/main/cond/tophcd", fGetCD("grd_tcdlist", "tophcd")); model.setValue("/root/main/cond/morphcd", fGetCD("grd_mcdlist", "morphcd")); model.setValue("/root/main/cond/rerntmetstaspartcd", fGetCD("grd_metstascdlist", "rerntmetstaspartcd")); //¼ö¼ú¼½¼ÇÀÇ Á¤º¸¸¦ ÆÄ¾ÇÇÑ´Ù. var opfromdd = model.getValue("/root/main/cond/opfromdd"); // ¼ö¼úÀÏ var opdeptcd = model.getValue("/root/main/cond/opdeptcd"); // ¼ö¼ú°ú var opclsdept = model.getValue("/root/main/cond/opclsdept"); // ºÐ°ú var perfdrid = model.getValue("/root/main/cond/perfdrid"); // ÁýµµÀÇ if(opfromdd != "" || opdeptcd != "-" || opclsdept != "-" || perfdrid != "" ){ //¼ö¼úÁ¤º¸ ¼½¼Ç¿¡ µ¥ÀÌÅÍ µé¾î°¡ÀÖÀ» °æ¿ì model.setValue("/root/main/cond/section1", "Y"); } //ºÐ¸¸¼½¼ÇÀÇ Á¤º¸¸¦ ÆÄ¾ÇÇÑ´Ù. var partrtnfromdd = model.getValue("/root/main/cond/partrtnfromdd"); //ºÐ¸¸ÀÏ var womntypecd = model.getValue("/root/main/cond/womntypecd"); // »ê¸ðÇüÅ var stlborncd = model.getValue("/root/main/cond/stlborncd"); //»ç»ê¿©ºÎ var partrtnkindcd = model.getValue("/root/main/cond/partrtnkindcd"); // ºÐ¸¸ÇüÅ var allwomntypecd = model.getValue("/root/main/cond/allwomntypecd"); // ºÐ¸¸Á¤º¸¸¸ if(partrtnfromdd != "" || womntypecd != "-" || stlborncd != "" || partrtnkindcd != "-" || allwomntypecd != ""){ model.setValue("/root/main/cond/section2", "Y"); } //½Å»ý¾Æ¼½¼ÇÀÇ Á¤º¸¸¦ ÆÄ¾ÇÇÑ´Ù. var prgweekfrom = model.getValue("/root/main/cond/prgweekfrom"); // ÀÓ½ÅÁÖ¼ö var nbabybdwtqtyfrom = model.getValue("/root/main/cond/nbabybdwtqtyfrom"); // ½Å»ý¾ÆÃ¼Áß if(prgweekfrom != "" || nbabybdwtqtyfrom != ""){ model.setValue("/root/main/cond/section3", "Y"); } //Àü°ú¼½¼ÇÀÇ Á¤º¸¸¦ ÆÄ¾ÇÇÑ´Ù. var chngdeptfromdd = model.getValue("/root/main/cond/chngdeptfromdd"); //ÀüÃâÀÏ var chngdeptcd = model.getValue("/root/main/cond/chngdeptcd"); // ÀüÃâ°ú var chngclsdept = model.getValue("/root/main/cond/chngclsdept"); // ÀüÃâºÐ°ú if(chngdeptfromdd != "" || chngdeptcd != "-" || chngclsdept != "-"){ model.setValue("/root/main/cond/section4", "Y"); } //ÇùÁø¼½¼ÇÀÇ Á¤º¸¸¦ ÆÄ¾ÇÇÑ´Ù. var cnstreqfromdd = model.getValue("/root/main/cond/cnstreqfromdd"); // ÇùÁøÀÇ·ÚÀÏ var cnstreqdeptcd = model.getValue("/root/main/cond/cnstreqdeptcd"); // ÇùÁøÀÇ·Ú°ú var cnstclsdept = model.getValue("/root/main/cond/cnstclsdept"); // ºÐ°ú var cnstexecfromdd = model.getValue("/root/main/cond/cnstexecfromdd"); //ÇùÁø½ÃÇàÀÏ var cnstexecdeptcd = model.getValue("/root/main/cond/cnstexecdeptcd"); // ÇùÁø ½ÃÇà°ú var cnstexeclrsdeptcd = model.getValue("/root/main/cond/cnstexeclrsdeptcd"); // ºÐ°ú if(cnstreqfromdd != "" || cnstreqdeptcd != "-" || cnstclsdept != "-" || cnstexecfromdd != "" || cnstexecdeptcd != "-" || cnstexeclrsdeptcd != "-"){ model.setValue("/root/main/cond/section5", "Y"); } //Á¾¾ç, °¡ÄÚµù ¼½¼ÇÀÇ Á¤º¸¸¦ ÆÄ¾ÇÇÑ´Ù. var cncrflag = model.getValue("/root/main/cond/cncrflag"); // Á¾¾ç±¸ºÐ var tmpcodeyn = model.getValue("/root/main/cond/tmpcodeyn"); // °¡ÄÚµù if(cncrflag != "-" || tmpcodeyn != ""){ model.setValue("/root/main/cond/section6", "Y"); } //¾ÏȯÀÚ°ü¸® ¼½¼ÇÀÇ Á¤º¸¸¦ ÆÄ¾ÇÇÑ´Ù. var prmycncryn = model.getValue("/root/main/cond/prmycncryn"); // ´Ù¹ß¼º ¿ø¹ß¾Ï var dethyn = model.getValue("/root/main/cond/dethyn"); // »ç¸Á¿©ºÎ var seer = model.getValue("/root/main/cond/seer"); // SEER var staging = model.getValue("/root/main/cond/staging"); // º´±â var rerntmetstaspart = model.getValue("/root/main/cond/rerntmetstaspart"); // ÀüÀÌ¿©ºÎ var ecog = model.getValue("/root/main/cond/ecog"); // ECOG var regimen = model.getValue("/root/main/cond/regimen"); // Regimen var chosbfcuremthd = model.getValue("/root/main/cond/chosbfcuremthd"); // ³»¿øÀüÄ¡·á var prmypart = model.getValue("/root/main/cond/prmypart"); // º»¿øÄ¡·á(¿ø¹ß) var metstaspart = model.getValue("/root/main/cond/metstaspart"); // º»¿øÄ¡·á(ÀüÀÌ) if(prmycncryn != "" || dethyn != "" || seer != "-" || staging != "-" || rerntmetstaspart != "" || ecog != "" || regimen != "" || chosbfcuremthd != "" || prmypart != "" || metstaspart != ""){ model.setValue("/root/main/cond/section7", "Y"); } } function doSetNullSrchCond(){ model.setValue("/root/main/cond/section1", ""); model.setValue("/root/main/cond/section2", ""); model.setValue("/root/main/cond/section3", ""); model.setValue("/root/main/cond/section4", ""); model.setValue("/root/main/cond/section5", ""); model.setValue("/root/main/cond/section6", ""); model.setValue("/root/main/cond/section7", ""); model.refresh(); } /** * @ver : 2009-01-13 * @desc : ÀúÀåµÈ Á¶°Ç Á¶È¸ * @by : °­ÁöÈÆ * @param : * @return : * @--------------------------------------------------- */ function GetCondSave(){ model.removeNode ("/root/tmp/condlist"); model.makeNode("/root/tmp/condlist"); submit("TRMRD01602"); var node = model.instance1.selectSingleNode("/root/tmp/condlist"); var childNodeList = node.childNodes; var childNode; while( childNode = childNodeList.nextNode() ) { model.setValue("/root/main/cond/" + childNode.nodeName, model.getValue(childNode)); } //Åð¿ø°ú ºÐ°ú°¡ ºñ¾îÀÖÁö ¾ÊÀ¸¸é if(model.getValue("/root/main/cond/dschclsdept") != "-"){ var deptcd = model.getValue("/root/main/cond/dschdeptcd"); switch(deptcd){ case "2010000000": cmb_dschclsdept.choices.itemset.attribute("nodeset") = "/root/init/mdclrsdeptlist/M0500"; break; case "2040000000": cmb_dschclsdept.choices.itemset.attribute("nodeset") = "/root/init/gsclrsdeptlist/M0501"; break; case "2100000000": cmb_dschclsdept.choices.itemset.attribute("nodeset") = "/root/init/gyclrsdeptlist/M0502"; break; case "2110000000": cmb_dschclsdept.choices.itemset.attribute("nodeset") = "/root/init/pdclrsdeptlist/M0503"; break; default: cmb_dschclsdept.choices.itemset.attribute("nodeset") = "/root/init/nulllist/M503"; break; } cmb_dschclsdept.refresh(); } //ÀÔ¿ø°ú ºÐ°ú°¡ ºñ¾îÀÖÁö ¾ÊÀ¸¸é if(model.getValue("/root/main/cond/inclsdept") != "-"){ var deptcd = model.getValue("/root/main/cond/indeptcd"); switch(deptcd){ case "2010000000": cmb_inclsdept.choices.itemset.attribute("nodeset") = "/root/init/mdclrsdeptlist/M0500"; break; case "2040000000": cmb_inclsdept.choices.itemset.attribute("nodeset") = "/root/init/gsclrsdeptlist/M0501"; break; case "2100000000": cmb_inclsdept.choices.itemset.attribute("nodeset") = "/root/init/gyclrsdeptlist/M0502"; break; case "2110000000": cmb_inclsdept.choices.itemset.attribute("nodeset") = "/root/init/pdclrsdeptlist/M0503"; break; default: cmb_inclsdept.choices.itemset.attribute("nodeset") = "/root/init/nulllist/M503"; break; } cmb_inclsdept.refresh(); } //¼ö¼ú°ú ºÐ°ú°¡ ºñ¾îÀÖÁö ¾ÊÀ¸¸é if(model.getValue("/root/main/cond/opclsdept") != "-"){ var deptcd = model.getValue("/root/main/cond/opdeptcd"); switch(deptcd){ case "2010000000": cmb_opclsdept.choices.itemset.attribute("nodeset") = "/root/init/mdclrsdeptlist/M0500"; break; case "2040000000": cmb_opclsdept.choices.itemset.attribute("nodeset") = "/root/init/gsclrsdeptlist/M0501"; break; case "2100000000": cmb_opclsdept.choices.itemset.attribute("nodeset") = "/root/init/gyclrsdeptlist/M0502"; break; case "2110000000": cmb_opclsdept.choices.itemset.attribute("nodeset") = "/root/init/pdclrsdeptlist/M0503"; break; default: cmb_opclsdept.choices.itemset.attribute("nodeset") = "/root/init/nulllist/M503"; break; } cmb_opclsdept.refresh(); } //ÀüÃâ°ú ºÐ°ú°¡ ºñ¾îÀÖÁö ¾ÊÀ¸¸é if(model.getValue("/root/main/cond/chngclsdept") != "-"){ var deptcd = model.getValue("/root/main/cond/chngdeptcd"); switch(deptcd){ case "2010000000": cmb_chngclsdept.choices.itemset.attribute("nodeset") = "/root/init/mdclrsdeptlist/M0500"; break; case "2040000000": cmb_chngclsdept.choices.itemset.attribute("nodeset") = "/root/init/gsclrsdeptlist/M0501"; break; case "2100000000": cmb_chngclsdept.choices.itemset.attribute("nodeset") = "/root/init/gyclrsdeptlist/M0502"; break; case "2110000000": cmb_chngclsdept.choices.itemset.attribute("nodeset") = "/root/init/pdclrsdeptlist/M0503"; break; default: cmb_chngclsdept.choices.itemset.attribute("nodeset") = "/root/init/nulllist/M503"; break; } cmb_chngclsdept.refresh(); } //ÇùÁø°ú ºÐ°ú°¡ ºñ¾îÀÖÁö ¾ÊÀ¸¸é if(model.getValue("/root/main/cond/cnstclsdept") != "-"){ var deptcd = model.getValue("/root/main/cond/cnstreqdeptcd"); switch(deptcd){ case "2010000000": cmb_cnstclsdept.choices.itemset.attribute("nodeset") = "/root/init/mdclrsdeptlist/M0500"; break; case "2040000000": cmb_cnstclsdept.choices.itemset.attribute("nodeset") = "/root/init/gsclrsdeptlist/M0501"; break; case "2100000000": cmb_cnstclsdept.choices.itemset.attribute("nodeset") = "/root/init/gyclrsdeptlist/M0502"; break; case "2110000000": cmb_cnstclsdept.choices.itemset.attribute("nodeset") = "/root/init/pdclrsdeptlist/M0503"; break; default: cmb_cnstclsdept.choices.itemset.attribute("nodeset") = "/root/init/nulllist/M503"; break; } cmb_cnstclsdept.refresh(); } //ÇùÁø½ÃÇà°ú ºÐ°ú°¡ ºñ¾îÀÖÁö ¾ÊÀ¸¸é if(model.getValue("/root/main/cond/cnstexeclrsdeptcd") != "-"){ var deptcd = model.getValue("/root/main/cond/cnstexecdeptcd"); switch(deptcd){ case "2010000000": cmb_cnstexeclrsdeptcd.choices.itemset.attribute("nodeset") = "/root/init/mdclrsdeptlist/M0500"; break; case "2040000000": cmb_cnstexeclrsdeptcd.choices.itemset.attribute("nodeset") = "/root/init/gsclrsdeptlist/M0501"; break; case "2100000000": cmb_cnstexeclrsdeptcd.choices.itemset.attribute("nodeset") = "/root/init/gyclrsdeptlist/M0502"; break; case "2110000000": cmb_cnstexeclrsdeptcd.choices.itemset.attribute("nodeset") = "/root/init/pdclrsdeptlist/M0503"; break; default: cmb_cnstexeclrsdeptcd.choices.itemset.attribute("nodeset") = "/root/init/nulllist/M503"; break; } cmb_cnstexeclrsdeptcd.refresh(); } model.makeNode("/root/main/diagcdlist"); model.makeNode("/root/main/cclist"); model.makeNode("/root/main/chngcdlist"); model.makeNode("/root/main/directcdlist"); model.makeNode("/root/main/cnstcdlist"); model.makeNode("/root/main/opcdlist"); model.makeNode("/root/main/mcdlist"); model.makeNode("/root/main/tcdlist"); model.makeNode("/root/main/metstascdlist"); copyNodesetType("/root/main/diagcdlist", "/root/tmp/diagcdlist" , "replace"); copyNodesetType("/root/main/cclist", "/root/tmp/cclist" , "replace"); copyNodesetType("/root/main/chngcdlist", "/root/tmp/chngcdlist" , "replace"); copyNodesetType("/root/main/directcdlist", "/root/tmp/directcdlist" , "replace"); copyNodesetType("/root/main/cnstcdlist", "/root/tmp/cnstcdlist" , "replace"); copyNodesetType("/root/main/opcdlist", "/root/tmp/opcdlist" , "replace"); copyNodesetType("/root/main/mcdlist", "/root/tmp/mcdlist" , "replace"); copyNodesetType("/root/main/tcdlist", "/root/tmp/tcdlist" , "replace"); copyNodesetType("/root/main/metstascdlist", "/root/tmp/metstascdlist" , "replace"); cap_condnm.attribute("text") = "Á¶°Ç¸í : " + model.getValue("/root/main/cond/condnm"); model.refresh(); } function getMonthInterval(startdd, enddd){ var monthcnt = 0; while(startdd != enddd){ startdd = addMonth(startdd); monthcnt++; } return monthcnt; } function addMonth(yyyymm){ var yyyy = yyyymm.substring(0, 4); var mm = yyyymm.substring(4, 6); var bfmm; if(mm.substr(0,1) == "0"){ //10¿ù ÀÌÀüÀÎ °æ¿ì, ¾ÕÀÚ¸® 0À» Á¦°Å bfmm = mm.substr(1,1); bfmm++; }else{ //10¿ù ÀÌÈÄÀÎ °æ¿ì bfmm = mm; bfmm++; } if(bfmm > 12){ // 1¿ù ÀÌÀüÀ» ¼±ÅÃÇÑ °æ¿ì, ³âµµ¸¦ ¹Ù²Þ bfmm = "01"; yyyy++; }else if(bfmm < 10){ //10¿ù ÀÌÈÄÀÎ °æ¿ì¿¡´Â ¾ÕÀÚ¸®¿¡ 0À» ºÙÀÓ. bfmm = "0".concat(bfmm); } return "" + yyyy + "".concat(bfmm); } function excel_save(){ //var fileName = window.fileDialog("save", ",", false, "", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls"); var fileName = window.fileDialog("save", "|", true, "", "", "Excel Files(*.xls)|*.xls"); if (fileName != ""){ iviewer_list.window.javascript.grd_list.saveExcel(fileName, "SheetName", false, false, "", "", false); } }