function fRecMainReady() { try { grp_base.setAttribute("visibility", "visible"); fReadyForm(); fReadyFormInitData(); } catch (e) { alert("e"); } } function fReadyForm() { grd_medireclist.autoMerge = false; grd_medireclist.setMergeCol(grd_medireclist.colRef("formrecdd"), true); fReadyFormInitData(); fAddDateReq("today"); var defltdeptcd = getUserInfo("dutplcecd"); if (defltdeptcd == "2280000000") { defltdeptcd = "ALL"; } else if(defltdeptcd == ""){ defltdeptcd = "ALL"; } var selDept = instance1.selectSingleNode("/root/init/deptlist/dept[deptcd='" + defltdeptcd + "']/deptcd"); if(selDept == null){ defltdeptcd = "ALL"; } model.setValue("/root/send/reqmedireclist/formrecdeptcd", defltdeptcd); model.setValue("/root/send/reqmedireclist/chosflag", "A"); model.setValue("/root/hidden/openform/degnid", getUserInfo("usernm")); model.refresh(); grd_medireclist.merge(); fInitRecPamInfo(); } function fReadyFormInitData() { mmbfGetDeptCodeComboList("/root/send/reqdeptlist", "/root/init/deptlist", "A"); model.setValue("/root/init/deptlist/dept[1]/deptcd", "ALL"); model.setValue("/root/init/deptlist/dept[1]/depthngnm", "전체"); fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/srchday", "024"); var srchday = model.getValue("/root/envinit/srchday/answcnt"); switch(srchday) { case "001" : model.setValue("/root/init/reqmedireclist/diffdt", "1"); break; case "002" : model.setValue("/root/init/reqmedireclist/diffdt", "3"); break; case "003" : model.setValue("/root/init/reqmedireclist/diffdt", "6"); break; case "004" : model.setValue("/root/init/reqmedireclist/diffdt", "9"); break; case "005" : model.setValue("/root/init/reqmedireclist/diffdt", "12"); break; case "006" : model.setValue("/root/init/reqmedireclist/diffdt", "24"); break; } combo4.refresh(); } 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(); } 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(); } function fShowMediRecCnt(formrecseq, arrFormrecseq) { if (model.getValue("/root/main/paminfo/pid") == "") { return; } var cond = new COMN_CONT_RECCNTS(); var instance = model.instances.item(0); var nodeReclist = instance.selectNodes("/root/main/mainlist/medireclist"); var nodeReclistlength = nodeReclist.length; cond.pid = model.getValue("/root/main/paminfo/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 = ""; } if ( arrFormrecseq != null ) cond.arrFormrecseq = arrFormrecseq; cond.formrecseq = formrecseq; ivw_reccnts.window.fRefMediRecCnts(cond); swt_left.setSelectedIndex(1); radio1.setValue("RD"); swt_left.setVisible(true); } function fRefMain() { switch (swt_left.selectedIndex) { case 0: fRefMediRecList(); break; case 1: fShowMediRecCnt(""); break; } } var isFstListSrch = "Y"; function fRefMediRecList() { if (model.getValue("/root/main/paminfo/pid") == "") { messageBox("환자정보가 존재하지 않아 진행 ", "E001"); return; } model.setValue("/root/send/reqmedireclist/pid", model.getValue("/root/main/paminfo/pid")); if (model.getValue("/root/main/paminfo/ioflag") == "O") model.setValue("/root/send/reqmedireclist/orddd", model.getValue("/root/main/paminfo/orddd")); else model.setValue("/root/send/reqmedireclist/orddd", model.getValue("/root/main/paminfo/indd")); model.setValue("/root/send/reqmedireclist/cretno", model.getValue("/root/main/paminfo/cretno")); model.setValue("/root/send/reqmedireclist/orddeptcd", model.getValue("/root/main/paminfo/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")); model.makeValue("/root/send/reqmedireclist/formcd", "-"); var offset = parseInt(model.getValue("root/page/curpage")); if(offset == 1) { offset = offset - 1; } else { offset = (offset - 1) * 10; } model.makeValue("/root/send/reqmedireclist/offset", String(offset)); model.makeValue("/root/send/reqmedireclist/pagesize", model.getValue("root/page/pagesize")); submit("TRMOB04201"); var maxpage = parseInt(model.getValue("/root/main/mainlist/medireclistcnt/maxcnt")); if(maxpage < 10) { model.setValue("/root/page/maxpage", "1"); } else { maxpage = (maxpage / 10) - ((maxpage % 10) / 10) + 1; model.setValue("/root/page/maxpage", String(maxpage)); } model.refresh(); swt_left.setSelectedIndex(0); swt_left.setVisible(true); grd_medireclist.autoMerge = false; grd_medireclist.setMergeCol(grd_medireclist.colRef("formrecdd"), true); grd_medireclist.merge(); if (grd_medireclist.rows > 1) { grd_medireclist.setRow(1); } } function fInitRecPamInfo() { clearParameter("SSMMR01200_Param_formcd"); clearParameter("SSMMR01200_Param_recseq"); isFstListSrch = "Y"; try { model.removeNodeset("/root/main/paminfo"); model.makeValue("/root/main/paminfo/pid", model.getProperty("pid") ); model.makeValue("/root/main/paminfo/orddd", "" ); model.makeValue("/root/main/paminfo/indd", model.getProperty("indd") ); model.makeValue("/root/main/paminfo/cretno", model.getProperty("cretno")); model.makeValue("/root/main/paminfo/orddeptcd", model.getProperty("orddeptcd") ); model.makeValue("/root/main/paminfo/deptnm", model.getProperty("deptnm") ); model.makeValue("/root/main/paminfo/medispclnm", model.getProperty("medispclnm")); model.makeValue("/root/main/paminfo/hngnm", model.getProperty("hngnm") ); model.makeValue("/root/main/paminfo/sexage", model.getProperty("sexage") ); model.makeValue("/root/main/paminfo/wardroomnm", model.getProperty("wardroomnm") ); model.makeValue("/root/main/paminfo/ioflag", "I" ); model.setValue("/root/send/reqinitinfo/pid", model.getValue("/root/main/paminfo/pid")); model.setValue("/root/send/reqinitinfo/cretno", model.getValue("/root/main/paminfo/cretno")); model.setValue("/root/send/reqinitinfo/chosflag", model.getValue("/root/main/paminfo/ioflag")); if (model.getValue("/root/send/reqinitinfo/chosflag") == "O" || model.getValue("/root/send/reqinitinfo/chosflag") == "S") { model.setValue("/root/send/reqinitinfo/orddd", model.getValue("/root/main/paminfo/orddd")); } else { model.setValue("/root/send/reqinitinfo/orddd", model.getValue("/root/main/paminfo/indd")); } button3.dispatch("onclick"); } catch (e) { throw e; } }