/* - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì ¼­½Ä¹Ì¸®º¸±â ( SPMRF05500_¼­½Ä¹Ì¸®º¸±â.xrw - JScript ) - Version : 1) : Ver.1.00.01 - Author : À̰æÈñ - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì */ var gFormcd = ""; /** * @desc : È­¸éÃʱâÈ­ * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fInitalize() { try { //var wid = parseInt(ivw_reccnts.attribute("width")) - 40; //var hei = parseInt(ivw_reccnts.attribute("height")); ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")), parseInt(ivw_loader.attribute("width"))); //ivw_loader.btn_del.visible = true; ivw_loader.btn_del.visible = false; //ivw_loader.window.javascript.afterSaveExeFuncNm = "fReclistClick"; //ivw_reccnts.window.javascript.fInitPage(wid, hei); ivw_patlist.window.javascript.fInitalize(); ivw_patlist.window.javascript.fInitSize(parseInt(ivw_patlist.attribute("width")), parseInt(ivw_patlist.attribute("height"))); //btn_form.selected = true; //fSetPatInfo(); //fAddDateReq("today"); setParameter("SPMRI01300_openerid", "SPMMR05400"); //model.toggle("case_form"); //model.toggle("case_loader"); //fGetFormList(); model.refresh(); // var formcd = opener.window.javascript.getParameter("SPMRF05500_formcd"); if(formcd == "") { messageBox("¼­½ÄÄڵ尡", "I004"); model.close(); return; } copyNodeset("/root/main/forminfo/formmast", "/root/main/forminfo/formmast", "replace", model, opener.window.model); var cnt = getNodesetCnt(model, "/root/main/forminfo/formmast"); if(cnt == 0) { messageBox("¼­½ÄÁ¤º¸°¡", "I004"); model.close(); return; } fSelectForm(formcd); // ÀÓ½ÃÀúÀå, ÀÎÁõÀúÀå ¹öư invisible ó¸® ivw_loader.grup_btn.visible = false; ivw_loader.button1.visible = false; ivw_loader.ipt_formrecdd.visible = false; ivw_loader.ipt_formrectm.visible = false; ivw_loader.button10.visible = false; ivw_loader.cbo_formrecextnnm.visible = false; ivw_loader.caption7.visible = false; } catch(e) { } } /** * @desc : µðÆúÆ® ¼­½Ä ¿ÀÇ * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fLoadDefForm() { if (gFormcd != "") { //¼­½Ä·Îµå½Ã TOPÁ¤º¸ Á¶È¸ ¿©ºÎ ¼ÂÆÃ(NÀϰæ¿ì TopÂüÁ¶ ¾ÈÇÔ) ivw_loader.window.javascript.fLoadNewForm(gFormcd, false); if (getUserInfo("jobkindcd").substring(0, 2) != "03") { ivw_loader.grup_btn.disabled = false; //ivw_loader.btn_signsave.disabled = true; } } } /** * @desc : ȯÀÚÁ¤º¸ * @id : * @event : ondblclick * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fSetPatInfo() { //setParameter("SPMMR05400_parm_pinfo", pid + "¢Ë" + orddd + "¢Ë" + cretno + "¢Ë" + ioflag + "¢Ë" + orddeptcd + "¢Ë" + orddrid + "¢Ë" + ȯÀÚ¸í + "¢Ë" + ³ªÀÌ + "¢Ë" + ¼ºº° + "¢Ë" + ¼­½ÄºÎ¼­ÄÚµå); var patinfo = ""; if(isPopup()) patinfo = parent.window.javascript.getParameter("SPMMR05400_parm_pinfo"); var pid = ""; var orddd = ""; var cretno = ""; var ioflag = ""; var orddeptcd = ""; var orddrid = ""; var patnm = ""; var age = ""; var sex = ""; var formdeptcd = ""; if (patinfo == "") { var pamInfoCvs = getGlobalVariable("paminfo"); //»ó´ÜÁ¤º¸°¡ ÀÖÀ» °æ¿ì´Â °Ë»ö if(pamInfoCvs != null) { //cvs°¡ nullÀÌ ¾Æ´Ñ °æ¿ì¿¡¸¸ ó¸®ÇÔ. model.removeNodeSet ("/root/main/paminfo/list"); setCSVToNode ("/root/main/paminfo", pamInfoCvs); //pid = model.getValue ("/root/main/result/patinfo/list/pid"); ioflag = model.getValue("/root/main/paminfo/list/ioflag"); if (ioflag == "O") { orddd = model.getValue("/root/main/paminfo/list/orddd"); orddrid = model.getValue("/root/main/paminfo/list/orddrid"); } else { orddd = model.getValue("/root/main/paminfo/list/indd"); orddrid = model.getValue("/root/main/paminfo/list/medispclid"); } pid = model.getValue("/root/main/paminfo/list/pid"); cretno = model.getValue("/root/main/paminfo/list/cretno"); orddeptcd = model.getValue("/root/main/paminfo/list/orddeptcd"); patnm = model.getValue("/root/main/paminfo/list/hngnm"); age = model.getValue("/root/main/paminfo/list/age"); sex = model.getValue("/root/main/paminfo/list/sex"); } } else { patinfo = patinfo.split("¢Ë"); pid = patinfo[0]; orddd = patinfo[1]; cretno = patinfo[2]; ioflag = patinfo[3]; orddeptcd = patinfo[4]; orddrid = patinfo[5]; patnm = patinfo[6]; age = patinfo[7]; sex = patinfo[8]; formdeptcd = patinfo[9]; model.makeValue("/root/main/paminfo/list/pid", pid); model.makeValue("/root/main/paminfo/list/orddeptcd", orddeptcd); } //Áø·áºÎ¼­ Á¶È¸ //reqGetDeptList("/root/init/reqdata", "/root/init/deptlist", "", "012"); mmbfGetDeptCodeComboList("/root/init/deptlist", "/root/init/deptlist", "A"); if (pid == "") { messageBox("±â·Ï¿¡ ÇÊ¿äÇÑ È¯ÀÚ ¿ø¹«Á¤º¸°¡", "I004"); ivw_loader.grup_btn.disabled = true; model.toggle("case_patlist"); //window.close(); } else { if (formdeptcd != "") { model.setValue("/root/send/formdeptcd", formdeptcd); } else { model.setValue("/root/send/formdeptcd", orddeptcd); } model.setValue("/root/init/patinfo", pid + " " + patnm + "(" + sex + "/" + age + ")"); //¼­½Ä·Î´õ¿¡¼­ ȯÀÚ ±â·Ï°ü·Ã ¿ø¹«Á¤º¸¸¦ Top¿¡¼­ Á¶È¸ÇØ¿ÃÁö ¿©ºÎ(NÀϰæ¿ì Top¿¡¼­ ÂüÁ¶ÇÏÁö ¾ÊÀ½) setParameter("SSMMR01100_getTopYn", "N"); ivw_loader.window.javascript.fSetPamInfo(pid, orddd, cretno, ioflag , orddeptcd, orddrid); } } /** * @desc : ȯÀÚ ¸®½ºÆ®¿¡¼­ ȯÀÚ ¿ø¹« Á¤º¸ ¼ÂÆÃ * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fIvwSetPamInfo(pid, orddd, cretno, ioflag , orddeptcd, orddrid, patnm, sa) { model.setValue("/root/init/patinfo", pid + " " + patnm + "(" + sa + ")"); model.makeValue("/root/main/paminfo/list/pid", pid); model.makeValue("/root/main/paminfo/list/orddeptcd", orddeptcd); model.setValue("/root/send/formdeptcd", model.getValue("/root/main/paminfo/list/orddeptcd")); ivw_loader.window.javascript.fSetPamInfo(pid, orddd.substring(0, 8), cretno, ioflag , orddeptcd, orddrid); setParameter("SSMMR01100_getTopYn", "N"); model.refresh(); if (gFormcd != "") { //¼­½Ä·Îµå½Ã TOPÁ¤º¸ Á¶È¸ ¿©ºÎ ¼ÂÆÃ(NÀϰæ¿ì TopÂüÁ¶ ¾ÈÇÔ) ivw_loader.window.javascript.fLoadNewForm(gFormcd, false); if (getUserInfo("jobkindcd").substring(0, 2) != "03") { ivw_loader.grup_btn.disabled = false; //ivw_loader.btn_signsave.disabled = true; } } fGetFormList(); //model.toggle("case_form"); var selindx = switch2.selectedIndex; if (selindx != "0") { model.toggle("case_loader"); } //btn_form.selected = true; } /** * @desc : ¼­½Ä ¸®½ºÆ® Á¶È¸ * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fGetFormList() { model.removeNodeSet ("/root/main/form/formlist"); if(submit("TRMMR05401")) { //var grdObj = document.controls("grd_formlist"); //grdObj.resizeCells(); //setTree(grdObj, grdObj.colRef("depth"), grdObj.colRef("formnm"), true); } } /** * @desc : ¼­½Ä ¿ÀÇ * @id : * @event : ondblclick * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fSelectForm(formcd) { //var formcd = model.getValue("/root/main/form/formlist['" + grd_formlist.row + "']/linkcd"); if(formcd == null || formcd == "") formcd = model.getValue("/root/main/form/formlist['" + grd_formlist.row + "']/linkcd"); if (formcd != "") { gFormcd = formcd; copyNodeset("/root/main/forminfo/formmast", "/root/main/forminfo/formmast", "replace", ivw_loader.window.model, model); copyNodeset("/root/temp/forminfo/formmast", "/root/main/forminfo/formmast", "replace", ivw_loader.window.model, model); //ivw_loader.window.javascript.fLoadNewForm(formcd, false); ivw_loader.window.javascript.fPreviewForm(formcd, false, ""); if (model.getValue("/root/main/paminfo/list/pid") == "") { ivw_loader.grup_btn.disabled = true; } else { ivw_loader.grup_btn.disabled = false; if (getUserInfo("jobkindcd").substring(0, 2) != "03") { //ivw_loader.btn_signsave.disabled = true; } } } } /** * @desc : ±â·Ï¸ñ·ÏÀ» °¡Á®¿Â´Ù * @id : * @event : DOMActivate * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fGetRecList() { if (model.getValue("/root/main/paminfo/list/pid") == "") { messageBox("±â·Ï¿¡ ÇÊ¿äÇÑ È¯ÀÚ ¿ø¹«Á¤º¸°¡", "I004"); return; } model.setValue("/root/send/reqmedireclist/formrecdeptcd", "ALL"); model.setValue("/root/send/reqmedireclist/chosflag", "A"); model.setValue("/root/send/reqmedireclist/pid", model.getValue("/root/main/paminfo/list/pid")); if (model.getValue("/root/main/paminfo/list/ioflag") == "O") { model.setValue("/root/send/reqmedireclist/orddd", model.getValue("/root/main/paminfo/list/orddd")); } else { model.setValue("/root/send/reqmedireclist/orddd", model.getValue("/root/main/paminfo/list/indd")); } model.setValue("/root/send/reqmedireclist/cretno", model.getValue("/root/main/paminfo/list/cretno")); model.setValue("/root/send/reqmedireclist/orddeptcd", model.getValue("/root/main/paminfo/list/orddeptcd")); model.setValue("/root/send/reqmedireclist/recfromdt", model.getValue("/root/init/reqmedireclist/recfromdt")); model.setValue("/root/send/reqmedireclist/rectodt", model.getValue("/root/init/reqmedireclist/rectodt")); var tmpformcd = model.getValue("/root/init/formcd"); if (tmpformcd == "") { tmpformcd = "-"; } model.makeValue("/root/send/reqmedireclist/formcd", tmpformcd); model.makeValue("/root/send/reqmedireclist/deptrecyn", "Y"); if(submit("TRMMR00101")) { //¿¹Áø±â·Ï¸¸ º¹»çÇÏ¿© º¸¿©ÁØ´Ù copyNodeset("/root/main/foctsnwlist/medireclist", "/root/main/mainlist/medireclist[foctsnwyn = 'Y']", "replace", model, model); model.refresh(); } } /** * @desc : ±â·Ï³»¿ëÀ» °¡Á®¿Â´Ù * @id : * @event : DOMActivate * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fShowMediRecCnt(formrecseq) { if (model.getValue("/root/main/paminfo/list/pid") == "") { return; } var cond = new COMN_CONT_RECCNTS(); var instance = document.models(0).instances(0); var nodeReclist = instance.selectNodes("/root/main/foctsnwlist/medireclist"); var nodeReclistlength = nodeReclist.length; cond.pid = model.getValue("/root/main/paminfo/list/pid"); cond.formrecdeptcd = model.getValue("/root/send/reqmedireclist/formrecdeptcd"); cond.chosflag = model.getValue("/root/send/reqmedireclist/chosflag"); cond.reclistlength = nodeReclistlength; if (formrecseq == "") { cond.recfromdt = model.getValue("/root/init/reqmedireclist/recfromdt"); cond.rectodt = model.getValue("/root/init/reqmedireclist/rectodt"); } else { cond.recfromdt = ""; cond.rectodt = ""; } cond.formrecseq = formrecseq; ivw_reccnts.window.javascript.fRefMediRecCnts(cond); //2009-07-04 ¿ÀÈÄ 11:40:30 °­ÁöÈÆ ¼öÁ¤ : 1. ÇϵåÄÚµå 9905¿¡ µî·ÏµÈ ¼­½Ä¸¸ Ãâ·Â¹öưÀÌ È°¼ºÈ­ µÈ´Ù. 2. ±â·ÏÀúÀåºÎ¼­¿Í °°ÀººÎ¼­Àϰæ¿ì¸¸ Ãâ·Â¹öư Ȱ¼ºÈ­ model.removenode("/root/hidden/formhardcd"); model.makeNode("/root/hidden/formhardcd"); mmbfGetHardCodeInfo("/root/send/formhrdcd", "/root/hidden/formhardcd", 9905); var formcd = model.getValue("/root/main/foctsnwlist/medireclist['" + grd_reclist.row + "']/formcd"); var formrecdeptcd = model.getValue("/root/main/foctsnwlist/medireclist['" + grd_reclist.row + "']/formrecdeptcd") var orddeptcd = model.getValue("/root/main/paminfo/list/orddeptcd"); //var orddeptcd = getUserInfo("dutplcecd"); var iexNodeCnt = getNodesetCnt(model, "/root/hidden/formhardcd/hardcd[hardcd = '" + formcd + "']"); if(iexNodeCnt > 0) { if(orddeptcd == formrecdeptcd){ btn_print.visible = true; } else{ btn_print.visible = false; } }else{ btn_print.visible = false; } } /** * @desc : °Ë»ö ³¯Â¥±â°£ * @id : * @event : DOMActivate * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fAddDateReq(diffFlag) { var frdd = model.getValue("/root/init/reqmedireclist/recfromdt"); var todd = model.getValue("/root/init/reqmedireclist/rectodt"); var srcdd = new Date(); var destdd = new Date(); var diffdt; if (diffFlag == "next") { srcdd = todd.toDate(); srcdd = srcdd.getAddDate(1, "D"); frdd = srcdd.getDateFormat(); diffdt = parseInt(model.getValue("/root/init/reqmedireclist/diffdt")) * 1; destdd = srcdd.getAddDate(diffdt, "M"); todd = destdd.getDateFormat(); } else if (diffFlag == "back") { srcdd = frdd.toDate(); srcdd = srcdd.getAddDate(-1, "D"); todd = srcdd.getDateFormat(); diffdt = parseInt(model.getValue("/root/init/reqmedireclist/diffdt")) * -1; destdd = srcdd.getAddDate(diffdt, "M"); frdd = destdd.getDateFormat(); } else if (diffFlag == "today") { todd = getCurrentDate(); var today = new Date(); var frday = new Date(); var diffdt = parseInt(model.getValue("/root/init/reqmedireclist/diffdt")) * -1; frday = today.getAddDate(diffdt , "M"); frdd = frday.getDateFormat(); } else { var today = todd.toDate(); var frday = new Date(); var diffdt = parseInt(model.getValue("/root/init/reqmedireclist/diffdt")) * -1; frday = today.getAddDate(diffdt , "M"); frdd = frday.getDateFormat(); } model.setValue("/root/init/reqmedireclist/recfromdt", frdd); model.setValue("/root/init/reqmedireclist/rectodt", todd); ipt_formrecdtfr.refresh(); ipt_formrecdtto.refresh(); } /** * @desc : ±â·Ï¼öÁ¤ * @id : * @event : * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fRecModify() { var recseq = grd_reclist.valueMatrix(grd_reclist.row, grd_reclist.colref("formrecseq")); ivw_loader.window.javascript.fLoadRecForm(recseq, false); ivw_loader.grup_btn.disabled = false; model.toggle("case_loader"); } /** * @desc : ±â·Ï·Îµå ÈÄ À̺¥Æ®(ÀÎÁõÀúÀå disable) * @id : * @event : * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fOnLoadComplete() { if (getUserInfo("jobkindcd").substring(0, 2) != "03") { //ivw_loader.btn_signsave.disabled = true; } } /** * @desc : ±â·Ï¸ñ·ÏÅÇ Å¬¸¯½Ã À̺¥Æ® * @id : * @event : * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fReclistClick() { model.toggle("case_rec"); model.toggle("case_prew"); ivw_reccnts.window.javascript.fClear(); caption7.text = "±â·Ï³»¿ë"; button1.selected = true; fGetRecList(); //btn_formrecupdt.attribute("visibility") = "visible"; } /** * @group : * @ver : 2009-06-25 ¿ÀÀü 10:54:51 * @by : °­ÁöÈÆ * @--------------------------------------------------- * @type : function * @desc : Ãâ·Â ¹öư À̺¥Æ® * @param : * @return : * @--------------------------------------------------- */ function fClickPrtBtn() { var formcd = ""; var signno = ""; var prtparam = ""; var formcd = model.getValue("/root/main/foctsnwlist/medireclist['" + grd_reclist.row + "']/formcd"); var signno = model.getValue("/root/main/foctsnwlist/medireclist['" + grd_reclist.row + "']/espiseq"); if(formcd == "" || formcd == null){ messageBox("¼±ÅÃµÈ ¼­½ÄÀÌ ", "I004"); return; } if(signno == "" || signno == null){ messageBox("ÀÎÁõÀúÀåµÈ ±â·Ï¸¸ Ãâ·ÂÀÌ ", "I006"); return; } prtparam += "E¢Ë" + signno + "¢Ë" + formcd + "¢Ì"; setParameter("SPMRI02400_prtrecinfo", prtparam); modal("SPMRI02400"); }