/**
* @desc : Ãʱâ È¸é ¼³Á¤
* @id :
* @event : xforms-ready
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fReadyForm_old()
{
ivw_loader.attribute("top") = 30;
ivw_loader.attribute("height") = 740;
ivw_loader.src = "../../../emr/medirecweb/xrw/SSMMR01100_¼½Ä·Î´õ.xrw";
ivw_patsmm.src = "../../../emr/medirecweb/xrw/SSMMR04800_Áø·á¿ä¾à±â·Ï.xrw";
ivw_loader.window.javascript.gMediRecMain = true;
ivw_loader.window.javascript.gIsCashedFormDegn = true;
//ivw_patsmm.window.javascript.fResizeGrup("1", parseInt(ivw_patsmm.attribute("height")), parseInt(ivw_patsmm.attribute("width")));
ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));
ivw_loader.window.javascript.afterSaveExeFuncNm = "fRefMediRecList";
grd_medireclist.mergecol(grd_medireclist.colref("formrecdd")) = true;
fReadyFormInitData();
model.setValue("/root/init/reqmedireclist/diffdt", 12); //°Ë»ö µðÆúÆ® 12°³¿ù
fAddDateReq("today");
model.setValue("/root/send/reqmedireclist/formrecdeptcd", getUserInfo("dutplcecd"));
model.setValue("/root/send/reqmedireclist/chosflag", "A");
model.setValue("/root/hidden/openform/degnid", getUserInfo("usernm"));
model.refresh();
// if (window.document.location == "C:/CMCProject/application/webapps/emr/medirecweb/xrw/" || window.document.location == "D:/CMCProject/application/webapps/emr/medirecweb/xrw/")
// {// TFViewer·Î »ý¼º½Ã¿¡ ȯÀÚ¼¼ÆÃÀ» À§ÇÏ¿©...
// fTmpInitPamInfo("O");
// //fOpenNewForm("0000000532");
// }
// else
// {
// fInitRecPamInfo();
// }
fInitRecPamInfo();
var nodeList = model.instances(0).selectNodes("/root/main/mainlist/medireclist");
if (nodeList.length > 0)
{
fShowMediRecCnt(grd_medireclist.valueMatrix(1, grd_medireclist.colref("formrecseq")));
}
}
/**
* @desc : ȯÀÚ¿ä¾à È¸é ¼³Á¤
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
gIsSmmFst = "Y";
function fSetPatSmm(visible)
{
if (visible)
{
ivw_patsmm.window.javascript.fInitalize();
if (! ivw_patsmm.visible)
{
ivw_loader.attribute("top") = 215;
ivw_loader.attribute("height") = 553;
}
}
else
{
//ivw_patsmm.visible = false;
ivw_loader.attribute("top") = 30;
ivw_loader.attribute("height") = 740;
}
if (ivw_patsmm.visible != visible)
{
ivw_patsmm.visible = visible;
ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));
if (gIsSmmFst == "Y") //óÀ½ ¿Àǽÿ¡¸¸ »çÀÌÁî Á¶Àý
{
ivw_patsmm.window.javascript.fResizeGrup("1", parseInt(ivw_patsmm.attribute("height")), parseInt(ivw_patsmm.attribute("width")));
gIsSmmFst = "N";
}
}
}
function fSetRecItemValueBydegnitemlevlcd(reciteminfo)
{
return ivw_loader.window.javascript.fSetRecItemValue_MMR01100(reciteminfo);
}
/**
* @desc : Áø·á±â·Ï ¸®½ºÆ® Á¶È¸Á¶°ÇÀÇ Áø·á°ú Á¶È¸ ¹× ¼½ÄÁñ°Üã±â Á¶È¸
* 2010.04.13 dhkim ±â°£¿É¼Ç Á¶È¸ Ãß°¡
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fReadyFormInitData()
{
mmbfGetDeptCodeComboList("/root/send/reqdeptlist", "/root/init/deptlist", "A");
sortNodeList("/root/init/deptlist/dept", "depthngnm", "asc"); // °¡³ª´Ù ¼øÀ¸·Î Á¤¸®µÇµµ·Ï ¼öÁ¤.
addComboItem("cbo_deptlist", "- Àüü -", "ALL", "above" );
fFavorRefresh("refresh"); //Áñ°Üã±â Á¶È¸
//2010.04.12 dhkim ±â°£¿É¼Ç Á¶È¸
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;
case "007" :
model.setValue("/root/init/reqmedireclist/diffdt", "36");
break;
case "008" :
model.setValue("/root/init/reqmedireclist/diffdt", "48");
break;
case "009" :
model.setValue("/root/init/reqmedireclist/diffdt", "60");
break;
default :
model.setValue("/root/init/reqmedireclist/diffdt", "12");
break;
}
combo4.refresh();
// 2013.08.28 CYW
fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/btnviewflag" , "041"); // Áø·á±â·Ï¸ÞÀÎÀÇ ±â·ÏÁ¶È¸ µðÆúÆ® ¼³Á¤(¹öưView)
fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/mainyn" , "042"); // Áø·á±â·Ï¸ÞÀÎÀÇ ±â·ÏÁ¶È¸ µðÆúÆ® ¼³Á¤(°øÅë±â·Ï¸¸º¸±â)
fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/rechfview" , "043"); // Áø·á±â·Ï¸ÞÀÎÀÇ ±â·ÏÁ¶È¸ µðÆúÆ® ¼³Á¤(±â·ÏHeader/Footerº¸±â)
// 2013.10.28 CYW
fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/painhide" , "048"); // Áø·á±â·Ï¸ÞÀÎÀÇ ±â·ÏÁ¶È¸ µðÆúÆ® ¼³Á¤(ÅëÁõ¼û±è¿©ºÎ)
// 2014.05.19 ¾ö¿µ¸¸
fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/deptmemopopyn", "054"); // Áø·á±â·Ï¸ÞÀÎÀÇ Å¸°ú¸Þ¸ð ÆË¾÷ ¿©ºÎ
// ÅëÁõ¼û±è¿©ºÎ
if( model.getValue("/root/envinit/painhide/answcnt") == "002" ){
model.setValue("/root/temp/painhideflag", "true");
}else{
model.setValue("/root/temp/painhideflag", "false");
}
// ¹öưº¸±â¿©ºÎ
if( model.getValue("/root/envinit/btnviewflag/answcnt") == "002" ){
model.setValue("/root/temp/btnviewflag", "true");
grp_btnbox.visible = false;
group3.attribute("top") = "55";
swt_left.attribute("top") = "80";
swt_left.attribute("height") = "695";
grd_medireclist.attribute("height") = "690";
ivw_reccnts.attribute("height") = "690";
ivw_reccnts.grd_medirec.attribute("style") = "left:0px; top:0px; width:583px; height:688px; background-position:center; border-style:none;";
ivw_reccnts.grd_medirec.refresh();
}else{
model.setValue("/root/temp/btnviewflag", "false");
}
// °øÅë ±â·ÏÁö¸¸ º¸±â¿©ºÎ
if( model.getValue("/root/envinit/mainyn/answcnt") == "002" ){
model.setValue("/root/temp/btnmainyn", "true");
}else{
model.setValue("/root/temp/btnmainyn", "false");
}
// ±â·Ï³»¿ë Header/Footer º¸±â¿©ºÎ
if( model.getValue("/root/envinit/rechfview/answcnt") == "002" ){
model.setValue("/root/temp/rechfview", "true");
}else{
model.setValue("/root/temp/rechfview", "false");
}
bool_btnmainyn.refresh();
bool_btnviewflag.refresh();
bool_rechfview.refresh();
// 2013.08.28 CYW
//2010.04.26 dhkim - °£È£Á¤º¸Á¶»çÁö ¼¿ï¼º¸ð¸¸ ¹öư visibleó¸®
//±â°üÄÚµå(°£È£°øÅë±âÁØÀÚ·áÅ×ÀÌºí¿¡¼ °¡Á®¿È)
var pCode = "'077'"; // Á¶È¸ÇÒ CdGrupID ÄÚµåÁ¤º¸(077:°¢±â°üÄÚµåÁ¤º¸)
var pDate = getCurrentDate(); //Á¶È¸±âÁØÀÏÀÚ
fGetNursHardCdInfo_MMR00100(pCode, pDate);
if(getUserInfo("dutplceinstcd") == model.getValue("/root/code_mmr00100/codeinfo/codelist[supcdid='01']/cdid")){
btn_nursinfo.visible = true;
}else{
btn_nursinfo.visible = false;
}
}
/**
* @desc : Áø·á±â·Ï ¸ÞÀÎÀÇ ¿ÞÂÊ ½ºÀ§Ä¡¿¡ µû¸¥ ÇÔ¼ö È£Ãâ
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fRefMain()
{
switch (swt_left.selectedIndex)
{
case 0:
fRefMediRecList();
break;
case 1:
//2014/03/17 ÀÌÁ¤Åà Ãß°¡
fRefMediRecList();
//2014/03/17 ÀÌÁ¤Åà Ãß°¡
fShowMediRecCnt("");
break;
case 2:
fShowOrdCnt(); //󹿳»¿ª Á¶È¸
break;
default:
// ivew Á¶°Ç ¼³Á¤ (Ä¡°ú ¿Ü·¡Áø·áÀÏ °æ¿ì Ä¡°ú±â·Ï »ç¿ë : ÃÖ¿øµ· 20101222 °æºÏ´ë)
if ( btn_tab_denti.visible
&& ivw_denti.src != ""
&& btn_tab_denti.selected)
{
ivw_denti.window.javascript.fGetrecinfo();
}
break;
}
//2013.11.28 ±è¿µ±â ¼öÁøÀÏÀÚ¿Í ±â·ÏÀÏÀÚ°¡ ´Ù¸¦°æ¿ì »ö»óº¯È
fSetColorByNotSameOrdddandRecdd(grd_medireclist);
//ÀÌÀ±ÁÖ Ãß°¡(20150703)
var rsrvflag = model.getValue("/root/main/paminfo/rsrvflag");
var orddd = model.getValue("/root/main/paminfo/orddd");
btn_hieview.attribute("visibility") = "hidden";
if (rsrvflag == "V" ) {
btn_hieview.attribute("visibility") = "visible"; //Áø·á±³·ù
if (orddd == getCurrentDate()) {
btn_hieview.dispatch("onclick");
}
}
}
/**
* @desc : ¹Ì¸®º¸±â Á¶È¸
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
* @parameter : formrecseq - °Ë»öÇϰíÀÚ ÇÏ´Â seq¹øÈ£
findrowInfo - ¿øÇÏ´Â ±×·ì search(°°Àº¼½Ä °Ë»öÀ¸·Î seq°¡ ±¸ºÐÀÚ·Î ¸ÖƼ·Î ±¸¼ºµÇ¾î ³Ñ¾î¿È.)
* 2010/01/04 hkjoo ¼öÁ¤
*/
function fShowMediRecCnt(formrecseq, arrFormrecseq)
{
model.addlog("fShowMediRecCnt_start");
if (model.getValue("/root/main/paminfo/pid") == "")
{
return;
}
//cyw
fGrdSortFlag();
var cond = new COMN_CONT_RECCNTS();
var instance = document.models(0).instances(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.rechfview = model.getValue("/root/temp/rechfview");
cond.mainyn = model.getValue("/root/temp/btnmainyn"); // 2013.09.25 CYW
cond.recformsort = model.getValue("/root/temp/recformsort"); // 2013.10.22 CYW
cond.painhideflag = model.getValue("/root/temp/painhideflag"); // 2013.10.28 CYW
cond.notprogress = model.getValue("/root/temp/notprogress"); // 2014.05.30 ÀÌÀ±ÁÖ
cond.reclistlength = nodeReclistlength;
//2014/02/20 ÀÌÁ¤Åà Ãß°¡
// ÆäÀÌ¡ ¿©ºÎ¸¦ ³Ñ°ÜÁÜ
if(formrecseq!="" && formrecseq!=null){
cond.pagingyn = "N";
ivw_reccnts.window.javascript.btn_paging.visible=false;
}else{
cond.formrecseq="";
cond.pagingyn = "Y";
cond.pagecnt = "1";
}
//2014/02/20 ÀÌÁ¤Åà Ãß°¡
if (formrecseq == ""){
cond.recfromdt = model.getValue("/root/init/reqmedireclist/recfromdt");
cond.rectodt = model.getValue("/root/init/reqmedireclist/rectodt");
}else{
cond.recfromdt = "";
cond.rectodt = "";
}
//2010/01/04 hkjoo Ãß°¡
if ( arrFormrecseq != null )
cond.arrFormrecseq = arrFormrecseq;
////////////////////////
cond.formrecseq = formrecseq;
ivw_reccnts.window.javascript.fRefMediRecCnts(cond);
swt_left.selectedIndex = 1;
button15.selected = true;
fSetIviewVisible(false); // ivew È¸é ¼³Á¤ (Ä¡°ú ¿Ü·¡Áø·áÀÏ °æ¿ì Ä¡°ú±â·Ï »ç¿ë : ÃÖ¿øµ· 20101223 °æºÏ´ë)
model.addlog("fShowMediRecCnt_end");
}
/**
* @desc : ¹Ì¸®º¸±â Á¶È¸(XSLT)
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fShowMediRecCntByXslt(signno, formcd)
{
model.resetInstanceNode("/root/send/xslsend");
model.removeNodeset("/root/tmpinicert");
model.makeValue("/root/send/xslsend/signno", signno);
if(submit("TRMRI02401"))
{
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
var foldernm = "C:/CertrecPrnt";
if (certnodeList.length <= 0)
return;
fExistFolder(foldernm);
var emrpath = "";
var emrorddate = "";
var emrformnm = "";
var emrformcd = "";
var emrdeptnm = "";
var emrdeptcd = "";
var emrpage = "";
var emrhiddenmsg = "";
var k = "";
var pid = "";
var ptnm = "";
var deptengabbr = "";
var rgstno = "";
var sa = "";
var disporddd = "";
var orddd = "";
var drid = "";
var roomcd = "";
var ordtype = "";
var chosflag = "";
var orddeptcd = "";
var signflag = "";
var signno = 0;
var formcd = "";
var formnm = "";
var recdt = "";
for(var i = 1; i <= certnodeList.length; i++)
{
signno = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/signno");
formcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formcd");
formnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formnm");
recdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/recdt");
trans = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/trans");
pid = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/pid");
ptnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ptnm");
deptengabbr = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/deptengabbr");
rgstno = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/rgstno");
sa = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/sa");
disporddd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/disporddd");
orddd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/orddd");
drid = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/drid");
roomcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/roomcd");
ordtype = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ordtype");
chosflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/chosflag");
orddeptcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/orddeptcd");
signflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/signflag");
model.makeValue("/root/prthist[" + i + "]/pid", pid);
model.makeValue("/root/prthist[" + i + "]/signno", signno);
model.makeValue("/root/prthist[" + i + "]/reckind", "01");
model.makeValue("/root/prthist[" + i + "]/readprtflag", "P");
model.makeValue("/root/prthist[" + i + "]/formcd", formcd);
model.makeValue("/root/prthist[" + i + "]/signflag", signflag);
model.makeValue("/root/prthist[" + i + "]/orddd", orddd);
model.makeValue("/root/prthist[" + i + "]/chosflag", chosflag);
model.makeValue("/root/prthist[" + i + "]/refusge", "");
model.makeValue("/root/prthist[" + i + "]/refremark", "");
if(trans == "")
{
trans = "\n" + "
Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù."
//alert("Ãâ·Â¿ë ¼½Ä µðÀÚÀÎÀÌ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.");
//return;
}
else
{
trans = "\n" + trans
}
obj_cvrt.InputPath = "wide://" + trans;
obj_cvrt.SaveFile(foldernm + "/" + signno + "_" + "####.jpg");
pageno = obj_cvrt.TotalPage;
for(var j = 1; j <= pageno; j++)
{
k = ("" + j + "").getLeftPad(4, "0");
emrpath += foldernm + "/" + signno + "_" + k + ".jpg|";
emrorddate += orddd + "|";
emrformnm += formnm + "|";
emrformcd += formcd + "|";
emrdeptnm += deptengabbr + "|";
emrdeptcd += orddeptcd + "|";
emrpage += j+"|";
emrhiddenmsg += formcd + "¢Ë" + signno + "¢Ë" + formnm + "¢Ë" + chosflag + "¢Ë" +pid + "¢Ë" + ptnm + "¢Ë" + deptengabbr
+ "¢Ë" + sa + "¢Ë" + rgstno + "¢Ë" + disporddd + "¢Ë" + drid + "¢Ë" + roomcd + "¢Ë" + disporddd + "¢Ë" + ordtype + "¢Ë" + "E" +"|";
}
}
model.removeNodeset("/root/temp/inisend");
model.resetInstanceNode("/root/imgrec/iemr");
//iviewerIemr.window.javascript.resetInstance_EMR();
//À̹ÌÁö°æ·Î
model.makeValue("/root/temp/inisend/emrpath", emrpath.substring(0, emrpath.length - 1));
iviewerIemr.model.setValue("/root/main/emrpath", model.getValue("/root/temp/inisend/emrpath"));
//Áø·áÀÏ
model.makeValue("/root/temp/inisend/emrorddate", emrorddate.substring(0, emrorddate.length - 1));
iviewerIemr.model.setValue("/root/main/emrorddate", model.getValue("/root/temp/inisend/emrorddate"));
//¼½Ä¸í
model.makeValue("/root/temp/inisend/emrformnm", emrformnm.substring(0, emrformnm.length - 1));
iviewerIemr.model.setValue("/root/main/emrformnm", model.getValue("/root/temp/inisend/emrformnm"));
//¼½ÄÄÚµå
model.makeValue("/root/temp/inisend/emrformcd", emrformcd.substring(0, emrformcd.length - 1));
iviewerIemr.model.setValue("/root/main/emrformcd", model.getValue("/root/temp/inisend/emrformcd"));
//Áø·á°ú
model.makeValue("/root/temp/inisend/emrdeptnm", emrdeptnm.substring(0, emrdeptnm.length - 1));
iviewerIemr.model.setValue("/root/main/emrdeptnm", model.getValue("/root/temp/inisend/emrdeptnm"));
//Áø·á°úÄÚµå
model.makeValue("/root/temp/inisend/emrdeptcd", emrdeptcd.substring(0, emrdeptcd.length - 1));
iviewerIemr.model.setValue("/root/main/emrdeptcd", model.getValue("/root/temp/inisend/emrdeptcd"));
//ÆäÀÌÁö
model.makeValue("/root/temp/inisend/emrpage", emrpage.substring(0, emrpage.length - 1));
iviewerIemr.model.setValue("/root/main/emrpage", model.getValue("/root/temp/inisend/emrpage"));
model.makeValue("/root/temp/inisend/emrhiddenmsg", emrhiddenmsg.substring(0, emrhiddenmsg.length - 1));
iviewerIemr.model.setValue("/root/main/emrhiddenmsg", model.getValue("/root/temp/inisend/emrhiddenmsg"));
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
iviewerIemr.window.javascript.searchChart(iemrNode);
if (iviewerIemr.window.javascript.downloadChart() == true)
{
iviewerIemr.window.javascript.setupChart("ChartView");
}
}
model.toggle("case5");
button16.selected = true;
}
/**
* @desc : Áø·á±â·Ï ¸®½ºÆ® Á¶È¸Á¶°Ç ½ÃÀÛÀÏ, Á¾·áÀÏ ¼ÂÆÃ
* @id :
* @event :
* @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();
}
function fGetUserComnFormCd(srcformcd)
{
selnode = instance1.selectSingleNode("/root/main/tmpformlist/endformlist[srcformcd='"+srcformcd+"' and formuseflag='D' and formdeptcd='"+ getUserInfo("dutplcecd") +"']/formcd");
if (selnode.text == "")
{
selnode = instance1.selectSingleNode("/root/main/tmpformlist/endformlist[srcformcd='"+srcformcd+"' and formuseflag='C']/formcd");
}
return selnode.text;
}
/**
* @desc : ȯÀÚ ¿ø¹« Á¤º¸ ¼ÂÆÃ(°³¹ß ȯ°æÀÌ ·ÎÄÃÀÏ °æ¿ì)
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
//function fTmpInitPamInfo(chosflag)
//{
// // TF viewer·Î ·Îµù½Ã¿¡ ȯÀÚÁ¤º¸ ¼¼ÆÃ
// if (window.document.location != "C:/CMCProject/application/webapps/emr/medirecweb/xrw/" && window.document.location != "D:/CMCProject/application/webapps/emr/medirecweb/xrw/") return;
// if (chosflag == "O")
// {
// model.makeValue("/root/main/paminfo/pid", "17419028");
// model.makeValue("/root/main/paminfo/orddd", "20080303");
// model.makeValue("/root/main/paminfo/cretno", "360043723");
// model.makeValue("/root/main/paminfo/ioflag", "O");
// model.makeValue("/root/main/paminfo/fsexamflag", "R");
// model.makeValue("/root/main/paminfo/orddeptcd", "2060000000");
// model.makeValue("/root/main/paminfo/orddrid", "93015133");
// }
// else if (chosflag == "I")
// {
// model.makeValue("/root/main/paminfo/pid", "16377040");
// model.makeValue("/root/main/paminfo/indd", "20071007");
// model.makeValue("/root/main/paminfo/cretno", "22532");
// model.makeValue("/root/main/paminfo/ioflag", "I");
// model.makeValue("/root/main/paminfo/orddeptcd", "2010000000");
// model.makeValue("/root/main/paminfo/medispclid", "EMR");
// model.makeValue("/root/main/paminfo/atdoctid", "EMR");
// }
// else if (chosflag == "E")
// {
// model.makeValue("/root/main/paminfo/pid", "19862");
// model.makeValue("/root/main/paminfo/indd", "20070808");
// model.makeValue("/root/main/paminfo/cretno", "1");
// /*model.makeValue("/root/main/paminfo/pid", "20143");
// model.makeValue("/root/main/paminfo/indd", "20070816");
// model.makeValue("/root/main/paminfo/cretno", "1");*/
//
// model.makeValue("/root/main/paminfo/ioflag", "E");
// model.makeValue("/root/main/paminfo/orddeptcd", "2280000000");
// model.makeValue("/root/main/paminfo/medispclid", "10301864");
// model.makeValue("/root/main/paminfo/atdoctid", "-");
// }
//
// model.makeValue("/root/temp/initpatinfo/localyn", "Y");
//
// fInitRecPamInfo();
//}
/**
* @desc : ȯÀÚ ¿ø¹« Á¤º¸ ¼ÂÆÃÀü ±â·Ï ÀúÀå¿©ºÎ üũ
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fPrevInitRecPamInfo()
{
if (ivw_loader.src != "" && ivw_loader.ivw_base.src != "")
{
var rtn = "N";
rtn = ivw_loader.window.javascript.fCheckChangeDataForCosign();
if (rtn != "N") //¼öÁ¤µ¥ÀÌÅͰ¡ ÀÖ´Â °æ¿ì
{
var sPid = model.getValue("/root/main/paminfo/pid");
var sPnm = model.getValue("/root/main/paminfo/hngnm");
var rtnmsg = messageBox("±â·Ï³»¿ë Áß ÀúÀåµÇÁö ¾ÊÀº ³»¿ëÀÌ ÀÖ½À´Ï´Ù. " + sPid + " " + sPnm + " ȯÀÚÀÇ ±â·ÏÀ»", "Q002");
setParameter("SSMMR01100_recsavechk", "Y");
if (rtnmsg == 6)
{
var saveRtn = ivw_loader.window.javascript.fClickSave("Y");
if (!saveRtn)
{
return false;
}
else
{
//2010.03.24 ¾ÈÄ¡¿ø - ȯÀÚ¼±Åýà ÀúÀåÈÄ¿¡ ÀúÀå¿Ï·á ¸Þ¼¼Áöâ ¶ßÁö ¾Ê°Ô ¼öÁ¤
//messageBox(sPid + " " + sPnm +" ȯÀÚÀÇ ±â·ÏÀ¸·Î ÀúÀåµÇ¾ú½À´Ï´Ù.", "I", "");
}
}
}
}
//2010.04.26 dhkim - Áø·á´ë»óÀÚ ¼±Åýà ±âÁ¸¿¡ ¿·ÁÀÖ´ø °£È£Á¤º¸Á¶»çÁö ÆË¾÷À» ¸ðµÎ ´ÝÀ½.
fCloseNursrecPop();
return true;
}
/**
* @desc : ȯÀÚ ¿ø¹« Á¤º¸ ¼ÂÆÃ
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fInitRecPamInfo()
{
//ȯÀÚÁ¤º¸ »õ·Î ¹Ù²ð½Ã ±â·Ï ¼öÁ¤À» À§ÇØ ¼ÂÆÃµÇ¾îÀÖ´ø ÆÄ¸®¹ÌÅÍ clear
clearParameter("SSMMR01200_Param_formcd");
clearParameter("SSMMR01200_Param_recseq");
isFstListSrch = "Y";
try
{
// if (model.getValue("/root/temp/initpatinfo/localyn") != "Y")
// {
// var node = getGlobalVariable("paminfo");
//
// model.removeNodeset("/root/main/paminfo");
// setCSVToNode("/root/main", node, "paminfo");
// }
// model.makeValue("/root/temp/initpatinfo/localyn", "N");
var node = getGlobalVariable("paminfo");
model.removeNodeset("/root/main/paminfo");
setCSVToNode("/root/main", node, "paminfo");
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")
{
button24.disabled = true;
model.setValue("/root/send/reqinitinfo/orddd", model.getValue("/root/main/paminfo/orddd"));
}
else
{
button24.disabled = false;
model.setValue("/root/send/reqinitinfo/orddd", model.getValue("/root/main/paminfo/indd"));
}
fFavorRefresh("chosflag");
/*
* Áø·á´ë»óÀÚ¸®½ºÆ®ÀÇ ¿Ü·¡out,ÀÔ¿øin,ÀÀ±Þer,¼ö¼úop,ÀÇ·Úcnst ±¸ºÐ°ª ¼¼ÆÃ
*/
var tabflag = "";
var oprsrvno = "";
var wndobj = getOpenWindow("SMMMO04100");
if (wndobj != null)
{
tabflag = wndobj.javascript.getParameter("SMMMO04100_medirec_caseid");
}
if (tabflag == "op")
{
var operation = getGlobalVariable("operation").split("¢Ì")[1];
if(operation != null && operation != ""){
oprsrvno = operation.split("¢Ë")[0];
}
}
model.makeValue("/root/send/reqinitinfo/tabflag", tabflag);
model.makeValue("/root/send/reqinitinfo/patflag", model.getValue("/root/main/paminfo/autoformcd"));
model.makeValue("/root/send/reqinitinfo/formrecdeptcd", model.getValue("/root/send/reqmedireclist/formrecdeptcd"));
model.makeValue("/root/send/reqinitinfo/oprsrvno", oprsrvno);
ivw_reccnts.window.javascript.fClear();
model.removeNodeset("/root/main/mainlist/medireclist");
/*
* Àǻ纰¹Ìºñ¸®½ºÆ®, CP ÀÎÅÍÆäÀ̽º formcd¹×, formrecseq ¼¼ÆÃ, formrecdd ¼¼ÆÃ
*/
var unprepformcd = getGlobalVariable("linked_formcd", "emr");
var unprepformrecseq = getGlobalVariable("linked_formrecseq", "emr");
var unprepformrecdd = getGlobalVariable("linked_formrecdd", "emr");
// ±Û·Î¹ú ÆÄ¶ó¹ÌÅÍ ÃʱâÈ
setGlobalVariable("linked_formcd", "", "emr") ;
setGlobalVariable("linked_formrecseq", "", "emr") ;
setGlobalVariable("linked_formrecdd", "", "emr") ; // ÃßÈÄ ¼öÁ¤ : ÇØ´ç À§Ä¡¿¡ ¼ÂÆÃ ÈÄ ÃʱâÈ
var cpformcd = getGlobalVariable("linked_cpformcd", "emr");
var cpformrecseq = getGlobalVariable("linked_cpformrecseq", "emr");
var cpformrecdd = getGlobalVariable("linked_cpformrecdd", "emr");
// ±Û·Î¹ú ÆÄ¶ó¹ÌÅÍ ÃʱâÈ
setGlobalVariable("linked_cpformcd", "", "emr") ;
setGlobalVariable("linked_cpformrecseq", "", "emr") ;
setGlobalVariable("linked_cpformrecdd", "", "emr") ; // ÃßÈÄ ¼öÁ¤ : ÇØ´ç À§Ä¡¿¡ ¼ÂÆÃ ÈÄ ÃʱâÈ
if(unprepformcd != "") //¹Ìºñ
{
setParameter("SSMMR01100_cert_Cnfm", "Y"); //¹Ìºñ±â·ÏÀÇ °æ¿ì ÀÎÁõ¼¸¦ Çѹø¸¸ ¶ç¿öÁÖ±â À§ÇÑ param(2008-12-29 : ¹ÚÁ¾ÈÆ Ãß°¡)
if(unprepformrecseq != "")
{
fOpenRecForm(unprepformcd, unprepformrecseq);
fShowMediRecCnt(unprepformrecseq);
}
else
{
ivw_loader.window.javascript.setParameter("SSMMR01100_formrecdd", unprepformrecdd);
fOpenNewForm(unprepformcd);
}
unprepformcd = "";
unprepformrecseq = "";
unprepformrecdd = "";
}
else if(cpformcd != "") //CP
{
if(cpformrecseq != "")
{
fOpenRecForm(cpformcd, cpformrecseq);
}
else
{
ivw_loader.window.javascript.setParameter("SSMMR01100_formrecdd", cpformrecdd);
fOpenNewForm(cpformcd);
}
cpformcd = "";
cpformrecseq = "";
cpformrecdd = "";
}
else
{
/*
* ±âº»¼½Ä Á¶È¸
*/
if (submit("TRMMR00102",false))
{
setParameter("srchmemo","Y");
var isOpenNewForm = false;
if (model.getValue("/root/main/initinfo/lastformrecseq") != "")
{
//KNUH_20110208, ÁÖÈñ°æ, ·Î±×ÀÎ ½Ã ¹Ì¸® µ¥ÀÌÅ͸¦ Á¶È¸ÇØ ³õ°í copyÇØ¼ ¾²´Â ¹æ½ÄÀ¸·Î º¯°æ
//ȯ°æ¼³Á¤¿¡¼ Áø·á±â·Ï¸ÞÀÎÀÇ ¿ÞÂÊÈ¸é µðÆúÆ® ÅÇ ¼³Á¤ °ªÀ» Àоî¿Í ÅǼ³Á¤
var viewerObj = getViewer("sysMessage");
var answvalnm = viewerObj.window.model.getValue(gvOrderBasicInfoPath +"/interface[qestcd='032']/answcnt");
if ( answvalnm == "001" )
{
swt_left.selectedIndex = 0;
button66.selected = true;
fRefMain();
}
else if ( ( model.getValue("/root/main/initinfo/lastformrecseq") > 0 ) )
{
fShowMediRecCnt(model.getValue("/root/main/initinfo/lastformrecseq"));
}
else
{
swt_left.selectedIndex = 0;
button66.selected = true;
fSetIviewVisible(false); // ivew È¸é ¼³Á¤ (Ä¡°ú ¿Ü·¡Áø·áÀÏ °æ¿ì Ä¡°ú±â·Ï »ç¿ë : ÃÖ¿øµ· 20101223 °æºÏ´ë)
}
}
if (model.getValue("/root/main/initinfo/formrecseq") != "")
{
fOpenRecForm(model.getValue("/root/main/initinfo/formcd"), model.getValue("/root/main/initinfo/formrecseq"));
}
else
{
isOpenNewForm = true;
}
if (isOpenNewForm)
{
if (model.getValue("/root/main/initinfo/formcd") == "")
{
ivw_loader.src = "";
ivw_loader.src = "../../../emr/medirecweb/xrw/SSMMR01100_¼½Ä·Î´õ.xrw";
ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));
//messageBox("±âº»¼½ÄÀ» ¾Ë¾Æ ¿À´Âµ¥ ½ÇÆÐÇß½À´Ï´Ù.\n\n¼½Ä¸ñ·ÏÀ̳ª Áñ°Üã±â¿¡¼ ¼½ÄÀ» ¼±ÅÃÇϽñ⠹ٶø´Ï´Ù.", "C", "")
}
else if (model.getValue("/root/main/initinfo/formcd") == "outfstmediform")
{
//messageBox("±âÁ¸ÀÇ ÃÊÁø±â·ÏÁö¿¡ ¼ö±âÀÛ¼ºÇØ ÁֽʽÿÀ.", "E", "");
}
else
{
fOpenNewForm(model.getValue("/root/main/initinfo/formcd"));
}
}
}
}
//2009.10.26 ¾ÈÄ¡¿ø TASK-32482
//¼½Ä¸ñ·Ï¿¡¼ ÀÀ±ÞȯÀÚÀÇ °æ¿ì ÀÔÅð¿ø¿ä¾à±â·ÏÀÌ ¾Èº¸ÀÌ°Ô ÇÑ´Ù.
//ȯÀÚÀÇ ³»¿ø±¸ºÐÀÌ ¹Ù²î¸é ¼½Ä¸ñ·ÏÀ» ¸®·ÎµåÇÑ´Ù.
var curObj = window.javascript.getOpenWindow("SPMMR01000");
var selectedChosFlag = model.getValue("/root/hidden/selectedChosFlag");
var chosFlag = model.getValue("/root/send/reqinitinfo/chosflag");
if (curObj != null && selectedChosFlag != chosFlag) {
model.makeValue("/root/hidden/selectedChosFlag", chosFlag);
//ȯÀÚÀÇ ³»¿ø±¸ºÐÀÌ ¹Ù²î¸é ¼½Ä¸ñ·ÏÀ» ´Ý´Â´Ù.
//curObj.window.javascript.reloadByRecMain();
curObj.window.close();
}
}
catch (e)
{
//alert("fInitRecPamInfo");
throw e;
}
//2009.11.18 ¾ÈÄ¡¿ø - Áø·á´ë»óÀÚ¸®½ºÆ®ÀÇ È¯ÀÚ ¼öÁøÅ°¿Í ºñ±³ÇÑ´Ù.
validPamInfo(model.getValue("/root/main/paminfo/pid")
,model.getValue("/root/main/paminfo/orddd")
,model.getValue("/root/main/paminfo/cretno"), 1);
//½ÃÁ¡ ¹®Á¦·Î loaderÀÇ oncomnformloadcompleteÀ¸·Î È£Ãâ½ÃÁ¡ º¯°æ
//fOpenPrcpMainWnd();
// Ä¡°ú±â·Ï ¹öư ¹× ÃʱâÈ ¼³Á¤ : ÃÖ¿øµ· 20101222 °æºÏ´ë
ivw_denti.src="";
ivw_dentifmla.src="";
btn_tab_denti.visible = ( model.getValue("/root/main/paminfo/ioflag") == "O"
&& model.getValue("/root/init/dentdept/hardcd[hardcd='" + getUserInfo("dutplcecd") + "']/hardcd") != "");
fSetIviewVisible(false);
}
/**
* @desc : ó¹æ ¸ÞÀÎ »õ·Î°íħ
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fOpenPrcpMainWnd()
{
var ordpatlistObj = getOpenWindow("SMMMO04100");
if(ordpatlistObj != null)
{
ordpatlistObj.javascript.fOpenPrcpMainWnd();
}
fReadyFormInitData();//2010.04.13 dhkim ±â·ÏÁ¶È¸ ȯ°æ¼³Á¤³»¿ë »õ·Î°íħ
}
/**
* @desc : CPâ¿¡¼ ±â·ÏÁö È£Ãâ
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fOpenFormByOther(formcd, formrecseq, calledflag, recdd)
{
if (formrecseq != null && formrecseq != "")
{
fOpenRecForm(formcd, formrecseq, calledflag);
}
else
{
ivw_loader.window.javascript.setParameter("SSMMR01100_formrecdd", recdd);
fOpenNewForm(formcd, calledflag);
}
}
function fCheckSaveRec()
{
return false;
}
/**
* @desc : ±â·Ï ¸ñ·Ï Á¶È¸
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
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", "-");
model.makeValue("/root/send/reqmedireclist/mainyn" , model.getValue("/root/temp/btnmainyn") );
model.makeValue("/root/send/reqmedireclist/recformsort" , model.getValue("/root/temp/recformsort") );
model.makeValue("/root/send/reqmedireclist/notprogress" , model.getValue("/root/temp/notprogress") );
submit("TRMMR00101");
var cnt = getNodesetCnt(model, "/root/main/mainlist/visitdept");
if (cnt > 0)
{
var orddd = model.getValue("/root/send/reqmedireclist/orddd");
var cretno = model.getValue("/root/send/reqmedireclist/cretno");
var cnt2 = getNodesetCnt(model, "/root/main/mainlist/medireclist");
if (cnt2 == 0)
{
for (var i = 1; i <= cnt; i++)
{
model.makeValue("/root/main/mainlist/medireclist["+i+"]/formrecdeptcd", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptcd"));
model.makeValue("/root/main/mainlist/medireclist["+i+"]/formrecdeptnm", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptnm"));
model.makeValue("/root/main/mainlist/medireclist["+i+"]/formnminfo", "È£Ãâ°ú ¹ÌÀÛ¼º");
model.makeValue("/root/main/mainlist/medireclist["+i+"]/orddd", orddd);
model.makeValue("/root/main/mainlist/medireclist["+i+"]/cretno", cretno);
}
}
else
{
var cond = "/root/main/mainlist/medireclist[orddd='#orddd#' and cretno='#cretno#' and formrecdeptcd='#deptcd#']";
cond = cond.replace("#orddd#", orddd);
cond = cond.replace("#cretno#", cretno);
var stmt;
for (var i = 1; i <= cnt; i++)
{
stmt = cond.replace("#deptcd#", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptcd"));
nodelist = instance1.selectNodes(stmt);
cnt2 = getNodesetCnt(model, stmt);
if (cnt2 == 0)
{
grd_medireclist.insertRow(1, "above");
model.setValue("/root/main/mainlist/medireclist[1]/formrecdeptcd", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptcd"));
model.setValue("/root/main/mainlist/medireclist[1]/formrecdeptnm", model.getValue("/root/main/mainlist/visitdept["+i+"]/orddeptnm"));
model.setValue("/root/main/mainlist/medireclist[1]/formnminfo", "È£Ãâ°ú ¹ÌÀÛ¼º");
model.setValue("/root/main/mainlist/medireclist[1]/orddd", orddd);
model.setValue("/root/main/mainlist/medireclist[1]/cretno", cretno);
}
}
}
model.refresh();
for (var i = 1; i <= grd_medireclist.rows; i++)
{
if (grd_medireclist.valueMatrix(i, grd_medireclist.colref("orddd")) == orddd &&
grd_medireclist.valueMatrix(i, grd_medireclist.colref("cretno")) == cretno)
grd_medireclist.rowStyle(i, "data", "color") = "blue";
}
}
//2014/03/17 ÀÌÁ¤Åà ÁÖ¼®Ã³¸®
// swt_left.selectedIndex = 0;
//2014/03/17 ÀÌÁ¤Åà ÁÖ¼®Ã³¸®
button66.selected = true;
fSetIviewVisible(false); // ivew È¸é ¼³Á¤ (Ä¡°ú ¿Ü·¡Áø·áÀÏ °æ¿ì Ä¡°ú±â·Ï »ç¿ë : ÃÖ¿øµ· 20101223 °æºÏ´ë)
grd_medireclist.mergeCol(grd_medireclist.colref("formrecdd")) = true;
grd_medireclist.merge();
if (grd_medireclist.rows > 1)
{
grd_medireclist.row = 1;
}
}
/**
* @desc : ±â·Ï »èÁ¦
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fDelete()
{
var formcd = ivw_loader.window.javascript.fGetFormMast("formcd");
if (formcd == "") return;
var ret = ivw_loader.window.javascript.fDelFormRec();
if (ret == null) return;
fOpenNewForm(formcd);
fRefMediRecList();
}
/**
* @desc : ¼½Ä ¿ÀÇÂ
* @id :
* @event :
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fOpenNewForm(formcd, calledflag)
{
ivw_loader.window.javascript.fLoadNewForm(formcd, null, calledflag);
fDefaultBtnClick();// Ä¡°ú±â·Ï ´Ý±â ivew Á¶°Ç ¼³Á¤ (Ä¡°ú ¿Ü·¡Áø·áÀÏ °æ¿ì Ä¡°ú±â·Ï »ç¿ë : ÃÖ¿øµ· 20101222 °æºÏ´ë)
}
/**
* @desc : Áñ°Üã±â ÄÞº¸¿¡¼ÀÇ ¼½Ä ¿ÀÇÂ
* @id :
* @event : xforms-select
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fOpenNewFormByList()
{
var sFormcd = model.getValue("/root/hidden/choinewform");
if(sFormcd == "-"){
fFavorRefresh(); //Áñ°Üã±â refresh
} else {
fOpenNewForm(sFormcd);
model.setValue("/root/hidden/choinewform", "-");
model.refresh();
}
}
/**
* @desc : ±â·ÏµÈ ¼½Ä ¿ÀÇÂ
* @id :
* @event : xforms-select
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fOpenRecForm(formcd, formrecseq, calledflag) {
ivw_loader.window.javascript.setParameter("userdeptcd", getUserInfo("dutplcecd"));
ivw_loader.window.javascript.fLoadRecForm(formrecseq, null, calledflag);
}
/**
* @desc : ±â·Ï ¹Ì¸®º¸±â
* @id :
* @event : xforms-select
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fPreview(node)
{
swt_left.selectedIndex = 1;
button4.selected = true;
ivw_reccnts.window.javascript.fPreviewData(node);
}
/**
* @desc : ÀÔ¿øÈ¯ÀÚ °£È£±â·Ï º¸±â
* @id :
* @event : xforms-select
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fShowNursingCnt()
{
if (model.getValue("/root/main/paminfo/pid") == "")
{
return;
}
var cond = new COMN_CONT_RECCNTS();
var ioflag = model.getValue("/root/main/paminfo/ioflag");
cond.pid = model.getValue("/root/main/paminfo/pid");
if(ioflag == "I" || ioflag == "E"){
cond.indd = model.getValue("/root/main/paminfo/indd");
} else {
cond.orddd = model.getValue("/root/main/paminfo/orddd");
}
cond.cretno = model.getValue("/root/main/paminfo/cretno");
cond.ioflag = ioflag;
cond.fromdd = model.getValue("/root/send/reqmedireclist/recfromdt");
cond.todd = model.getValue("/root/send/reqmedireclist/rectodt");
ivw_ganho.window.javascript.fRefNursingCnts(cond);
}
/**
* @desc : 󹿳»¿ª º¸±â
* @id :
* @event : xforms-select
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fShowOrdCnt()
{
if (model.getValue("/root/main/paminfo/pid") == "")
{
return;
}
//ÀÚ½Äâ(󹿳»¿ª)
var spid = ivw_ord.model.getValue("/root/send/prcp/pid");
var sorddeptcd = ivw_ord.model.getValue("/root/send/prcp/orddeptcd");
var sfromdd = ivw_ord.model.getValue("/root/send/prcp/fromdd");
var stodd = ivw_ord.model.getValue("/root/send/prcp/todd");
//ºÎ¸ðâ(Áø·á±â·Ï¸ÞÀÎ)
var ppid = model.getValue("/root/main/paminfo/pid");
var pformrecdeptcd = model.getValue("/root/send/reqmedireclist/formrecdeptcd")
var pfromdd = model.getValue("/root/send/reqmedireclist/recfromdt").substring(0, 8);
var ptodd = model.getValue("/root/send/reqmedireclist/rectodt").substring(0, 8);
if(spid != ppid || sorddeptcd != pformrecdeptcd || sfromdd != pfromdd || stodd != ptodd)
{
var cond = new COMN_CONT_RECCNTS();
cond.pid = ppid;
cond.formrecdeptcd = pformrecdeptcd;
cond.fromdd = pfromdd;
cond.todd = ptodd;
ivw_ord.window.javascript.fRefOrdCnts(cond);
}
// var ioflag = model.getValue("/root/main/paminfo/ioflag");
// if(ioflag == "I" || ioflag == "E"){
// cond.indd = model.getValue("/root/main/paminfo/indd");
// } else {
// cond.orddd = model.getValue("/root/main/paminfo/orddd");
// }
//
// cond.cretno = model.getValue("/root/main/paminfo/cretno");
// cond.ioflag = ioflag;
}
/**
* @desc : Áñ°Üã±â »õ·Î°íħ
* @id :
* @event : xforms-select
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fFavorRefresh(flag)
{
if (flag == "refresh")
{
var rsltref = "/root/main/formbasesetlist";
var srcref = gvOrderBasicInfoPath + "/formbaseset";
model.removeNodeset(rsltref);
model.makeNode(rsltref);
var viewerObj = getViewer("sysMessage");
var targetNodes = instance1.selectSingleNode(rsltref);
var srcNodes = viewerObj.window.instance1.selectNodes(srcref);
for(i=0; i 0 ) {
return "Y";
} else {
return "N";
}
}
/**
* @desc : ȯÀÚ¸Þ¸ð ÆË¾÷ È£Ãâ
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetPatMemo()
{
var sPid = getPatientInfo("pid");
//knuh 20120104 ÃÖ¿øµ· OCS Áø·á´ë»óÀÚ OCS Á¶È¸ ½Ã ȯÀڸ޸𸦠ÀÚµ¿À¸·Î »ç¶óÁö°Ô ¼³Á¤-ÇÊ¿ä¾ø¾î¼ »èÁ¦. SMMMO04100.js, SPMMR05600.js, MMR00100.js
////»ó´ÜÁ¤º¸ÀÇ pid¿Í instanceÀÇ pid°¡ ´Ù¸£¸é ¶ç¿ìÁö ¾Ê´Â´Ù-lyj(20111107)
//if ( model.getValue("/root/main/paminfo/pid") != sPid )
//{
// alert("»ó´ÜÁ¤º¸¿Í ÀÏÄ¡ÇÏÁö ¾Ê½À´Ï´Ù");
// return;
//}
if (model.getValue("/root/main/paminfo/pid") == model.getValue("/root/send/patmemo/pid")) {
return;
} else {
model.removeNodeset("/root/send/patmemo");
model.makeValue("/root/send/patmemo/pid", model.getValue("/root/main/paminfo/pid"));
model.makeValue("/root/send/patmemo/memo", "pmemosel");
model.makeValue("/root/send/patmemo/ioflag", model.getValue("/root/main/paminfo/ioflag") ); //KNUH_20110208, ÁÖÈñ°æ ¼Óµµ °³¼±À» À§ÇØ TXMMR00101¿¡¼ TRMMR05601 °°ÀÌ Á¶È¸Çϵµ·Ï Ãß°¡
model.makeValue("/root/send/patmemo/deptcd", getUserInfo("dutplcecd") );
//model.makeValue("/root/send/patmemo/delflag", "N");
//20090724 ÇÑÀç»ó Ãß°¡. º¸Çè¸Þ¸ð popup Á¶°Çüũ. (º¸Çè¸Þ¸ð°¡ ÀÖÀ¸¸é ¹«Á¶°Ç ¶ç¿î´Ù.)
// var pammemoyn = fGetPamMemoYN();
if(submit("TXMMR00101")) {
var pammemoyn = model.getValue("/root/send/pmemo/pammemoyn"); //KNUH_20110208, ÁÖÈñ°æ, ¼Óµµ°³¼±À» À§ÇØ TXMMR00101¿¡¼ TRMMR05601µµ ÇÔ²² Á¶È¸
if(model.getValue("/root/send/pmemo/memo") != "" || model.getValue("/root/send/pmemo/nmemo") != "" || pammemoyn == "Y") {
if(model.getValue("/root/send/pmemo/deptmemo") != "") {
btn_memo.value = "¸Þ¸ð¡á¡ß";
} else {
btn_memo.value = "¸Þ¸ð¡á¡Þ";
}
//btn_memo.value = "¸Þ¸ð¡á";
if ( model.getValue("/root/send/pmemo/popupyn") == "Y" // ÀÚµ¿ÆË¾÷ ¿©ºÎ
|| pammemoyn == "Y" // º¸Çè ¸Þ¸ð ¿©ºÎ
|| ( model.getValue("/root/send/pmemo/deptmemo") != "" && model.getValue("/root/envinit/deptmemopopyn/answcnt") == "002") // Ÿ°ú¸Þ¸ð°¡ Á¸ÀçÇϰí Ÿ°ú ¸Þ¸ð ÀÚµ¿ÆË¾÷Àϰæ¿ì
) {
//btn_memo.dispatch("DOMActivate");
setParameter("SPMMR05600_pammemoyn", pammemoyn);
fPopMemo();
} else {
var wndobj = getOpenWindow("SPMMR05600");
if(wndobj != null) {
//â´Ý±â
wndobj.javascript.window.close();
}
}
} else {
if(model.getValue("/root/send/pmemo/deptmemo") != "") {
btn_memo.value = "¸Þ¸ð¡à¡ß";
} else {
btn_memo.value = "¸Þ¸ð¡à¡Þ";
}
//btn_memo.value = "¸Þ¸ð¡à";
model.makeValue("/root/send/pmemo/memo", "");
if(model.getValue("/root/send/pmemo/deptmemo") != "" && model.getValue("/root/envinit/deptmemopopyn/answcnt") == "002" ){ // Ÿ°ú ¸Þ¸ð ÀÚµ¿ ÆË¾÷ ¿©ºÎ 002 ÀÚµ¿ÆË¾÷
setParameter("SPMMR05600_pammemoyn", pammemoyn);
fPopMemo();
} else {
if (model.getValue("/root/send/pmemo/popupyn") != "Y") {
var wndobj = getOpenWindow("SPMMR05600");
if(wndobj != null) {
//â´Ý±â
wndobj.javascript.window.close();
}
}
}
}
}else{
//2010.05.28 ÀÌÁö¿î Ãß°¡ - ¸Þ¸ð ÆË¾÷Á¤º¸ Á¶È¸ ½ÇÆÐ½Ã Timer ¸¦ ÀÌ¿ëÇÏ¿© 10ms ÈÄ¿¡ Àç½Ãµµ Çϵµ·Ï ¼öÁ¤ÇÔ.
model.setValue("/root/send/patmemo/pid", "");
htmlwindow.setTimeout(function(){
fGetPatMemo();
},10);
}
}
}
/**
* @desc : ȯÀÚ¸Þ¸ð ÀúÀå
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fSaveMemo()
{
var memo = model.getValue("/root/send/pmemo/memo");
var nmemo = model.getValue("/root/send/pmemo/nmemo");
model.removeNodeset("/root/send/patmemo");
model.makeValue("/root/send/patmemo/pid", model.getValue("/root/main/paminfo/pid"));
model.makeValue("/root/send/patmemo/memo", memo);
model.makeValue("/root/send/patmemo/nmemo", nmemo);
model.makeValue("/root/send/patmemo/deptcd", getUserInfo("dutplcecd") );
if(submit("TXMMR00101")) {
if(model.getValue("/root/send/pmemo/memo") != "" || model.getValue("/root/main/pmemo/nmemo") != "") {
if(model.getValue("/root/send/pmemo/deptmemo") != "") {
btn_memo.value = "¸Þ¸ð¡á¡ß";
} else {
btn_memo.value = "¸Þ¸ð¡á¡Þ";
}
}
grup_smm.visible = false;
}
}
/**
* @desc : ȯÀÚ¸Þ¸ð ¿ÀÇÂ
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
var curMemoObj = null;
function fPopMemo()
{
curMemoObj = getOpenWindow("SPMMR05600");
if(curMemoObj != null)
{
curMemoObj.javascript.fGetPatMemo();
activateChild("SPMMR05600");
} else{
setParameter("SPMMR05600_ioflag", model.getValue("/root/main/paminfo/ioflag"));
setParameter("SPMMR05600_pid", model.getValue("/root/main/paminfo/pid"));
setParameter("SPMMR05600_deptcd", getUserInfo("dutplcecd")); // ·Î±×ÀÎÇÑ °ú·Î Á¶È¸
setParameter("SPMMR05600_deptnm", getUserInfo("dutplcenm")); // ·Î±×ÀÎÇÑ °ú¸í·Î Á¶È¸
setParameter("SPMMR05600_hngnm", model.getValue("/root/main/paminfo/hngnm"));
var offsetX = event.screenX - event.clientX;
offsetX = parseInt(btn_memo.attribute("left")) + offsetX;
var offsetY = event.screenY - event.clientY;
offsetY = parseInt(btn_memo.attribute("top")) + offsetY + 120;
open("SPMMR05600", 1, offsetX, offsetY, "", "", "");
}
}
/**
* @desc : ÄÚ»çÀÎ °ü¸®È¸é ÆË¾÷ È£Ãâ
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fSetCoSign()
{
var coFormrecseq = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("formrecseq"));
var coRecDd = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("formrecdd"));
var coRecHm = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("formrechm"));
var coUserDeptCd = getUserInfo("dutplcecd");
setParameter("SPMRI02200_formrecseq", coFormrecseq);
setParameter("SPMRI02200_recdt", coRecDd + coRecHm);
setParameter("SPMRI02200_recdeptcd", coUserDeptCd);
modal("SPMRI02200");
}
/*******************************************************************************************************
Æ©´× ÀÛ¾÷
*******************************************************************************************************/
function fSelectNewForm()
{
var sCode = model.getValue("/root/hidden/formcd");
var sTmp = "";
var iTmp = 0;
// formÄÚµå ÀԷ½à ÀÚ¸´¼ö ä¿öÁØ´Ù
if(sCode.indexOf("/")!= "-1"){
sCode = sCode.substr(1,sCode.length);
var iCodeLength = sCode.length;
if(iCodeLength ==0){
return false;
}
var temp = 10 - iCodeLength
for(var i = 1; i <= temp; i++){
sTmp += "0";
}
sTmp = sTmp + sCode;
setParameter("codeflag","Y");
setParameter("formcd",sTmp);
}else{
// formÄÚµå ¾Æ´Ò¶§
setParameter("formcd",sCode);
}
//¼½Ä¼±Åà ÆË¾÷
modal("SPMRF03600", 1,10, 10, "SPMRF03600", "/root/send", "/root/temp/condition/getdata");
model.setValue("/root/hidden/formcd", "");
ipt_tmp.refresh();
ivw_loader.window.javascript.fLoadNewForm(getParameter("formcd"));
fDefaultBtnClick();// Ä¡°ú±â·Ï ´Ý±â ivew Á¶°Ç ¼³Á¤ (Ä¡°ú ¿Ü·¡Áø·áÀÏ °æ¿ì Ä¡°ú±â·Ï »ç¿ë : ÃÖ¿øµ· 20101222 °æºÏ´ë)
}
/**
* @desc : ±â·Ïºí¶óÀεå 󸮿¡ µû¸¥
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fRecMainReady()
{
try {
var ordPatObj = getOpenWindow("SMMMO04100");
if (ordPatObj != null)
{
var answcnt = ordPatObj.javascript.getParameter("SMMMO04100_ANSWCNT");
if (answcnt =="002" || answcnt =="003")
{
fBtnInitReady();
}
else
{
var fstload = model.getValue("/root/init/fstload");
if (fstload == "Y")
{
model.setValue("/root/init/fstload", "N");
fReadyForm();
}
else
{
fInitRecPamInfo();
}
grp_tle.attribute("visibility") = "visible";
grp_base.attribute("visibility") = "visible";
btn_blind.attribute("visibility") = "hidden";
}
}
else
{
grp_tle.attribute("visibility") = "visible";
grp_base.attribute("visibility") = "visible";
btn_blind.attribute("visibility") = "hidden";
fReadyForm();
}
// Áø·á±â·Ï °íµµÈ ¹öư »ç¿ë ÀÏÀÚ HARDCODE µî·ÏÇØ¼ °ü¸® 2013.09.27 CYW
/*
debugger;
mmbfGetHardCodeInfo ("/root/send/reqdata", "/root/temp/emrrecbtn", 5592 );
if(model.getValue( "/root/temp/emrrecbtn/hardcd/hardcdnm") <= getCurrentDate() ){
grp_btnsetting.attribute("visibility") = "visible";
}else{
grp_btnsetting.attribute("visibility") = "hidden";
}
*/
/*
2009.10.12 ¾ÈÄ¡¿ø TASK-36554
ÅëÁõ°ü¸® ¹öưÃß°¡
*/
//KNUH_20110209, ÁÖÈñ°æ, Áø·á¼Óµµ °³¼± À§ÇØ ·Î±×ÀÎ ½Ã Á¶È¸ ÇØ³õÀº µ¥ÀÌÅÍ Ä«ÇÇ
fGetHardCDList("N", "132", 0, "/root/main/hardcdlist");
//KNUH, ÀÀ±Þ½Ç¿¡¼ ¼Ò¾ÆÃ»¼Ò³â°ú Àǻ簡 ó¹æ ÀúÀå ½Ã ÀÎÁõ¼°¡ ÃÖÃÊ 1ȸ¸¸ ¶ßµµ·Ï (2011.03.21 JJE)
fGetHardCDList("N", "282", 0, "/root/main/hardcdlist_282");
var cnt = getNodesetCnt(model, "/root/main/hardcdlist/hardcd[hardcd='"+getUserInfo("dutplcecd")+"']");
//alert("132 new cnt:"+cnt+ ": getUserInfo(dutplcecd):"+getUserInfo("dutplcecd"));
if (cnt > 0) {
var tmp_left = btn_tong.attribute("left");
btn_tong.attribute("left") = btn_nurrec.attribute("left");
btn_nurrec.attribute("left") = tmp_left;
btn_tong.attribute("visibility") = "visible";
}
////////////////
/* KNUH_20110208, ÁÖÈñ°æ ÁÖ¼®Ã³¸®
model.makeValue("/root/send/reqhardcd/hardcdno", "132");
model.makeValue("/root/send/reqhardcd/dutplcecd", getUserInfo("dutplcecd"));
if (submit("TRMRF03104")) {
var cnt = getNodesetCnt(model, "/root/main/hardcdlist[trgtcd='"+getUserInfo("dutplcecd")+"']");
// alert("/root/main/hardcdlist[trgtcd='"+getUserInfo("dutplcecd")+"'] " + cnt);
if (cnt > 0) {
var tmp_left = btn_tong.attribute("left");
btn_tong.attribute("left") = btn_nurrec.attribute("left");
btn_nurrec.attribute("left") = tmp_left;
btn_tong.attribute("visibility") = "visible";
}
}*///////////////////
//2010.04.13 dhkim - Á¶È¸±â°£ ¼³Á¤ ÃʱâÈ
fReadyFormInitData();
// KNUH_20110104_ÃÖ¿øµ·_Ä¡°úÀÏ °æ¿ì Ä¡°ú±â·ÏÀÌ Default Setting
if (btn_tab_denti.visible)
{
btn_tab_denti.selected = true;
btn_tab_denti.dispatch("onclick");
}
} catch (e) {
//2009.11.18 ¾ÈÄ¡¿ø - ¿¡·¯¹ß»ý½Ã ±â·Ï¸ÞÀÎÀ» disable ÇÑ´Ù.
// sendSystemMail_MMR071(gMMR_INVALID_PATINFO_MMR071, null);
// disabledRecMain_MMR001(true, fGetErrMsg(1,""), null);
}
//20111031 ´ëÀå¾Ï°ü·Ã
/*
model.makeNode("/root/main/colorectal/count");
model.makeValue("/root/send/colorectal/pid", model.getValue("/root/main/paminfo/pid"));
model.makeValue("/root/send/colorectal/recflag", "4");
submit("TRMMR08102");
if(model.getValue("/root/main/colorectal/count")>=1){
btn_colorectal.disabled="true";
}else{
btn_colorectal.disabled="false";
}
model.removeNode("/root/main/colorectal/count");
model.removeNode("/root/send/colorectal");
*/
//20111031
//20111115 °£¾Ï°ü·Ã
model.makeNode("/root/main/liver/count");
model.makeValue("/root/send/liver/pid", model.getValue("/root/main/paminfo/pid"));
model.makeValue("/root/send/liver/recflag", "3");
submit("TRMMR08102");
if(model.getValue("/root/main/liver/count")>=1){
btn_liver.disabled="true";
}else{
btn_liver.disabled="false";
}
model.removeNode("/root/main/liver/count");
model.removeNode("/root/send/liver");
//20111115
//20150401 ÀÌÀ±ÁÖ °³¹ß
fNSTMan();
}
function fNSTMan() {
var pid = model.getValue("/root/main/paminfo/pid");
var orddd = model.getValue("/root/main/paminfo/indd");
var cretno = model.getValue("/root/main/paminfo/cretno");
fChkPatNSTConsult(pid, orddd, cretno); // NST ¿µ¾çÀÇ·Ú ¿äû ȯÀÚ ÀÇ·Ú¼ ÆË¾÷ 2015.04.01 ÀÌÀ±ÁÖ
var sNstConsult = model.getValue("/root/recv/selcheck/nstconsult");
if (sNstConsult =="Y") {
if( "6" == messageBox("NRS 2002¿¡ ÀÇÇÑ ¿µ¾çÆò°¡ °á°ú ¿µ¾çºÒ·® °íÀ§Ç豺 ȯÀÚ\n\n¶Ç´Â ¿µ¾ç°Ë»ö °á°ú Nutrtion Risk°¡ ³ôÀº ȯÀÚ ÀÔ´Ï´Ù.\n\nNST Consult ÇϽðڽÀ´Ï±î? ¹®ÀÇ(º»¿ø:5206, Ä¥°î:2594)\n\n\n¡Ø NSTÀÇ·Ú´ë»ó - ¾Æ·¡ Ç׸ñÀÇ 1°³ ÀÌ»ó¿¡ ÇØ´çÇÏ´Â °æ¿ì\n\n1.Ç÷Áß ¾ËºÎ¹Î ¡Â 3.0 g/dl ÀÎ °æ¿ì\n\n2.°æÀ念¾çÀ» ¹Þ°í ÀÖ´Â °æ¿ì\n\n3.Á¤¸Æ¿µ¾çÀ» ¹Þ°í ÀÖ´Â °æ¿ì\n\n4.ÁßȯÀڽǿ¡¼ ÁýÁßÄ¡·á ÁßÀÎ °æ¿ì\n\n5.Áø·á´ã´çÀÇ»çÀÇ ÀÇÇÐÀû ¼Ò°ß¿¡ µû¶ó ÁýÁß¿µ¾çÄ¡·á°¡ ÇÊ¿äÇÏ¿© ÀÇ·ÚµÈ °æ¿ì\n\n6.¼ºÀå°î¼± üÁß ±âÁØ 5percentile¹Ì¸¸ÀÇ °æ¿ì(¼Ò¾Æ¸¸ ÇØ´ç)", "Q999")) {
var formcd = "0000000770";
var deptcd = "3250100000";
var deptnm = "¿µ¾çÆÄÆ®";
var cnstflag = "3";
var orddd = getCurrentDate();
setParameter("SMMMR05000_nonstopyn", "Y");
setParameter("SMMMR05000_formcd", formcd);
setParameter("SMMMR05000_deptcd", deptcd);
setParameter("SMMMR05000_deptnm", deptnm);
setParameter("SMMMR05000_cnstflag", cnstflag);
setParameter("SMMMR05000_orddd", orddd);
setParameter("SMMMR05000_cnstioflag", "I");
modal("SMMMR05000");
return;
}
}
}
function fChkPatNSTConsult(pid, orddd, cretno){
model.removeNodeset("root/send/reqdata");
model.makeValue("/root/send/reqdata/pid" , pid);
model.makeValue("/root/send/reqdata/orddd" , orddd);
model.makeValue("/root/send/reqdata/cretno" , cretno);
submit("TRMMO04310",false);
}
/**
* @desc : ±â·Ï¸ÞÀÎ ·Îµå
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fLoadRecMain()
{
var fstload = model.getValue("/root/init/fstload");
if (fstload == "Y")
{
model.setValue("/root/init/fstload", "N");
fReadyForm();
}
else
{
fInitRecPamInfo();
}
grp_tle.attribute("visibility") = "visible";
grp_base.attribute("visibility") = "visible";
btn_blind.attribute("visibility") = "hidden";
}
/**
* @desc : ¹öư Ȱ¼ºÈÀÇ °æ¿ì ó¸®
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fBtnInitReady()
{
btn_blind.attribute("visibility") = "visible";
grp_tle.attribute("visibility") = "hidden";
grp_base.attribute("visibility") = "hidden";
}
/**
* @desc : ¸ÞÀÎÈ¸é ·Îµù
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fReadyForm()
{
ivw_loader.attribute("top") = 30;
ivw_loader.attribute("height") = 740;
ivw_loader.src = "../../../emr/medirecweb/xrw/SSMMR01100_¼½Ä·Î´õ.xrw";
//¿Ü·¡ ÀçÁøÀΰæ¿ì¸¸ Load
//ivw_patsmm.src = "../../../emr/medirecweb/xrw/SSMMR04800_Áø·á¿ä¾à±â·Ï.xrw";
ivw_loader.window.javascript.gMediRecMain = true;
ivw_loader.window.javascript.gIsCashedFormDegn = true;
//ivw_patsmm.window.javascript.fResizeGrup("1", parseInt(ivw_patsmm.attribute("height")), parseInt(ivw_patsmm.attribute("width")));
//ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")), null, true); //Ãâ·Â¹öư
ivw_loader.window.javascript.fInitPage(true, true, parseInt(ivw_loader.attribute("height")));
ivw_loader.window.javascript.afterSaveExeFuncNm = "fRefMediRecList";
// ivew ¼³Á¤À» À§Çؼ Ä¡°ú ÇϵåÄڵ带 °¡Á®¿Â´Ù. (Ä¡°ú ¿Ü·¡Áø·áÀÏ °æ¿ì Ä¡°ú±â·Ï »ç¿ë : ÃÖ¿øµ· 20101222 °æºÏ´ë)
fGethardcdArrayList(new Array(
"dentdept|242"
),
new Array(
"/root/init"
)
);
grd_medireclist.mergecol(grd_medireclist.colref("formrecdd")) = true;
fReadyFormInitData();
//2010.04.12 dhkim Á¶È¸±â°£ µðÆúÆ® ȯ°æ¼³Á¤°ªÀ¸·Î º¯°æ(fReadyFormInitData¾È)
//model.setValue("/root/init/reqmedireclist/diffdt", 12); //°Ë»ö µðÆúÆ® 12°³¿ù
fAddDateReq("today");
var defltdeptcd = getUserInfo("dutplcecd");
if (defltdeptcd == "2280000000")
{
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();
fInitRecPamInfo();
/*20090309 »ç¿ëÇÏÁö ¾Ê´Â ȸé(jonghun)
//Áø·á±â·Ï¸ÞÀΠȣÃâÇÏ´Â Popup Close (snoweye, 2008.08.13)
var scrnwnd = getOpenWindow("SPMMB08500");
if(scrnwnd != null){
scrnwnd.javascript.fEMRClose();
}
*/
/*var nodeList = model.instances(0).selectNodes("/root/main/mainlist/medireclist");
if (nodeList.length > 0)
{
fShowMediRecCnt(grd_medireclist.valueMatrix(1, grd_medireclist.colref("formrecseq")));
}*/
}
/**
* @desc : ±â·Ï¼öÁ¤
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fModifyForm() {
if (swt_left.selectedIndex == 0){
var cnfmyn = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("cnfmyn"));
var formcd = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("formcd"));
var formrecseq = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("formrecseq"));
var type = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colRef("type"));
if (grd_medireclist.row > 0) {
if (type == "A") {
messageBox("Áø·á±â·Ï ȸ鿡¼ ¼öÁ¤ÇÒ ¼ö ¾ø´Â ¼½ÄÀÔ´Ï´Ù", "I999");
return;
}
if (cnfmyn == "Y") {
fOpenRecForm(formcd, formrecseq);
} else {
messageBox("OCS¿¡¼ ÀÛ¼ºÇÑ ±â·ÏÀº ¼öÁ¤ÇÒ ¼ö ¾ø½À´Ï´Ù.", "I008");
return;
}
}
} else if (swt_left.selectedIndex == 1) {
var formcd = getParameter("SSMMR01200_Param_formcd");
var formrecseq = getParameter("SSMMR01200_Param_recseq");
var cnfmyn = getParameter("SSMMR01200_Param_cnfmyn");
clearParameter("SSMMR01200_Param_formcd");
clearParameter("SSMMR01200_Param_recseq");
clearParameter("SSMMR01200_Param_cnfmyn");
if(formrecseq != "") {
if (cnfmyn == "Y") {
fOpenRecForm(formcd, formrecseq);
} else {
messageBox("OCS¿¡¼ ÀÛ¼ºÇÑ ±â·ÏÀº ¼öÁ¤ÇÒ ¼ö ¾ø½À´Ï´Ù.", "I008");
return;
}
}
}
}
/**
* @desc : ÀÎÁõµ¥ÀÌÅÍ »ý¼º
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fMakeSignData(signrecinfo, chosflag, sUserID)
{
var certcnfmyn = getParameter("SSMMR01100_cert_Cnfm"); //¹Ìºñ±â·ÏÀÇ °æ¿ì ÀÎÁõ¼¸¦ Çѹø¸¸ ¶ç¿öÁÖ±â À§ÇÑ param(2008-12-29 : ¹ÚÁ¾ÈÆ Ãß°¡)
clearParameter("SSMMR01100_cert_Cnfm");
//KNUH, ÀÀ±Þ½Ç¿¡¼ ¼Ò¾ÆÃ»¼Ò³â°ú Àǻ簡 ó¹æ ÀúÀå ½Ã ÀÎÁõ¼°¡ ÃÖÃÊ 1ȸ¸¸ ¶ßµµ·Ï (2011.03.21 JJE)
var userDeptCd = getUserInfo("dutplcecd");
if( chosflag == "E" && instance1.selectSingleNode("/root/main/hardcdlist_282/hardcd[hardcd='"+ userDeptCd +"']") != null ){
certcnfmyn = "Y";
}
// ÀÔ¿ø ¶Ç´Â ÀÀ±ÞÀÏ °æ¿ì // 20111201 knuh ÃÖ¿øµ·
// ±â·Ï/ó¹æ Á÷Àü ÀÎÁõÀúÀåÀÌ Á¤ÇØÁø ½Ã°£(ºÐ ´ÜÀ§, ÇϵåÄÚµå 401) À̳»À̸é ÀÎÁõ¼¸¦ ¶ç¿ìÁö ¾ÊÀ½(1/1)
// SMMMO00100.js, MMR01300.js, MMR00100.js, SPMRF05200.js
// ¶ç¿ìÁö ¾Ê´Â ·ÎÁ÷
var ls_emrinptsavetime = fGetHardCDList("Y", 401, 3);
var ll_emrinptsavetime = ls_emrinptsavetime == "" ? 0 : parseInt(ls_emrinptsavetime) * -1;
if ( ( chosflag == "I"
|| chosflag == "E")
&& ll_emrinptsavetime < 0
&& getGlobalVariable("emrinptsavetime") >= getCurrentDateTime().toDate("YYYYMMDD hhmmss").getAddDate(ll_emrinptsavetime, "m").getDateFormat("YYYYMMDD hhmmss"))
{
certcnfmyn = "Y";
}
if (chosflag == "O" || certcnfmyn == "Y")
{
// KNUH_20100820_¹Ú¼ºÈ£_start ÀÎÁõ¼ ¾È³ª¿À°Ô ¼öÁ¤
var signedrecinfo = zesfSignData(signrecinfo, sUserID, false); //¿Ü·¡È¯ÀÚÀϰæ¿ì Çѹø¸¸ ÀÎÁõ¼ ¶ç¿ò
//var signedrecinfo = "-"; //¿Ü·¡È¯ÀÚÀϰæ¿ì Çѹø¸¸ ÀÎÁõ¼ ¶ç¿ò
// KNUH_20100820_¹Ú¼ºÈ£_end
}
else
{
// KNUH_20100820_¹Ú¼ºÈ£_start ÀÎÁõ¼ ¾È³ª¿À°Ô ¼öÁ¤
var signedrecinfo = zesfSignData(signrecinfo, sUserID, true);
//var signedrecinfo = "-"; //¿Ü·¡È¯ÀÚÀϰæ¿ì Çѹø¸¸ ÀÎÁõ¼ ¶ç¿ò
// KNUH_20100820_¹Ú¼ºÈ£_end
}
return signedrecinfo
}
/* @group : Æú´õ Á¸Àç¿©ºÎ ÆÄ¾Ç
* @ver : 2007.01.06
* @by : ¹ÚÁ¾ÈÆ
* @-----------------------------------
* @type : function
* @access : public
* @desc :
*/
function fExistFolder(foldernm)
{
var fso, folder, s;
fso = new ActiveXObject("Scripting.FileSystemObject");
try
{
folder = fso.GetFolder(foldernm);
s = folder.DateCreated;
if (s != "")
{
fDelFolder(foldernm);
fMakeFolder(foldernm);
}
}
catch (e)
{
fMakeFolder(foldernm);
}
}
/* @group : Æú´õ »ý¼º
* @ver : 2007.01.06
* @by : ¹ÚÁ¾ÈÆ
* @-----------------------------------
* @type : function
* @access : public
* @desc :
*/
function fMakeFolder(foldernm)
{
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = fso.CreateFolder(foldernm);
}
/* @group : Æú´õ »èÁ¦
* @ver : 2007.01.06
* @by : ¹ÚÁ¾ÈÆ
* @-----------------------------------
* @type : function
* @access : public
* @desc :
*/
function fDelFolder(foldernm)
{
var fso;
fso = new ActiveXObject("Scripting.FileSystemObject");
fso.DeleteFolder(foldernm);
}
/* @group : µðÀÚÀκ¸±â¹öư Ŭ¸¯
* @ver : 2007.01.06
* @by : ¹ÚÁ¾ÈÆ
* @-----------------------------------
* @type : function
* @access : public
* @desc :
*/
function fBtnViewDegn()
{
model.toggle("case5");
}
/*
* ±â·Ï¸ÞÀÎÀ» disable ÇÑ´Ù.
*/
function disabledRecMain_MMR001(disable, errMsg, lockMode) {
/*btn_err.visible = disable;
ivw_patsmm.visible = !disable;
ivw_loader.visible = !disable;
if (lockMode == 2) {
errMsg += "\n\n¢Ñ Ŭ¸¯Çϸé ÇØÁ¦µË´Ï´Ù."
}
if (disable) {
model.toggle("case2");
btn_err.text = isNull(errMsg) ? "ERROR - ±â·ÏâÀÌ Á¦Çѵ˴ϴÙ." : errMsg;
} else {
btn_err.text = "ERROR - ±â·ÏâÀÌ Á¦Çѵ˴ϴÙ.";
}
if (lockMode == null || lockMode > 2) {
lockMode = 1;
}
if (lockMode == 1) {
btn_err.disabled = true;
} else {
btn_err.disabled = false;
}
// alert("visible::"+btn_err.visible);
btn_err.refresh();
*/
}
/*
* Áø·á´ë»óÀÚ¸®½ºÆ®ÀÇ È¯ÀÚ ¼öÁøÅ°¿Í ºñ±³ÇÑ´Ù.
*/
function validPamInfo(pPid, pOrddd, pCretno, lockMode)
{
return true;
/*var flag = false;
var patListViewer = getOpenWindow("SMMMO04100");
if (patListViewer == null) {
flag = fCheckPamInfo_MMR001(getPatientInfo("pid"), null, null, model.getValue("/root/main/paminfo/pid"), null, null, lockMode);
} else {
flag = fCheckPamInfo_MMR001(patListViewer.window.javascript.getParameter("SMMMR00100_PATINFO_PID")
,patListViewer.window.javascript.getParameter("SMMMR00100_PATINFO_ORDDD")
,patListViewer.window.javascript.getParameter("SMMMR00100_PATINFO_CRETNO")
,pPid
,pOrddd
,pCretno, lockMode);
}
return flag;
*/
}
function fGetErrMsg(flag, addMsg)
{
if (flag == null) {
flag = 0;
}
if (addMsg == null) {
addMsg = "";
}
var errMsg = "";
if (flag == 0) {
errMsg = "ERROR - ±â·ÏâÀÌ Á¦Çѵ˴ϴÙ.";
} else if (flag == 1) {
errMsg = "["+gMMR_INVALID_PATINFO_MMR071+"]\n\n";
errMsg += "Áø·á´ë»óÀÚ Á¤º¸¸¦ ¼³Á¤ÇÏ´ø Áß ¿¹±âÄ¡ ¸øÇÑ ¿¡·¯°¡ ¹ß»ýÇß½À´Ï´Ù.\n";
errMsg += "Áø·á´ë»óÀÚ¸¦ ´Ù½Ã ¼±ÅÃ ÇØ Áֽñ⠹ٶø´Ï´Ù.\n\n";
errMsg += "°°Àº Çö»óÀÌ ¹Ýº¹µÈ´Ù¸é Á¤º¸Áö¿øÆÀÀ¸·Î ¹®ÀÇ ÇØ Áֽñ⠹ٶø´Ï´Ù.\n";
}
errMsg += addMsg;
return errMsg;
}
/*
* 2009.11.18 ¾ÈÄ¡¿ø - »ó´ÜȯÀÚÁ¤º¸¿Í GlobalÁ¤º¸°¡ Ʋ¸®¸é ±â·Ï¸ÞÀÎÀ» disable ÇÑ´Ù.
* ÀÏ´Ü, pid ·Î¸¸ °Ë»çÇÑ´Ù.
*/
function fCheckPamInfo_MMR001(pPid, pOrddd, pCretno, gPid, gOrddd, gCretno, lockMode)
{
return true;
/* var params = pPid +",";
params += pOrddd +",";
params += pCretno +".\n";
params += gPid +",";
params += gOrddd +",";
params += gCretno +".";
if (isNull(pPid) || isNull(pPid)) {
disabledRecMain_MMR001(true, fGetErrMsg(1, params), lockMode);
return false;
}
var flag = true;
if (pPid != gPid) {
flag = false;
} //else if (pOrddd != gOrddd) {
// flag = false;
// } else if (pCretno != gCretno) {
// flag = false;
// }
// alert("falg::"+flag);
if (flag) {
disabledRecMain_MMR001(false, null, lockMode);
} else {
disabledRecMain_MMR001(true, fGetErrMsg(1, params), lockMode);
sendSystemMail_MMR071(gMMR_INVALID_PATINFO_MMR071, null);
}
return flag;
*/
}
function fSetUnLockScreen()
{
disabledRecMain_MMR001(false, null, null);
btn_err.visible = false;
}
/* @group : ±â·Ï¸ñ·Ï¿¡¼ ¿ìŬ¸¯ ¸Þ´º¿¡¼ [°°Àº ¼½Ä¸ð¾Æº¸±â] Ŭ¸¯ ½Ã
* @ver : 2010.01.04
* @by : ÁÖÈñ°æ
* @-----------------------------------
* @type : function
* @access : public
* @desc : ±â·Ï¸ñ·Ï¿¡¼ ¿ìŬ¸¯ ÈÄ °°Àº ¼½Ä¸ð¾Æº¸±â Ŭ¸¯ ½Ã °°Àº ¼½Ä¸¸ ¸ð¾Æ ±â·Ï³»¿ë Á¶È¸ Çϵµ·Ï ÇÔ¼ö Ãß°¡
*/
function fGetMediRecCnt()
{
var srcformcd = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("srcformcd"));
var type = grd_medireclist.valueMatrix(grd_medireclist.row, grd_medireclist.colref("type"));
if ( type == "A") {
messageBox("°°Àº¼½Ä ¸ð¾Æº¸±â ±â´ÉÀº Á¦°øµÇÁö ¾Ê½À´Ï´Ù","I999");
return;
}
//formcd°¡ µ¿ÀÏÇÑ ¼½Ä ±×·ìÀÇ formrecseq ÃßÃâ
var seqlist = instance1.selectNodes("/root/main/mainlist/medireclist[srcformcd='"+srcformcd+"']/formrecseq");
var arrFormrecseq = new Array();
for (i=0; i ÀÔÅð¿ø¿ä¾à±â·Ï
var findtext = formnminfo[0];
var findrowInfo = "";
//¸®½ºÆ®¿¡¼ ¼½Ä¸íÀÌ °°Àº ¼½Ä ÃßÃâ (±×¸®µå¸®½ºÆ®ÀÇ ¼½Ä¸í °Ë»ö)
for(i=1; i i )
i = row;
if ( row != -1 )
{
var formrecseq = grd_medireclist.valueMatrix(row, grd_medireclist.colref("formrecseq"));
findrowInfo = findrowInfo + formrecseq + "||";
}
}
//////////////
var arrFormrecseq = findrowInfo.split("||");
*/
}
/* @group : ±â·Ï¸ñ·Ï¿¡¼ ¿ìŬ¸¯ ¸Þ´º¿¡¼ [¼±Åøñ·ÏÁ¶È¸] Ŭ¸¯ ½Ã
* @ver : 2014.05.30
* @by : ÀÌÀ±ÁÖ
* @-----------------------------------
* @type : function
* @access : public
* @desc : ±â·Ï¸ñ·Ï¿¡¼ ¿ìŬ¸¯ ÈÄ °°Àº ¼±Åøñ·ÏÁ¶È¸ Ŭ¸¯ ½Ã ±â·Ï³»¿ë Á¶È¸ Çϵµ·Ï ÇÔ¼ö Ãß°¡
*/
function fGetSelectedRecCnt()
{
var rows = grd_medireclist.rows;
var arrFormrecseq = new Array();
var j = 0;
for (i=1; i <= rows; i++)
{
if (grd_medireclist.isSelected(i)) {
arrFormrecseq[j] = model.getValue("/root/main/mainlist/medireclist['"+i+"']/formrecseq");
j++;
}
}
fShowMediRecCnt(arrFormrecseq);
}
/* @group : °£È£Á¤º¸Á¶»çÁö ¸µÅ©
* @ver : 2010.04.19
* @by : dhkim
* @-----------------------------------
* @type : function
* @access : public
* @desc : °£È£Á¤º¸Á¶»çÁö ¸µÅ©
*/
function fOpenNursCareRecInfo(){
var path = "/root/main/enrcarecomrecinfo";
var param = "pid¢Ëorddd¢Ëcretno¢Ëordtype¢Ì";
var pid = model.getValue("/root/main/paminfo/pid");
var orddd = model.getValue("/root/main/paminfo/orddd");
var indd = model.getValue("/root/main/paminfo/indd");
var cretno = model.getValue("/root/main/paminfo/cretno");
var ordtype = model.getValue("/root/main/paminfo/ioflag");
if(ordtype == "I" || ordtype == "E" || ordtype == "D"){
orddd = indd;
}
//param setting
param += pid + "¢Ë" + orddd + "¢Ë" + cretno + "¢Ë" + ordtype + "¢Ì";
//instance node»ý¼º
model.removenode(path);
model.makeNode(path);
model.refresh();
//CareCom.js È£Ãâ
fEnrCareComRecInfo_SPMNZ002(param, path);
}
/**
* @desc : ¿·ÁÀִ ȸéÀ» ´Ý¾ÆÁØ´Ù.
* @ver : 2010.04.26 dhkim
*
*/
function fCloseNursrecPop(){
//2010.04.26 dhkim - °£È£Á¤º¸Á¶»ç ÆË¾÷À» ¿±â Àü¿¡ ±âÁ¸¿¡ ¿·ÁÀÖ´ø âÀ» ¸ðµÎ ´Ý´Â´Ù.
/*
* ¿¹)
*
*
* ȸéAID;ȸéBID;....
*
*
*/
var opennurscarereclist = model.getValue("/root/hidden/opennurscarereclist");
if(opennurscarereclist.length > 0){
var opennurscarerecArr = opennurscarereclist.split(";");
var wndobj;
for(var i = 0 ; i < opennurscarerecArr.length-1 ; i++){
wndobj = getOpenWindow(opennurscarerecArr[i]);
if(wndobj != null){
wndobj.javascript.window.close();//±âÁ¸¿¡ ¿·ÁÀÖ´ø â´Ý±â
}
}
//ÀνºÅϽº ÃʱâÈ
model.removenode("/root/hidden/opennurscarereclist");
}
}
/**
* @desc : ±â°üÄÚµåÁ¶È¸(°£È£°øÅëÅ×ÀÌºí¿¡¼Á¶È¸)
* @ver : 2010.04.26 dhkim Ãß°¡
*/
function fGetNursHardCdInfo_MMR00100(pCode, pDate){
if ( pCode = "'077'" ) //KNUH_20110211, ÁÖÈñ°æ, Áø·á¼Óµµ°³¼±, '077'ÀÏ °æ¿ì¿¡¸¸ ·Î±×ÀÎ ½Ã Á¶È¸ÇسõÀº µ¥ÀÌÅ͸¦ copy
{
var targetNode = "/root/code_mmr00100/codeinfo";
model.removeNodeset("/root/code_mmr00100");
model.makeNode(targetNode);
var viewerObj = getViewer("sysMessage");
var srcNodes = viewerObj.window.instance1.selectNodes(gvOrderBasicInfoPath + "/codelist");
var targetNodes = instance1.selectSingleNode(targetNode);
if ( srcNodes.length > 0 )
{
for(i=0; i