/* - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì Áø´ÜÆË¾÷ ( SMMMO03200_Áø´ÜÆË¾÷.xrw - JScript ) - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì */ var gEXPANDFLAG = false; //Áø´Ü³»¿ª grid È®ÀåÀ¯¹« /** * @desc : È­¸é ÃʱâÈ­ * @ * @param : * @return : * @--------------------------------------------------- */ function fInitializeDone_SPMMO03200(){ model.removeNodeset("/root/main/diaginfo/diagcdlist"); model.removeNodeset("/root/main/icd10indx/icd10indxcdlist"); model.removeNodeset("/root/main/selectdiaglist/selectdiaglist"); model.refresh(); // 2009. 02.10 pymi if(opener.javascript.getParameter("SPMMO03200_diagParam") == "Y") { btn_deptindx.selected = true; model.toggle("deptcd"); fReqGetDeptIndxList(); model.refresh(); } else { //È­¸é open½Ã, ICD10»öÀÎÅÇÀÌ ±âº» btn_icd10.selected = true; model.toggle("icd10"); fReqGetIndxList(); model.refresh(); } var srchdata = opener.javascript.getParameter("SPMMO03200_SEARCHDATA"); //mainâ¿¡¼­ °Ë»ö¾î·Î ¶ç¿î °æ¿ì if(srchdata.length > 0){ model.setValue("/root/main/cond/reqdata", srchdata); btn_req.dispatch("DOMActivate"); } } /** * @desc : ICD10 IndexÁ¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetIndxList(){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/indxflag", "0"); if(submit("TRMMO03101", true)){ } } /** * @desc : °ú IndexÁ¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetDeptIndxList(){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/deptindxflag", "0"); if(submit("TRMMO03111", true)){ //°ú»öÀÎÄÚµå Á¶È¸ } } /** * @desc : °³ÀÎ Áø´ÜSET Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetPrmsDiagSETList(){ 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", "D"); model.makeValue("/root/send/reqdata/ioflag" , "N"); if(submit("TRMMB00601", true)){ //°³ÀÎ Áø´ÜSET Á¶È¸ } } /** * @desc : ICD10»öÀÎ ¼±Åýà Áø´Ü Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetICD10CDList(){ var item = trv_icd10indxcdlist.item(trv_icd10indxcdlist.selectedIndex); if(item.depth == 0){ //»óÀ§index¸¦ Ŭ¸¯ÇÑ °æ¿ì, Á¶È¸ÇÏÁö ¾Ê´Â´Ù. return; } var indxcd = trv_icd10indxcdlist.value; model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/icd10indxcd", indxcd); if(submit("TRMMO03102")){ } } /** * @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", "0"); model.makeValue("/root/send/reqdata/deptindxcd" , deptindxcd); model.makeValue("/root/send/reqdata/deptcd" , getUserInfo("dutplcecd")); if(submit("TRMMO03112")){ } } /** * @desc : ¾à¼ÓSET ¼±Åýà Áø´Ü Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetPrmsDiagList(){ var item = trv_prmsprcpsetlist.item(trv_prmsprcpsetlist.selectedIndex); 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("TRMMO03104")){ } } /** * @desc : Áø´Ü¿ë¾î °Ë»ö¾î·Î Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetTermDiagSrch(){ var cond1; var cond2; var cond5 = model.getValue("/root/main/cond/reqdata"); if(cond5.length < 1){ //°Ë»ö¾î¸¦ ÀÔ·ÂÇÏÁö ¾ÊÀº °æ¿ì, messageBox("°Ë»ö¾î¸¦", "C002"); 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); //°Ë»ö±¸ºÐ 1:ÄÚµå, 2:¸í model.makeValue("/root/send/reqdata/cond2", cond2); //¸íĪ°Ë»ö±¸ºÐ, 1:ÄÚµå, 2:´Ü¾î, 3:¹®Àå, 4:ù´Ü¾î model.makeValue("/root/send/reqdata/cond3", cond3); //ÇÑ¿µ±¸ºÐ(H:ÇѱÛ, E:¿µ¹®) model.makeValue("/root/send/reqdata/cond4", cond4); //±âÁØÀÏÀÚ model.makeValue("/root/send/reqdata/cond5", cond5.toUpperCase()); //°Ë»ö³»¿ë model.makeValue("/root/send/reqdata/synmflag", "Y"); //µ¿ÀǾºÐ if(submit("TRMMO03103")){ } } /** * @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", "0"); 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("TRMMO03112")){ } } /** * @desc : °³ÀÎÁø´ÜSET °Ë»ö¾î·Î Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqGetPrmsDiagSETSrch(){ 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/settypecd", "D"); //Áø´Ü model.makeValue("/root/send/reqdata/setkindcd", "P"); //°³ÀÎ model.makeValue("/root/send/reqdata/setclscd" , "D"); //ÀÇ»ç model.makeValue("/root/send/reqdata/settrgtcd", getUserInfo("userid")); //ÀÇ»çID model.makeValue("/root/send/reqdata/srchflag" , srchflag); model.makeValue("/root/send/reqdata/srchdata" , srchdata); if(submit("TRMMO03115")){ } } /** * @desc : ´Ù¼öÀÇ Áø´ÜÄÚµå ¼±Åà ÈÄ, Áø´ÜÃß°¡¹öư Ŭ¸¯ * @ : 1. check box¿¡ ¼±ÅÃµÈ Áø´ÜÀ» Ãß°¡ * @ : 2. ctrl + mouse select·Î ¼±ÅÃµÈ Áø´ÜÀ» Ãß°¡ * @param : * @return : * @--------------------------------------------------- */ function fAppendDiagCD(){ /* for(var i = 0; i < grd_diaglist.selectedRows; i++){ fAddDiag(i + 1); //instance ´Â gridº¸´Ù +1 ¸¹¾Æ¾ßÇÔ } */ var totrow = grd_diaglist.rows; for(var i = 1; i < totrow; i++){ var bflag = grd_diaglist.valueMatrix(i, grd_diaglist.colRef("boolflag")); if(bflag == "true"){ grd_diaglist.valueMatrix(i, grd_diaglist.colRef("boolflag")) = "false"; //º¹»çÇÑ Áø´ÜÀº check boxÀÇ °ªÀ» ÇØÃ¼ fAddDiag(i); } } grd_selectdiag.rebuild(); } /** * @desc : ´ÜÀÏ Áø´ÜÄÚµå ¼±ÅÃ, ±×¸®µå Ŭ¸¯ * @ * @param : trgtrow - ÇöÀç Ŭ¸¯ÇÑ ±×¸®µåÀÇ row À§Ä¡ * @return : * @--------------------------------------------------- */ function fAddDiag(trgtrow){ var diagcd = model.getValue("/root/main/diaginfo/diagcdlist[" + trgtrow + "]/diagcd"); var dispdiagcd = model.getValue("/root/main/diaginfo/diagcdlist[" + trgtrow + "]/dispdiagcd"); var diagengnm = model.getValue("/root/main/diaginfo/diagcdlist[" + trgtrow + "]/diagengnm"); var diaghngnm = model.getValue("/root/main/diaginfo/diagcdlist[" + trgtrow + "]/diaghngnm"); var orgdiagcd = model.getValue("/root/main/diaginfo/diagcdlist[" + trgtrow + "]/orgdiagcd"); var icd10cd = model.getValue("/root/main/diaginfo/diagcdlist[" + trgtrow + "]/icd10cd"); var fndrow = grd_selectdiag.findRow(diagcd, 1, 0, "true", "true"); if(fndrow < 0){ grd_selectdiag.addRow(false); currow = grd_selectdiag.row; model.setValue("/root/main/selectdiaglist/selectdiaglist[" + currow + "]/diagcd" , diagcd); model.setValue("/root/main/selectdiaglist/selectdiaglist[" + currow + "]/dispdiagcd", dispdiagcd); model.setValue("/root/main/selectdiaglist/selectdiaglist[" + currow + "]/diagengnm" , diagengnm); model.setValue("/root/main/selectdiaglist/selectdiaglist[" + currow + "]/diaghngnm" , diaghngnm); model.setValue("/root/main/selectdiaglist/selectdiaglist[" + currow + "]/orgdiagcd" , orgdiagcd); model.setValue("/root/main/selectdiaglist/selectdiaglist[" + currow + "]/icd10cd" , icd10cd); } model.refresh(); } /** * @desc : Áø´Ü³»¿ª ±×¸®µå Å©±â Á¶Àý ¹× ¹öư À§Ä¡ À̵¿ * @ * @param : iRow - ÇöÀç Ŭ¸¯ÇÑ ±×¸®µåÀÇ row À§Ä¡ * @return : * @--------------------------------------------------- */ function fCtrlSizeDiagList(){ if(gEXPANDFLAG == false){ caption1.attribute("left") = 0; line1.attribute("x1") = 0; line2.attribute("x1") = 0; btn_icd10.visible = false; btn_deptindx.visible = false; btn_indset.visible= false; switch1.visible = false; grd_diaglist.attribute("left") = 0; grd_diaglist.attribute("width") = 938; grd_diaglist.colWidth(grd_diaglist.colRef("diagengnm")) = 390; //grd_diaglist.colWidth(grd_diaglist.colRef("orgdiagengnm")) = 390; grd_selectdiag.attribute("left") = 0; grd_selectdiag.attribute("width") = 938; grd_selectdiag.colWidth(grd_diaglist.colRef("diagengnm")) = 400; //grd_selectdiag.colWidth(grd_diaglist.colRef("orgdiagengnm")) = 400; btn_expand.attribute("left") = 8; gEXPANDFLAG = true; }else{ caption1.attribute("left") = 327; line1.attribute("x1") = 323; line2.attribute("x1") = 323; btn_icd10.visible = true; btn_deptindx.visible= true; btn_indset.visible = true; switch1.visible = true; grd_diaglist.attribute("left") = 323; grd_diaglist.attribute("width") = 615; grd_diaglist.colWidth(grd_diaglist.colRef("diagengnm")) = 231; //grd_diaglist.colWidth(grd_diaglist.colRef("orgdiagengnm")) = 261; grd_selectdiag.attribute("left") = 323; grd_selectdiag.attribute("width") = 615; grd_selectdiag.colWidth(grd_diaglist.colRef("diagengnm")) = 231; //grd_selectdiag.colWidth(grd_diaglist.colRef("orgdiagengnm")) = 261; btn_expand.attribute("left") = 329; gEXPANDFLAG = false; } } /** * @desc : Áø´ÜÄÚµå Àü´Þ * @ * @param : * @return : * @--------------------------------------------------- */ function fSendDiag(currow){ if(checkOpener()){ var nodelist = model.instance1.selectNodes("/root/main/selectdiaglist/selectdiaglist[" + currow + "]"); var node = nodelist.item(0); var nodepath = opener.javascript.getParameter("SPMMO03200_param_nodepath"); if(nodepath == ""){ //openerÀÇ Æ¯Á¤ nodepath¸¦ ³Ñ°ÜÁÖÁö ¾ÊÀº °æ¿ì var selectnode = opener.instance1.selectSingleNode("/root/temp/selectdiaglist"); if(selectnode == null){ //opener¿¡ node¸¦ ¸¸µç´Ù. opener.model.makeNode("/root/temp/selectdiaglist"); } model.copyNode(opener.root.temp.selectdiaglist, 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("SPMMO03200_rtn_useyn", "Y"); }else{ messageBox("»óÀ§ È­¸éÀÌ º¯°æµÇ¾î µ¥ÀÌÅ͸¦ Àü´Þ", "E001"); } window.close(); } /** * @desc : Áø´ÜÄڵ帮½ºÆ® Àü´Þ * @ * @param : * @return : * @--------------------------------------------------- */ function fSendDiagCDList(){ if(checkOpener()){ var nodepath = opener.javascript.getParameter("SPMMO3200_param_nodepath"); if(nodepath == ""){ var selectNode = opener.instance1.selectSingleNode("/root/temp/selectdiaglist"); if(selectNode == null){ opener.model.makeNode("/root/temp/selectdiaglist"); } model.copyNode(opener.root.temp, root.main.selectdiaglist); opener.javascript.setParameter("SPMMO03200_rtn_useyn", "Y"); }else{ var selectnode = opener.instance1.selectSingleNode(nodepath); if(selectnode == null){ opener.model.makeNode(nodepath); } opener.model.copyNode(nodepath, root.main.selectdiaglist); opener.javascript.setParameter("SPMMO03200_rtn_useyn", "Y"); } }else{ messageBox("»óÀ§ È­¸éÀÌ º¯°æµÇ¾î µ¥ÀÌÅ͸¦ Àü´Þ", "E001"); } window.close(); } /** * @desc : Áø´ÜÄڵ帮½ºÆ® »èÁ¦ * @ * @param : * @return : * @--------------------------------------------------- */ function fDelDiagCDList(){ deleteSelectedRows(grd_selectdiag, false); }