/*
- ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì
ÅëÇÕ±â·ÏÁ¶È¸ ( SMMRI04000_ÅëÇÕ±â·ÏÁ¶È¸.xrw - JScript )
- Version : SMMRI03000 + SMMRI04000 È¥ÇÕµÊ.
1) : Ver.1.00.01
- ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì
*/
var arrbtn = new Array("btn_all", "btn_prog", "btn_op", "btn_test", "btn_prcp", "btn_nurc", "btn_etc", "btn_img");
var grdObj = "";
var ref = "/root/main/recsrch/reclist";
var stRef = "/root/tmp/reclist";
var paramdefault = "";
var isFirst = "Y";
var gImgFile = "";
var oprnerId = "";
var srchorgcnt = 0;
var srchcnt = 0;
var srchendyn = "N";
var gtmptreatno = "";
var gtmpiformcd = "";
var gemrpath = "";
var gemrorddate = "";
var gemrformnm = "";
var gemrformcd = "";
var gemrdeptnm = "";
var gemrdeptcd = "";
var gemrpage = "";
var gemrhiddenmsg = "";
var multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
var nodeposcnt = 1;
var prevflag = "N";
/**
* @desc : ȸéÃʱâÈ
* @id :
* @event : xforms-ready
* @return : void
* @authur : ¹ÚÁ¾ÈÆ(Æ©´×)
*/
function fInitalize()
{
var chkPidRtn = "";
iviewerIemr.window.javascript.setChartViewerSize(parseInt(iviewerIemr.attribute("width")), parseInt(iviewerIemr.attribute("height")));
mmbfGetHardCodeInfo("/root/send/reqdata", "/root/init/pidynhcd", 3801);
//2009-10-27 ¿ÀÈÄ 4:37:13 °ÁöÈÆ Ãß°¡ : ºÏ¸¶Å© »ç¿ë¿©ºÎ¸¦ ±â°üº°·Î °ü¸®ÇÑ´Ù.
mmbfGetHardCodeInfo("/root/send/reqdata", "/root/init/bmkuseyn", 9909);
var bmkuseyn = model.getValue("/root/init/bmkuseyn/hardcd/hardcd");
if (bmkuseyn == "Y")
{
btn_setbmk.visible = true;
btn_mark.visible = true;
}
else{
btn_setbmk.visible = false;
btn_mark.visible = false;
}
var sUserDeptcd = getUserInfo("dutplcecd");
var sJobkind = getUserInfo("jobkindcd").substring(0, 2);
if(sJobkind == "03" || sUserDeptcd == "3230000000")
{
btn_copyprt.visible = true;
}
if (isPopup())
{
var parampid = opener.window.javascript.getParameter("SMMRI00400_param_pid");
var paramchosflag = opener.window.javascript.getParameter("SMMRI00400_param_chosflag");
var authflag = opener.window.javascript.getParameter("SMMRI00400_param_authflag");
if (authflag == "N")
{
ipt_pid.disabled = true;
ipt_hngnm.disabled = true;
btn_search.disabled = true;
ipt_rrgstno1.disabled = true;
ipt_rrgstno2.disabled = true;
button14.disabled = true;
button5.disabled = true;
}
else
{
ipt_pid.disabled = false;
ipt_hngnm.disabled = false;
btn_search.disabled = false;
ipt_rrgstno1.disabled = false;
ipt_rrgstno2.disabled = false;
button14.disabled = false;
button5.disabled = false;
}
}
if(parampid == "")
{
var pamInfoCvs = getGlobalVariable("paminfo"); //»ó´ÜÁ¤º¸°¡ ÀÖÀ» °æ¿ì´Â °Ë»ö
var pid = "";
if(pamInfoCvs != null)
{ //cvs°¡ nullÀÌ ¾Æ´Ñ °æ¿ì¿¡¸¸ ó¸®ÇÔ.
model.removeNodeSet ("/root/main/result/paminfo/list");
setCSVToNode ("/root/main/result/paminfo", pamInfoCvs);
pid = model.getValue ("/root/main/result/paminfo/list/pid");
ordtype = model.getValue ("/root/main/result/paminfo/list/ioflag");
if ( !isNull ( pid ) )
{
if(oprnerId == "SPMRC03200")
{
opener.window.javascript.fGetCopyCmpPid(pid);
}
ipt_pid.value = pid;
chkPidRtn = fPidKeyPress(); //µî·Ï¹øÈ£·Î ȯÀÚ Á¤º¸Á¶È¸
}
}
}
else
{
ipt_pid.value = parampid;
chkPidRtn = fPidKeyPress(); //µî·Ï¹øÈ£·Î ȯÀÚ Á¤º¸Á¶È¸
}
model.setValue("/root/init/ioflag", "ALL");
model.removeNodeset("/root/send");
model.makeValue("/root/send/trgtno", 1100);
model.makeValue("/root/send/exno", 1110);
submit("TRMRI04006");
//2009-11-17 ¿ÀÈÄ 5:48:29 °ÁöÈÆ ¼öÁ¤ : ÈÙ½ºÅ©·Ñ ¸Þ¼¼Áö¹Ú½º »ç¿ë¿©ºÎ °³Àκ° ȯ°æ¼³Á¤À¸·Î °ü¸®
model.removeNode("/root/send/interqestcd");
model.makeNode("/root/send/interqestcd");
var AnswData = fGetIntefeAnsw("017");
model.setValue("/root/tmp/wheelmsg", AnswData);
//2009-10-20 ¿ÀÈÄ 2:01:30 °ÁöÈÆ ¼öÁ¤
btn_all.selected = true;
model.toggle("grd");
if (chkPidRtn)
{
fGetPatOrddept();
btn_all.dispatch("DOMActivate");
}
}
/**
* @desc : ȯÀÚ ¼öÁøºÎ¼ Á¶È¸
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetPatOrddept()
{
model.removeNodeset("/root/send");
model.removeNodeset("/root/initinfo/lrgIndx");
model.removeNodeset("/root/initinfo/dplist");
model.makeValue("/root/send/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
if (submit("TRMRI04001"))
{
addComboInstance("/root/initinfo", "itemindxseq^indxnm", "ALL^Àüü", "lrgIndx");
addComboInstance("/root/initinfo", "deptcd^deptnm", "ALL^Àüü", "dplist");
model.setValue("/root/init/orddept", "ALL");
model.setValue("/root/init/tabflag", "ALL");
cmb_dept.refresh();
rdo_lindx.refresh();
}
}
/**
* @desc : ȯÀÚ ¼öÁøÀÌ·Â Á¶È¸
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ(Æ©´×)
*/
function fGetPatOrdHist(ioflag)
{
model.toggle("grd");
iviewerIemr.window.javascript.cleanViewer();
var orddept = model.getValue("/root/init/orddept");
var tmpioflag = "" ;
if (ioflag == null || ioflag == "")
{
tmpioflag = model.getValue("/root/init/ioflag");
}
else
{
model.setValue("/root/init/ioflag", ioflag);
tmpioflag = ioflag;
}
model.setValue("/root/init/totcnt", "");
lbl_totcnt.refresh();
model.removeNodeset("/root/send");
model.removeNodeset("/root/main/pathist/patordhist");
model.removeNodeset("/root/main/midindx/midindxlist");
model.resetInstanceNode("/root/init/accresn");
model.resetInstanceNode("/root/init/prtresn");
model.resetInstanceNode("/root/init/itemindxseq");
model.resetInstanceNode("/root/init/midreccnt");
model.resetInstanceNode("/root/init/reccurpos");
model.makeValue("/root/send/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
model.makeValue("/root/send/ioflag", tmpioflag);
model.makeValue("/root/send/orddeptcd", model.getValue("/root/init/orddept"));
//±è¾ç¼öÃß°¡-kys-20091207-ÀÇ»çÁö½ÃÁ¶È¸°ü·Ã ÃʱâÈ=========
grup_prcppaging.attribute("visibility") = "hidden";
model.makeValue("/root/tmp/prcprec/srchInterval", "");
model.makeValue("/root/tmp/prcprec/srchFromdd", "");
model.makeValue("/root/tmp/prcprec/srchTodd", "");
model.makeValue("/root/tmp/prcprec/srchYn", "");
//======================================================
submit("TRMRI04002");
if (ioflag == "I" || ioflag == "E")
{
grd_pathist.colhidden(grd_pathist.colref("centcd")) = true; //¼¾ÅÍ Ä÷³ ¾Èº¸À̰Ô
grd_pathist.attribute("scroll") = "autovscroll";
}
else
{
grd_pathist.colhidden(grd_pathist.colref("centcd")) = false; //¼¾ÅÍ Ä÷³ º¸À̰Ô
grd_pathist.attribute("scroll") = "auto";
}
grd_pathist.rebuild();
}
/**
* @desc : ȯÀÚ ±â·Ï Áߺзù Á¶È¸
* @id :
* @event : ondblclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetRecMidIndx( grow )
{
var row = grow;
if ( grow == null )
row = grd_pathist.row;
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
var pid = "";
var orddd = "";
var cretno = "";
var orddeptcd = "";
var tabflag = "";
var bfopentest = ""; //2009-10-31 ¿ÀÈÄ 2:39:16 °ÁöÈÆ Ãß°¡ : nU ¿ÀÇÂÀü °Ë»çó¹æÀÌ ÀÖ´Â ¼öÁø¿©ºÎ
var emrflag = grd_pathist.valueMatrix(row, grd_pathist.colref("emrflag"));
model.resetInstanceNode("/root/init/itemindxseq");
model.resetInstanceNode("/root/init/midreccnt");
model.resetInstanceNode("/root/init/reccurpos");
model.setValue("/root/init/emrflag", emrflag);
if((grd_pathist.isCell(event.target) && grd_pathist.mouserow >= grd_pathist.fixedrows))
{
pid = grd_pathist.valueMatrix(row, grd_pathist.colref("formrecseq"));
orddd = grd_pathist.valueMatrix(row, grd_pathist.colref("orddd"));
cretno = grd_pathist.valueMatrix(row, grd_pathist.colref("cretno"));
orddeptcd = grd_pathist.valueMatrix(row, grd_pathist.colref("orddeptcd"));
bfopentest = grd_pathist.valueMatrix(row, grd_pathist.colref("bfopentest"));
tabflag = model.getValue("/root/init/tabflag");
}
else
{
if (row > 0)
{
pid = grd_pathist.valueMatrix(row, grd_pathist.colref("formrecseq"));
orddd = grd_pathist.valueMatrix(row, grd_pathist.colref("orddd"));
cretno = grd_pathist.valueMatrix(row, grd_pathist.colref("cretno"));
orddeptcd = grd_pathist.valueMatrix(row, grd_pathist.colref("orddeptcd"));
bfopentest = grd_pathist.valueMatrix(row, grd_pathist.colref("bfopentest"));
tabflag = model.getValue("/root/init/tabflag");
}
else
{
messageBox("ȯÀÚÀÇ ¼öÁøÀÌ·ÂÀ» ", "C002");
return;
}
}
var comporddd = model.getValue("/root/init/accresn/orddd");
var compcretno = model.getValue("/root/init/accresn/cretno");
if (compcretno == "")
{
compcretno = "-";
}
var itrgtNodeCnt = getNodesetCnt(model, "/root/hardcd/trgtdept[trgtcd = '" + orddeptcd + "']"); //»çÀ¯´ë»óºÎ¼
if (itrgtNodeCnt > 0) //°¨¿°³»°ú, Á¤½Å°ú, »êºÎÀΰú, ºñ´¢±â°ú
{
var sUserDeptcd = getUserInfo("dutplcecd");
var iexNodeCnt = getNodesetCnt(model, "/root/hardcd/exdept[trgtcd = '" + sUserDeptcd + "']"); //»çÀ¯Á¦¿ÜºÎ¼
if ((iexNodeCnt <= 0) && (sUserDeptcd != orddeptcd) && (comporddd != orddd && compcretno != cretno)) //»ç¿ëÀÚ ±Ù¹«ºÎ¼¿Í ȯÀÚ ¼öÁøºÎ¼°¡ Ʋ¸°°æ¿ì »çÀ¯Ã¢ ÆË¾÷, ±Ù¹«ºÎ¼°¡ ÀÇ·áÁ¤º¸ÆÀÀϰæ¿ì Á¦¿Ü
{
model.resetInstanceNode("/root/init/accresn");
setParameter("SPMRI03100_param_nodepath", "/root/init/accresn");
setParameter("SPMRI03100_param_rsnflag", 'R');
modal("SPMRI03100");
var valiyn = model.getValue("/root/init/accresn/valiyn");
if (valiyn != "Y")
{
return;
}
else
{
}
}
model.makeValue("/root/init/accresn/orddd", orddd);
model.makeValue("/root/init/accresn/cretno", cretno);
}
else
{
model.resetInstanceNode("/root/init/accresn/resncd");
model.resetInstanceNode("/root/init/accresn/resnnm");
model.resetInstanceNode("/root/init/accresn/etc");
model.resetInstanceNode("/root/init/accresn/valiyn");
model.resetInstanceNode("/root/init/accresn/orddd");
model.resetInstanceNode("/root/init/accresn/cretno");
}
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "" || ViewMode != "ChartView")
{
iviewerIemr.window.javascript.setupChart("ChartView");
}
iviewerIemr.window.javascript.cleanViewer();
var ioflag = model.getValue("/root/send/ioflag");
var refdata = "";
var sizedata = "";
if (emrflag == "I")
{
grd_midindx.caption = "lisflag^reckind^emrflag^Á¤·Ä¼ø¹ø^»óÀ§¾ÆÀÌÅÛÄÚµå^¾ÆÀÌÅÛÄÚµå^Áߺзù¸í^ÆäÀÌÁö¼ö";
}
else if (emrflag == "E")
{
grd_midindx.caption = "lisflag^reckind^emrflag^Á¤·Ä¼ø¹ø^»óÀ§¾ÆÀÌÅÛÄÚµå^¾ÆÀÌÅÛÄÚµå^Áߺзù¸í^±â·Ï¼ö";
}
model.setValue("/root/init/totcnt", "");
lbl_totcnt.refresh();
model.removeNodeset("/root/send");
model.removeNodeset("/root/main/midindx/midindxlist");
model.makeValue("/root/send/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
model.makeValue("/root/send/orddd", orddd);
model.makeValue("/root/send/cretno", cretno);
model.makeValue("/root/send/orddeptcd", orddeptcd);
model.makeValue("/root/send/tabflag", tabflag);
model.makeValue("/root/send/emrflag", emrflag);
model.makeValue("/root/send/chosflag", grd_pathist.valueMatrix(row, grd_pathist.colref("ordtype")));
model.makeValue("/root/send/refusge", model.getValue("/root/init/accresn/resncd"));
model.makeValue("/root/send/refremark", model.getValue("/root/init/accresn/etc"));
model.makeValue("/root/send/readprtflag", 'R');
//2009-10-31 ¿ÀÈÄ 2:36:09 °ÁöÈÆ ¼öÁ¤ :
model.makeValue("/root/send/bfopentest", bfopentest);
//20091204-kys-Ãß°¡ Á¶È¸ÇöÀçÀÏ ¼ÂÆÃ
//model.makeValue("/root/tmp/currentDate", orddd);
if(submit("TRMRI04003"))
{
var midindxNodelist = model.instances(0).selectNodes("/root/main/midindx/midindxlist");
var itemindxseq = 0;
var midreccnt = 0;
if (midindxNodelist.length > 0)
{
grd_midindx.resizeCells();
var subNode = midindxNodelist.item(0);
itemindxseq = parseInt(subNode.selectSingleNode("itemindxseq").text);
midreccnt = parseInt(subNode.selectSingleNode("cnt").text);
model.setValue("/root/init/itemindxseq", itemindxseq);
model.setValue("/root/init/midreccnt", midreccnt);
model.setValue("/root/init/reccurpos", 1);
model.setValue("/root/init/bfopentest", bfopentest);
grd_midindx.row = 1;
fGetDetlRec(1, row); //pjh
}
}
}
/**
* @desc : Ű À̺¥Æ®
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetRec(val)
{
if(model.getValue("/root/tmp/chklittleindx") != "Y"){ //Á¶°ÇºÐ±âÃß°¡-kys-20091210(ÀüüÁ¶È¸½Ã)
var selIndx = switch1.selectedIndex;
var aaa = "";
//ºÏ¸¶Å©¸ðµå°¡ ¾Æ´Ò¶§
if(selIndx == 0){
var midnodeList = instance1.selectNodes("/root/main/midindx/midindxlist");
if (midnodeList.length < 1)
{
messageBox("¼½ÄºÐ·ù¸¦", "C002");
iviewerIemr.window.javascript.setupChart("ChartView");
return;
}
var ViewMode = "-";
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == "ThumbView")
{
iviewerIemr.window.javascript.setupChart("ChartView");
}
var emrflag = model.getValue("/root/init/emrflag");
//2009-11-02 ¿ÀÈÄ 7:16:41 °ÁöÈÆ ¼öÁ¤
var reckind = grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("reckind"))
var wheelMsgFlag = model.getValue("/root/tmp/wheelmsg");
if (emrflag == "I" && reckind != "EMR")
{
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
switch(val)
{
case "first" :
if (grd_midindx.row == 1)
{
messageBox("óÀ½", "I009");
return;
}
else
{
grd_midindx.row = 1;
break;
}
case "prev" :
if (grd_midindx.row == 1)
{
//messageBox("óÀ½", "I009");
//return;
if(wheelMsgFlag == "Y"){
var rtnmsg = messageBox("óÀ½ ±â·ÏÀÔ´Ï´Ù. ÀÌÀü ¼öÁøÀÌ·ÂÀ¸·Î", "Q003");
if (rtnmsg == 6)
{
fPrevRecHist();
return;
}
else
{
return;
}
}
else{
fPrevRecHist();
return;
}
}
else
{
grd_midindx.row = grd_midindx.row - 1;
break;
}
case "next" :
if (grd_midindx.row + 1 == grd_midindx.rows)
{
if(wheelMsgFlag == "Y"){
var rtnmsg = messageBox("¸¶Áö¸· ±â·ÏÀÔ´Ï´Ù. ´ÙÀ½ ¼öÁøÀÌ·ÂÀ¸·Î", "Q003");
if (rtnmsg == 6)
{
fNextRecHist();
return;
}
else
{
return;
}
}
else{
fNextRecHist();
return;
}
}
else
{
grd_midindx.row = grd_midindx.row + 1;
break;
}
case "end" :
if (grd_midindx.row + 1 == grd_midindx.rows)
{
messageBox("¸¶Áö¸·", "I009");
return;
}
else
{
grd_midindx.row = grd_midindx.rows - 1;
break;
}
case "all" :
model.setValue("/root/init/recall", "Y");
}
}
else
{
var reccurpos = parseInt(model.getValue("/root/init/reccurpos"));
var midreccnt = parseInt(model.getValue("/root/init/midreccnt"));
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
switch(val)
{
case "first" :
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
if (grd_midindx.row == 1 && reccurpos == 1)
{
messageBox("óÀ½", "I009");
return;
}
else
{
model.setValue("/root/init/recall", "N");
grd_midindx.row = 1;
var curmidcnt = parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt")));
model.setValue("/root/init/midreccnt", curmidcnt);
model.setValue("/root/init/reccurpos", 1);
model.setValue("/root/init/itemindxseq", parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq"))));
break;
}
case "prev" :
prevflag = "Y";
if (certnodeList.length > 1 && nodeposcnt > 1)
{
multirecyn = "Y";
}
else
{
multirecyn = "N";
nodeposcnt = 1;
}
if (multirecyn == "N")
{
if (grd_midindx.row == 1 && reccurpos == 1)
{
if(wheelMsgFlag == "Y"){
var rtnmsg = messageBox("óÀ½ ±â·ÏÀÔ´Ï´Ù. ÀÌÀü ¼öÁøÀÌ·ÂÀ¸·Î", "Q003");
if (rtnmsg == 6)
{
fPrevRecHist();
return;
}
else
{
return;
}
}
else{
fPrevRecHist();
return;
}
}
else
{
model.setValue("/root/init/recall", "N");
if (reccurpos == 1) //ÇØ´çÁߺзùÀÇ Ã¹±â·ÏÀÏ °æ¿ì Àü Áߺзù·Î À̵¿ ÈÄ ÇØ´ç ÁߺзùÀÇ Á¤º¸¸¦ ¼ÂÆÃÇÑ´Ù.
{
grd_midindx.row = grd_midindx.row - 1;
var curmidcnt = parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt")));
model.setValue("/root/init/midreccnt", curmidcnt);
model.setValue("/root/init/reccurpos", curmidcnt);
model.setValue("/root/init/itemindxseq", parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq"))));
break;
}
else
{
model.setValue("/root/init/reccurpos", reccurpos - 1);
break;
}
}
}
else //ÇϳªÀÇ ±â·ÏÀ̳ª À̹ÌÁö°¡ Æ÷ÇԵȰæ¿ì
{
if (nodeposcnt <= 1)
{
if (grd_midindx.row == 1 && reccurpos == 1)
{
if(wheelMsgFlag == "Y"){
var rtnmsg = messageBox("óÀ½ ±â·ÏÀÔ´Ï´Ù. ÀÌÀü ¼öÁøÀÌ·ÂÀ¸·Î", "Q003");
if (rtnmsg == 6)
{
fPrevRecHist();
return;
}
else
{
return;
}
}
else{
fPrevRecHist();
return;
}
}
else
{
model.setValue("/root/init/reccurpos", reccurpos - 1);
break;
}
}
else
{
nodeposcnt--;
break;
}
}
case "next" :
prevflag = "N";
if (certnodeList.length > 1 && certnodeList.length > nodeposcnt)
{
multirecyn = "Y";
}
else
{
multirecyn = "N";
nodeposcnt = 1;
}
if (multirecyn == "N")
{
if (reccurpos == midreccnt && grd_midindx.row + 1 == grd_midindx.rows)
{
if(wheelMsgFlag == "Y"){
var rtnmsg = messageBox("¸¶Áö¸· ±â·ÏÀÔ´Ï´Ù. ´ÙÀ½ ¼öÁøÀÌ·ÂÀ¸·Î", "Q003");
if (rtnmsg == 6)
{
fNextRecHist();
return;
}
else
{
return;
}
}
else{
fNextRecHist();
return;
}
}
else
{
model.setValue("/root/init/recall", "N");
if (reccurpos == midreccnt)
{
grd_midindx.row = grd_midindx.row + 1;
var curmidcnt = parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt")));
model.setValue("/root/init/midreccnt", curmidcnt);
model.setValue("/root/init/reccurpos", 1);
model.setValue("/root/init/itemindxseq", parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq"))));
break;
}
else
{
model.setValue("/root/init/reccurpos", reccurpos + 1);
break;
}
}
}
else //ÇϳªÀÇ ±â·ÏÀ̳ª À̹ÌÁö°¡ Æ÷ÇԵȰæ¿ì
{
if (nodeposcnt >= certnodeList.length)
{
if (reccurpos == midreccnt && grd_midindx.row + 1 == grd_midindx.rows)
{
if(wheelMsgFlag == "Y"){
var rtnmsg = messageBox("¸¶Áö¸· ±â·ÏÀÔ´Ï´Ù. ´ÙÀ½ ¼öÁøÀÌ·ÂÀ¸·Î", "Q003");
if (rtnmsg == 6)
{
fNextRecHist();
return;
}
else
{
model.setValue("/root/init/reccurpos", reccurpos + 1);
break;
}
}
else{
fNextRecHist();
return;
}
}
}
else
{
nodeposcnt++;
break;
}
}
case "end" :
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
if (reccurpos == midreccnt && grd_midindx.row + 1 == grd_midindx.rows)
{
messageBox("¸¶Áö¸·", "I009");
return;
}
else
{
model.setValue("/root/init/recall", "N");
grd_midindx.row = grd_midindx.rows - 1;
var curmidcnt = parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt")));
model.setValue("/root/init/midreccnt", curmidcnt);
model.setValue("/root/init/reccurpos", curmidcnt);
model.setValue("/root/init/itemindxseq", parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq"))));
break;
}
case "midfirst" :
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
if (grd_midindx.row == 1 && reccurpos == 1)
{
messageBox("óÀ½", "I009");
return;
}
else
{
model.setValue("/root/init/recall", "N");
model.setValue("/root/init/reccurpos", 1);
break;
}
case "midend" :
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
if (reccurpos == midreccnt && grd_midindx.row + 1 == grd_midindx.rows)
{
messageBox("¸¶Áö¸·", "I009");
return;
}
else
{
model.setValue("/root/init/recall", "N");
model.setValue("/root/init/reccurpos", midreccnt);
break;
}
case "all" :
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
model.setValue("/root/init/recall", "Y");
}
model.refresh(); //pjh
}
}
fGetDetlRec(); //pjh
}else{ //kys-20091210-¼±ÅÃüũÈÄ Á¶È¸½Ã(ºÎºÐ(°£°Ý,ÀÏÀÚ¼±ÅÃ)Á¶È¸)
var wheelMsgFlag = model.getValue("/root/tmp/wheelmsg");
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
switch(val)
{
case "prev" : //Page UpŬ¸¯½Ã
prevflag = "Y";
if(model.getValue("/root/tmp/prcprec/srchkind") != 1){ //¼½Äº°, ÀÏÀÚ+¼½Äº°Á¶È¸½Ã
if(grd_littleindx.row == 1){
if(wheelMsgFlag == "Y"){
if(nodeposcnt == 1){
messageBox("óÀ½", "I009");
return;
}else{
nodeposcnt--;
break;
}
}
}else if(grd_littleindx.row != 1){
if(wheelMsgFlag == "Y"){
if (nodeposcnt == 1){
grd_littleindx.row = grd_littleindx.row - 1;
multirecyn = "N"; //´ÙÀ½ÇàÀ¸·Î ³Ñ¾î°¥¶§´Â Á¶È¸¸¦ ÇϱâÀ§ÇØ NÀ¸·Î ¼ÂÆÃÇÑ´Ù-20091210-kys
break;
}else{
nodeposcnt--;
break;
}
}
}
}else{ //ÀÏÀÚº° Á¶È¸½Ã
if(wheelMsgFlag == "Y"){
if(nodeposcnt == 1){
messageBox("óÀ½", "I009");
return;
}else{
nodeposcnt--;
break;
}
}
}
case "next" : //Page DownŬ¸¯½Ã
prevflag = "N";
if(model.getValue("/root/tmp/prcprec/srchkind") != 1){ //¼½Äº°, ÀÏÀÚ+¼½Äº°Á¶È¸½Ã
if(grd_littleindx.row + 1 != grd_littleindx.rows){
if(wheelMsgFlag == "Y"){
if (nodeposcnt == certnodeList.length){
grd_littleindx.row = grd_littleindx.row + 1;
multirecyn = "N"; //´ÙÀ½ÇàÀ¸·Î ³Ñ¾î°¥¶§´Â Á¶È¸¸¦ ÇϱâÀ§ÇØ NÀ¸·Î ¼ÂÆÃÇÑ´Ù-20091210-kys
break;
}else{
nodeposcnt++;
break;
}
}
}else if(grd_littleindx.row + 1 == grd_littleindx.rows){
if(wheelMsgFlag == "Y"){
if (nodeposcnt == certnodeList.length){
messageBox("¸¶Áö¸·", "I009");
return;
}else{
nodeposcnt++;
break;
}
}
}
}else{ //ÀÏÀÚº° Á¶È¸½Ã
if (nodeposcnt == certnodeList.length){
messageBox("¸¶Áö¸·", "I009");
return;
}else{
nodeposcnt++;
break;
}
}
case "all" : //¿©·¯ÆäÀÌÁöº¸±âŬ¸¯½Ã¿¡µµ »ç¿ëµÊ-kys
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
model.setValue("/root/init/recall", "Y");
}
//model.refresh(); //pjh
fGetDetlRec();
}
}
/**
* @desc : ´ÙÀ½ ¼öÁøÀÌ·ÂÀ¸·Î ÀÚµ¿ À̵¿
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fNextRecHist()
{
var histrow = grd_pathist.row + 1;
if ( histrow == grd_pathist.rows )
{
messageBox("¸¶Áö¸· ÀÌ·Â", "I009");
return;
}
else
{
grd_pathist.row = histrow;
fGetRecMidIndx();
}
var ctrl = document.controls("grd_midindx");
if (ctrl != null)
{
model.setFocus(ctrl.attribute("id"));
ctrl.dispatch("onkeyup");
}
}
/**
* @desc : ÀÌÀü ¼öÁøÀÌ·ÂÀ¸·Î ÀÚµ¿ À̵¿
* @id :
* @event :
* @return : void
* @authur : ÁÖÈñ°æ
*/
function fPrevRecHist()
{
var histrow = grd_pathist.row - 1;
if (histrow <= 0)
{
messageBox("óÀ½ ÀÌ·Â", "I009");
return;
}
else
{
grd_pathist.row = histrow;
fGetRecMidIndx();
}
var ctrl = document.controls("grd_midindx");
if (ctrl != null)
{
model.setFocus(ctrl.attribute("id"));
ctrl.dispatch("onkeyup");
}
}
/**
* @desc : Áߺзù ´õºíŬ¸¯
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fDbClickMidIndx()
{
//if((grd_midindx.isCell(event.target) && grd_midindx.mouserow >= grd_midindx.fixedrows)) ÁÖ¼®Ã³¸®-kys-20091209
//{
multirecyn = "N"; //´Ù¼öÀÇ ±â·Ï ¿©ºÎ(ex.±â·Ï+À̹ÌÁö)
nodeposcnt = 1;
prevflag = "N";
iviewerIemr.window.javascript.cleanViewer();
if (grd_midindx.row >= 1)
{
var curmidcnt = parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt")));
var itemindxseq = parseInt(grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq")));
//±è¾ç¼öÃß°¡-kys-20091208
var reckind = grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("reckind"));
model.setValue("/root/init/midreccnt", curmidcnt);
model.setValue("/root/init/reccurpos", 1);
model.setValue("/root/init/itemindxseq", itemindxseq);
model.refresh(); //pjh
if(reckind != "PRCP"){ //±è¾ç¼öÁ¶°ÇÃß°¡-ÀÇ»çÁöÄ¡±â·ÏÀϰæ¿ì ±â°£Á¶È¸Â÷¶ç¿ì±â-kys-20091204
if(model.getValue("/root/tmp/chklittleindx") != "Y"){ //¼±Åÿ¡ üũ°¡ µÇ¾îÀÖÁö ¾ÊÀº°æ¿ì-kys-20091209
grup_prcppaging.attribute("visibility") = "hidden"; ////±è¾ç¼öÁ¶°ÇÃß°¡-ÀÇ»çÁöÄ¡±â·ÏÀϰæ¿ì ±â°£Á¶È¸Â÷¶ç¿ì±â-kys-20091204
}
grup_prcppaging2.attribute("visibility") = "hidden"; //ÀÇ»çÁö½Ã ±â·ÏÁ¶È¸Ã¢ ´Ý±â-kys-20091215
fGetDetlRec(grd_midindx.row); //pjh
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "" || ViewMode != "ChartView")
{
iviewerIemr.window.javascript.setupChart("ChartView");
}
}else if(reckind == "PRCP"){
//20091204-kys-Ãß°¡ Á¶È¸ÇöÀçÀÏ ¼ÂÆÃ
//ÇѹøÁ¶È¸Çß´Ù¸é ÃʱâÈÇÏÁö ¾Ê´Â´Ù.-20091207
if(model.getValue("/root/tmp/prcprec/srchYn") != "Y"){ //ÃÖÃÊ Á¶È¸½Ã ¼ÂÆÃ
var srchAddOrddd = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd"));
//model.makeValue("/root/tmp/prcprec/srchYn", "Y"); //Á¶È¸À¯¹«
model.makeValue("/root/tmp/sndprcprec/srchprcpinterval", "7");
model.makeValue("/root/tmp/sndprcprec/srchprcpfromdd", srchAddOrddd);
model.makeValue("/root/tmp/sndprcprec/srchprcptodd", srchAddOrddd.toDate().getAddDate(6, "D").getDateFormat());
}
grup_prcppaging.attribute("visibility") = "hidden";
grup_prcppaging2.attribute("visibility") = "visible";
model.setFocus("ipt_srchprcpinterval");
rdo_srchprcpchoice.select(0);
model.refresh();
fGetDetlRec(grd_midindx.row); //pjh
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "" || ViewMode != "ChartView")
{
iviewerIemr.window.javascript.setupChart("ChartView");
}
}
}
// }
}
/**
* @desc : ±â·ÏÁ¶È¸
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetDetlRec( row1, row2 )
{
var grd_midindxrow = row1;
var grd_pathistrow = row2;
if ( row1 == null )
grd_midindxrow = grd_midindx.row;
if ( row2 == null )
grd_pathistrow = grd_pathist.row;
var itemindxseq = parseInt(model.getValue("/root/init/itemindxseq")); //¼±ÅÃÁߺзù À妽º¼ø¹ø
var reccurpos = parseInt(model.getValue("/root/init/reccurpos")); //ÇöÀç¼±Åõȱâ·Ï ¼ø¹ø
var midreccnt = parseInt(model.getValue("/root/init/midreccnt")); //¼±ÅÃÁߺзù ±â·Ï¼ö
var bfopentest = model.getValue("/root/init/bfopentest"); //¿ÀÇ ÀÌÀü °Ë»çó¹æ ¼öÁøÀÌ·Â
var reckind = grd_midindx.valueMatrix(grd_midindxrow, grd_midindx.colref("reckind"));
var rowfocus = "";
var emrflag = model.getValue("/root/init/emrflag");
var selIndx = switch1.selectedIndex; //2009-10-20 ¿ÀÈÄ 10:00:57 °ÁöÈÆ Ãß°¡
if(selIndx == 1){
fGetBookmarkItem();
}
else if(selIndx == 0){
//2009-11-18 ¿ÀÈÄ 10:14:11 °ÁöÈÆ Ãß°¡
if (emrflag == "I" && (reckind != "EMR" && reckind != "CDIS"))
{
var totcnt = "[ " + 1 + " / " + grd_midindx.valueMatrix(grd_midindxrow, grd_midindx.colref("cnt")) + " / " + model.getValue("/root/init/reccnt") + " ]";
model.setValue("/root/init/totcnt", totcnt);
lbl_totcnt.refresh();
var treatno = grd_midindx.valueMatrix(grd_midindxrow, grd_midindx.colref("itemindxseq"));
var formcd = grd_midindx.valueMatrix(grd_midindxrow, grd_midindx.colref("supitemindxseq"));
iviewerIemr.window.javascript.cleanViewer();
iviewerIemr.window.javascript.refreshFalse();
model.makeValue("/root/imgrec/iemr/treatno", parseInt(treatno));
model.makeValue("/root/imgrec/iemr/docucd", formcd);
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
var chartinfo;
chartinfo = "I";
var hiddenmsg;
hiddenmsg = "I";
iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, hiddenmsg);
iviewerIemr.window.javascript.refreshTrue();
}
else
{
var calcReccurpos = parseInt(model.getValue("/root/init/reccurpos"));
var itemindxseq = parseInt(model.getValue("/root/init/itemindxseq"));
var isLis = "";
// for (var j = 1; j < grd_midindx.row; j++)
// {
// isLis = grd_midindx.valueMatrix(j, grd_midindx.colref("reckind"));
//
// if (isLis == "LIS")
// {
// calcReccurpos -= 1;
// }
// }
model.removeNodeset("/root/send");
model.makeValue("/root/send/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
model.makeValue("/root/send/orddd", grd_pathist.valueMatrix(grd_pathistrow, grd_pathist.colref("orddd")));
model.makeValue("/root/send/cretno", grd_pathist.valueMatrix(grd_pathistrow, grd_pathist.colref("cretno")));
model.makeValue("/root/send/chosflag", grd_pathist.valueMatrix(grd_pathistrow, grd_pathist.colref("ordtype")));
model.makeValue("/root/send/orddeptcd", grd_pathist.valueMatrix(grd_pathistrow, grd_pathist.colref("orddeptcd")));
model.makeValue("/root/send/tabflag", model.getValue("/root/init/tabflag"));
model.makeValue("/root/send/reccurpos", calcReccurpos);
if(model.getValue("/root/tmp/chklittleindx") != "Y"){ //ºÐ±â-kys-üũ¼±ÅÃÈÄ Á¶È¸½Ã Àüü¸¦ °¡Áö°í ¿Â´Ù.-20091210
model.makeValue("/root/send/recall", model.getValue("/root/init/recall"));
}else{
model.makeValue("/root/send/recall", "Y");
}
model.makeValue("/root/send/reckind", reckind);
model.makeValue("/root/send/itemindxseq", itemindxseq);
model.makeValue("/root/send/lisflag", grd_midindx.valueMatrix(grd_midindxrow, grd_midindx.colref("lisflag")));
//±è¾ç¼öÃß°¡ºÎºÐ-20091204-kys
if(reckind == "PRCP" || model.getValue("/root/tmp/chklittleindx") == "Y"){
if(reckind == "PRCP"){ //ÀÇ»çÁö½Ã±â·ÏÁ¶È¸Àϰæ¿ì
model.makeValue("/root/send/fromdd", model.getValue("/root/tmp/sndprcprec/srchprcpfromdd"));
model.makeValue("/root/send/todd", model.getValue("/root/tmp/sndprcprec/srchprcptodd"));
}else if(model.getValue("/root/tmp/chklittleindx") == "Y"){ //¼½Äâ Á¶°ÇÁ¶È¸½Ã
if(model.getValue("/root/tmp/prcprec/srchkind") != 2){ //¼½Äº° Á¶È¸½Ã fromm,todd ºÒÇÊ¿ä-20091216-kys
model.makeValue("/root/send/fromdd", model.getValue("/root/tmp/prcprec/srchFromdd"));
model.makeValue("/root/send/todd", model.getValue("/root/tmp/prcprec/srchTodd"));
}
if(model.getValue("/root/tmp/prcprec/srchkind") != 1){ //ÀÏÀÚº° Á¶È¸½Ã srcformcd ºÒÇÊ¿ä-20091216-kys
model.makeValue("/root/send/srcformcd", grd_littleindx.valueMatrix(grd_littleindx.row, grd_littleindx.colref("srcformcd"))); //¼ÒºÐ·ùÁ¶È¸½Ã »ç¿ëÇÑ´Ù.-kys
}
}
}
//2009-11-02 ¿ÀÈÄ 2:18:45 °ÁöÈÆ ¼öÁ¤
model.makeValue("/root/send/bfopentest", bfopentest);
pathistEmrFlag = grd_pathist.valueMatrix(grd_pathistrow, grd_pathist.colref("emrflag"))
if(bfopentest == "Y" && emrflag != "E"){
model.makeValue("/root/send/midbftest", "Y");
}
else{
model.makeValue("/root/send/midbftest", "N");
}
if (multirecyn == "N")
{
if(submit("TRMRI04004"))
{
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
if (certnodeList.length > 1 && certnodeList.length >= nodeposcnt)
{
multirecyn = "Y";
if (prevflag == "Y")
nodeposcnt = certnodeList.length;
else
nodeposcnt = 1;
}
else
{
multirecyn = "N";
nodeposcnt = 1;
}
iviewerIemr.window.javascript.cleanViewer();
if (model.getValue("/root/init/recall") == "Y")
{
fGetNextEmrImgRec(); //Áߺзù Àüü´Â ±âÁ¸´ë·Î
}
else
{
fGetNextEmrImgRecOne(); //±â·ÏÁ¶È¸ °á°ú°¡ ¿©·¯°³ÀÎ °æ¿ì ÇѰ³¾¿ Á¶È¸
}
model.setValue("/root/init/recall", "N");
}
}
else
{
iviewerIemr.window.javascript.cleanViewer();
fGetNextEmrImgRecOne(); //±â·ÏÁ¶È¸ °á°ú°¡ ¿©·¯°³ÀÎ °æ¿ì ÇѰ³¾¿ Á¶È¸
}
}
}
}
/**
* @desc : ȯÀÚ¹øÈ£ Á¤º¸Á¶È¸
* @id :
* @event : onkeypress
* @return : void
* @authur : ¹ÚÁ¾ÈÆ(Æ©´×)
*/
function fPidKeyPress()
{
model.removeNodeSet("/root/main/result/inform");
model.setValue("/root/source/srchcond", "1");
model.setValue("/root/source/pid", ipt_pid.currentText);
model.setValue("/root/main/patinfo/patinfolist/pid", ipt_pid.currentText);
//inputEnterKey("btn_search", "DOMActivate");
//ȯÀÚµî·Ï¹øÈ£ üũ
if(ipt_pid.currentText.length >= 1 )
{
model.resetInstanceNode("/root/main/result/patinfo");
model.resetInstanceNode("/root/main/patinfo/patinfolist");
//model.makeNode("/root/main/result/patinfo");
if(submit("TRMRC00501"))
{
var sBindPid = model.getValue("/root/main/result/inform/item/bindpid");
if( sBindPid != '-' && sBindPid != '' && sBindPid != ' ' )
{
var sPid = model.getValue("/root/main/result/inform/item/pid");
var sHngnm = model.getValue("/root/main/result/inform/item/hngnm");
var retValue = messageBox(sPid + "(" + sHngnm + ") ȯÀÚÀÇ µî·Ï¹øÈ£°¡ [ " + sBindPid + " ] ·Î ÇÕ¹ø µÇ¾ú½À´Ï´Ù. ÇÕ¹øµÈ µî·Ï¹øÈ£·Î ÀçÁ¶È¸ ÇϽðڽÀ´Ï±î?", "Q999", "");
if( retValue == '6' )
{
ipt_pid.currentText = sBindPid;
model.setValue("/root/source/srchcond", "1");
model.setValue("/root/source/pid", ipt_pid.currentText);
model.setValue("/root/main/patinfo/patinfolist/pid", ipt_pid.currentText);
if (submit("TRPMC02500"))
{
//fSearch´Â ÀÎÀû»çÇ× È¸éÀ» ÀÓÆ÷Æ® ÇØ°£ ȸ鿡¼ ±¸ÇöÇØ ÁÖ¾î¾ß ÇÏ´Â ÇÔ¼öÀÌ´Ù.
if( getNodesetCount("/root/main/result/patinfo/patinfolist") > 0 ){
model.copyNode("/root/main/patinfo", "/root/main/result/patinfo");
model.makeValue("/root/main/patinfo/agesex", model.getValue("/root/main/patinfo/patinfolist/sex") + "/" + model.getValue("/root/main/patinfo/patinfolist/age"));
model.setValue("/root/main/popupendflag", "ok");
model.refresh();
oprnerId = opener.window.javascript.getScreenID();
if(oprnerId == "SPMRC03200")
{
var keyparam = model.getValue("/root/main/patinfo/patinfolist/pid") + "¢Ë" + model.getValue("/root/main/patinfo/patinfolist/hngnm") + "¢Ë" + model.getValue("/root/main/patinfo/patinfolist/sex") + "¢Ë" + model.getValue("/root/main/patinfo/patinfolist/age") + "¢Ì";
opener.window.javascript.fEnterPatinfo(keyparam);
}
//2009-10-21 ¿ÀÀü 11:40:01 °ÁöÈÆ Ãß°¡ : ȯÀÚÀÇ ±â·ÏÀÌ ºÏ¸¶Å©¿¡ ÀÖÀ»¶§ ÅÇ»ö º¯°æ
fChkBookmark();
return true;
}
else
{
model.resetInstanceNode("/root/main/patinfo/patinfolist");
messageBox("¾ø´Â µî·Ï¹øÈ£ ÀÔ´Ï´Ù.", "E999", "");
return false;
}
}
}
else
{
var pAge = getFullAge(model.getValue("/root/main/result/inform/item/rrgstno1")+model.getValue("/root/main/result/inform/item/rrgstno2"));
var pGender = getGender(model.getValue("/root/main/result/inform/item/rrgstno1")+model.getValue("/root/main/result/inform/item/rrgstno2"));
model.makeValue("/root/main/patinfo/patinfolist/pid", sPid);
model.makeValue("/root/main/patinfo/agesex", pGender + "/" + pAge);
model.makeValue("/root/main/patinfo/patinfolist/hngnm", sHngnm);
model.makeValue("/root/main/patinfo/patinfolist/rrgstno1", model.getValue("/root/main/result/inform/item/rrgstno1"));
model.makeValue("/root/main/patinfo/patinfolist/rrgstno2", model.getValue("/root/main/result/inform/item/rrgstno2"));
ipt_pid.refresh();
ipt_hngnm.refresh();
opt_age.refresh();
ipt_rrgstno1.refresh();
ipt_rrgstno2.refresh();
//ȸé ÃʱâÈ!!
//btn_init.dispatch("DOMActivate");
return true;
}
}
else
{
if (submit("TRPMC02500"))
{
//fSearch´Â ÀÎÀû»çÇ× È¸éÀ» ÀÓÆ÷Æ® ÇØ°£ ȸ鿡¼ ±¸ÇöÇØ ÁÖ¾î¾ß ÇÏ´Â ÇÔ¼öÀÌ´Ù.
if( getNodesetCount("/root/main/result/patinfo/patinfolist") > 0 ){
model.copyNode("/root/main/patinfo", "/root/main/result/patinfo");
model.makeValue("/root/main/patinfo/agesex", model.getValue("/root/main/patinfo/patinfolist/sex") + "/" + model.getValue("/root/main/patinfo/patinfolist/age"));
model.setValue("/root/main/popupendflag", "ok");
model.refresh();
oprnerId = opener.window.javascript.getScreenID();
if(oprnerId == "SPMRC03200")
{
var keyparam = model.getValue("/root/main/patinfo/patinfolist/pid") + "¢Ë" + model.getValue("/root/main/patinfo/patinfolist/hngnm") + "¢Ë" + model.getValue("/root/main/patinfo/patinfolist/sex") + "¢Ë" + model.getValue("/root/main/patinfo/patinfolist/age") + "¢Ì";
opener.window.javascript.fEnterPatinfo(keyparam);
}
//2009-10-21 ¿ÀÀü 11:40:01 °ÁöÈÆ Ãß°¡ : ȯÀÚÀÇ ±â·ÏÀÌ ºÏ¸¶Å©¿¡ ÀÖÀ»¶§ ÅÇ»ö º¯°æ
fChkBookmark();
return true;
}
else
{
model.resetInstanceNode("/root/main/patinfo/patinfolist");
messageBox("¾ø´Â µî·Ï¹øÈ£ ÀÔ´Ï´Ù.", "E999", "");
return false;
}
}
}
}
}
else
{
messageBox("µî·Ï¹øÈ£¸¦ Á¤È®È÷", "C001");
return false;
}
}
/**
* @desc : ȯÀÚÀ̸§ Á¤º¸Á¶È¸
* @id :
* @event : onkeypress
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fPnmKeyPress()
{
model.setValue("/root/source/srchcond", "2");
model.setValue("/root/source/hngnm", ipt_hngnm.currentText);
inputEnterKey("btn_search", "DOMActivate");
}
/**
* @desc : ȯÀÚÁֹιøÈ£ Á¤º¸Á¶È¸
* @id :
* @event : onkeypress
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fRgstnoKeyPress()
{
model.setValue("/root/source/srchcond", "3");
model.setValue("/root/source/rrgstno1", ipt_rrgstno1.currentText);
model.setValue("/root/source/rrgstno2", ipt_rrgstno2.value);
model.makeValue("/root/source/autoflag", "Y");
inputEnterKey("btn_search", "DOMActivate");
}
/**
* @desc : ȯÀÚÁֹιøÈ£ µÞÀÚ¸® Á¤º¸Á¶È¸
* @id :
* @event : onkeypress
* @return : void
* @authur : °ÁöÈÆ
*/
function fRgstno2KeyPress(){
if(event.keyCode == "13") {
model.setValue("/root/source/srchcond", "3");
model.setValue("/root/source/rrgstno1", ipt_rrgstno1.currentText);
model.setValue("/root/source/rrgstno2", ipt_rrgstno2.formattedText);
model.makeValue("/root/source/autoflag", "Y");
fPopPtinfo();
}
}
/**
* @desc : ȯÀÚÁ¤º¸Á¶È¸ ÆË¾÷
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fPopPtinfo()
{
modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/source", "/root/send");
model.resetInstanceNode("/root/source");
//2009-11-14 ¿ÀÀü 11:57:20 °ÁöÈÆ Ãß°¡
model.makeValue("/root/main/patinfo/agesex", model.getValue("/root/main/patinfo/patinfolist/sex") + "/" + model.getValue("/root/main/patinfo/patinfolist/age"));
opt_age.refresh();
}
/**
* @desc : ȸé´Ý±â(ó¹æ¿¡¼ »ç¿ë)
* @id :
* @event : xforms-select
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fClose()
{
window.close();
}
/* @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 : BIT¸ðµâ·ÎºÎÅÍ Å°°ª ¹Þ¾Æ¿È
* @ver : 2008.01.17
* @by : ¹ÚÁ¾ÈÆ
* @-----------------------------------
* @type : function
* @access : public
* @desc :
*/
function fSetCertRecKey(key)
{
setParameter("SPMRI02400_certinfo", key);
modal("SPMRI02400");
}
/**
* @desc : »çº»¹ßÇà ½Åû
* @id :
* @event : xforms-ready
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fAppcopy()
{
setParameter("SMMRC03000_pid", ipt_pid.value);
open("SMMRC03000");
}
/**
* @desc : Áúº´ ¹× ¼ö¼ú À妽º È¸é ¿¬°á
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fDiagOprIndxLnk()
{
setParameter("SMMRD00400_pid", ipt_pid.value);
open("SMMRD00700");
}
/**
* @desc : ±â·Ï Á¶È¸¿µ¿ª ÃÖ´ë ÃÖ¼ÒÈ
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fMaxMin()
{
var leftwidth = grup_left.attribute("width");
if (leftwidth == 0)
{
btn_minmax.attribute("class") = "icon_left";
grup_right.attribute("width") = 906;
grup_right.attribute("left") = 345;
grup_left.attribute("width") = 340;
iviewerIemr.attribute("width") = 902;
iviewerIemr.window.javascript.setChartViewerSize(parseInt(iviewerIemr.attribute("width")), parseInt(iviewerIemr.attribute("height")));
btn_minmax.hint = "ÃÖ´ëÈ";
}
else
{
btn_minmax.attribute("class") = "icon_right";
grup_left.attribute("width") = 0;
grup_right.attribute("left") = 0;
grup_right.attribute("width") = 1251;
iviewerIemr.attribute("width") = 1247;
iviewerIemr.window.javascript.setChartViewerSize(parseInt(iviewerIemr.attribute("width")), parseInt(iviewerIemr.attribute("height")));
btn_minmax.hint = "ÀÌÀüÅ©±â·Î";
}
}
//////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
/**
* @desc : ȸéÇ¥½Ã ´ë»óÀÌ EMR + IMG ±â·ÏÀΰæ¿ì ó¸®
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetNextEmrImgRec()
{
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
var foldernm = "C:\\Certrec";
var recall = model.getValue("/root/init/recall");
if (certnodeList.length <= 0)
{
return;
}
else if(certnodeList.length > 1)
{
model.setValue("/root/init/recall", "N");
}
var emrpath = "";
var emrorddate = "";
var emrformnm = "";
var emrformcd = "";
var emrdeptnm = "";
var emrdeptcd = "";
var emrpage = "";
var emrhiddenmsg = "";
var recrowno = "";
var k = "";
var pid = "";
var ptnm = "";
var depthngnm = "";
var deptengabbr = "";
var rgstno = "";
var sa = "";
var disporddd = "";
var orddd = "";
var drid = "";
var roomcd = "";
var ordtype = "";
var chosflag = "";
var orddeptcd = "";
var signflag = "";
var imgflag = "";
var langflag = "";
var tmptreatno = "";
var tmpiformcd = "";
var signno = 0;
var formcd = "";
var srcformcd = "";
var formnm = "";
var formprogflag = "";
var recdt = "";
var recdd = "";
var wardheader = "";
var dateheader = "";
var doctorheader = "";
var printheader = "";
var pageheader = "";
var imgepath = "";
var formrecdt = "";
var fstrgstdt = "";
var lastupdtdt = "";
var staffconfirmdt = "";
var fstrgstrusrnm = "";
var lastupdtrusrnm = "";
var erdt = "";
var ervisittm = "";
var staffnmheader = "";
var staffnm = "";
var emrrecusrnmheader = "";
var emrrecusrnm = "";
var indd = "";
var dschdd = "";
var inorddepthngnm = "";
var dschorddepthngnm = "";
var incnt = "";
var mainyn = "";
var rowno = "";
var prtnunm = getUserInfo("usernm");
var prtndeptnm = "";
//var getuseren = getUserInfo("userengnm");
var getdate = getCurrentDate();
var gettime = getCurrentTime();
var dateprnt = getdate.substr(0, 4) + "/" + getdate.substr(4, 2) + "/" + getdate.substr(6, 2);
var timeprnt = gettime.substr(0, 2) + ":" + gettime.substr(2, 2) + ":" + gettime.substr(4, 2);
var prtdt = dateprnt + " " + timeprnt;
fExistFolder(foldernm);
iviewerIemr.window.javascript.refreshFalse();
for(var i = 1; i <= certnodeList.length; i++)
{
signno = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/signno");
formcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formcd");
srcformcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/srcformcd");
formnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formnm");
formprogflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formprogflag");
recdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/recdt");
recdd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/recdd");
trans = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/trans");
pid = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/pid");
ptnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ptnm");
depthngnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/depthngnm");
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");
imgflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/imgflag");
langflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/langflag");
formrecdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formrecdt");
formrecdt = formrecdt.toDate().getDateFormat("YYYY/MM/DD");
fstrgstdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/fstrgstdt");
lastupdtdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/lastupdtdt");
staffconfirmdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/staffconfirmdt");
fstrgstrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/fstrgstrusrnm");
if(fstrgstrusrnm != "")
fstrgstrusrnm = fstrgstrusrnm + " (" + fstrgstdt + ")";
lastupdtrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/lastupdtrusrnm");
if(lastupdtrusrnm != "")
lastupdtrusrnm = lastupdtrusrnm + " (" + lastupdtdt + ")";
erdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/erdt");
ervisittm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ervisittm");
staffnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/staffnm");
emrrecusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/emrrecusrnm");
indd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/indd");
dschdd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/dschdd");
inorddepthngnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/inorddepthngnm");
dschorddepthngnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/dschorddepthngnm");
mainyn = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/mainyn");
rowno = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/rowno");
incnt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/incnt");
if(incnt != "")
incnt += " ȸÂ÷";
var ininfo = indd + " / " + inorddepthngnm;
if(erdt != "")
ininfo += " (ÀÀ±Þ½Ç ³»¿øÀÏ : " + erdt + ")";
var dschinfo = dschdd + " / " + dschorddepthngnm;
var formnmarr = formnm.split("\n");
var topformnm = "";
var botformnm = "";
if (formnmarr.length == 1)
{
topformnm = formnmarr[0];
}
else if (formnmarr.length == 2)
{
topformnm = formnmarr[0];
botformnm = formnmarr[1];
}
else
{
topformnm = formnm;
}
//2009-06-02 µî·Ï¹øÈ£ "-" º´¿øº° Á¦°Å
var pidynhcd = model.getValue("/root/init/pidynhcd/hardcd/hardcd");
if (pidynhcd == "Y")
{
for(var k = pid.length; k <= 8; k++)
{
if(k < 8){
pid = "0"+pid;
}
}
var str1 = pid.substr(0, 3);
var str2 = pid.substr(3, 2);
var str3 = pid.substr(5, 2);
var str4 = pid.substr(7, 1);
var tmppid = str1 + " " + str2 + " " + str3 + "-" + str4;
}
else
{
tmppid = pid;
}
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Áø·á°ú : ";
}
else
{
wardheader = "º´½Ç : ";
}
if (langflag == "KO")
{
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Áø·á°ú : ";
}
else
{
wardheader = "º´½Ç : ";
}
dateheader = "Áø·á±â°£ : ";
doctorheader = "ÁÖÄ¡ÀÇ : ";
printheader = "Ãâ·Â : ";
prtndeptnm = getUserInfo("dutplcenm");
imgepath = "com/commonweb/images/biglogo" + getUserInfo("dutplceinstcd") + ".jpg"
pageheader = "ÆäÀÌÁö : ";
}
else
{
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Dept : ";
}
else
{
wardheader = "Room : ";
}
dateheader = "Date : ";
doctorheader = "Doctor : ";
printheader = "Print date : ";
prtndeptnm = getUserInfo("deptengnm");
imgepath = "com/commonweb/images/biglogo" + getUserInfo("dutplceinstcd") + "e.jpg"
if (prtndeptnm == "" || prtndeptnm == null)
{
prtndeptnm = getUserInfo("dutplcenm");
}
pageheader = "Page : ";
}
if (imgflag == "N")
{
if(trans == "")
trans = "
Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.";
var ininm = "cmc";
switch(srcformcd)
{
case "0000000001"://¿Ü·¡ÃÊÁø
case "0000000002"://¿Ü·¡ÀçÁø
case "0000000004"://ÀÔ¿ø°æ°ú
case "0000003325"://DSC±â·Ï
ininm += "_0000000001.ini";
break;
case "0000000003"://ÀÔ¿øÃÊÁø
ininm += "_0000000003.ini";
break;
case "0000000676"://¼ö¼ú±â·Ï
staffnmheader = "¢Â Surgeon :";
if(staffnm != "")
staffnm += "(" + staffconfirmdt + ")";
emrrecusrnmheader = "";
ininm += "_0000000676.ini";
break;
case "0000003169"://Brief OP Note
ininm += "_0000000676.ini";
break;
case "0000000680"://ÀÔÅð¿ø¿ä¾à
staffnmheader = "¢Â StaffÀÛ¼º ¹× È®ÀÎ :";
if(staffnm != "")
staffnm += "(" + staffconfirmdt + ")";
emrrecusrnmheader = "¢Â Àǹ«±â·Ï»ç :";
ininm += "_0000000680.ini";
break;
case "0000000679"://ÀÀ±Þ½Ç±â·Ï
ininm += "_0000000679.ini";
break;
default:
//ininm += "_0000000001.ini";
if(formprogflag == "-" || formprogflag == "MAIN" || mainyn == "Y")
ininm += "_0000000001.ini";
else
ininm += ".ini";
break;
}
trans = "\n" + trans;
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = fso.CreateTextFile(foldernm + "\\" + signno + "_" + formcd + ".HTML", true, true);
a.WriteLine(trans);
//a.Write(trans);
a.Close();
emrpath = foldernm + "\\" + signno + "_" + formcd + ".HTML|";
//emrorddate += orddd + "|";
emrorddate = recdd + "|"; //±â·ÏÀÏÀ» º¸¿©´Þ¶ó´Â ÀÇ·áÁ¤º¸ÆÀ ¿äû
emrformnm = formnm + "|";
emrformcd = formcd + "|";
emrdeptnm = deptengabbr + "|";
emrdeptcd = orddeptcd + "|";
emrpage = "1|";
emrhiddenmsg = formcd + "¢Ë" + signno + "¢Ë" + formnm + "¢Ë" + chosflag + "¢Ë" +pid + "¢Ë" + ptnm + "¢Ë" + deptengabbr
+ "¢Ë" + sa + "¢Ë" + rgstno + "¢Ë" + disporddd + "¢Ë" + drid + "¢Ë" + roomcd + "¢Ë" + disporddd + "¢Ë" + ordtype + "¢Ë" + "E|";
recrowno = rowno;
//¿µ»ó-EMR±¸ºÐ|ÆÄÀϰæ·Î|ÀÔ¿øÀÏ|¼½ÄÁöÄÚµå|¼½ÄÁöÀ̸§|Áø·á°úÄÚµå|Áø·á°úÀ̸§
var chartinfo = "";
chartinfo = "E|" + emrpath + emrorddate + emrformcd + emrformnm + emrdeptcd + emrdeptnm;
model.makeValue("/root/send/iemr/treatno", "");
model.makeValue("/root/send/iemr/docucd", "");
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, emrhiddenmsg, recrowno);
//iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, emrhiddenmsg);
}
else
{
tmptreatno = signno + ",";
tmpiformcd = formcd + ",";
emrpath = "*|";
emrorddate = "*|";
emrformnm = "*|";
emrformcd = "*|";
emrdeptnm = "*|";
emrdeptcd = "*|";
emrpage = "*|";
emrhiddenmsg = "*|";
recrowno = rowno;
model.makeValue("/root/imgrec/iemr/treatno", signno);
model.makeValue("/root/imgrec/iemr/docucd", formcd);
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
var chartinfo;
chartinfo = "I";
var hiddenmsg;
hiddenmsg = "I";
iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, hiddenmsg, recrowno);
//iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, hiddenmsg);
}
}
iviewerIemr.window.javascript.refreshTrue();
}
/**
* @desc : ¹ÌºñÈ®ÀÎ È¸é ¿ÀÇÂ
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fOpenUnprep()
{
var pid = model.getValue("/root/main/patinfo/patinfolist/pid");
var orddd = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd"));
var cretno = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("cretno"));
setParameter("SPMRI03000_pid", pid);
setParameter("SPMRI03000_indd", orddd);
setParameter("SPMRI03000_cretno", cretno);
var wndobj = getOpenWindow("SPMRI03000");
if(wndobj != null)
{
wndobj.window.javascript.fInitialize_SPMRI03000();
activateChild("SPMRI03000");
}
else
{
open("SPMRI03000");
}
}
/**
* @desc : Ãâ·Â¹öư Ŭ¸¯
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fClickPrint()
{
var orddd = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd"));
var cretno = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("cretno"));
var orddeptcd = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddeptcd"));
var comporddd = model.getValue("/root/init/prtresn/orddd");
var compcretno = model.getValue("/root/init/prtresn/cretno");
var itrgtNodeCnt = getNodesetCnt(model, "/root/hardcd/trgtdept[trgtcd = '" + orddeptcd + "']"); //»çÀ¯´ë»óºÎ¼
if (itrgtNodeCnt > 0) //°¨¿°³»°ú, Á¤½Å°ú, »êºÎÀΰú, ºñ´¢±â°ú
{
var sUserDeptcd = getUserInfo("dutplcecd");
var iexNodeCnt = getNodesetCnt(model, "/root/hardcd/exdept[trgtcd = '" + sUserDeptcd + "']"); //»çÀ¯Á¦¿ÜºÎ¼
if ((iexNodeCnt <= 0) && (sUserDeptcd != orddeptcd) && (comporddd != orddd && compcretno != cretno)) //»ç¿ëÀÚ ±Ù¹«ºÎ¼¿Í ȯÀÚ ¼öÁøºÎ¼°¡ Ʋ¸°°æ¿ì »çÀ¯Ã¢ ÆË¾÷, ±Ù¹«ºÎ¼°¡ ÀÇ·áÁ¤º¸ÆÀÀϰæ¿ì Á¦¿Ü
{
model.resetInstanceNode("/root/init/prtresn");
setParameter("SPMRI03100_param_nodepath", "/root/init/prtresn");
setParameter("SPMRI03100_param_rsnflag", 'P');
modal("SPMRI03100");
var valiyn = model.getValue("/root/init/prtresn/valiyn");
if (valiyn != "Y")
{
return;
}
else
{
}
}
model.makeValue("/root/init/prtresn/orddd", orddd);
model.makeValue("/root/init/prtresn/cretno", cretno);
}
else
{
model.resetInstanceNode("/root/init/prtresn");
}
var appcopykey = iviewerIemr.window.javascript.setCopy(true); //¿µ»óºä¾î¿¡¼ÀÇ ¸®Åϰª
if (appcopykey != "")
{
var copykey = appcopykey.split("|");
var appkeyArr = copykey[0].split("¢Ë");
var reckind = ""; //±â·Ï, ¿µ»ó±¸ºÐ(E/I)
var tmpval = "";
var tmpformcd = "";
var tmptotpage = "";
appkeyArr = "";
var copyparam = "";
var compsignno = "";
var compformcd = "";
var tmpreckind = "";
var tmpdeptcd = getUserInfo("dutplcecd");
var tmppid = model.getValue("/root/main/patinfo/patinfolist/pid")
var tmporddd = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd"));
var tmpcretno = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("cretno"));
var tmpchosflag = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("ordtype"));
model.removeNodeSet("/root/prthist");
model.makeNode("/root/prthist");
var leng = 1;
for(var i = 0; i < copykey.length; i = i + 2)
{
appkeyArr = copykey[i].split("¢Ë");
reckind = appkeyArr[0];
if (reckind == "I")
{
tmpval = appkeyArr[1];
tmpformcd = appkeyArr[2];
tmpreckind = "02";
if (compsignno != tmpval || compformcd != tmpformcd)
{
compsignno = tmpval;
compformcd = tmpformcd;
}
else
{
continue;
}
}
else
{
tmpval = appkeyArr[1];
tmpformcd = appkeyArr[0];
tmpreckind = "01";
if (compsignno != tmpval)
{
compsignno = tmpval;
}
else
{
continue;
}
}
if (tmpcretno == "")
tmpcretno = 0;
model.makeValue("/root/prthist[" + leng + "]/pid", tmppid);
model.makeValue("/root/prthist[" + leng + "]/orddd", tmporddd);
model.makeValue("/root/prthist[" + leng + "]/cretno", tmpcretno);
model.makeValue("/root/prthist[" + leng + "]/chosflag", tmpchosflag);
model.makeValue("/root/prthist[" + leng + "]/signno", tmpval);
model.makeValue("/root/prthist[" + leng + "]/formcd", tmpformcd);
model.makeValue("/root/prthist[" + leng + "]/reckind", tmpreckind);
model.makeValue("/root/prthist[" + leng + "]/userdeptcd", tmpdeptcd);
model.makeValue("/root/prthist[" + leng + "]/readprtflag", "P");
model.makeValue("/root/prthist[" + leng + "]/refusge", model.getValue("/root/init/prtresn/resncd"));
model.makeValue("/root/prthist[" + leng + "]/refremark", model.getValue("/root/init/prtresn/etc"));
leng++;
}
datagrid1.rebuild();
for(var j = 1; j < datagrid1.rows; j++)
{
datagrid1.rowstatus(j) = 1;
}
model.removeNodeset("/root/send");
model.makeValue("/root/send/prtlist", datagrid1.getUpdateData());
submit("TXMRI04001");
if(iviewerIemr.window.javaScript.printChart("SMMRC03000"))
{
messageBox("Ãâ·Â", "I001");
}
else
{
messageBox("Ãâ·Â¿¡", "E009");
}
model.removeNodeSet("/root/prthist");
model.makeNode("/root/prthist");
datagrid1.refresh();
}
}
/**
* @desc : Áߺзù ±×¸®µå ¸Þ´º
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fMidindxMouseRight()
{
if(grd_midindx.isCell(event.target) && (grd_midindx.mouserow >= grd_midindx.fixedrows))
{
setPopupMenu("grd_midindx", false, "/root/midmsrght/mouserght", "label", "func");
}
}
/**
* @desc : ºÐ·ùÃâ·Â Ŭ¸¯
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fMidPrint()
{
model.setValue("/root/init/recall", "Y");
iviewerIemrprt.window.javascript.setupChart("ThumbView");
fGetDetlRecForPrt();
var appcopykey = iviewerIemrprt.window.javascript.setCopy(true); //¿µ»óºä¾î¿¡¼ÀÇ ¸®Åϰª
if (appcopykey != "")
{
var copykey = appcopykey.split("|");
var appkeyArr = copykey[0].split("¢Ë");
var reckind = ""; //±â·Ï, ¿µ»ó±¸ºÐ(E/I)
var tmpval = "";
var tmpformcd = "";
var tmptotpage = "";
appkeyArr = "";
var copyparam = "";
var compsignno = "";
var compformcd = "";
var tmpreckind = "";
var tmpdeptcd = getUserInfo("dutplcecd");
var tmppid = model.getValue("/root/main/patinfo/patinfolist/pid")
var tmporddd = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd"));
var tmpcretno = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("cretno"));
var tmpchosflag = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("ordtype"));
model.removeNodeSet("/root/prthist");
model.makeNode("/root/prthist");
var leng = 1;
for(var i = 0; i < copykey.length; i = i + 2)
{
appkeyArr = copykey[i].split("¢Ë");
reckind = appkeyArr[0];
if (reckind == "I")
{
tmpval = appkeyArr[1];
tmpformcd = appkeyArr[2];
tmpreckind = "02";
if (compsignno != tmpval || compformcd != tmpformcd)
{
compsignno = tmpval;
compformcd = tmpformcd;
}
else
{
continue;
}
}
else
{
tmpval = appkeyArr[1];
tmpformcd = appkeyArr[0];
tmpreckind = "01";
if (compsignno != tmpval)
{
compsignno = tmpval;
}
else
{
continue;
}
}
if (tmpcretno == "")
tmpcretno = 0;
model.makeValue("/root/prthist[" + leng+ "]/pid", tmppid);
model.makeValue("/root/prthist[" + leng + "]/orddd", tmporddd);
model.makeValue("/root/prthist[" + leng + "]/cretno", tmpcretno);
model.makeValue("/root/prthist[" + leng + "]/chosflag", tmpchosflag);
model.makeValue("/root/prthist[" + leng + "]/signno", tmpval);
model.makeValue("/root/prthist[" + leng + "]/formcd", tmpformcd);
model.makeValue("/root/prthist[" + leng + "]/reckind", tmpreckind);
model.makeValue("/root/prthist[" + leng + "]/userdeptcd", tmpdeptcd);
model.makeValue("/root/prthist[" + leng + "]/readprtflag", "P");
model.makeValue("/root/prthist[" + leng + "]/refusge", "");
model.makeValue("/root/prthist[" + leng + "]/refremark", "");
leng++;
}
datagrid1.rebuild();
for(var j = 1; j < datagrid1.rows; j++)
{
datagrid1.rowstatus(j) = 1;
}
model.removeNodeset("/root/send");
model.makeValue("/root/send/prtlist", datagrid1.getUpdateData());
submit("TXMRI04001");
if(iviewerIemr.window.javaScript.printChart("SMMRC03000"))
{
messageBox("Ãâ·Â", "I001");
}
else
{
messageBox("Ãâ·Â¿¡", "E009");
}
model.removeNodeSet("/root/prthist");
model.makeNode("/root/prthist");
datagrid1.refresh();
}
}
/**
* @desc : ±â·ÏÁ¶È¸
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetDetlRecForPrt()
{
var reccurpos = parseInt(model.getValue("/root/init/reccurpos"));
var rowfocus = "";
var midreccurpos = 1;
var midpos = 0; //ÁߺзùÁß ¸î¹øÂ° ±â·Ï°è»ê
var emrflag = model.getValue("/root/init/emrflag");
//2009-11-02 ¿ÀÈÄ 4:44:56 °ÁöÈÆ ¼öÁ¤
var reckind = grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("reckind"));
if (emrflag == "I" && (reckind != "EMR" && reckind != "CDIS"))
{
var totcnt = "[ " + 1 + " / " + grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt")) + " / " + model.getValue("/root/init/reccnt") + " ]";
model.setValue("/root/init/totcnt", totcnt);
lbl_totcnt.refresh();
var treatno = grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq"));
var formcd = grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("supitemindxseq"));
iviewerIemrprt.window.javascript.cleanViewer();
iviewerIemrprt.window.javascript.refreshFalse();
model.makeValue("/root/imgrec/iemr/treatno", parseInt(treatno));
model.makeValue("/root/imgrec/iemr/docucd", formcd);
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
var chartinfo;
chartinfo = "I";
var hiddenmsg;
hiddenmsg = "I";
iviewerIemrprt.window.javascript.appendChart(iemrNode, chartinfo, hiddenmsg);
iviewerIemrprt.window.javascript.refreshTrue();
}
else
{
for (var i = 1; i <= grd_midindx.rows; i++)
{
midcnt = grd_midindx.valueMatrix(i, grd_midindx.colref("cnt"));
midreccurpos += parseInt(midcnt);
if (midreccurpos > reccurpos)
{
//grd_midindx.row = i;
break;
}
}
var reckind = grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("reckind"));
var calcReccurpos = parseInt(model.getValue("/root/init/reccurpos"));
var bfopentest = model.getValue("/root/init/bfopentest");
var isLis = "";
for (var j = 1; j < grd_midindx.row; j++)
{
isLis = grd_midindx.valueMatrix(j, grd_midindx.colref("reckind"));
if (isLis == "LIS")
{
calcReccurpos -= 1;
}
}
model.removeNodeset("/root/send");
model.makeValue("/root/send/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
model.makeValue("/root/send/orddd", grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd")));
model.makeValue("/root/send/cretno", grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("cretno")));
model.makeValue("/root/send/chosflag", grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("ordtype")));
model.makeValue("/root/send/orddeptcd", grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddeptcd")));
model.makeValue("/root/send/tabflag", model.getValue("/root/init/tabflag"));
model.makeValue("/root/send/reccurpos", calcReccurpos);
model.makeValue("/root/send/recall", model.getValue("/root/init/recall"));
model.makeValue("/root/send/reckind", reckind);
model.makeValue("/root/send/itemindxseq", grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq")));
model.makeValue("/root/send/lisflag", grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("lisflag")));
//2009-11-02 ¿ÀÈÄ 2:18:45 °ÁöÈÆ ¼öÁ¤
model.makeValue("/root/send/bfopentest", bfopentest);
grd_pathistrow = grd_pathist.row;
pathistEmrFlag = grd_pathist.valueMatrix(grd_pathistrow, grd_pathist.colref("emrflag"))
if(bfopentest == "Y" && emrflag != "E"){
model.makeValue("/root/send/midbftest", "Y");
}
else{
model.makeValue("/root/send/midbftest", "N");
}
if(submit("TRMRI04004"))
{
iviewerIemrprt.window.javascript.cleanViewer();
fGetNextEmrImgRecPrt();
}
if (grd_midindx.row > 1)
{
var prevmidcnt = grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt"));
midpos = reccurpos - midreccurpos + parseInt(prevmidcnt) + 1;
}
else
{
midpos = reccurpos;
}
var totcnt = "[ " + midpos + " / " + grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("cnt")) + " / " + model.getValue("/root/init/reccnt") + " ]";
model.setValue("/root/init/totcnt", totcnt);
lbl_totcnt.refresh();
}
}
function fGetNextEmrImgRecPrt()
{
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
var foldernm = "C:\\Certrec";
if (certnodeList.length <= 0)
return;
var emrpath = "";
var emrorddate = "";
var emrformnm = "";
var emrformcd = "";
var emrdeptnm = "";
var emrdeptcd = "";
var emrpage = "";
var emrhiddenmsg = "";
var k = "";
var pid = "";
var ptnm = "";
var depthngnm = "";
var deptengabbr = "";
var rgstno = "";
var sa = "";
var disporddd = "";
var orddd = "";
var drid = "";
var roomcd = "";
var ordtype = "";
var chosflag = "";
var orddeptcd = "";
var signflag = "";
var imgflag = "";
var langflag = "";
var tmptreatno = "";
var tmpiformcd = "";
var signno = 0;
var formcd = "";
var srcformcd = "";
var formnm = "";
var formprogflag = "";
var recdt = "";
var recdd = "";
var wardheader = "";
var dateheader = "";
var doctorheader = "";
var printheader = "";
var pageheader = "";
var imgepath = "";
var formrecdt = "";
var fstrgstdt = "";
var lastupdtdt = "";
var staffconfirmdt = "";
var fstrgstrusrnm = "";
var lastupdtrusrnm = "";
var erdt = "";
var ervisittm = "";
var staffnmheader = "";
var staffnm = "";
var emrrecusrnmheader = "";
var emrrecusrnm = "";
var indd = "";
var dschdd = "";
var inorddepthngnm = "";
var dschorddepthngnm = "";
var incnt = "";
var mainyn = "";
var prtnunm = getUserInfo("usernm");
var prtndeptnm = "";
//var getuseren = getUserInfo("userengnm");
var getdate = getCurrentDate();
var gettime = getCurrentTime();
var dateprnt = getdate.substr(0, 4) + "/" + getdate.substr(4, 2) + "/" + getdate.substr(6, 2);
var timeprnt = gettime.substr(0, 2) + ":" + gettime.substr(2, 2) + ":" + gettime.substr(4, 2);
var prtdt = dateprnt + " " + timeprnt;
fExistFolder(foldernm);
iviewerIemrprt.window.javascript.refreshFalse();
for(var i = 1; i <= certnodeList.length; i++)
{
signno = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/signno");
formcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formcd");
srcformcd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/srcformcd");
formnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formnm");
formprogflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formprogflag");
recdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/recdt");
recdd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/recdd");
trans = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/trans");
pid = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/pid");
ptnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ptnm");
depthngnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/depthngnm");
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");
imgflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/imgflag");
langflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/langflag");
formrecdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formrecdt");
formrecdt = formrecdt.toDate().getDateFormat("YYYY/MM/DD");
fstrgstdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/fstrgstdt");
lastupdtdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/lastupdtdt");
staffconfirmdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/staffconfirmdt");
fstrgstrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/fstrgstrusrnm");
if(fstrgstrusrnm != "")
fstrgstrusrnm = fstrgstrusrnm + " (" + fstrgstdt + ")";
lastupdtrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/lastupdtrusrnm");
if(lastupdtrusrnm != "")
lastupdtrusrnm = lastupdtrusrnm + " (" + lastupdtdt + ")";
erdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/erdt");
ervisittm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/ervisittm");
staffnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/staffnm");
emrrecusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/emrrecusrnm");
indd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/indd");
dschdd = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/dschdd");
inorddepthngnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/inorddepthngnm");
dschorddepthngnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/dschorddepthngnm");
mainyn = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/mainyn");
incnt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/incnt");
if(incnt != "")
incnt += " ȸÂ÷";
var ininfo = indd + " / " + inorddepthngnm;
if(erdt != "")
ininfo += " (ÀÀ±Þ½Ç ³»¿øÀÏ : " + erdt + ")";
var dschinfo = dschdd + " / " + dschorddepthngnm;
var formnmarr = formnm.split("\n");
var topformnm = "";
var botformnm = "";
if (formnmarr.length == 1)
{
topformnm = formnmarr[0];
}
else if (formnmarr.length == 2)
{
topformnm = formnmarr[0];
botformnm = formnmarr[1];
}
else
{
topformnm = formnm;
}
//2009-06-02 µî·Ï¹øÈ£ "-" º´¿øº° Á¦°Å
var pidynhcd = model.getValue("/root/init/pidynhcd/hardcd/hardcd");
if (pidynhcd == "Y")
{
for(var k = pid.length; k <= 8; k++)
{
if(k < 8){
pid = "0"+pid;
}
}
var str1 = pid.substr(0, 3);
var str2 = pid.substr(3, 2);
var str3 = pid.substr(5, 2);
var str4 = pid.substr(7, 1);
var tmppid = str1 + " " + str2 + " " + str3 + "-" + str4;
}
else
{
tmppid = pid;
}
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Áø·á°ú : ";
}
else
{
wardheader = "º´½Ç : ";
}
if (langflag == "KO")
{
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Áø·á°ú : ";
}
else
{
wardheader = "º´½Ç : ";
}
dateheader = "Áø·á±â°£ : ";
doctorheader = "ÁÖÄ¡ÀÇ : ";
printheader = "Ãâ·Â : ";
prtndeptnm = getUserInfo("dutplcenm");
imgepath = "com/commonweb/images/biglogo" + getUserInfo("dutplceinstcd") + ".jpg"
pageheader = "ÆäÀÌÁö : ";
}
else
{
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Dept : ";
}
else
{
wardheader = "Room : ";
}
dateheader = "Date : ";
doctorheader = "Doctor : ";
printheader = "Print date : ";
prtndeptnm = getUserInfo("deptengnm");
imgepath = "com/commonweb/images/biglogo" + getUserInfo("dutplceinstcd") + "e.jpg"
if (prtndeptnm == "" || prtndeptnm == null)
{
prtndeptnm = getUserInfo("dutplcenm");
}
pageheader = "Page : ";
}
if (imgflag == "N")
{
if(trans == "")
trans = "Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.";
var ininm = "cmc";
switch(srcformcd)
{
case "0000000001"://¿Ü·¡ÃÊÁø
case "0000000002"://¿Ü·¡ÀçÁø
case "0000000004"://ÀÔ¿ø°æ°ú
case "0000003325"://DSC±â·Ï
ininm += "_0000000001.ini";
break;
case "0000000003"://ÀÔ¿øÃÊÁø
ininm += "_0000000003.ini";
break;
case "0000000676"://¼ö¼ú±â·Ï
staffnmheader = "¢Â Surgeon :";
if(staffnm != "")
staffnm += "(" + staffconfirmdt + ")";
emrrecusrnmheader = "";
ininm += "_0000000676.ini";
break;
case "0000003169"://Brief OP Note
ininm += "_0000000676.ini";
break;
case "0000000680"://ÀÔÅð¿ø¿ä¾à
staffnmheader = "¢Â StaffÀÛ¼º ¹× È®ÀÎ :";
if(staffnm != "")
staffnm += "(" + staffconfirmdt + ")";
emrrecusrnmheader = "¢Â Àǹ«±â·Ï»ç :";
ininm += "_0000000680.ini";
break;
case "0000000679"://ÀÀ±Þ½Ç±â·Ï
ininm += "_0000000679.ini";
break;
default:
//ininm += "_0000000001.ini";
if(formprogflag == "-" || formprogflag == "MAIN" || mainyn == "Y")
ininm += "_0000000001.ini";
else
ininm += ".ini";
break;
}
trans = "\n" + trans;
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = fso.CreateTextFile(foldernm + "\\" + signno + "_" + formcd + ".HTML", true, true);
a.WriteLine(trans);
//a.Write(trans);
a.Close();
emrpath += foldernm + "\\" + signno + "_" + formcd + ".HTML|";
//emrorddate += orddd + "|";
emrorddate += recdd + "|"; //±â·ÏÀÏÀ» º¸¿©´Þ¶ó´Â ÀÇ·áÁ¤º¸ÆÀ ¿äû
emrformnm += formnm + "|";
emrformcd += formcd + "|";
emrdeptnm += deptengabbr + "|";
emrdeptcd += orddeptcd + "|";
emrpage += "1|";
emrhiddenmsg += formcd + "¢Ë" + signno + "¢Ë" + formnm + "¢Ë" + chosflag + "¢Ë" +pid + "¢Ë" + ptnm + "¢Ë" + deptengabbr
+ "¢Ë" + sa + "¢Ë" + rgstno + "¢Ë" + disporddd + "¢Ë" + drid + "¢Ë" + roomcd + "¢Ë" + disporddd + "¢Ë" + ordtype + "¢Ë" + "E|";
//¿µ»ó-EMR±¸ºÐ|ÆÄÀϰæ·Î|ÀÔ¿øÀÏ|¼½ÄÁöÄÚµå|¼½ÄÁöÀ̸§|Áø·á°úÄÚµå|Áø·á°úÀ̸§
var chartinfo = "E|" + emrpath + emrorddate + emrformcd + emrformnm + emrdeptcd + emrdeptnm;
model.makeValue("/root/send/iemr/treatno", "");
model.makeValue("/root/send/iemr/docucd", "");
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
iviewerIemrprt.window.javascript.appendChart(iemrNode, chartinfo, emrhiddenmsg);
}
else
{
tmptreatno += signno + ",";
tmpiformcd += formcd + ",";
emrpath += "*|";
emrorddate += "*|";
emrformnm += "*|";
emrformcd += "*|";
emrdeptnm += "*|";
emrdeptcd += "*|";
emrpage += "*|";
emrhiddenmsg += "*|";
model.makeValue("/root/imgrec/iemr/treatno", signno);
model.makeValue("/root/imgrec/iemr/docucd", formcd);
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
var chartinfo;
chartinfo = "I";
var hiddenmsg;
hiddenmsg = "I";
iviewerIemrprt.window.javascript.appendChart(iemrNode, chartinfo, hiddenmsg);
}
}
iviewerIemrprt.window.javascript.refreshTrue();
}
/**
* @desc : ¿¬¼Óº¸±â ´õºíŬ¸¯½Ã ±â·Ï rowno ¸®ÅÏ ÀÎÅÍÆäÀ̽º
* @id :
* @event : DOMActivate
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fReturnRecRowno(rowno)
{
if (rowno != null && rowno != "" && rowno > 0)
{
model.setValue("/root/init/reccurpos", parseInt(rowno));
}
model.refresh(); //pjh
}
/**
* @desc : ȸéÇ¥½Ã ´ë»óÀÌ EMR + IMG ±â·ÏÀΰæ¿ì ó¸®
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fGetNextEmrImgRecOne()
{
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
var foldernm = "C:\\Certrec";
var recall = model.getValue("/root/init/recall");
if (certnodeList.length <= 0)
{
return;
}
else if(certnodeList.length > 1)
{
model.setValue("/root/init/recall", "N");
}
var emrpath = "";
var emrorddate = "";
var emrformnm = "";
var emrformcd = "";
var emrdeptnm = "";
var emrdeptcd = "";
var emrpage = "";
var emrhiddenmsg = "";
var recrowno = "";
var k = "";
var pid = "";
var ptnm = "";
var depthngnm = "";
var deptengabbr = "";
var rgstno = "";
var sa = "";
var disporddd = "";
var orddd = "";
var drid = "";
var roomcd = "";
var ordtype = "";
var chosflag = "";
var orddeptcd = "";
var signflag = "";
var imgflag = "";
var langflag = "";
var tmptreatno = "";
var tmpiformcd = "";
var signno = 0;
var formcd = "";
var srcformcd = "";
var formnm = "";
var formprogflag = "";
var recdt = "";
var recdd = "";
var wardheader = "";
var dateheader = "";
var doctorheader = "";
var printheader = "";
var pageheader = "";
var imgepath = "";
var formrecdt = "";
var fstrgstdt = "";
var lastupdtdt = "";
var staffconfirmdt = "";
var fstrgstrusrnm = "";
var lastupdtrusrnm = "";
var erdt = "";
var ervisittm = "";
var staffnmheader = "";
var staffnm = "";
var emrrecusrnmheader = "";
var emrrecusrnm = "";
var indd = "";
var dschdd = "";
var inorddepthngnm = "";
var dschorddepthngnm = "";
var incnt = "";
var mainyn = "";
var rowno = "";
var prtnunm = getUserInfo("usernm");
var prtndeptnm = "";
//var getuseren = getUserInfo("userengnm");
var getdate = getCurrentDate();
var gettime = getCurrentTime();
var dateprnt = getdate.substr(0, 4) + "/" + getdate.substr(4, 2) + "/" + getdate.substr(6, 2);
var timeprnt = gettime.substr(0, 2) + ":" + gettime.substr(2, 2) + ":" + gettime.substr(4, 2);
var prtdt = dateprnt + " " + timeprnt;
fExistFolder(foldernm);
iviewerIemr.window.javascript.refreshFalse();
//for(var i = 1; i <= certnodeList.length; i++)
//{
signno = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/signno");
formcd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/formcd");
srcformcd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/srcformcd");
formnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/formnm");
formprogflag = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/formprogflag");
recdt = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/recdt");
recdd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/recdd");
trans = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/trans");
pid = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/pid");
ptnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/ptnm");
depthngnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/depthngnm");
deptengabbr = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/deptengabbr");
rgstno = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/rgstno");
sa = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/sa");
disporddd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/disporddd");
orddd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/orddd");
drid = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/drid");
roomcd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/roomcd");
ordtype = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/ordtype");
chosflag = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/chosflag");
orddeptcd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/orddeptcd");
signflag = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/signflag");
imgflag = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/imgflag");
langflag = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/langflag");
formrecdt = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/formrecdt");
formrecdt = formrecdt.toDate().getDateFormat("YYYY/MM/DD");
fstrgstdt = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/fstrgstdt");
lastupdtdt = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/lastupdtdt");
staffconfirmdt = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/staffconfirmdt");
fstrgstrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/fstrgstrusrnm");
if(fstrgstrusrnm != "")
fstrgstrusrnm = fstrgstrusrnm + " (" + fstrgstdt + ")";
lastupdtrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/lastupdtrusrnm");
if(lastupdtrusrnm != "")
lastupdtrusrnm = lastupdtrusrnm + " (" + lastupdtdt + ")";
erdt = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/erdt");
ervisittm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/ervisittm");
staffnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/staffnm");
emrrecusrnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/emrrecusrnm");
indd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/indd");
dschdd = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/dschdd");
inorddepthngnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/inorddepthngnm");
dschorddepthngnm = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/dschorddepthngnm");
mainyn = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/mainyn");
rowno = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/rowno");
incnt = model.getValue("/root/tmpinicert/iniinfo[" + nodeposcnt + "]/incnt");
if(incnt != "")
incnt += " ȸÂ÷";
var ininfo = indd + " / " + inorddepthngnm;
if(erdt != "")
ininfo += " (ÀÀ±Þ½Ç ³»¿øÀÏ : " + erdt + ")";
var dschinfo = dschdd + " / " + dschorddepthngnm;
var formnmarr = formnm.split("\n");
var topformnm = "";
var botformnm = "";
if (formnmarr.length == 1)
{
topformnm = formnmarr[0];
}
else if (formnmarr.length == 2)
{
topformnm = formnmarr[0];
botformnm = formnmarr[1];
}
else
{
topformnm = formnm;
}
//2009-06-02 µî·Ï¹øÈ£ "-" º´¿øº° Á¦°Å
var pidynhcd = model.getValue("/root/init/pidynhcd/hardcd/hardcd");
if (pidynhcd == "Y")
{
for(var k = pid.length; k <= 8; k++)
{
if(k < 8){
pid = "0"+pid;
}
}
var str1 = pid.substr(0, 3);
var str2 = pid.substr(3, 2);
var str3 = pid.substr(5, 2);
var str4 = pid.substr(7, 1);
var tmppid = str1 + " " + str2 + " " + str3 + "-" + str4;
}
else
{
tmppid = pid;
}
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Áø·á°ú : ";
}
else
{
wardheader = "º´½Ç : ";
}
if (langflag == "KO")
{
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Áø·á°ú : ";
}
else
{
wardheader = "º´½Ç : ";
}
dateheader = "Áø·á±â°£ : ";
doctorheader = "ÁÖÄ¡ÀÇ : ";
printheader = "Ãâ·Â : ";
prtndeptnm = getUserInfo("dutplcenm");
imgepath = "com/commonweb/images/biglogo" + getUserInfo("dutplceinstcd") + ".jpg"
pageheader = "ÆäÀÌÁö : ";
}
else
{
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Dept : ";
}
else
{
wardheader = "Room : ";
}
dateheader = "Date : ";
doctorheader = "Doctor : ";
printheader = "Print date : ";
prtndeptnm = getUserInfo("deptengnm");
imgepath = "com/commonweb/images/biglogo" + getUserInfo("dutplceinstcd") + "e.jpg"
if (prtndeptnm == "" || prtndeptnm == null)
{
prtndeptnm = getUserInfo("dutplcenm");
}
pageheader = "Page : ";
}
if (imgflag == "N")
{
if(trans == "")
trans = "Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.";
var ininm = "cmc";
switch(srcformcd)
{
case "0000000001"://¿Ü·¡ÃÊÁø
case "0000000002"://¿Ü·¡ÀçÁø
case "0000000004"://ÀÔ¿ø°æ°ú
case "0000003325"://DSC±â·Ï
ininm += "_0000000001.ini";
break;
case "0000000003"://ÀÔ¿øÃÊÁø
ininm += "_0000000003.ini";
break;
case "0000000676"://¼ö¼ú±â·Ï
staffnmheader = "¢Â Surgeon :";
if(staffnm != "")
staffnm += "(" + staffconfirmdt + ")";
emrrecusrnmheader = "";
ininm += "_0000000676.ini";
break;
case "0000003169"://Brief OP Note
ininm += "_0000000676.ini";
break;
case "0000000680"://ÀÔÅð¿ø¿ä¾à
staffnmheader = "¢Â StaffÀÛ¼º ¹× È®ÀÎ :";
if(staffnm != "")
staffnm += "(" + staffconfirmdt + ")";
emrrecusrnmheader = "¢Â Àǹ«±â·Ï»ç :";
ininm += "_0000000680.ini";
break;
case "0000000679"://ÀÀ±Þ½Ç±â·Ï
ininm += "_0000000679.ini";
break;
default:
//ininm += "_0000000001.ini";
if(formprogflag == "-" || formprogflag == "MAIN" || mainyn == "Y")
ininm += "_0000000001.ini";
else
ininm += ".ini";
break;
}
trans = "\n" + trans;
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = fso.CreateTextFile(foldernm + "\\" + signno + "_" + formcd + ".HTML", true, true);
a.WriteLine(trans);
//a.Write(trans);
a.Close();
emrpath = foldernm + "\\" + signno + "_" + formcd + ".HTML|";
//emrorddate += orddd + "|";
emrorddate = recdd + "|"; //±â·ÏÀÏÀ» º¸¿©´Þ¶ó´Â ÀÇ·áÁ¤º¸ÆÀ ¿äû
emrformnm = formnm + "|";
emrformcd = formcd + "|";
emrdeptnm = deptengabbr + "|";
emrdeptcd = orddeptcd + "|";
emrpage = "1|";
emrhiddenmsg = formcd + "¢Ë" + signno + "¢Ë" + formnm + "¢Ë" + chosflag + "¢Ë" +pid + "¢Ë" + ptnm + "¢Ë" + deptengabbr
+ "¢Ë" + sa + "¢Ë" + rgstno + "¢Ë" + disporddd + "¢Ë" + drid + "¢Ë" + roomcd + "¢Ë" + disporddd + "¢Ë" + ordtype + "¢Ë" + "E|";
recrowno = rowno;
//¿µ»ó-EMR±¸ºÐ|ÆÄÀϰæ·Î|ÀÔ¿øÀÏ|¼½ÄÁöÄÚµå|¼½ÄÁöÀ̸§|Áø·á°úÄÚµå|Áø·á°úÀ̸§
var chartinfo = "";
chartinfo = "E|" + emrpath + emrorddate + emrformcd + emrformnm + emrdeptcd + emrdeptnm;
model.makeValue("/root/send/iemr/treatno", "");
model.makeValue("/root/send/iemr/docucd", "");
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, emrhiddenmsg, recrowno);
//iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, emrhiddenmsg);
}
else
{
tmptreatno = signno + ",";
tmpiformcd = formcd + ",";
emrpath = "*|";
emrorddate = "*|";
emrformnm = "*|";
emrformcd = "*|";
emrdeptnm = "*|";
emrdeptcd = "*|";
emrpage = "*|";
emrhiddenmsg = "*|";
recrowno = rowno;
model.makeValue("/root/imgrec/iemr/treatno", signno);
model.makeValue("/root/imgrec/iemr/docucd", formcd);
var iemrNode = instance1.selectSingleNode("/root/imgrec/iemr");
var chartinfo;
chartinfo = "I";
var hiddenmsg;
hiddenmsg = "I";
iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, hiddenmsg, recrowno);
//iviewerIemr.window.javascript.appendChart(iemrNode, chartinfo, hiddenmsg);
}
/*
if (certnodeList.length > 1 && certnodeList.length > nodeposcnt)
{
multirecyn = "Y";
}
else
{
multirecyn = "N";
nodeposcnt = 1;
}*/
//}
iviewerIemr.window.javascript.refreshTrue();
}
/**
* @desc : ºÏ¸¶Å© µî·Ï Ŭ¸¯½Ã ¸ð´Þâ È£Ãâ
* @id :
* @event : DOMActivate
* @return : void
* @authur : °ÁöÈÆ
*/
function fSetBookmark()
{
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
var appcopykey = iviewerIemr.window.javascript.SetMarkPage(ViewMode); //¿µ»óºä¾î¿¡¼ÀÇ ¸®Åϰª
var selPid = model.getValue("/root/main/patinfo/patinfolist/pid");
if(selPid != ""){
if(appcopykey != null && appcopykey != "" ){
appcopykey = appcopykey.getTrim();
var copykey = appcopykey.split("|");
var appkeyArr = "";
var imageCnt = 0;
//1Â÷ÀûÀ¸·Î ¿µ»óEMR¸¸ µî·Ï°¡´É. ¼±ÅÃµÈ ¿µ»óEMRÀÇ °¹¼ö¸¦ ÆÄ¾ÇÇÑ´Ù.
for(var i = 0; i < copykey.length; i++){
appkeyArr = copykey[i].split("¢Ë");
reckind = appkeyArr[0];
if (reckind == "I"){
imageCnt++;
}
}
if(imageCnt > 0){ //¼±ÅÃµÈ À̹ÌÁöÁß¿¡ ¿µ»óEMRÀÌ ÀÖÀ»°æ¿ì
setParameter("SPMRI01500_reckey", appcopykey);
setParameter("SPMRI01500_setflag", "A");
modal("SPMRI01500");
//ºÏ¸¶Å© treeview ÀçÁ¶È¸
fGetTreeView();
}
else{
messageBox("ÇöÀç ¿µ»óEMR¸¸ µî·Ï ","I006");
return;
}
}
else{
var ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "" || ViewMode != "ChartView")
{
messageBox("¼±ÅÃµÈ ±â·ÏÀÌ","I004");
return;
}
}
}
else{
messageBox("¼±ÅÃµÈ È¯ÀÚ°¡","I004");
model.toggle("grd");
btn_all.selected = true;
model.setFocus("ipt_pid");
return;
}
}
/**
* @group :
* @ver :
* @by : 2009-10-16 ¿ÀÀü 10:13:04 °ÁöÈÆ
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : Æ®¸®ºä Á¶È¸
* @param :
* @return :
* @---------------------------------------------------
*/
function fGetTreeView(){
//ºÏ¸¶Å© Æ®¸®ºä´Â ȯÀÚ°¡ Á¶È¸µÇ¾îÀÖ¾î¾ß¸¸ Á¶È¸µÈ´Ù. ȯÀÚ°¡¾øÀ»°æ¿ì Àüüâ ¸ðµå
var selPid = model.getValue("/root/main/patinfo/patinfolist/pid");
if(selPid == ""){
messageBox("¼±ÅÃµÈ È¯ÀÚ°¡","I004");
model.toggle("grd");
btn_all.selected = true;
model.setFocus("ipt_pid");
return;
}
else{
//ºÏ¸¶Å©°¡ ¼±ÅõǾî¾ß¸¸ Á¶È¸¸¦ ÇÑ´Ù.
var selIndx = switch1.selectedIndex;
var bmkAll = chk_allbmk.value;
if(selIndx == 1){
//InstanceÃʱâÈ
model.removenode("/root/main/treeview");
model.makeNode("/root/main/treeview");
//send Node ¼³Á¤
model.removenode("/root/send/bmkpara");
model.makeValue("/root/send/bmkpara/pid", selPid);
model.makeValue("/root/send/bmkpara/bmkall", bmkAll);
if(submit("TRMRI01500")){
trv_bookmark.rebuild();
}
}
}
}
/**
* @group :
* @ver :
* @by : 2009-10-16 ¿ÀÀü 10:13:04 °ÁöÈÆ
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : ºÏ¸¶Å© Ç׸ñÀ» ´õºíŬ¸¯ÇÑ´Ù.
* @param :
* @return :
* @---------------------------------------------------
*/
function fGetBookmarkItem(){
var selFolder = new SELFOLDER();
itemno = selFolder.itemno;
linkflag = selFolder.linkflag;
if(linkflag == "Y"){
model.removeNode("/root/send/bookmark");
model.makeValue("/root/send/bookmark/itemno", itemno);
submit("TRMRI00408");
var recinfos = instance1.selectNodes("/root/tmp/recinfos/recinfo");
if(recinfos.length > 0){
//ÃʱâÈ
iviewerIemr.window.javascript.cleanViewer();
iviewerIemr.window.javascript.refreshFalse();
model.removenode("/root/tmp/imgrec");
//ÅëÇÕ±â·ÏÁ¶È¸ ȯÀÚÁ¤º¸ ¼ÂÆÃ
var selPid = "";
//ºÏ¸¶Å©¿¡ µî·ÏµÈ Á¤º¸¸¦ °¡Á®¿Â´Ù.
for(var i = 0 ; i < recinfos.length; i++){
var recinfo = recinfos.item(i);
var emrflag = recinfo.selectSingleNode("emrflag").text;
//¿µ»óÀ϶§
if(emrflag == "I"){
var nodePos = i+1;
var treatno = recinfo.selectSingleNode("recno").text;
var docucd = recinfo.selectSingleNode("formcd").text;
var pageno = recinfo.selectSingleNode("pageno").text;
var pid = recinfo.selectSingleNode("pid").text;
selPid = pid;
model.makeValue("/root/tmp/imgrec/iemr[" + nodePos + "]/treatno", parseInt(treatno));
model.makeValue("/root/tmp/imgrec/iemr[" + nodePos + "]/pid", pid);
model.makeNode("/root/tmp/imgrec/iemr[" + nodePos + "]/orddeptcd");
model.makeNode("/root/tmp/imgrec/iemr[" + nodePos + "]/indd");
model.makeValue("/root/tmp/imgrec/iemr[" + nodePos + "]/docucd", docucd);
model.makeNode("/root/tmp/imgrec/iemr[" + nodePos + "]/ioflag");
model.makeNode("/root/tmp/imgrec/iemr[" + nodePos + "]/cmc_cretno");
model.makeNode("/root/tmp/imgrec/iemr[" + nodePos + "]/cmc_spcid");
model.makeNode("/root/tmp/imgrec/iemr[" + nodePos + "]/cmc_orddate");
model.makeNode("/root/tmp/imgrec/iemr[" + nodePos + "]/cmc_orderseqno");
model.makeValue("/root/tmp/imgrec/iemr[" + nodePos + "]/pageno", parseInt(pageno));
}
}
//ÅëÇÕ±â·ÏÁ¶È¸ ȯÀÚÁ¤º¸ÀԷ¶õ Setting
if(chk_allbmk.value == "A"){
ipt_pid.value = selPid;
chkPidRtn = fPidKeyPress();
}
var iemrNode = instance1.selectSingleNode("/root/tmp/imgrec");
//chartÃß°¡
var chartinfo;
chartinfo = "I";
var hiddenmsg;
hiddenmsg = "I";
iviewerIemr.window.javascript.append_BmarkChart(iemrNode, chartinfo, hiddenmsg);
iviewerIemr.window.javascript.refreshTrue();
//ViewMode¸¦ ¿©·¯ÆäÀÌÁö º¸±â·Î Setting
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "" || ViewMode != "ChartView")
{
iviewerIemr.window.javascript.setupChart("ChartView");
}
}
else{
messageBox("µî·ÏµÈ ±â·ÏÀÌ ", "I004");
return;
}
}
}
/**
* @group :
* @ver :
* @by : 2009-10-16 ¿ÀÀü 10:13:04 °ÁöÈÆ
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : ¼±ÅÃÇÑ Æú´õÀÇ Á¤º¸
* @param :
* @return :
* @---------------------------------------------------
*/
function SELFOLDER(){
var item = trv_bookmark.item(trv_bookmark.selectedIndex);
if(item == null) return;
var currow = item.index + 1;
this.level = model.getValue("/root/main/treeview/item["+currow+"]/level");
this.itemno = model.getValue("/root/main/treeview/item["+currow+"]/itemno");
this.supitemno = model.getValue("/root/main/treeview/item["+currow+"]/supitemno");
this.itemnm = model.getValue("/root/main/treeview/item["+currow+"]/itemnm");
this.linkflag = model.getValue("/root/main/treeview/item["+currow+"]/linkflag");
this.pid = model.getValue("/root/main/treeview/item["+currow+"]/pid");
}
/**
* @group :
* @ver :
* @by : 2009-10-16 ¿ÀÀü 10:13:04 °ÁöÈÆ
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : Æú´õ¸¦ ¼öÁ¤ÇÔ
* @param :
* @return :
* @---------------------------------------------------
*/
function fModiFolder(){
setParameter("SPMRI01500_setflag", "M");
open("SPMRI01500");
fGetTreeView();
}
/**
* @group :
* @ver :
* @by : 2009-10-16 ¿ÀÀü 10:13:04 °ÁöÈÆ
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : ºÏ¸¶Å©¿¡ ÇØ´çȯÀÚ ±â·ÏÀÌ ÀÖÀ¸¸é ºÏ¸¶Å© ÅÇ »öÀ» º¯°æ.
* @param :
* @return :
* @---------------------------------------------------
*/
function fChkBookmark(){
var selPid = model.getValue("/root/main/patinfo/patinfolist/pid");
model.removeNode("/root/send/selpid");
model.makeValue("/root/send/selpid", selPid);
if(submit("TRMRI00409")){
var itemNodes = instance1.selectNodes("/root/tmp/chkitem/itemno");
if(0 < itemNodes.length){
btn_mark.attribute("color") = "#ff0000";
}
else{
btn_mark.attribute("color") = "";
}
}
}
function fUpKeyBtn()
{
if ( (grd_pathist.row-1) >= grd_pathist.fixedRows )
{
fGetRecMidIndx(grd_pathist.row-1);
grd_pathist.row = grd_pathist.row - 1;
}
}
function fDownKeyBtn()
{
if ( (grd_pathist.row+1) != grd_pathist.rows )
{
fGetRecMidIndx(grd_pathist.row+1);
grd_pathist.row = grd_pathist.row + 1;
}
}
/**
* @group :
* @ver :
* @by : 2009-10-30 ÁÖÈñ°æ
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : xrwȸ鳻¿¡¼ ¹æÇâŰ(¡è , ¡é) À̺¥Æ® ¹ß»ý ½Ã ´ÙÀ½/ÀÌÀüÀÇ ¼öÁøÀÌ·Â Á¶È¸
* @param :
* @return :
* @---------------------------------------------------
*/
function onkeydown()
{
/*
if (event.keyCode == 38) //¡è
{
if ( (grd_pathist.row-1) >= grd_pathist.fixedRows )
{
fGetRecMidIndx(grd_pathist.row-1);
grd_pathist.row = grd_pathist.row - 1;
}
}
else if ( event.keyCode == 40 ) //¡é
{
if ( (grd_pathist.row+1) != grd_pathist.rows )
{
fGetRecMidIndx(grd_pathist.row+1);
grd_pathist.row = grd_pathist.row + 1;
}
}
else {
event.preventDefault();
}
event.stopPropagation();*/
}
/**
* @group :
* @ver :
* @by : 2009-12-04 ±è¾ç¼ö
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : Á¶È¸ÀÏÀÚ »ý¼º ¹× Á¶È¸
* @param :
* @return :
* @---------------------------------------------------
*/
function fSrchMakeDd(preflag, callflag)
{
if(callflag == "Y"){ //¼½ÄâÁ¶È¸Àΰæ¿ì
var currentSchrFromDay = model.getValue("/root/tmp/prcprec/srchFromdd"); //Á¶È¸½ÃÀÛÀÏÀÚ
var currentSchrToDay = model.getValue("/root/tmp/prcprec/srchTodd"); //Á¶È¸Á¾·áÀÏÀÚ
var srchInterval = model.getValue("/root/tmp/prcprec/srchInterval"); //Á¶È¸±¸°£
//var srchYn = model.getValue("/root/tmp/prcprec/srchYn"); //ÃÖÃÊÁ¶È¸¿©ºÎ
}else if(callflag == "P"){ //ÀÇ»çÁö½Ã ±â·ÏÁ¶È¸Àϰæ¿ì
var currentSchrFromDay = model.getValue("/root/tmp/sndprcprec/srchprcpfromdd"); //Á¶È¸½ÃÀÛÀÏÀÚ
var currentSchrToDay = model.getValue("/root/tmp/sndprcprec/srchprcptodd"); //Á¶È¸Á¾·áÀÏÀÚ
var srchInterval = model.getValue("/root/tmp/sndprcprec/srchprcpinterval"); //Á¶È¸±¸°£
}
if(srchInterval == ""){
messageBox("Á¶È¸±¸°£À» ÀÔ·ÂÇÏ¼Å¾ß ÇÕ´Ï´Ù.","I");
return;
}
if(preflag == 1){ //ÀÌÀüÀΰæ¿ì
var fromDay = currentSchrFromDay.toDate().getAddDate(parseInt(srchInterval) * -1, "D").getDateFormat();
if(callflag == "Y"){ //¼½ÄâÁ¶È¸Àΰæ¿ì
model.makeValue("/root/tmp/prcprec/srchFromdd", fromDay);
model.makeValue("/root/tmp/prcprec/srchTodd", currentSchrFromDay.toDate().getAddDate(-1, "D").getDateFormat());
}else if(callflag == "P"){ //ÀÇ»çÁö½Ã ±â·ÏÁ¶È¸Àϰæ¿ì
model.makeValue("/root/tmp/sndprcprec/srchprcpfromdd", fromDay);
model.makeValue("/root/tmp/sndprcprec/srchprcptodd", currentSchrFromDay.toDate().getAddDate(-1, "D").getDateFormat());
}
//model.makeValue("/root/tmp/prcprec/srchYn", "Y");
}else if(preflag == 2){ //´ÙÀ½Àΰæ¿ì
var toDay = currentSchrToDay.toDate().getAddDate(parseInt(srchInterval)).getDateFormat();
if(callflag == "Y"){ //¼½ÄâÁ¶È¸Àΰæ¿ì
model.makeValue("/root/tmp/prcprec/srchFromdd", currentSchrToDay.toDate().getAddDate(1, "D").getDateFormat());
model.makeValue("/root/tmp/prcprec/srchTodd", toDay);
}else if(callflag == "P"){ //ÀÇ»çÁö½Ã ±â·ÏÁ¶È¸Àϰæ¿ì
model.makeValue("/root/tmp/sndprcprec/srchprcpfromdd", currentSchrToDay.toDate().getAddDate(1, "D").getDateFormat());
model.makeValue("/root/tmp/sndprcprec/srchprcptodd", toDay);
}
//model.makeValue("/root/tmp/prcprec/srchYn", "Y");
}
model.refresh();
if(callflag == "P"){ //ÀÇ»çÁö½Ã ±â·ÏÁ¶È¸Àϰæ¿ì
//grd_littleindx.attribute("visibility") = "hidden";
fGetDetlRec(grd_midindx.row);
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "" || ViewMode != "ChartView"){
iviewerIemr.window.javascript.setupChart("ChartView");
}
}else if(callflag == "Y"){ //¼½ÄâÁ¶È¸Àΰæ¿ì
fReqLittleIndx();
fDbClickMidIndx();
}
}
function fSrchChoice(callflag)
{
if(callflag == "C"){ //¼½ÄâÁ¶È¸½Ã
var srchChoice = model.getValue("/root/tmp/prcprec/srchchoice");
if(srchChoice == "1"){ //±â°£(°£°Ý)Á¶È¸
ipt_srchinterval.disabled = "false";
ipt_fromdd.disabled = "true";
ipt_todd.disabled = "true";
btn_prcpsrch.attribute("visibility") = "hidden";
btn_intervalpre.disabled = "false";
btn_intervalnext.disabled = "false";
}else if(srchChoice == "2"){ //ÀÏÀÚÁ¶È¸
ipt_srchinterval.disabled = "true";
ipt_fromdd.disabled = "false";
ipt_todd.disabled = "false";
btn_prcpsrch.attribute("visibility") = "visible";
btn_intervalpre.disabled = "true";
btn_intervalnext.disabled = "true";
}
}else if(callflag == "P"){ //ÀÇ»çÁö½Ã±â·ÏÁ¶È¸½Ã
var srchChoice = model.getValue("/root/tmp/sndprcprec/srchprcpchoice");
if(srchChoice == "1"){ //±â°£(°£°Ý)Á¶È¸
ipt_srchprcpinterval.disabled = "false";
ipt_srchprcpfromdd.disabled = "true";
ipt_srchprcptodd.disabled = "true";
btn_srchprcp.attribute("visibility") = "hidden";
btn_prcppre.disabled = "false";
btn_prcpnext.disabled = "false";
}else if(srchChoice == "2"){ //ÀÏÀÚÁ¶È¸
ipt_srchprcpinterval.disabled = "true";
ipt_srchprcpfromdd.disabled = "false";
ipt_srchprcptodd.disabled = "false";
btn_srchprcp.attribute("visibility") = "visible";
btn_prcppre.disabled = "true";
btn_prcpnext.disabled = "true";
}
}
}
/**
* @group :
* @ver :
* @by : 2009-12-04 ±è¾ç¼ö
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : ÀǽÃÁö½Ã±â°£Á¶È¸Ã¢¿¡¼ÀÇ Á¶È¸¹öư(ÀÇ»çÁö½Ã ±â°£°Ë»ö)
* @param :
* @return :
* @---------------------------------------------------
*/
function fPrcpSrchDd()
{
fGetDetlRec(grd_midindx.row);
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "" || ViewMode != "ChartView"){
iviewerIemr.window.javascript.setupChart("ChartView");
}
}
/**
* @group :
* @ver :
* @by : 2009-12-04 ±è¾ç¼ö
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : ¼ÒºÐ·ùÁ¶È¸
* @param :
* @return :
* @---------------------------------------------------
*/
function fReqLittleIndx(reqflag)
{
if(reqflag == 1){
grup_prcppaging.attribute("visibility") = "hidden";
}
grup_prcppaging2.attribute("visibility") = "hidden"; //ÀÇ»çÁö½Ã±â·Ï Á¶È¸Ã¢ÀÌ visibleÀÌ¸é ¼û±è-20091215
model.removeNodeset("/root/send");
model.makeValue("/root/send/pid", model.getValue("/root/main/patinfo/patinfolist/pid"));
model.makeValue("/root/send/orddd", grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd")));
model.makeValue("/root/send/cretno", grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("cretno")));
model.makeValue("/root/send/itemindxseq", grd_midindx.valueMatrix(grd_midindx.row, grd_midindx.colref("itemindxseq")));
if(reqflag == 1){
var srchAddOrddd = grd_pathist.valueMatrix(grd_pathist.row, grd_pathist.colref("orddd"));
model.makeValue("/root/tmp/prcprec/srchInterval", "10");
model.makeValue("/root/tmp/prcprec/srchFromdd", srchAddOrddd);
model.makeValue("/root/tmp/prcprec/srchTodd", srchAddOrddd.toDate().getAddDate(9, "D").getDateFormat());
grup_prcppaging.attribute("visibility") = "visible";
model.setFocus("ipt_srchinterval");
rdo_srchchoice.select(0);
//rdo_srchkind.select(0);
//grup_srchchrt.disabled = true; //ÀÏÀÚº°Àϰæ¿ì ¼½Äº°±×·ìºñȰ¼ºÈ-kys-20091215
model.refresh();
}
if(model.getValue("/root/tmp/prcprec/srchkind") != 2){ //¼½Äº° Á¶È¸½Ã fromm todd ºÒÇÊ¿ä-20091216-kys
model.makeValue("/root/send/fromdd", model.getValue("/root/tmp/prcprec/srchFromdd"));
model.makeValue("/root/send/todd", model.getValue("/root/tmp/prcprec/srchTodd"));
}
if(model.getValue("/root/tmp/prcprec/srchkind") == 1){ //ÀÏÀÚº°Àϰæ¿ì
model.removeNodeset("root/tmp/littleindx");
fDbClickMidIndx();
}else if(model.getValue("/root/tmp/prcprec/srchkind") == ""){
}else{ //¼½Äº°, ÀÏÀÚ+¼½Äº°ÀÏ °æ¿ì
if(submit("TRMRI04007")){
var littleIndxNodeCnt = getNodesetCnt(model, "/root/tmp/littleindx/littleindxlist");
if(littleIndxNodeCnt > 0){
//grd_littleindx.attribute("visibility") = "visible";
grd_littleindx.row = 1;
fDbClickMidIndx();
}else{
//grd_littleindx.attribute("visibility") = "hidden";
}
}else{
messageBox("¼ÒºÐ·ù °¡Á®¿À±â¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.", "E", "");
return;
}
}
}
/**
* @group :
* @ver :
* @by : 2009-12-15 ±è¾ç¼ö
* @---------------------------------------------------
* @type : function
* @access : public
* @desc : Á¶È¸Á¾·ù setting
* @param :
* @return :
* @---------------------------------------------------
*/
function fChngkind(){
var srchkind = model.getValue("/root/tmp/prcprec/srchkind");
if(srchkind == 1){ //ÀÏÀÚº°
grup_srchchrt.disabled = true; //¼½Äº° Á¶È¸
grup_srchday.disabled = false; //ÀÏÀÚº° Á¶È¸
}else if(srchkind == 2){ //¼½Äº°
grup_srchchrt.disabled = false; //¼½Äº° Á¶È¸
grup_srchday.disabled = true; //ÀÏÀÚº° Á¶È¸
//fReqLittleIndx();
}else if(srchkind == 3){ //ÀÏÀÚ+¼½Ä
grup_srchchrt.disabled = false; //¼½Äº° Á¶È¸
grup_srchday.disabled = false; //ÀÏÀÚº° Á¶È¸
}
fReqLittleIndx();
}