/** - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì Áø·á - Áúº´ ¹× ¼ö¼úºÐ·ù ( SMMRD00700_Áúº´¹×¼ö¼úºÐ·ù.xrw - JScript ) - Version : 1) : Ver.1.00.01 - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì **/ /** * @ver : 2007/12/27 * @desc :ÆûÃʱâÈ­ ¹× °øÅëÄÚµå load,opener¿©ºÎ * @ : * @by : ÀÌâ·Ï * @param : * @return : * @--------------------------------------------------- **/ function fInitialize() { // KNUH_20101207_¹Ú¼ºÈ£_start_Àǹ«±â·Ï ºÎ¼­ÄÚµå °¡Á®¿À±â mmbfGetHardCodeInfo("/root/send/reqdata", "/root/temp/deptcd", 5501); mmbfGetHardCodeInfo("/root/send/reqdata", "/root/temp/dutplcecd", 5502); // KNUH_20101207_¹Ú¼ºÈ£_end //°øÅëÄÚµå °¡Á®¿À±â(Á¾±³,°¨¿°Á¾·ù1,°¨¿°¿øÀÎ2,ÇÕº´Áõ,Àç¼ö¼úÄÚµå,Á÷¾÷,Â÷Æ®»óÅÂ,ÁÖ/ºÎÁø´Ü,R/oÁø´Ü,È®Á¤Áø´Ü,Á¾¾ç±¸ºÐ,°¡ÄÚµù»çÀ¯ÄÚµå °¡Á®¿À±â) zbcfGetCodeList(new Array("M0070","M0151","M0414", "M0484", "M0159","M0149","M0416","M0019","M0018","M0417","M0433","M0434", "M0415"), new Array("/root/init/relignList","/root/init/maryStatList","/root/init/cmpllist", "/root/init/infccaselist","/root/init/reOpResnList", "/root/init/jobList","/root/init/disposstatlist","/root/init/diagkindcdflag", "/root/init/diagkindcd","/root/init/unprepstatlist","/root/init/cncrlist","/root/init/tmpcoderesnlist", "/root/init/wundcasclslist"), true); zsdfGetInOrdDeptList(getUserInfo("dutplceinstcd"), "/root/init/diagchgndeptlist", "depthngnm", "asc");// ÀÓ»ó°ú¸®½ºÆ® copyNodeset("/root/init/opchgndeptlist/dept", "/root/init/diagchgndeptlist/dept"); model.removeNodeset("/root/main/indxinfo/ccindxinfo/ccindxlist"); model.removeNodeset("/root/main/indxinfo/bfindxlist/bfindxinfo"); model.removeNodeset("/root/main/indxinfo/diagindxinfo/diagindxlist"); model.removeNodeset("/root/main/indxinfo/diaginfo/diaglist"); model.removeNodeset("/root/main/indxinfo/insudiaginfo/insudiaglist"); model.removeNodeset("/root/opinfo/opindxdtlinfo/opindxdtllist"); model.removeNodeset("/root/main/indxinfo/cnstinfo/cnstlist"); model.removeNodeset("/root/main/indxinfo/opinfo/oplist"); model.removeNodeset("/root/main/indxinfo/cureindxinfo/cureindxlist"); model.removeNodeset("/root/main/indxinfo/dethindxinfo/dethindxlist"); model.removeNodeset("/root/main/indxinfo/serdiaginfo/serdiaglist"); model.removeNodeset("/root/main/indxinfo/cnstinfo/cnstlist"); if(checkOpener()){ var parampid = opener.javascript.getParameter("SMMRD00400_pid"); var paramdschdd = opener.javascript.getParameter("SMMRD00400_dschdd"); fUserAdmin();//ÀÇ·áÁ¤º¸»ç¿ëÀÚÇÑÇÏ¿© ÀúÀå¹öư visible chk_cretchknum.value = "false"; model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/pid", parampid); if(parampid != "") { fPidKeyPress(); if(paramdschdd!=""){ var sDschdd=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); if(paramdschdd!=sDschdd){ cmb_dschdd.refresh(); model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd", paramdschdd); fSelectDschdd(); } } } } model.refresh(); } /** * @desc : ¼ö¼ú »öÀÎÁ¤º¸ Á¶È¸ * @id : * @event : xforms * @return : void * @authur : */ function fOpIndxInfo() { submit("TRMRD00706"); } function fOpIndxList() { submit("TRMRD00707"); } /** * @desc : µî·Ï¹øÈ£·Î Á¶È¸ * @id : * @event : xforms * @return : void * @authur : */ function fPidKeyPress() { button99.dispatch("onclick"); var sPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var instcd= getUserInfo("dutplceinstcd"); if(model.getValue("/root/init/checknum/value") == "true"){//üŷ¹øÈ£ üũ var cret_pid = getCretCheckNo(sPid, instcd); model.makeValue("/root/send/reqdata/pid", cret_pid); model.makeValue("/root/main/indxinfo/dschpatinfo/patinfo/pid", cret_pid); } else { model.makeValue("/root/send/reqdata/pid", sPid); } // ÀÌÁß¹øÈ£ üũ °ü·Ã model.makeValue("/root/send/cond/srchcond", "1"); model.makeValue("/root/send/cond/pid", ipt_pid.currentText); if(model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid").length >= 1 ) { if(submit("TRPMC02500")) { model.removeNodeset("/root/main/indxinfo/infdisinfo/infdislist"); model.makeValue("/root/send/reqdata/instcd",instcd); if(submit("TRMRD00703")){ //Åð¿øÀÏÀÚ¿Í µ¿½Ã¿¡ Åð¿øÀÏÀÚ¿¡ µû¸¥ ȯÀÚ³»¿ë °¡Á®¿À±â if(getNodesetCnt(model,"/root/init/dschpatinfo/chgdschinfo/chgdschddlist")>0){ var dschdd = model.getValue("/root/init/dschpatinfo/chgdschinfo/chgdschddlist/dschdd[1]"); var dschddnm = model.getValue("/root/init/dschpatinfo/chgdschinfo/chgdschddlist/dschddnm[1]"); var indxmyn = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/indxmyn"); model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd" ,dschddnm); model.makeValue("/root/send/reqdata/dschdd" ,dschdd); model.makeValue("/root/send/reqdata/indd" ,model.getValue("/root/init/dschpatinfo/chgdschinfo/chgdschddlist[dschdd='"+dschdd+"']/indd")); model.makeValue("/root/send/reqdata/cretno" ,model.getValue("/root/init/dschpatinfo/chgdschinfo/chgdschddlist[dschdd='"+dschdd+"']/cretno")); fOpIndxInfo(); if(submit("TRMRD00702")){ //2013/01/08 Start Åð¿øºÐ¼®ÀÌ µÇÁö ¾ÊÀº »óÅ¿¡¼­´Â Áúº´ ¹× ¼ö¼úºÐ·ù¸¦ ÇÏÁö ¸øÇϵµ·Ï ºí·°Å· ó¸® var getcretno=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/cretno"); if(getcretno==""){ messageBox("Åð¿ø ºÐ¼® ÈÄ ","C003"); btn_save.disabled=true; return; } btn_save.disabled=false; //2013/01/08 End var code = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/infccas"); var chngdeptyn = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/chngdeptyn"); fGetInFcCas(code); fChgTmpCodeyn(); if(chngdeptyn !="Y"){ //ÀüÃâ ¿©ºÎ¿¡ µû¸¥ Áø´Ü,¼ö¼ú ÀüÃâ°úÄ÷³ disabled grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=true; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=true; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=true; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=true; }else{ grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=false; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=false; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=false; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=false; } if(getNodesetCnt(model,"/root/main/indxinfo/infdisinfo/infdislist")>0){ model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyn","01"); btn_infdis.disabled= false; }else{ model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyn","02"); btn_infdis.disabled= true; } model.makeValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyncd",model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyn")); cmb_infdisyn.refresh(); ipt_infdisyncd.refresh(); var sPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var sDschDD = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); sDschDD = sDschDD.substr(0,4)+"/"+sDschDD.substr(4,2)+"/"+sDschDD.substr(6,2) var diagtermcd = model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist/diagtermcd"); var fstrgstdt = model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/fstrgstdt"); var fstrgstrnm = model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/fstrgstrnm"); if((diagtermcd!="")&&((fstrgstdt!="")||(fstrgstrnm!="")) ){ messageBox(sPid + "ȯÀÚÀÇ" + sDschDD +"ÀÇ Áúº´¹×¼ö¼úºÐ·ù°¡ µÇ¾î","I010"); } } }else{ messageBox("¾ø´Â ȯÀÚ ¹øÈ£ ÀÔ´Ï´Ù.", "E999", ""); model.setFocus("ipt_pid"); } } } }else{ messageBox("ȯÀÚµî·Ï¹øÈ£¸¦ Á¤È®È÷", "C001"); } model.refresh(); } /** * @desc : ȯÀÚÀÇ Åð¿øÀÏÀÚ °¡Á®¿À±â * @id : * @event : xforms * @return : void * @authur : */ function fSelectDschdd() { //Åð¿øÀÏÀÚ ¼±Åýà ¸ðµç Á¤º¸ º¯°æ var dschdd=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var sPid=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var indd=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/orgindd"); var cretno=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/cretno"); model.removeNodeset("/root/main/indxinfo/infdisinfo/infdislist"); model.makeValue("/root/send/reqdata/dschdd" ,dschdd); model.makeValue("/root/send/reqdata/pid" ,sPid); model.makeValue("/root/send/reqdata/indd" ,model.getValue("/root/init/dschpatinfo/chgdschinfo/chgdschddlist[dschdd='"+dschdd+"']/indd")); model.makeValue("/root/send/reqdata/cretno" ,model.getValue("/root/init/dschpatinfo/chgdschinfo/chgdschddlist[dschdd='"+dschdd+"']/cretno")); if(submit("TRMRD00702")){ //2013/01/08 Start Åð¿øºÐ¼®ÀÌ µÇÁö ¾ÊÀº »óÅ¿¡¼­´Â Áúº´ ¹× ¼ö¼úºÐ·ù¸¦ ÇÏÁö ¸øÇϵµ·Ï ºí·°Å· ó¸® var getcretno=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/cretno"); if(getcretno==""){ messageBox("Åð¿ø ºÐ¼® ÈÄ ","C003"); btn_save.disabled=true; return; } btn_save.disabled=false; //2013/01/08 End var code = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/infccas"); var chngdeptyn = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/chngdeptyn"); fGetInFcCas(code); fChgTmpCodeyn(); // ¼ö¼úÁ¤º¸ °¡Á®¿À±â(20120831 ÀÌÀ±ÁÖ) fOpIndxInfo(); if(chngdeptyn !="Y"){ //ÀüÃâ ¿©ºÎ¿¡ µû¸¥ Áø´Ü,¼ö¼ú ÀüÃâ°úÄ÷³ disabled grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=true; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=true; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=true; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=true; }else{ grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=false; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=false; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=false; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=false; } if(getNodesetCnt(model,"/root/main/indxinfo/infdisinfo/infdislist")>0){ model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyn","01"); btn_infdis.disabled= false; }else{ model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyn","02"); btn_infdis.disabled= true; } model.makeValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyncd",model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyn")); cmb_infdisyn.refresh(); ipt_infdisyncd.refresh(); var sPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var sDschDD = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); sDschDD = sDschDD.substr(0,4)+"/"+sDschDD.substr(4,2)+"/"+sDschDD.substr(6,2) var diagtermcd = model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist/diagtermcd"); var fstrgstdt = model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/fstrgstdt"); var fstrgstrnm = model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/fstrgstrnm"); if((diagtermcd!="")&&((fstrgstdt!="")||(fstrgstrnm!="")) ){ messageBox(sPid + "ȯÀÚÀÇ" + sDschDD +"ÀÇ Áúº´¹×¼ö¼úºÐ·ù°¡ µÇ¾î","I010"); } } } /** * @desc : * @id : ÁÖÈ£¼Ò ÆË¾÷ °ú ¿¬°è * @event : xforms-select * @return : void * @authur : */ function fCcIndxList(flag) { var sPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var sDschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); if((sPid=="")&&(sDschdd=="")){ messageBox("Åð¿øÀÏÀÚ°¡ ¼±ÅõÇÁö" ,"E007"); return; } clearParameter("SPMRF04200_SEARCHDATA"); model.removeNodeset("/root/temp/selectdiaglist"); var ccengnm = model.getValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/ccengnm"); var cCol=grd_ccindxlist.col; if(flag == "eng"){ if(ccengnm==""){ return; }else setParameter("SPMRF04200_SEARCHDATA", ccengnm); }else{ setParameter("SPMRF04200_SEARCHDATA",""); } modal("SPMRF04200"); var nodelist = instance1.selectNodes("/root/temp/selectdiaglist"); for(var i = 1; i <= nodelist.length; i++) { var termcd = model.getValue("/root/temp/selectdiaglist["+i+"]/termcd"); var termengnm = model.getValue("/root/temp/selectdiaglist["+i+"]/termengnm"); var termhngnm = model.getValue("/root/temp/selectdiaglist["+i+"]/termhngnm"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var instcd = getUserInfo("dutplceinstcd"); var iFndRow = grd_ccindxlist.findRow(termcd, 0, parseInt(grd_ccindxlist.colRef("cctermcd")), "true", "true");//Áߺ¹ code check if(flag != "eng"){ if(iFndRow > 0){ messageBox(termcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_ccindxlist.addRow(false); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/cctermcd", termcd); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/cchngnm" , termhngnm); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/ccengnm" , termengnm); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/pid" , pid); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/instcd" , instcd); grd_ccindxlist.refresh(); } }else if((flag == "eng") && (i != 1)){ if(iFndRow > 0){ messageBox(termcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_ccindxlist.addRow(false); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/cctermcd", termcd); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/cchngnm" , termhngnm); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/ccengnm" , termengnm); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/pid" , pid); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/instcd" , instcd); grd_ccindxlist.refresh(); } }else if((flag == "eng") && (i == 1)){ if(iFndRow > 0){ messageBox(termcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/cctermcd", termcd); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/cchngnm" , termhngnm); model.makeValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/ccengnm" , termengnm); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/pid" , pid); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/ccindxinfo/ccindxlist["+grd_ccindxlist.Row+"]/instcd" , instcd); grd_ccindxlist.refresh(); } } } model.refresh(); } /** * @desc : * @id : Áø´Ü ÆË¾÷°ú ¿¬°è * @event : xforms-select * @return : void * @authur : */ function fDiagIndxList(flag){ //Áø´Ü¿ë¾î var sPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var sDschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var iCol = grd_diagindxlist.colRef("dispdiagcd"); var diagRow = grd_diagindxlist.row - grd_diagindxlist.fixedRows + 1 if((sPid=="")&&(sDschdd=="")){ messageBox("Åð¿øÀÏÀÚ°¡ ¼±ÅõÇÁö" ,"E007"); return; } clearParameter("SPMRT01600_FLAG"); clearParameter("SPMRT01600_SEARCHDATA"); clearParameter("stndd"); model.removeNodeset("/root/temp/selectdiaglist"); model.removeNodeset("/root/tmp/selectoplist"); var dispdiagcd = model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+diagRow+"]/dispdiagcd"); if((iCol!="")&&(flag == "code")){ if(dispdiagcd !=""){ if(dispdiagcd.indexOf("/") > 0){ setParameter("SPMRT01600_FLAG","2"); }else{ setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",sDschdd); } setParameter("SPMRT01600_SEARCHDATA",dispdiagcd); setParameter("stndd",sDschdd); }else return; }else{ setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",sDschdd); } modal("SPMRT01600"); var nodelist = instance1.selectNodes("/root/temp/selectdiaglist"); var duplFlag = false; for(var i = 1; i <= nodelist.length; i++) { var diagcd = model.getValue("/root/temp/selectdiaglist["+i+"]/diagcd"); //Áø´ÜÄÚµå var dispdiagcd = model.getValue("/root/temp/selectdiaglist["+i+"]/dispdiagcd"); //Áø´Ü¼Ó¼ºÄÚµå var diagengnm = model.getValue("/root/temp/selectdiaglist["+i+"]/diagengnm"); var diaghngnm = model.getValue("/root/temp/selectdiaglist["+i+"]/diaghngnm"); var seqno = model.getValue("/root/temp/selectdiaglist["+i+"]/seqno"); //Mophology ÄÚµå ¼ø¹ø var lglydisflag = model.getValue("/root/temp/selectdiaglist["+i+"]/lglydisflag"); //Àü¿°º´ ±¸ºÐ var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var instcd = getUserInfo("dutplceinstcd"); for(var rowcnt = 0; rowcnt < grd_diagindxlist.rows; rowcnt++){ if((model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+ rowcnt + "]/diagtermcd") == diagcd) && (model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+ rowcnt + "]/diagseqno") == seqno)){ duplFlag = true; break; } else { duplFlag = false; } } if(flag != "code"){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/poa" , "Y"); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , ""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); //grd_diagindxlist.refresh(); } }else if((flag == "code")&& (i != 1)){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/poa" , "Y"); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , ""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); //grd_diagindxlist.refresh(); } }else if((flag == "code") && (i == 1)){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/poa" , "Y"); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" ,""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); //grd_diagindxlist.refresh(); } } } //¼ö¼ú¿ë¾î if(getNodesetCnt(model,"/root/tmp/selectoplist")>0){ var nodelist = instance1.selectNodes("/root/tmp/selectoplist"); for(var i = 1; i <= nodelist.length; i++){ var opcd = model.getValue("/root/tmp/selectoplist["+i+"]/opcd"); var dispopcd = model.getValue("/root/tmp/selectoplist["+i+"]/dispopcd"); var opengnm = model.getValue("/root/tmp/selectoplist["+i+"]/opengnm"); var ophngnm = model.getValue("/root/tmp/selectoplist["+i+"]/ophngnm"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var dschdd=model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var instcd= getUserInfo("dutplceinstcd"); var opflag=1;//¼ö¼ú,óġ ±¸ºÐ ¼ö¼ú="0",óġ="1" var iFndRow1 = grd_cureindxlist.findRow(opcd, 0, parseInt(grd_cureindxlist.colRef("optermcd")), "true", "true");//Áߺ¹ code check if(flag != "code"){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_cureindxlist.addRow(false); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/pid" ,pid); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opflag" ,opflag); //grd_cureindxlist.refresh(); } }else if((flag == "code") && (i != 1)){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_cureindxlist.addRow(false); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/pid" ,pid); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opflag" ,opflag); // grd_cureindxlist.refresh(); } }else if((flag == "code") && (i == 1)){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/pid" ,pid); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opflag" ,opflag); // grd_cureindxlist.refresh(); } } } } model.refresh(); } /** * @desc : * @id : ¼ö¼ú ÆË¾÷ * @event : xforms-select * @return : void * @authur : */ function fOpGridIndxList(flag) { var sPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var sDschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var iCol = grd_opindxlist.col; if((sPid=="")&&(sDschdd=="")){ messageBox("Åð¿øÀÏÀÚ°¡ ¼±ÅõÇÁö" ,"E007"); return; } clearParameter("SPMRT01600_FLAG"); clearParameter("SPMRT01600_SEARCHDATA"); clearParameter("stndd"); model.removeNodeset("/root/temp/selectdiaglist"); model.removeNodeset("/root/tmp/selectoplist"); var disoptermcd =model.getValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/disoptermcd"); if((iCol!="")&&(flag == "code")){ if(disoptermcd !=""){ setParameter("SPMRT01600_FLAG","5"); setParameter("SPMRT01600_SEARCHDATA",disoptermcd); setParameter("stndd",sDschdd); }else{ return; } }else{ setParameter("SPMRT01600_FLAG","5"); setParameter("stndd",sDschdd); } modal("SPMRT01600"); var nodelist = instance1.selectNodes("/root/tmp/selectoplist"); for(var i = 1; i <= nodelist.length; i++){ var opcd = model.getValue("/root/tmp/selectoplist["+i+"]/opcd"); var dispopcd = model.getValue("/root/tmp/selectoplist["+i+"]/dispopcd"); var opengnm = model.getValue("/root/tmp/selectoplist["+i+"]/opengnm"); var ophngnm = model.getValue("/root/tmp/selectoplist["+i+"]/ophngnm"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var instcd = getUserInfo("dutplceinstcd"); var opflag=0;//¼ö¼ú,óġ ±¸ºÐ ¼ö¼ú="0",óġ="1" var iFndRow1 = grd_opindxlist.findRow(opcd, 0, parseInt(grd_opindxlist.colRef("optermcd")), "true", "true");//Áߺ¹ code check iFndRow1 = 0 ; var selectedRow = grd_oplist.row ; var dsopno = model.getValue("/root/main/indxinfo/opinfo/oplist["+selectedRow+"]/dsopno") ; if(flag != "code"){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_opindxlist.addRow(false); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/pid" ,pid); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/opflag" ,opflag); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/dsopno" ,dsopno); //grd_opindxlist.refresh(); } }else if((flag == "code") && (i != 1)){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_opindxlist.addRow(false); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/pid" ,pid); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/opflag" ,opflag); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/dsopno" ,dsopno); // grd_opindxlist.refresh(); } }else if((flag == "code") && (i == 1)){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/pid" ,pid); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/opflag" ,opflag); model.makeValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+grd_opindxlist.row+"]/dsopno" ,dsopno); // grd_opindxlist.refresh(); } } } if(getNodesetCnt(model,"/root/temp/selectdiaglist")>0){ var nodelist = instance1.selectNodes("/root/temp/selectdiaglist"); var duplFlag = false; for(var i = 1; i <= nodelist.length; i++) { var diagcd = model.getValue("/root/temp/selectdiaglist["+i+"]/diagcd"); //Áø´ÜÄÚµå var dispdiagcd = model.getValue("/root/temp/selectdiaglist["+i+"]/dispdiagcd");//Áø´Ü¼Ó¼ºÄÚµå var diagengnm = model.getValue("/root/temp/selectdiaglist["+i+"]/diagengnm"); var diaghngnm = model.getValue("/root/temp/selectdiaglist["+i+"]/diaghngnm"); var seqno = model.getValue("/root/temp/selectdiaglist["+i+"]/seqno");//Mophology ÄÚµå ¼ø¹ø var lglydisflag = model.getValue("/root/temp/selectdiaglist["+i+"]/lglydisflag"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var instcd = getUserInfo("dutplceinstcd"); for(var rowcnt = 0; rowcnt < grd_diagindxlist.rows; rowcnt++){ if((model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+ rowcnt + "]/diagtermcd") == diagcd) && (model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+ rowcnt + "]/diagseqno") == seqno)){ duplFlag = true; break; } else { duplFlag = false; } } if(flag != "code"){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , ""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); // grd_diagindxlist.refresh(); } }else if((flag == "code")&& (i != 1)){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , ""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); // grd_diagindxlist.refresh(); } }else if((flag == "code") && (i == 1)){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" ,""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); //grd_diagindxlist.refresh(); } } } } model.refresh(); } function fCureGridIndxList(flag) { var sPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var sDschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var iCol = grd_cureindxlist.col; if((sPid=="")&&(sDschdd=="")){ messageBox("Åð¿øÀÏÀÚ°¡ ¼±ÅõÇÁö" ,"E007"); return; } clearParameter("SPMRT01600_FLAG"); clearParameter("SPMRT01600_SEARCHDATA"); clearParameter("stndd"); model.removeNodeset("/root/temp/selectdiaglist"); model.removeNodeset("/root/tmp/selectoplist"); var disoptermcd =model.getValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/disoptermcd"); if((iCol!="")&&(flag == "code")){ if(disoptermcd !=""){ setParameter("SPMRT01600_FLAG","5"); setParameter("SPMRT01600_SEARCHDATA",disoptermcd); setParameter("stndd",sDschdd); }else{ return; } }else{ setParameter("SPMRT01600_FLAG","5"); setParameter("stndd",sDschdd); } modal("SPMRT01600"); var nodelist = instance1.selectNodes("/root/tmp/selectoplist"); for(var i = 1; i <= nodelist.length; i++){ var opcd = model.getValue("/root/tmp/selectoplist["+i+"]/opcd"); var dispopcd = model.getValue("/root/tmp/selectoplist["+i+"]/dispopcd"); var opengnm = model.getValue("/root/tmp/selectoplist["+i+"]/opengnm"); var ophngnm = model.getValue("/root/tmp/selectoplist["+i+"]/ophngnm"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var instcd = getUserInfo("dutplceinstcd"); var opflag=1;//¼ö¼ú,óġ ±¸ºÐ ¼ö¼ú="0",óġ="1" var iFndRow1 = grd_cureindxlist.findRow(opcd, 0, parseInt(grd_cureindxlist.colRef("optermcd")), "true", "true");//Áߺ¹ code check if(flag != "code"){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_cureindxlist.addRow(false); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/pid" ,pid); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opflag" ,opflag); //grd_cureindxlist.refresh(); } }else if((flag == "code") && (i != 1)){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_cureindxlist.addRow(false); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/pid" ,pid); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opflag" ,opflag); // grd_cureindxlist.refresh(); } }else if((flag == "code") && (i == 1)){ if(iFndRow1>0){ messageBox(opcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/disoptermcd" ,dispopcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/optermcd" ,opcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/ophngnm" ,ophngnm); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opengnm" ,opengnm); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/pid" ,pid); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/dschdd" ,dschdd); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/instcd" ,instcd); model.makeValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+grd_cureindxlist.row+"]/opflag" ,opflag); // grd_cureindxlist.refresh(); } } } if(getNodesetCnt(model,"/root/temp/selectdiaglist")>0){ var nodelist = instance1.selectNodes("/root/temp/selectdiaglist"); var duplFlag = false; for(var i = 1; i <= nodelist.length; i++) { var diagcd = model.getValue("/root/temp/selectdiaglist["+i+"]/diagcd"); //Áø´ÜÄÚµå var dispdiagcd = model.getValue("/root/temp/selectdiaglist["+i+"]/dispdiagcd");//Áø´Ü¼Ó¼ºÄÚµå var diagengnm = model.getValue("/root/temp/selectdiaglist["+i+"]/diagengnm"); var diaghngnm = model.getValue("/root/temp/selectdiaglist["+i+"]/diaghngnm"); var seqno = model.getValue("/root/temp/selectdiaglist["+i+"]/seqno");//Mophology ÄÚµå ¼ø¹ø var lglydisflag = model.getValue("/root/temp/selectdiaglist["+i+"]/lglydisflag"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var instcd = getUserInfo("dutplceinstcd"); for(var rowcnt = 0; rowcnt < grd_diagindxlist.rows; rowcnt++){ if((model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+ rowcnt + "]/diagtermcd") == diagcd) && (model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+ rowcnt + "]/diagseqno") == seqno)){ duplFlag = true; break; } else { duplFlag = false; } } if(flag != "code"){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , ""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); // grd_diagindxlist.refresh(); } }else if((flag == "code")&& (i != 1)){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , ""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); // grd_diagindxlist.refresh(); } }else if((flag == "code") && (i == 1)){ if(duplFlag == true){ messageBox(diagcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_diagindxlist.addRow(false); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagtermcd" , diagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dispdiagcd" , dispdiagcd); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/hngnm" , diaghngnm); model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/engnm" , diagengnm); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" ,""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/lglydisflag" , lglydisflag+"±º"); } model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/diagseqno" , seqno); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/pid" , pid); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/dschdd" , dschdd); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+grd_diagindxlist.row+"]/instcd" , instcd); //grd_diagindxlist.refresh(); } } } } model.refresh(); } /** * @desc : »ç¸Á ºÐ¼® ¹öư Ŭ¸¯(ÆË¾÷) * @id : * @event : xforms-select * @return : void * @authur : */ function fDethPopup() { var dschdd =model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var xDschpatinfoPath ="/root/main/indxinfo/dschpatinfo/patinfo"; if(dschdd==""){ messageBox("ȯÀÚÀÇ Åð¿øÀÏÀÚ°¡ ¼±ÅõÇÁö", "E007"); return; } if(model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dethyn")=="N"){ messageBox("»ç¸ÁȯÀÚÀÏ °æ¿ì¿¡¸¸ ¼±ÅÃ","I006"); return; } var sPid = model.getValue(xDschpatinfoPath+"/pid" ); setParameter("SMMRD00500_pid",sPid); open("SMMRD00500", 1, 0, 0, "", "", "", "left:0px; top:0px"); } /** * @desc : Áø´Ü ÆË¾÷ ¼±ÅýÃ(»ç¸ÁÀ妽º) * @id : * @event : xforms-select * @return : void * @authur : */ function fDethCd(flag,editflag) { var dPid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); if(dPid ==""){ messageBox("ȯÀÚ¹øÈ£¸¦","C001"); return; } if(model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dethyn")=="N"){ messageBox("»ç¸ÁȯÀÚÀÏ °æ¿ì¿¡¸¸ ¼±ÅÃ","I006"); return; } clearParameter("SPMRT01600_FLAG"); clearParameter("SPMRT01600_SEARCHDATA"); clearParameter("stndd"); model.removeNodeset("/root/temp/selectdiaglist"); var iRow = grd_dethindxlist.row -grd_dethindxlist.fixedRows + 1 var iCol = grd_dethindxlist.col; var Dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var basedethcd = model.getValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+iRow+"]/basedethcd"); var mdldethcd = model.getValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+iRow+"]/mdldethcd"); var direcdethcd = model.getValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+iRow+"]/direcdethcd"); if(flag == "B"){ if(((flag == "B")&&(editflag=="1"))&&(iCol==0)){ if(basedethcd!=""){ setParameter("SPMRT01600_FLAG","1"); setParameter("SPMRT01600_SEARCHDATA",basedethcd); setParameter("stndd",Dschdd); }else{ if(basedethcd==""){ return; } setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",Dschdd); } }else{ setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",Dschdd); } }else if(flag=="M"){ if(((flag=="M")&&(editflag=="2"))&&(iCol==2)){ if(mdldethcd!=""){ setParameter("SPMRT01600_FLAG","1"); setParameter("SPMRT01600_SEARCHDATA",mdldethcd); setParameter("stndd",Dschdd); }else{ if(mdldethcd==""){ return; } setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",Dschdd); } }else{ setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",Dschdd); } }else if(flag =="D"){ if(((flag =="D")&&(editflag=="3"))&&(iCol==4)){ if(direcdethcd!=""){ setParameter("SPMRT01600_FLAG","1"); setParameter("SPMRT01600_SEARCHDATA",direcdethcd); setParameter("stndd",Dschdd); }else{ if(direcdethcd==""){ return; } setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",Dschdd); } }else{ setParameter("SPMRT01600_FLAG","1"); setParameter("stndd",Dschdd); } } modal("SPMRT01600"); var nodelist = instance1.selectNodes("/root/temp/selectdiaglist"); var iRow = grd_dethindxlist.row - grd_dethindxlist.fixedRows + 1 var duplFlag = false; var nodelist = instance1.selectNodes("/root/temp/selectdiaglist"); for(var i = 1; i <= nodelist.length; i++){ var Disdethcd =model.getValue("/root/temp/selectdiaglist["+i+"]/dispdiagcd");//Áø´Ü¼Ó¼ºÄÚµå var dethcd = model.getValue("/root/temp/selectdiaglist["+i+"]/diagcd"); //Áø´ÜÄÚµå if(getNodesetCnt(model,"/root/temp/selectdiaglist")>0){ for(var rowcnt = 0; rowcnt < grd_dethindxlist.rows; rowcnt++){ var basedethcd = model.getValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+rowcnt+"]/basedethcd"); var mdldethdiagcd = model.getValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+rowcnt+"]/mdldethdiagcd"); var direcdethcd = model.getValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+rowcnt+"]/direcdethcd"); if((basedethcd == dethcd)||(mdldethdiagcd == dethcd)||(direcdethcd == dethcd)){ duplFlag = true; //Áߺ¹ ÄÚµå üũ break; } else { duplFlag = false; } } if(flag =="B"){ if(duplFlag==true){ messageBox(dethcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ grd_dethindxlist.addRow(false); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/basedethcd" ,Disdethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/basedethdiagcd" ,dethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/pid" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/dschdd" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/instcd" ,getUserInfo("dutplceinstcd")); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/dethcdflag1" ,"B"); } }else if((flag == "B")&&(editflag=="1")){ if(duplFlag==true){ messageBox(dethcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/basedethcd" ,Disdethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/basedethdiagcd" ,dethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/pid" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/dschdd" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/instcd" ,getUserInfo("dutplceinstcd")); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/dethcdflag1" ,"B"); } }else if((flag =="M")||(editflag=="2")){ if(duplFlag==true){ messageBox(dethcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/mdldethcd" ,Disdethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/mdldethdiagcd" ,dethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/dethcdflag2" ,"M"); } }else if((flag =="D")||(editflag=="3")){ if(duplFlag==true){ messageBox(dethcd+" ÄÚµå´Â À̹ÌÀÔ·ÂÇϽŠÄÚµå","I009"); }else{ model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/direcdethcd" ,Disdethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/direcdethdiagcd" ,dethcd); model.makeValue("/root/main/indxinfo/dethindxinfo/dethindxlist["+grd_dethindxlist.row+"]/dethcdflag3" ,"D"); } } } } model.refresh(); } /** * @desc : ÀúÀå * @id : * @event : xforms-select(ÁÖÈ£¼ÒÀ妽º,Áø´ÜÀ妽º,¼ö¼úÀ妽º,óġÀ妽º,°¡ÄÚµù ¹× Á¾¾ç±¸ºÐ ÀúÀå ,°¨¿°¿øÀÎ1,°¨¿°¿øÀÎ2,Àü¿°º´,ÇÕº´Áõ,Àç¼ö¼ú ¾÷µ¥ÀÌÆ®) * @return : void * @authur : */ function fSave() { var dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var cctermcd = model.getValue("/root/main/indxinfo/ccindxinfo/ccindxlist/cctermcd"); var diagtermcd = model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist/diagtermcd"); var dethyn = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dethyn"); if(pid=="") { messageBox("ȯÀÚ µî·Ï¹øÈ£°¡ ÀԷµÇÁö","E007"); model.setFocus("ipt_pid"); return; } if(dschdd=="") { messageBox("ȯÀÚÀÇ Åð¿øÀÏÀÚ°¡ ¼±ÅõÇÁö", "E007"); return; } if(diagtermcd=="") { messageBox("ȯÀÚÀÇ Áø´ÜÀÌ ¼±ÅõÇÁö", "E007"); return; } //2012/10/19 Start //¸ðµç ¼ö¼ú°Ç¿¡ ´ëÇØ¼­ ¼ö¼úÄÚµùÀ» Çß´ÂÁö È®ÀÎ var nodeSetcnt = getNodesetCount("/root/main/indxinfo/dsopinfo/dsoplist"); for (var i=1; i<=nodeSetcnt; i++) { var dsopno = model.getValue("/root/main/indxinfo/dsopinfo/dsoplist["+i+"]/dsopno"); var dsopinfo = model.getValue("/root/main/indxinfo/dsopinfo/dsoplist["+i+"]/dsopinfo"); var existcnt = getNodesetCnt(model, "/root/opinfo/opindxdtlinfo/opindxdtllist[dsopno = '" + dsopno + "']"); if ( existcnt == 0) { messageBox("¼ö¼úÄÚµù µÇÁö ¾ÊÀº ¼ö¼úÁ¤º¸("+dsopinfo+")°¡ Á¸ÀçÇÏ¿© ÁøÇà ºÒ°¡ÇÕ´Ï´Ù", "E999"); return; } } //2012/10/19 End //º´¿ë±Ý±â»óº´ üũ(20180402 ÀÌÀ±ÁÖ) fGetHardCDList("N", 6157, 0 , "/root/hidden/icd10s"); var icd10cnt = getNodeSetCnt("/root/hidden/icd10s/hardcd"); var gicd10cd1 =""; var gicd10cd2 =""; var t1=""; var t2=""; var a1=""; var a2=""; for(var i = grd_diagindxlist.fixedrows; i < grd_diagindxlist.rows; i++) { gicd10cd1 = grd_diagindxlist.valueMatrix(i,grd_diagindxlist.colRef("dispdiagcd")); for(var k = grd_diagindxlist.fixedrows; k < grd_diagindxlist.rows; k++){ gicd10cd2 = grd_diagindxlist.valueMatrix(k,grd_diagindxlist.colRef("dispdiagcd")); t1 = gicd10cd1.split(".")[0]; t2 = gicd10cd2.split(".")[0]; for ( var j = 1; j <= icd10cnt; j++) { a1 = model.getValue("/root/hidden/icd10s/hardcd["+j+"]/hardcd"); a2 = model.getValue("/root/hidden/icd10s/hardcd["+j+"]/hardcdnm"); if (t1+t2==a1+a2 || t1+t2==a2+a1 || t2+t1==a1+a2 || t2+t1==a2+a1 ) { messageBox(a1+", "+a2+" º´¿ë ºÒ°¡»óº´ ÀçÈ®ÀÎ ºÎʵ右´Ï´Ù!","Q"); return; } } } } //ÁÖÈ£¼Ò À妽ºÀúÀå grd_ccindxlist.clearStatus(); for(var i = grd_ccindxlist.fixedrows; i < grd_ccindxlist.rows; i++) { grd_ccindxlist.addStatus(i, "insert") } //Áø´Ü À妽º ÀúÀå grd_diagindxlist.clearStatus(); for(var i = grd_diagindxlist.fixedrows; i < grd_diagindxlist.rows; i++) { grd_diagindxlist.addStatus(i, "insert"); /*if(i==1){ model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+i+"]/diagkindcdflag","M"); }else{ model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+i+"]/diagkindcdflag","S"); }*/ } //¼ö¼ú À妽º ÀúÀå grd_opindxlist.clearStatus(); for(var i = grd_opindxlist.fixedrows; i < grd_opindxlist.rows; i++) { var opkindcdflag = model.getValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+i+"]/opkindcdflag"); var dsopno = model.getValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+i+"]/dsopno"); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+i+"]/opflag","0"); grd_opindxlist.addStatus(i, "insert"); } //óġ À妽º ÀúÀå grd_cureindxlist.clearStatus(); for(var i = grd_cureindxlist.fixedrows; i < grd_cureindxlist.rows; i++) { var opkindcdflag = model.getValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+i+"]/opkindcdflag"); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+i+"]/opflag","1"); grd_cureindxlist.addStatus(i, "insert"); } //»ç¸Á À妽º ÀúÀå grd_dethindxlist.clearStatus(); for(var i = grd_dethindxlist.fixedrows; i < grd_dethindxlist.rows; i++) { grd_dethindxlist.addStatus(i, "insert"); } //ÁÖÈ£¼ÒÀ妽º ÀúÀå model.makeValue("/root/send/savedata/ccindxlist" , grd_ccindxlist.getUpdateData()); //Áø´ÜÀ妽º ÀúÀå model.makeValue("/root/send/savedata/diagindxlist" , grd_diagindxlist.getUpdateData()); //¼ö¼úÀ妽º ÀúÀå model.makeValue("/root/send/savedata/opindxlist" , grd_opindxlist.getUpdateData()); //óÁöÀ妽º ÀúÀå(20120831 ÀÌÀ±ÁÖ) model.makeValue("/root/send/savedata/cureindxlist" , grd_cureindxlist.getUpdateData()); //»ç¸ÁÀ妽º ÀúÀå if(dethyn =="Y"){ if(grd_dethindxlist.labelMatrix(1,1) ==""){ messageBox("»ç¸ÁȯÀÚÀÇ »çÀÎÀÌ ¼±ÅõÇÁö", "E007"); return; }else{ model.makeValue("/root/send/savedata/dethindxlist" , grd_dethindxlist.getUpdateData()); } } //°¡ÄÚµù ¿©ºÎ ¹× Á¾¾ç ±¸ºÐ ÀúÀå model.makeValue("/root/send/savedata/indxmast/cncrflag" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/cncrflag")); model.makeValue("/root/send/savedata/indxmast/tmpcodeyn" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/tmpcodeyn")); model.makeValue("/root/send/savedata/indxmast/tmpcoderesncd" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/tmpcoderesncd")); model.makeValue("/root/send/savedata/indxmast/memo" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/memo")); model.makeValue("/root/send/savedata/indxmast/pid" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.makeValue("/root/send/savedata/indxmast/dschdd" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.makeValue("/root/send/savedata/indxmast/instcd" , getUserInfo("dutplceinstcd")); model.makeValue("/root/send/savedata/indxmast/fstrgstrid" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/fstrgstrid")); model.makeValue("/root/send/savedata/indxmast/fstrgstdt" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/fstrgstdt")); model.makeValue("/root/send/savedata/indxmast/lastupdtrid" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/lastupdtrid")); model.makeValue("/root/send/savedata/indxmast/lastupdtdt" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/lastupdtdt")); //°¨¿°¿øÀÎ,°¨¿°ºÎÀ§,Àü¿°º´,ÇÕº´Áõ,Àç¼ö¼úÀ» Åð¿øºÐ¼®¿¡ ÀúÀå model.makeValue("/root/send/savedata/dschpatinfo/infccascd" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/infccascd")); model.makeValue("/root/send/savedata/dschpatinfo/infcpartcd" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/infcpartcd")); model.makeValue("/root/send/savedata/dschpatinfo/infdisyn" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/infdisyn").substr(1,1)); model.makeValue("/root/send/savedata/dschpatinfo/cmplcd" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/cmplcd")); model.makeValue("/root/send/savedata/dschpatinfo/reopresncd" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/reopresncd")); model.makeValue("/root/send/savedata/dschpatinfo/pid" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.makeValue("/root/send/savedata/dschpatinfo/indd" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/indd")); model.makeValue("/root/send/savedata/dschpatinfo/dschdd" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.makeValue("/root/send/savedata/dschpatinfo/cretno" , model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/cretno")); //Àç°ËÅä ÀúÀå model.makeValue("/root/send/savedata/indxmast/reviewyn" , model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/reviewyn")); if(submit("TXMRD00703")) { messageBox("ÀúÀå","I002"); model.setValue("/root/main/indxinfo/dschpatinfo/patinfo/pid", ""); model.setFocus("ipt_pid"); fOpIndxInfo(); //button100.dispatch("onclick"); }else{ messageBox("ÀúÀåÀ»", "E009"); } model.removeNodeset("/root/send/savedata"); model.refresh(); } /** * @desc : À妽º ±×¸®µå À§¾Æ·¡ º¯°æ * @id : * @event : grdobj =ÇØ´ç±×¸®µå,direcflag = up,down¿©ºÎ, flag=±¸ºÐ°ª * @return : void * @authur : */ function fChgValueIndxGrd(grdObj, direcflag,flag) { var srcRow = grdObj.row - grdObj.fixedRows + 1; //(È­¸é ±×¸®µåº£À̽º¿¡¼­ ¼±ÅÃÇÑ Çà - ±×¸®µå Á¦¸ñ ÁÙ)+1 if(srcRow =="0") return; var sRow; //¹æÇâ À§Ä¡°¡ À§·Î À϶§ if(direcflag == "up"){ //À§·Î if(srcRow == 1){ //ÇöÀç À§Ä¡°¡ ¸Ç À§ÀÏ °æ¿ì return; } sRow = srcRow - 1; //¾Æ´Ï¸é À§·Î ¿Ã¸°´Ù }else if(direcflag == "down"){ //¾Æ·¡·Î if(srcRow == grdObj.rows - grdObj.fixedRows){ //ÇöÀç À§Ä¡°¡ ¸Ç ¾Æ·¡ÀÏ °æ¿ì return; } sRow = srcRow + 1; } if(flag =="Ccindx"){//ÁÖÈ£¼Ò À妽º model.removeNodeset("/root/temp/tmp"); model.makeNode("/root/temp/tmp/ccindx"); model.copyNode("/root/temp/tmp/ccindx", "/root/main/indxinfo/ccindxinfo/ccindxlist[" + srcRow + "]"); model.copyNode("/root/main/indxinfo/ccindxinfo/ccindxlist[" + srcRow + "]", "/root/main/indxinfo/ccindxinfo/ccindxlist[" + sRow + "]"); model.copyNode("/root/main/indxinfo/ccindxinfo/ccindxlist[" + sRow + "]", "/root/temp/tmp/ccindx"); }else if(flag =="diagindx"){//Áø´ÜÀ妽º model.removeNodeset("/root/temp/tmp"); model.makeNode("/root/temp/tmp/diagindx"); model.copyNode("/root/temp/tmp/diagindx", "/root/main/indxinfo/diagindxinfo/diagindxlist[" + srcRow + "]"); model.copyNode("/root/main/indxinfo/diagindxinfo/diagindxlist[" + srcRow + "]", "/root/main/indxinfo/diagindxinfo/diagindxlist[" + sRow + "]"); model.copyNode("/root/main/indxinfo/diagindxinfo/diagindxlist[" + sRow + "]", "/root/temp/tmp/diagindx"); }else if(flag =="opindx"){//¼ö¼úÀ妽º model.removeNodeset("/root/temp/tmp"); model.makeNode("/root/temp/tmp/opindx"); model.copyNode("/root/temp/tmp/opindx", "/root/opinfo/opindxdtlinfo/opindxdtllist[" + srcRow + "]"); model.copyNode("/root/opinfo/opindxdtlinfo/opindxdtllist[" + srcRow + "]", "/root/opinfo/opindxdtlinfo/opindxdtllist[" + sRow + "]"); model.copyNode("/root/opinfo/opindxdtlinfo/opindxdtllist[" + sRow + "]", "/root/temp/tmp/opindx"); }else if(flag =="cureindx"){//óġÀ妽º model.removeNodeset("/root/temp/tmp"); model.makeNode("/root/temp/tmp/cureindx"); model.copyNode("/root/temp/tmp/cureindx", "/root/main/indxinfo/cureindxinfo/cureindxlist[" + srcRow + "]"); model.copyNode("/root/main/indxinfo/cureindxinfo/cureindxlist[" + srcRow + "]", "/root/main/indxinfo/cureindxinfo/cureindxlist[" + sRow + "]"); model.copyNode("/root/main/indxinfo/cureindxinfo/cureindxlist[" + sRow + "]", "/root/temp/tmp/cureindx"); } // grdObj.rebuild(); grdObj.refresh(); return sRow; } /** * @desc :¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯½Ã Ãß°¡ ,»èÁ¦(À妽º ) * @id : * @event : * @return : void * @authur : */ function fMouseRightindx(){ if(event.button == 3){ window.setPopupMenu(true, "/root/hidden/menu/indxlist", "label", "func", false); return; } } /** * @desc : À妽º ÇàÃß°¡ * @id : * @event : * @return : void * @authur : */ function fAddRow_indxlist(grdObj) { var Pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var Dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); //var flag = model.getValue("/Root/Hidden/Chgrowflag"); var chngdeptyn = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/chngdeptyn");//ÀüÃâÁ¤º¸ ¿©ºÎ if((Pid=="")&&(Dschdd=="")){ messageBox("Åð¿øÀÏÀÚ¸¦ ÀÔ·Â ÈÄ¿¡ Ãß°¡","I006"); return; } var grdRow = grdObj.row - grdObj.fixedRows + 1; if(grdRow < 1){ grdObj.addRow(); }else if(grdRow >= 1){ grdObj.insertRow(grdRow, "below", true); } grdObj.valueMatrix( grdObj.row, grdObj.colRef("poa")) = "Y"; if(chngdeptyn !="Y"){ //ÀüÃâ ¿©ºÎ¿¡ µû¸¥ Áø´Ü,¼ö¼ú ÀüÃâ°úÄ÷³ disabled grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=true; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=true; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=true; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=true; }else{ grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=false; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=false; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=false; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=false; } } /** * @desc : ¿À¸¥Âʸ¶¿ì½º Ŭ¸¯½Ã ÇàÃß°¡ * @id : * @event : flag= (CC->ÁÖÈ£¼Ò,DA->Áø´Ü,OP->¼ö¼ú,DT->»ç¸Á),//¾Æ·¡·Î Ãß°¡->below,À§·Î Ãß°¡-> above * @return : void * @authur : */ function fAddRow_Rindxlist() { var Pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var Dschdd = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd"); var flag = model.getValue("/root/hidden/chgrowflag"); var chngdeptyn = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/chngdeptyn"); if((Pid=="")&&(Dschdd=="")){ messageBox("Åð¿øÀÏÀÚ¸¦ ÀÔ·Â ÈÄ¿¡ Ãß°¡","I006"); return; } if(flag=="CC"){ var ccRow = grd_ccindxlist.row - grd_ccindxlist.fixedRows + 1; if(ccRow < 1){ grd_ccindxlist.addRow(); }else if(ccRow >= 1){ grd_ccindxlist.insertRow( ccRow, "above", true); } }else if(flag=="DA"){ var diagRow = grd_diagindxlist.row - grd_diagindxlist.fixedRows + 1; if(diagRow < 1){ grd_diagindxlist.addRow(); }else if(diagRow >= 1){ grd_diagindxlist.insertRow( diagRow, "above", true); } if(chngdeptyn !="Y"){ //ÀüÃâ ¿©ºÎ¿¡ µû¸¥ Áø´Ü,¼ö¼ú ÀüÃâ°úÄ÷³ disabled grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=true; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=true; }else{ grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngdeptcd"))=false; grd_diagindxlist.colDisabled(grd_diagindxlist.colRef("chngclrsdeptcd"))=false; } }else if(flag=="OP"){ var opRow = grd_opindxlist.row - grd_opindxlist.fixedRows + 1; if(opRow < 1){ grd_opindxlist.addRow(); }else if(opRow >= 1){ grd_opindxlist.insertRow( opRow, "above", true); } if(chngdeptyn !="Y"){ //ÀüÃâ ¿©ºÎ¿¡ µû¸¥ Áø´Ü,¼ö¼ú ÀüÃâ°úÄ÷³ disabled grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=true; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=true; }else{ grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngdeptcd"))=false; grd_opindxlist.colDisabled(grd_opindxlist.colRef("chngclrsdeptcd"))=false; } }else if(flag=="DT"){ var dethRow = grd_dethindxlist.row - grd_dethindxlist.fixedRows + 1; if(dethRow < 1){ grd_dethindxlist.addRow(); }else if(dethRow >= 1){ grd_dethindxlist.insertRow( dethRow, "above", true); } } //model.refresh(); } /** * @desc : À妽º Çà»èÁ¦ * @id : * @event : flag= (CC->ÁÖÈ£¼Ò,DA->Áø´Ü,OP->¼ö¼ú,DT->»ç¸Á) * @return : void * @authur : */ function fDelRow_indxlist(grdObj) { var flag = model.getValue("/root/hidden/chgrowflag"); if(flag=="CC") { if(grd_ccindxlist.row < 0) { messageBox("»èÁ¦ÇÒ ÇàÀÌ ", "I004") return; } if (grd_ccindxlist.selectedRows > 0) { var selectedRows = Array(grd_ccindxlist.selectedRows); for(i=0;i= 0 ; i--) { rowIdx = selectedRows[i]; grd_ccindxlist.deleteRow( rowIdx , false); } }else if(flag=="DA"){ if(grd_diagindxlist.row < 0) { messageBox("»èÁ¦ÇÒ ÇàÀÌ ", "I004") return; } if (grd_diagindxlist.selectedRows > 0) { var selectedRows = Array(grd_diagindxlist.selectedRows); for(i=0;i= 0 ; i--) { rowIdx = selectedRows[i]; grd_diagindxlist.deleteRow( rowIdx , false); } }else if(flag=="OP"){ if(grd_opindxlist.row < 0) { messageBox("»èÁ¦ÇÒ ÇàÀÌ ", "I004") return; } if (grd_opindxlist.selectedRows > 0) { var selectedRows = Array(grd_opindxlist.selectedRows); for(i=0;i= 0 ; i--) { rowIdx = selectedRows[i]; grd_opindxlist.deleteRow( rowIdx , false); } }else if(flag=="CURE"){ if(grd_cureindxlist.row < 0) { messageBox("»èÁ¦ÇÒ ÇàÀÌ ", "I004") return; } if (grd_cureindxlist.selectedRows > 0) { var selectedRows = Array(grd_cureindxlist.selectedRows); for(i=0;i= 0 ; i--) { rowIdx = selectedRows[i]; grd_cureindxlist.deleteRow( rowIdx , false); } }else if(flag=="DT"){ if(grd_dethindxlist.row < 0) { messageBox("»èÁ¦ÇÒ ÇàÀÌ ", "I004") return; } if (grd_dethindxlist.selectedRows > 0) { var selectedRows = Array(grd_dethindxlist.selectedRows); for(i=0;i= 0 ; i--) { rowIdx = selectedRows[i]; grd_dethindxlist.deleteRow( rowIdx , false); } } //model.refresh(); } /** * @desc : * @id : * @event : °¡ÄÚµù À¯¹«½Ã °¡ÄÚµù»çÀ¯¹× ¸Þ¸ð disabled»óÅ º¯°æ(tmpcodeyn = "Y,N") * @return : void * @authur : */ function fChgTmpCodeyn() { var tmpcodeyn=model.getValue("/root/main/indxinfo/indxmastinfo/indxmast/tmpcodeyn") if(tmpcodeyn=="Y") { cmb_tmpcoderesncd.disabled =false; tar_memo.disabled=false; }else if(tmpcodeyn!="Y") { if(tmpcodeyn=="N"){ chk_tmpcodeyn.value=""; chk_tmpcodeyn.refresh(); } cmb_tmpcoderesncd.disabled =true; tar_memo.disabled=true; } //model.refresh(); } /** * @desc : * @id : * @event : ÁÖÁø´Ü½Ã ÀÚµ¿À¸·Î ³ª¸ÓÁö Çà ºÎÁø´ÜÀ¸·Î º¯°æ * @return : void * @authur : flag =diag -> Áø´Ü À妽º,flag="op" ->¼ö¼úÀ妽º ,flag="cure" ->óġÀ妽º */ function fChgKindcdFlag(flag) { var diagRow = grd_diagindxlist.row - grd_diagindxlist.fixedRows + 1; var opRow = grd_opindxlist.row - grd_opindxlist.fixedRows + 1; var cureRow = grd_cureindxlist.row - grd_cureindxlist.fixedRows + 1; var Diagkindcdflag = model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist[" +diagRow + "]/diagkindcdflag"); var Opkindcdflag = model.getValue("/root/opinfo/opindxdtlinfo/opindxdtllist[" + opRow + "]/opkindcdflag"); var Curekindcdflag = model.getValue("/root/main/indxinfo/cureindxinfo/cureindxlist[" + cureRow + "]/opkindcdflag"); var diagCol = grd_diagindxlist.col; var opCol = grd_opindxlist.col; var cureCol = grd_cureindxlist.col; if(flag =="diag"){ if(diagCol==1){ for ( var i= 1; i < grd_diagindxlist.rows; i++){ if(Diagkindcdflag=="M"){ if(i != diagRow){ grd_diagindxlist.valueMatrix(i,1)="S"; } } } } }else if(flag=="op"){ if(opCol==2){ for ( var i= 1; i< grd_opindxlist.rows; i++){ if(Opkindcdflag=="M"){ if(i != opRow){ grd_opindxlist.valueMatrix(i,2)="S"; } } } } }else if(flag =="cure"){ if(cureCol==1){ for( var i= 1; i< grd_cureindxlist.rows; i++){ if(Curekindcdflag=="M"){ if(i != cureRow){ grd_cureindxlist.valueMatrix(i,1)="S"; } } } } } model.refresh(); } /** * @ver : 2007-12-01 * @desc : ÃʱâÈ­¹öư * @ : * @by : ÀÌâ·Ï * @param : * @return : * @--------------------------------------------------- */ function fClearIndxInfo() { model.resetInstanceNode("/root/main/indxinfo"); model.removeNodeset("/root/main/indxinfo/ccindxinfo/ccindxlist"); model.removeNodeset("/root/main/indxinfo/diagindxinfo/diagindxlist"); model.removeNodeset("/root/opinfo/opindxdtlinfo/opindxdtllist"); model.removeNodeset("/root/main/indxinfo/cureindxinfo/cureindxlist"); model.removeNodeset("/root/main/indxinfo/dethindxinfo/dethindxlist"); model.removeNodeset("/root/main/indxinfo/bfindxlist/bfindxinfo"); model.removeNodeset("/root/main/indxinfo/diaginfo/diaglist"); model.removeNodeset("/root/main/indxinfo/insudiaginfo/insudiaglist"); model.removeNodeset("/root/main/indxinfo/serdiaginfo/serdiaglist"); model.removeNodeset("/root/main/indxinfo/cnstinfo/cnstlist"); model.removeNodeset("/root/main/indxinfo/opinfo/oplist"); model.removeNodeset("/root/init/dschpatinfo/chgdschinfo/chgdschddlist"); model.removeNodeset("/root/init/infdcpartinfo/infdcpartlist"); model.refresh(); cmb_tmpcoderesncd.disabled =true; tar_memo.disabled=true; } /** * @ver : 2007-12-01 * @desc : ÀÇ·áÁ¤º¸»ç¿ëÀÚ¿¡ ÇÑÇÏ¿© ÀúÀå¹öư visibility * @ : * @by : ÀÌâ·Ï * @param : * @return : * @--------------------------------------------------- */ function fUserAdmin() { var userinfo = getUserInfo("dutplcecd"); //ÀÇ·áÁ¤º¸ÆÀ // KNUH_20101207_¹Ú¼ºÈ£_start_Àǹ«±â·Ï ºÎ¼­ÄÚµå °¡Á®¿À±â //if(userinfo=="3230000000") if(model.getValue("/root/temp/deptcd/hardcd[hardcd='" + userinfo + "']/hardcd") != "") { // KNUH_20101207_¹Ú¼ºÈ£_end btn_save.visible = "true"; btn_clear.visible = "true"; model.refresh(); } else { btn_save.visible = "false"; btn_clear.visible = "false"; model.refresh(); } } /** * @ver : 2008-08-25 * @desc : °¨¿°Á¾·ù1ÀÇ °¨¿°Á¾·ù2ÀÇ ÇϺÎÇ׸ñµé Á¶È¸(Åð¿øºÐ¼®°ú µ¿ÀÏ) * @by : ÀÌâ·Ï * @param : * @return : * @--------------------------------------------------- */ function fGetInFcCas(code){ switch(code){ 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.refresh(); model.removeNodeset("/root/hidden/infdcpartinfo/infdcpartlist"); model.makeNode("/root/hidden/infdcpartinfo/infdcpartlist"); } /** * @ver : 2008-12-17 * @desc : ¹ýÁ¤ Àü¿°º´½Å°í¼­ È­¸é°ú ¿¬°è * @by : ÀÌâ·Ï * @param : * @return : * @--------------------------------------------------- */ function fSendInfdisInfo() { var reptflag = model.getValue("/root/main/indxinfo/infdisinfo/infdislist/reptflag"); if(reptflag=="01"){ setParameter("wrtedt",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/wrtedt")); setParameter("seqno",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/seqno")); setParameter("pid" , model.getValue("/root/main/indxinfo/infdisinfo/infdislist/pid")); setParameter("indd" , model.getValue("/root/main/indxinfo/infdisinfo/infdislist/indd")); setParameter("psnflag", "I"); setParameter("state", "S"); open("SPASI01500");//¹ýÁ¤ Àü¿°º´½Å°í¼­ }else if(reptflag=="02"){ setParameter("wrtedt",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/wrtedt")); setParameter("seqno",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/seqno")); setParameter("pid" , model.getValue("/root/main/indxinfo/infdisinfo/infdislist/pid")); setParameter("indd" , model.getValue("/root/main/indxinfo/infdisinfo/infdislist/indd")); setParameter("psnflag", "I"); setParameter("state", "S"); open("SPASI01800");//°áÇÙ½Å°í¼­ }else if(reptflag=="03"){ setParameter("wrtedt",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/wrtedt")); setParameter("seqno",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/seqno")); setParameter("pid" ,model.getValue("/root/main/indxinfo/infdisinfo/infdislist/pid")); setParameter("indd" ,model.getValue("/root/main/indxinfo/infdisinfo/infdislist/indd")); setParameter("psnflag", "I"); setParameter("state","S"); open("SPASI01600");//°£¿°½Å°í¼­ }else if(reptflag=="04"){ setParameter("wrtedt",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/wrtedt")); setParameter("seqno" ,model.getValue("/root/main/indxinfo/infdisinfo/infdislist/seqno")); setParameter("pid" ,model.getValue("/root/main/indxinfo/infdisinfo/infdislist/pid")); setParameter("indd" ,model.getValue("/root/main/indxinfo/infdisinfo/infdislist/indd")); setParameter("psnflag", "I"); setParameter("state" ,"S"); open("SPASI01900");//¼±Ãµ¼º ¸Åµ¶½Å°í¼­ }else if(reptflag=="05"){ setParameter("wrtedt",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/wrtedt")); setParameter("seqno",model.getValue("/root/main/indxinfo/infdisinfo/infdislist/seqno")); setParameter("pid" ,model.getValue("/root/main/indxinfo/infdisinfo/infdislist/pid")); setParameter("indd" ,model.getValue("/root/main/indxinfo/infdisinfo/infdislist/indd")); setParameter("psnflag", "I"); setParameter("state","S"); open("SPASI01700");//¼ºº´½Å°í¼­ } } /** * @ver : 2009-02-16 * @desc : Áø´Ü/¼ö¼ú FULL ÄÚµå Á¶È¸, FULL Äڵ尡 ¾Æ´Ï¸é ÆË¾÷°ú ¿¬°è * @by : ÀÌâ·Ï * @param : * @return : * @--------------------------------------------------- */ function fDiagOpCdFullSearch(flag) { if(event.keyCode == "13") { if(flag =="grd_diagindxlist"){ var iRow = grd_diagindxlist.row - grd_diagindxlist.fixedRows + 1; var dispdiagcd = model.getValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/dispdiagcd"); if(dispdiagcd==""){ return; } if(dispdiagcd!=""){ model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/indxcd", "null"); model.makeValue("/root/send/indxflag", "0"); // KNUH_20101207_¹Ú¼ºÈ£_start_Àǹ«±â·Ï ºÎ¼­ÄÚµå °¡Á®¿À±â var dutplcecd = model.getValue("/root/temp/dutplcecd/hardcd/hardcd"); //model.makeValue("/root/send/deptcd", "3230000000");//ÀÇ·áÁ¤º¸ÆÀ Áø´Ü¿ë¾î¸¸ model.makeValue("/root/send/deptcd", dutplcecd);//ÀÇ·áÁ¤º¸ÆÀ Áø´Ü¿ë¾î¸¸ // KNUH_20101207_¹Ú¼ºÈ£_end model.makeValue("/root/send/deptflag", "Y"); model.makeValue("/root/send/srchflag", "C"); var Srchnm = grd_diagindxlist.valueMatrix(iRow,grd_diagindxlist.colRef("dispdiagcd")).toUpperCase(); model.makeValue("/root/send/srchnm", Srchnm); model.makeValue("/root/send/stndd",cmb_dschdd.value); if(Srchnm.indexOf("/") > 0){ if(submit("TRMRT00209")){//Mophology ÄÚµå if(getNodesetCnt(model,"/root/main/diagcdinfo/kcd4m")==1){ model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/dispdiagcd" ,model.getValue("/root/main/diagcdinfo/kcd4m/morphlgccd")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/diagtermcd" ,model.getValue("/root/main/diagcdinfo/kcd4m/morphlgccd")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/diagseqno" ,model.getValue("/root/main/diagcdinfo/kcd4m/kcd4mseqno")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/hngnm" ,model.getValue("/root/main/diagcdinfo/kcd4m/kcd4mhngnm")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/engnm" ,model.getValue("/root/main/diagcdinfo/kcd4m/kcd4mengnm")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/pid" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/dschdd" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/instcd" ,getUserInfo("dutplceinstcd")); model.removeNodeset("/root/main/diagcdinfo/kcd4"); model.makeNode("/root/main/diagcdinfo/kcd4"); grd_diagindxlist.refresh(); }else{ fDiagIndxList("code"); } } }else if(submit("TRMRT01600")){//Áø´ÜÄÚµå if(getNodesetCnt(model,"/root/main/deptdiagcdlist/deptdiagcdinfo")==1){ model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/dispdiagcd" ,model.getValue("/root/main/deptdiagcdlist/deptdiagcdinfo/termcd")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/diagtermcd" ,model.getValue("/root/main/deptdiagcdlist/deptdiagcdinfo/termcd")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/hngnm" ,model.getValue("/root/main/deptdiagcdlist/deptdiagcdinfo/termhngnm")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/engnm" ,model.getValue("/root/main/deptdiagcdlist/deptdiagcdinfo/termengnm")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/pid" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/dschdd" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.setValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/instcd" ,getUserInfo("dutplceinstcd")); var lglydisflag = model.getValue("/root/main/deptdiagcdlist/deptdiagcdinfo/lglydisflag"); if((lglydisflag=="00")||(lglydisflag=="")){ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/lglydisflag" , ""); }else{ model.makeValue("/root/main/indxinfo/diagindxinfo/diagindxlist["+iRow+"]/lglydisflag" , lglydisflag+"±º"); } model.removeNodeset("/root/main/deptdiagcdlist/deptdiagcdinfo"); model.makeNode("/root/main/deptdiagcdlist/deptdiagcdinfo"); grd_diagindxlist.refresh(); }else{ fDiagIndxList("code"); } } } }else if(flag =="grd_opindxlist"){ var opRow = grd_opindxlist.row - grd_opindxlist.fixedRows + 1; var disoptermcd = model.getValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/disoptermcd"); if(disoptermcd==""){ return; } model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/indxcd", "null"); model.makeValue("/root/send/indxflag", "9"); // KNUH_20101207_¹Ú¼ºÈ£_start_Àǹ«±â·Ï ºÎ¼­ÄÚµå °¡Á®¿À±â var dutplcecd = model.getValue("/root/temp/dutplcecd/hardcd/hardcd"); //model.makeValue("/root/send/deptcd", "3230000000"); model.makeValue("/root/send/deptcd", dutplcecd);//ÀÇ·áÁ¤º¸ÆÀ Áø´Ü¿ë¾î¸¸ // KNUH_20101207_¹Ú¼ºÈ£_end model.makeValue("/root/send/deptflag", "Y"); model.makeValue("/root/send/srchflag", "C"); var Srchnm = grd_opindxlist.valueMatrix(opRow,grd_opindxlist.colRef("disoptermcd")).toUpperCase(); model.makeValue("/root/send/srchnm", Srchnm); model.makeValue("/root/send/stndd",cmb_dschdd.value); if(submit("TRMRT01601")){//¼ö¼úÄÚµå if(getNodesetCnt(model,"/root/main/deptopcdlist/deptopcdinfo")==1){ model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/disoptermcd" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termcd")); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/optermcd" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termcd")); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/ophngnm" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termhngnm")); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/opengnm" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termengnm")); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/pid" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/dschdd" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/opflag" ,"0"); model.setValue("/root/opinfo/opindxdtlinfo/opindxdtllist["+opRow+"]/instcd" ,getUserInfo("dutplceinstcd")); model.removeNodeset("/root/main/deptopcdlist/deptopcdinfo"); model.makeNode("/root/main/deptopcdlist/deptopcdinfo"); grd_opindxlist.refresh(); }else{ fOpGridIndxList("code"); } } }else if(flag =="grd_cureindxlist"){ var opRow = grd_cureindxlist.row - grd_cureindxlist.fixedRows + 1; var disoptermcd = model.getValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/disoptermcd"); if(disoptermcd==""){ return; } model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/indxcd", "null"); model.makeValue("/root/send/indxflag", "9"); // KNUH_20101207_¹Ú¼ºÈ£_start_Àǹ«±â·Ï ºÎ¼­ÄÚµå °¡Á®¿À±â var dutplcecd = model.getValue("/root/temp/dutplcecd/hardcd/hardcd"); //model.makeValue("/root/send/deptcd", "3230000000"); model.makeValue("/root/send/deptcd", dutplcecd);//ÀÇ·áÁ¤º¸ÆÀ Áø´Ü¿ë¾î¸¸ // KNUH_20101207_¹Ú¼ºÈ£_end model.makeValue("/root/send/deptflag", "Y"); model.makeValue("/root/send/srchflag", "C"); var Srchnm = grd_cureindxlist.valueMatrix(opRow,grd_cureindxlist.colRef("disoptermcd")).toUpperCase(); model.makeValue("/root/send/srchnm", Srchnm); model.makeValue("/root/send/stndd",cmb_dschdd.value); if(submit("TRMRT01601")){//¼ö¼úÄÚµå if(getNodesetCnt(model,"/root/main/deptopcdlist/deptopcdinfo")==1){ model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/disoptermcd" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termcd")); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/optermcd" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termcd")); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/ophngnm" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termhngnm")); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/opengnm" ,model.getValue("/root/main/deptopcdlist/deptopcdinfo/termengnm")); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/pid" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid")); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/dschdd" ,model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/dschdd")); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/opflag" ,"0"); model.setValue("/root/main/indxinfo/cureindxinfo/cureindxlist["+opRow+"]/instcd" ,getUserInfo("dutplceinstcd")); model.removeNodeset("/root/main/deptopcdlist/deptopcdinfo"); model.makeNode("/root/main/deptopcdlist/deptopcdinfo"); grd_cureindxlist.refresh(); }else{ fOpGridIndxList("code"); } } } } } //ÀÔÅð¿ø¿ä¾à±â·ÏÁö º¸¿©ÁÖ±â function fViewDischarge() { var formrecseq = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/formrecseq"); var pid = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/pid"); var hngnm = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/hngnm"); var sex = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/sex"); var age = model.getValue("/root/main/indxinfo/dschpatinfo/patinfo/age"); var sa = sex+"/"+age; var orddeptnm = ""; var roomcd = ""; var disppatinfo = pid +"¢Ë" + hngnm +"¢Ë" + sa+"¢Ë"+orddeptnm +"¢Ë" + roomcd + "¢Ë"; setParameter("openmode", "recform"); //¿ÀǸðµå´Â "recform" setParameter("formrecseq", formrecseq); //¼­½Ä±â·ÏÅ×À̺íÀÇ formrecseq(±â·Ï¼ø¹ø) setParameter("disppatinfo", disppatinfo); modal("SSMMR01100", 1, 0, 0 ,"", "", ""); }