/* - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì ¼ö¼úÆË¾÷ ( SMMMO03300_¼ö¼úÆË¾÷.xrw - JScript ) - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì */ var bExpandFlag = false; //¼ö¼ú³»¿ª grid È®ÀåÀ¯¹« /** * @desc : È­¸é ÃʱâÈ­ * @ * @param : * @return : * @--------------------------------------------------- */ function fInitializeDone_SPMMO03300(){ model.removeNodeset("/root/main/opcdinfo/opcdlist"); model.removeNodeset("/root/main/selectoplist/selectoplist"); // 2009. 02.10 pymi if(opener.javascript.getParameter("SPMMO03300_opParam") == "Y") { btn_deptindx.selected = true; model.toggle("deptindx"); fReqGetDeptOpIndxList(); model.refresh(); } else{ btn_icd9.selected = true; model.toggle("icd9"); fReqGetICD9IndxList(); model.refresh(); } var srchdata = opener.javascript.getParameter("SPMMO03300_SEARCHDATA"); //mainâ¿¡¼­ °Ë»ö¾î·Î ¶ç¿î °æ¿ì if(srchdata.length > 0){ model.setValue("/root/main/cond/reqdata", srchdata); btn_req.dispatch("DOMActivate"); } } /** * @desc : ICD9 »öÀÎ Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetICD9IndxList(){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/indxflag", "9"); if(submit("TRMMO03101", true)){ } } /** * @desc : °ú¼ö¼ú»öÀÎ Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetDeptOpIndxList(){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/deptindxflag", "9"); model.makeValue("/root/send/reqdata/deptcd", getUserInfo("dutplcecd")); model.makeValue("/root/send/reqdata/deptnm", getUserInfo("dutplcenm")); if(submit("TRMMO03111")){ } } /** * @desc : °³Àμö¼úSET Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetPrmsOpSETList(){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/setkindcd", "P"); //°³ÀÎ model.makeValue("/root/send/reqdata/setclscd" , "D"); //ÀÇ»ç model.makeValue("/root/send/reqdata/settypecd", "O"); //¼ö¼ú model.makeValue("/root/send/reqdata/ioflag" , "N"); if(submit("TRMMB00601")){ } } /** * @desc : ICD9ÄÚµå ¼±Åýà Áø´Ü Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetICD9CDList(){ var item = trv_icd9indxcdlist.item(trv_icd9indxcdlist.selectedIndex); if(item.depth == 0){ //»óÀ§index¸¸À» Ŭ¸¯ÇÑ °æ¿ì return; } var indxcd = trv_icd9indxcdlist.value; model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/icd9indxcd", indxcd); if(submit("TRMMO03109")){ } } /** * @desc : ¾à¼ÓSET ¼±Åýà ¼ö¼ú Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetPrmsOpList(){ var item = trv_prmsprcpsetlist.item(trv_prmsprcpsetlist.selectedIndex); if(item.depth == 0){ //»óÀ§index¸¸ Ŭ¸¯ÇÑ °æ¿ì return; } var currow = item.index + 1; var setno = model.getValue("/root/main/prmsprcpsetinfo/prmsprcpsetlist[" + currow + "]/setno"); var settypecd = model.getValue("/root/main/prmsprcpsetinfo/prmsprcpsetlist[" + currow + "]/settypecd"); model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/setno" , setno); model.makeValue("/root/send/reqdata/settypecd", settypecd); if(submit("TRMMB00610")){ } } /** * @desc : °ú»öÀÎ ¼±Åýà Áø´Ü Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetDeptIndxCDList(){ var item = trv_deptindxcdlist.item(trv_deptindxcdlist.selectedIndex); var currow = item.index + 1; var deptindxcd = model.getValue("/root/main/deptindxcdlist/deptindxcdlist[" + currow + "]/deptindxcd"); model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/deptindxflag", "9"); model.makeValue("/root/send/reqdata/deptindxcd" , deptindxcd); model.makeValue("/root/send/reqdata/deptcd" , getUserInfo("dutplcecd")); if(submit("TRMMO03113")){ } } /** * @desc : ¼ö¼ú¿ë¾î Á¶È¸(°Ë»ö Á¶°Ç) * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetTermOpSrch(){ var cond1; var cond2; var cond5 = model.getValue("/root/main/cond/reqdata"); if(cond5.length < 1){ //°Ë»ö¾î¸¦ ÀÔ·ÂÇÏÁö ¾ÊÀº °æ¿ì messageBox("°Ë»ö¾î¸¦", "C002") return; }else if(cond5.length < 2){ //°Ë»ö¾î°¡ 2´Ü¾î ¹Ì¸¸ÀÎ °æ¿ì messageBox("°Ë»ö¾î´Â 2´Ü¾î ÀÌ»ó", "C001"); return; } var cond3 = fIsHangul(cond5); var cond4 = getCurrentDate(); if(cond3 == "H"){ cond1 = 2; cond2 = 3; }else if(cond3 == "E"){ if(isNumber(cond5.charAt(1))== true){ //ÄÚµå cond1 = 1; cond2 = 1; }else{ //¹®Àå cond1 = 2; cond2 = 3; } } model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/cond1", cond1); model.makeValue("/root/send/reqdata/cond2", cond2); model.makeValue("/root/send/reqdata/cond3", cond3); model.makeValue("/root/send/reqdata/cond4", cond4); model.makeValue("/root/send/reqdata/cond5", cond5); if(submit("TRMMO03110")){ } } /** * @desc : °ú»öÀÎ °Ë»ö¾î·Î Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetDeptIndxSrch(){ var srchdata = model.getValue("/root/main/cond/reqdata"); if(srchdata.length < 1){ //°Ë»ö¾î¸¦ ÀÔ·ÂÇÏÁö ¾ÊÀº °æ¿ì, messageBox("°Ë»ö¾î¸¦", "C002"); return; } var srchflag = fIsHangul(srchdata); if(srchflag == "E"){ if(isNumber(srchdata.charAt(1))==true){ //ÄÚµå srchflag = "C"; }else{ //Äڵ尡 ¾Æ´Ñ °æ¿ì srchflag = "E"; } } model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/deptindxflag", "9"); model.makeValue("/root/send/reqdata/deptcd" , getUserInfo("dutplcecd")); model.makeValue("/root/send/reqdata/srchflag" , srchflag); model.makeValue("/root/send/reqdata/srchdata" , srchdata.toUpperCase()); if(submit("TRMMO03113")){ } } /** * @desc : °³Àμö¼úSET °Ë»ö¾î·Î Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetPrmsOpSETSrch(){ var srchdata = model.getValue("/root/main/cond/reqdata"); if(srchdata.length < 1){ //°Ë»ö¾î¸¦ ÀÔ·ÂÇÏÁö ¾ÊÀº °æ¿ì, messageBox("°Ë»ö¾î¸¦", "C002"); return; } var srchflag = fIsHangul(srchdata); if(srchflag == "E"){ if(isNumber(srchdata.charAt(1))==true){ //ÄÚµå srchflag = "C"; }else{ //Äڵ尡 ¾Æ´Ñ °æ¿ì srchflag = "E"; } } model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/setkindcd", "P"); model.makeValue("/root/send/reqdata/setclscd" , "D"); model.makeValue("/root/send/reqdata/settypecd", "O"); model.makeValue("/root/send/reqdata/settrgtcd", getUserInfo("userid")); model.makeValue("/root/send/reqdata/srchflag" , srchflag); model.makeValue("/root/send/reqdata/srchdata" , srchdata); if(submit("TRMMO03116")){ } } /** * @desc : ¼ö¼úÄÚµå ¸®½ºÆ® Àü´Þ * @ * @param : * @return : * @--------------------------------------------------- */ function fSendOpCDList(){ if(checkOpener()){ var nodepath = opener.javascript.getParameter("SPMMO3300_param_nodepath"); if(nodepath == ""){ var selectNode = opener.instance1.selectSingleNode("/root/temp/selectoplist"); if(selectNode == null){ opener.model.makeNode("/root/temp/selectoplist"); } model.copyNode(opener.root.temp, root.main.selectoplist); opener.javascript.setParameter("SPMMO03300_rtn_useyn", "Y"); }else{ var selectnode = opener.instance1.selectSingleNode(nodepath); if(selectnode == null){ opener.model.makeNode(nodepath); } opener.model.copyNode(nodepath, root.main.selectoplist); opener.javascript.setParameter("SPMMO03300_rtn_useyn", "Y"); } }else{ messageBox("»óÀ§ È­¸éÀÌ º¯°æµÇ¾î µ¥ÀÌÅ͸¦ Àü´Þ", "E001"); } window.close(); } /** * @desc : ¼ö¼úÄÚµå ¸®½ºÆ® Àü´Þ * @ * @param : * @return : * @--------------------------------------------------- */ function fSendOpCD(currow){ var nodelist = model.instance1.selectNodes("/root/main/opcdinfo/opcdlist[" + currow + "]"); var node = nodelist.item(0); var nodepath = opener.javascript.getParameter("SPMMO03300_param_nodepath"); if(checkOpener()){ if(nodepath == ""){ //openerÀÇ Æ¯Á¤ nodepath¸¦ ³Ñ°ÜÁÖÁö ¾ÊÀº °æ¿ì var selectnode = opener.instance1.selectSingleNode("/root/temp/selectoplist"); if(selectnode == null){ //opener¿¡ node¸¦ ¸¸µç´Ù. opener.model.makeNode("/root/temp/selectoplist"); } model.copyNode(opener.root.temp.selectoplist, node); }else{ //openerÀÇ Æ¯Á¤ nodepath¸¦ ³Ñ°ÜÁØ °æ¿ì var selectnode = opener.instance1.selectSingleNode(nodepath); if(selectnode == null){ //opener¿¡ node¸¦ ¸¸µç´Ù. opener.model.makeNode(nodepath); } opener.model.copyNode(nodepath, node); //opener¿¡ º¹»ç } opener.javascript.setParameter("SPMMO03300_rtn_useyn", "Y"); }else{ messageBox("»óÀ§ È­¸éÀÌ º¯°æµÇ¾î µ¥ÀÌÅ͸¦ Àü´Þ", "E001"); } window.close(); } /** * @desc : ´Ù¼öÀÇ ¼ö¼úÄÚµå ¼±ÅÃ, ¼ö¼úÃß°¡¹öư Ŭ¸¯ * @ * @param : * @return : * @--------------------------------------------------- */ function fAppendOpCD(){ var totrow = grd_opcdlist.rows; for(var i = 1; i < totrow; i++){ var bflag = grd_opcdlist.valueMatrix(i, grd_opcdlist.colRef("boolflag")); if(bflag == "true"){ grd_opcdlist.valueMatrix(i, grd_opcdlist.colRef("boolflag")) = false; fAddOp(i); } } grd_selectop.rebuild(); } /** * @desc : ´ÜÀÏ ¼ö¼úÄÚµå ¼±ÅÃ, ±×¸®µå Ŭ¸¯ * @ * @param : trgtrow - ÇöÀç Ŭ¸¯ÇÑ ±×¸®µåÀÇ row À§Ä¡ * @return : * @--------------------------------------------------- */ function fAddOp(trgtrow){ var opcd = model.getValue("/root/main/opcdinfo/opcdlist[" + trgtrow + "]/opcd"); var dispopcd= model.getValue("/root/main/opcdinfo/opcdlist[" + trgtrow + "]/dispopcd"); var opengnm = model.getValue("/root/main/opcdinfo/opcdlist[" + trgtrow + "]/opengnm"); var ophngnm = model.getValue("/root/main/opcdinfo/opcdlist[" + trgtrow + "]/ophngnm"); var fndrow = grd_selectop.findRow(opcd, 1, 1, "true", "true"); if(fndrow < 0){ grd_selectop.addRow(false); var currow = grd_selectop.row; model.setValue("/root/main/selectoplist/selectoplist[" + currow + "]/opcd" , opcd); model.setValue("/root/main/selectoplist/selectoplist[" + currow + "]/dispopcd", dispopcd); model.setValue("/root/main/selectoplist/selectoplist[" + currow + "]/opengnm" , opengnm); model.setValue("/root/main/selectoplist/selectoplist[" + currow + "]/ophngnm" , ophngnm); } model.refresh(); } /** * @desc : ¼ö¼úÆË¾÷ ±×¸®µå »çÀÌÁî º¯°æ * @ * @param : iRow - ÇöÀç Ŭ¸¯ÇÑ ±×¸®µåÀÇ row À§Ä¡ * @return : * @--------------------------------------------------- */ function fCtrlSizeOpList(){ if(bExpandFlag == false){ caption1.attribute("left") = 0; line1.attribute("x1") = 0; line2.attribute("x1") = 0; btn_icd9.visible = false; btn_deptindx.visible= false; btn_indset.visible = false; switch1.visible = false; grd_opcdlist.attribute("left") = 0; grd_opcdlist.attribute("width")= 938; grd_opcdlist.colWidth(grd_opcdlist.colRef("opengnm")) = 390; grd_opcdlist.colWidth(grd_opcdlist.colRef("ophngnm")) = 390; grd_selectop.attribute("left") = 0; grd_selectop.attribute("width")= 938; grd_selectop.colWidth(grd_selectop.colRef("opengnm")) = 400; grd_selectop.colWidth(grd_selectop.colRef("ophngnm")) = 400; btn_expand.attribute("left") = 8; bExpandFlag = true; }else{ caption1.attribute("left") = 327; line1.attribute("x1") = 323; line2.attribute("x1") = 323; btn_icd9.visible = true; btn_deptindx.visible= true; btn_indset.visible = true; switch1.visible = true; grd_opcdlist.attribute("left") = 323; grd_opcdlist.attribute("width")= 615; grd_opcdlist.colWidth(grd_opcdlist.colRef("opengnm")) = 231; grd_opcdlist.colWidth(grd_opcdlist.colRef("ophngnm")) = 261; grd_selectop.attribute("left") = 323; grd_selectop.attribute("width")= 615; grd_selectop.colWidth(grd_selectop.colRef("opengnm")) = 231; grd_selectop.colWidth(grd_selectop.colRef("ophngnm")) = 261; btn_expand.attribute("left") = 329; bExpandFlag = false; } } function fDelOpCDList(){ deleteSelectedRows(grd_selectop, false); }