// Edited by nj 2007-07-27 À̹ÌÁö pathÀ» 1depth·Î ÁöÁ¤ //var gv_ImgeSavePath = "C:\\Temp\\BCP\\OCR_Image\\"; //-- 20130418 ±èµ¿ÁØ start(html ´Ù¿î·Îµå½Ã º»¿ø°ú Ä¥°î ºÐ±â) /* ÀüÀÚµ¿ÀǼ­ ¿ÀÇ½à ¿¡·¯¶°¼­ ÀÓ½ÃÀûÀ¸·Î ¸·¾Æ ³õÀ½ getUserInfo("dutplceinstcd")¿¡¼­ ¿¡·¯¶ä var gv_Instcd = getUserInfo("dutplceinstcd"); var gv_ImgeSavePath = "C:\\BCP_OCR_Image" + gv_Instcd + "\\"; */ var gv_ImgeSavePath = "C:\\BCP_OCR_Image\\"; //-- 20130418 ±èµ¿ÁØ end // Edited by nj 2007-07-27 ȯ°æÆÄÀÏÀ» ÇöÀç xrwÆÄÀÏ À§Ä¡·Î º¯°æ //var gv_BCPINIPath = "BCP\\INI\\"; var gv_BCPINIPath = document.location; var gv_Logo_ImgePath = "../../../com/commonweb/images"; var gTimerID; var gocrprntyn = "Y"; /** * @desc : OCR µ¥ÀÌŸ Á¤º¸ Á¶È¸ ÈÄ ÆÄÀϼ¼ÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fGetOCRInfo(formcd, pid, orddd, cretno, ordtype, formtypecls, ocrtagprntyn, ocrtag){ //model.addlog("fGetOCRInfo: " + formcd + "," + pid + "," + orddd + "," + cretno + "," + ordtype + "," + formtypecls + "," + ocrtagprntyn + "," + ocrtag); var instance = document.models(0).instances(0); var nodelist = null; var localfilenm = null; var fso = new ActiveXObject("Scripting.FileSystemObject"); var img_size = ""; var para = false; var errFlag = false; if(formtypecls == '1'){ rdo_diagopnm.visible = true; ipt_diagnm.visible = true; } else if(formtypecls == '2'){ rdo_diagopnm.visible = true; ipt_diagnm.visible = true; //ipt_diagnm.value = "Å×½ºÆ®"; rdo_diagopnm.select(0); } else if((formtypecls == '3') || (formtypecls == '4') || (formtypecls == '5')){ rdo_diagopnm.visible = false; ipt_diagnm.visible = false; } model.removeNodeset("/root/hidden"); if((pid != null) && (orddd != null) && (cretno != null) && (ordtype != null)){ model.makeValue("/root/hidden/parentflag", "ETC"); } else if((pid == null) && (orddd == null) && (cretno == null) && (ordtype == null)){ model.makeValue("/root/hidden/parentflag", "PRNT"); } else { messageBox("¿ø¹«Á¢¼ö Á¤º¸°¡", "I004"); return; } model.makeValue("/root/main/forminfo/formcd", formcd); // model.setValue("/root/main/forminfo/formfromdt", formfromdt); model.makeValue("/root/main/forminfo/formtypecls", formtypecls); // 20090715 ocrtagprntyn °ª Ãß°¡ nj model.makeValue("/root/main/forminfo/ocrtagprntyn", ocrtagprntyn); model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/formcd", formcd); if(model.getValue("/root/hidden/parentflag") == "PRNT"){ model.makeValue("/root/send/reqdata/pid", parent.model.getValue("/root/main/ordinfo/pid")); } else { model.makeValue("/root/send/reqdata/pid", pid); } model.makeValue("/root/send/reqdata/ocrtag", ocrtag); if(submit("TRMRF03801")){ var ocrimgcnt = getNodesetCount("/root/main/ocrinfo/ocrlist"); if(ocrimgcnt == 0){ var check = parent.window.javaScript.getParameter("SPMRF01100"); if ( check == "Y" ) { messageBox("¿¬°áµÈ ¼­½ÄÀÌ Á¸ÀçÇÏÁö", "I011"); } else { messageBox("OCR·Î Ãâ·ÂÇÒ ¼ö ¾ø´Â ¼­½Ä", "E008"); } return; } else { //20170623 ÀÌÀ±ÁÖ ¼öÁ¤ var formtypecls = model.getValue("/root/main/ocrinfo/ocrlist/formtypecls"); if (formtypecls == "7" || formtypecls == "8") { messageBox("Ãâ·ÂÇÒ ¼ö ¾ø´Â ¼­½ÄÀÔ´Ï´Ù Ku2.0¿¡¼­ ÀÛ¾÷ÇϽñ⠹ٶø´Ï´Ù.","I"); return; } } } else { messageBox("OCR µ¥ÀÌÅÍ Á¶È¸¸¦", "E009"); return; } /** fFolderSet(path, flag) * path¿¡ ÇØ´çÇÏ´Â Æú´õ¸¦ local¿¡ »ý¼º * path´Â À̹ÌÁö°¡ ÀúÀåµÉ path * flag´Â ÇØ´ç Æú´õÀÇ fileÀ» »èÁ¦ ¿©ºÎ¸¦ ³ªÅ¸³¿ * flag: "D"ÀÌ¸é »èÁ¦ °ªÀ» ÁÖÁö ¾ÊÀ¸¸é »èÁ¦ÇÏÁö ¾ÊÀ½ */ fFolderSet(gv_ImgeSavePath, "D"); nodelist = instance.selectNodes("/root/main/ocrinfo/ocrlist"); model.makeValue("/root/main/ocrinfo/ocrdatacnt", nodelist.length); FileCount: for(var i = 0; i < nodelist.length; i++){ fGetOCRData(i+1); var img_file = fso.GetFile(gv_ImgeSavePath+model.getValue("/root/main/ocrinfo/ocrlist["+ (i+1) +"]/ocrfilenm")); var timeOut = getCurrentDateTime(); timeOut = timeOut.replace(" ", ""); timeOut = parseInt(timeOut) + 5; FileSize: while(true){ img_size = img_file.size; var currDate = getCurrentDateTime(); currDate = currDate.replace(" ", ""); currDate = parseInt(currDate); if(timeOut < currDate){ errFlag = true; break FileCount; } if(fso.FileExists(gv_ImgeSavePath+model.getValue("/root/main/ocrinfo/ocrlist["+ (i+1) +"]/ocrfilenm")) && (img_size == model.getValue("/root/main/ocrinfo/ocrlist["+ (i+1) +"]/ocrfilesize"))){ break FileSize; } } } if(errFlag){ messageBox("ÆÄÀÏ ´Ù¿î·Îµå¸¦", "E009"); return; } /* Edited by nj 2007-07-27 CurrentDirectoryÀ» »ç¿ëÇÏÁö ¾ÊÀ½ */ if(model.getValue("/root/hidden/parentflag") == "ETC"){ model.makeValue("/root/send/reqdata/pid", pid); model.makeValue("/root/send/reqdata/orddd", orddd); model.makeValue("/root/send/reqdata/cretno", cretno); model.makeValue("/root/send/reqdata/ordtype", ordtype); model.makeValue("/root/send/reqdata/ocrtag", ocrtag); if(submit("TRMRF03803")){ var rrgstno = model.getValue("/root/main/patinfo/items/rrgstno").substring(0, 8) + "XXXXXX"; model.makeValue("/root/main/patinfo/items/rrgstno", rrgstno); /* var sainfo = model.getValue("/root/main/patinfo/items/sa"); if(sainfo.indexOf("M") >= 0){ model.makeValue("/root/main/patinfo/items/rrgstno", model.getValue("/root/main/patinfo/items/rrgstno") + "-1XXXXXX"); } else if(sainfo.indexOf("F") >= 0){ model.makeValue("/root/main/patinfo/items/rrgstno", model.getValue("/root/main/patinfo/items/rrgstno") + "-2XXXXXX"); } */ } } model.makeValue("/root/main/ocrinfo/currentpage", "1"); model.makeValue("/root/main/ocrinfo/doubcnt", "1"); opt_pagecnt.attribute("text") = model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt"); /** Edited by nj 2007-08-28 Ãâ·Â ¼­½ÄÀÌ 5°³ Á¾·ù·Î ³ª´¸ * TYPE1: ȯÀÚÁ¤º¸+Áø´Ü¸í/¼ö¼ú¸í+º»¹® * TYPE2: ȯÀÚÁ¤º¸+Áø´Ü¸í+º»¹® * TYPE3: ȯÀÚÁ¤º¸+º»¹® * TYPE4: ȯÀÚÁ¤º¸+º»¹®(OMR) * TYPE5: º»¹®(DSC) * TYPE6: ȯÀÚÁ¤º¸+º»¹® ( 2013.08.21 cyw ) */ fInitCreateHtml(); //Footer ¹× Header Á¤º¸»ý¼º fBaseCreateHtml(formtypecls); //Typeº° Á¤º¸¼ÂÆÃ fChartCreateHtml(formtypecls,formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn); //OCRÆÄÀÏÁ¤º¸ »ý¼º. if(model.getValue("/root/main/ocrinfo/ocrdatacnt") == model.getValue("/root/main/ocrinfo/currentpage")){ btn_postpage.disabled = true; btn_prepage.disabled = true; } else { btn_postpage.disabled = false; btn_prepage.disabled = true; } //2013/03/29 Start model.makeValue("/root/main/ocrinfo/ocrtag/tag", ocrtag); //2013/03/29 End model.refresh(); } function fChartCreateHtml(formtypecls,formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn) { var fso = new ActiveXObject("Scripting.FileSystemObject"); if(fso.FileExists(gv_ImgeSavePath + "chart1.html") == true) { fso.DeleteFile(gv_ImgeSavePath + "chart*.html", true) } // ȯÀÚÁ¤º¸ var getdate = ""; var barcode= ""; var pidinfo = ""; var patnminfo = ""; var prnt_patnminfo =""; var sa = ""; var barcode_pid = parent.model.getValue("/root/main/ordinfo/pid"); if( formtypecls != "6" ){ if( ocrtag == "" || ocrtag == null){ ocrtag = "+2012123456789+"; barcode = "*2012123456789*"; }else if( ocrtag == "N" ){ }else{ ocrtag = "+" + ocrtag + "+"; barcode = "*" + ocrtag + "*"; } }else{ if( ocrtag == "" || ocrtag == null){ ocrtag = "+2012123456789+"; barcode = "*" + barcode_pid + "*"; }else if( ocrtag == "N" ){ }else{ ocrtag = "+" + ocrtag + "+"; barcode = "*" + barcode_pid + "*"; } } //[2012.04.27 ±â°üÄÚµå Ãß°¡ ] var pInstcd = parent.model.getValue("/root/main/ordinfo/instcd"); if(pInstcd ==""){ pInstcd =getUserInfo("dutplceinstcd"); } //[2012.04.27 ±â°üÄÚµå Ãß°¡ ] //f_View.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+pInstcd+".jpg"); if(model.getValue("/root/hidden/parentflag") == "ETC"){ pidinfo = model.getValue("/root/main/patinfo/items/pid"); patnminfo = model.getValue("/root/main/patinfo/items/patnm"); model.makeValue("/root/main/patinfo/items/rrgstno", model.getValue("/root/main/patinfo/items/rrgstno")); model.makeValue("/root/main/patinfo/items/centcd", model.getValue("/root/main/patinfo/items/centcd")); model.makeValue("/root/main/patinfo/items/centnm", model.getValue("/root/main/patinfo/items/centnm")); model.makeValue("/root/main/patinfo/items/centengabbr", model.getValue("/root/main/patinfo/items/centengabbr")); } else if (model.getValue("/root/hidden/parentflag") == "PRNT"){ pidinfo = parent.model.getValue("/root/main/ordinfo/pid"); patnminfo = parent.model.getValue("/root/main/ordinfo/patnm"); sa = parent.model.getValue("/root/main/ordinfo/sa"); model.makeValue("/root/main/patinfo/items/pid", parent.model.getValue("/root/main/ordinfo/pid")); model.makeValue("/root/main/patinfo/items/orddd", parent.model.getValue("/root/main/ordinfo/orddd")); model.makeValue("/root/main/patinfo/items/ordtype", parent.model.getValue("/root/main/ordinfo/ordtype")); model.makeValue("/root/main/patinfo/items/orddeptcd", parent.model.getValue("/root/main/ordinfo/orddeptcd")); model.makeValue("/root/main/patinfo/items/patnm", parent.model.getValue("/root/main/ordinfo/patnm")); model.makeValue("/root/main/patinfo/items/orddeptnm", parent.model.getValue("/root/main/ordinfo/orddeptnm")); model.makeValue("/root/main/patinfo/items/drid", parent.model.getValue("/root/main/ordinfo/drid")); model.makeValue("/root/main/patinfo/items/drnm", parent.model.getValue("/root/main/ordinfo/drnm")); model.makeValue("/root/main/patinfo/items/sa", parent.model.getValue("/root/main/ordinfo/sa")); model.makeValue("/root/main/patinfo/items/inroomcd", parent.model.getValue("/root/main/ordinfo/inroomcd")); model.makeValue("/root/main/patinfo/items/cretno", parent.model.getValue("/root/main/ordinfo/cretno")); model.makeValue("/root/main/patinfo/items/rrgstno", parent.model.getValue("/root/main/ordinfo/rrgstno")); model.makeValue("/root/main/patinfo/items/centcd", parent.model.getValue("/root/main/ordinfo/centcd")); model.makeValue("/root/main/patinfo/items/centnm", parent.model.getValue("/root/main/ordinfo/centnm")); model.makeValue("/root/main/patinfo/items/centengabbr", parent.model.getValue("/root/main/ordinfo/centengabbr")); } var hardcd = model.getValue("/root/temp/hardcode/hardcd/hardcd"); if (hardcd == "Y") { for(var i = pidinfo.length; i <= 8; i++){ if(i < 8){ pidinfo = "0"+pidinfo; } } var str1 = pidinfo.substr(0, 3); var str2 = pidinfo.substr(3, 2); var str3 = pidinfo.substr(5, 2); var str4 = pidinfo.substr(7, 1); pidinfo = str1 + " " + str2 + " " + str3 + "-" + str4; } getdate = model.getValue("/root/main/patinfo/items/orddd"); // ȯÀÚ¸í 5Àڱ ¼öÁ¤ if (patnminfo.length > 5 && patnminfo.length <= 10) { prnt_patnminfo = patnminfo; } else if (patnminfo.length > 11) { //ÀÌÀ±ÁÖ ¸·À½ //prnt_patnminfo = patnminfo.substring(0, 10); prnt_patnminfo = patnminfo; } else { for(var i = 0; i <= patnminfo.length; i++){ tmp_patnminfo = patnminfo.substring(i, i+1); if(i == patnminfo.length){ break; } prnt_patnminfo = prnt_patnminfo + tmp_patnminfo.concat(" "); } } model.makeValue("/root/send/reqdata/deptcd", model.getValue("/root/main/patinfo/items/orddeptcd")); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/patinfo/items/orddd")); // Áø·áÁ¤º¸ submit("TRMRF03805"); var dept = model.getValue("/root/main/deptinfo/info/deptengabbr"); var juminno = model.getValue("/root/main/patinfo/items/rrgstno"); var treatdate = getdate.substr(0, 4) + "/" + getdate.substr(4, 2) + "/" + getdate.substr(6, 2); var ordtype = model.getValue("/root/main/patinfo/items/ordtype"); if (ordtype == 'I') { model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/patinfo/items/pid")); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/patinfo/items/orddd")); model.makeValue("/root/send/reqdata/cretno", model.getValue("/root/main/patinfo/items/cretno")); submit("TRMRF03809"); var inroomcd = model.getValue("/root/main/inroominfo/inroomlist/roomcd"); } else { var inroomcd =" "; } var getformnm = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/formprntnm"); var arryformnm = getformnm.split("\n"); var langflag = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/langflag"); var formnm ="" ; var formnm2 ="" ; if(arryformnm.length == 2){ formnm = arryformnm[0]; formnm2 = arryformnm[1]; } else if(arryformnm.length == 1){ formnm = arryformnm[0]; } //formnm = getformnm.replace("\n",' '); // Ãâ·ÂÁ¤º¸ var getdate = getCurrentDate(); var gettime = getCurrentTime(); var getuser = getUserName(); var getuseren = getUserInfo("userengnm"); 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 langflag = model.getValue("/root/main/ocrinfo/ocrlist["+ 1 +"]/langflag"); var printDate = ""; var printDept = ""; var printIP = getUserInfo("ipaddr").split("."); //¿¹Àüµ¥ÀÌÅÍ »ÌÀ»¶§ Ȱ¿ë - Æò°¡(ÀÌÀ±ÁÖ) // var dateprnt = "2018/02/28"; // var timeprnt = "11:43:10"; // var getuser = "Áøº¸Çö"; // var inroomcd = "3265"; // printIP[2] = "32"; // printIP[3] = "50"; switch(langflag){ case "KO": printDate = "Ãâ·ÂÀϽà : " + dateprnt + " " + timeprnt + " " + printIP[2] + "." + printIP[3]+ " " +inroomcd; printDept = "Ãâ·ÂÀÚ : " + getuser; break; case "EN": printDate = "Print Date : " + dateprnt + " " + timeprnt + " " + printIP[2] + "." + printIP[3]+ " " +inroomcd; printDept = "Printed by : " + getuser; break; default: printDate = "Ãâ·ÂÀϽà : " + dateprnt + " " + timeprnt + " " + printIP[2] + "." + printIP[3]+ " " +inroomcd; printDept = "Ãâ·ÂÀÚ : " + getuser; break; } model.removeNodeset("/root/send/reqdata"); if(model.getValue("/root/main/exist") == "Y"){ } /* else if(model.getValue("/root/main/exist") == "N" && model.getValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm") == ""){ model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/patinfo/items/pid")); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/patinfo/items/orddd")); model.makeValue("/root/send/reqdata/cretno", model.getValue("/root/main/patinfo/items/cretno")); model.makeValue("/root/send/reqdata/orddeptcd", model.getValue("/root/main/patinfo/items/orddeptcd")); model.makeValue("/root/send/reqdata/ordtype", model.getValue("/root/main/patinfo/items/ordtype")); submit("TRMRF03807"); } jindan1 = model.getValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm"); */ //2012-10-15 ±èÀ¯¼º ¼öÁ¤-------------------------------------------------------------------------------------------------- else if(model.getValue("/root/main/exist") == "" && model.getValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm") == ""){ model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/patinfo/items/pid")); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/patinfo/items/orddd")); model.makeValue("/root/send/reqdata/cretno", model.getValue("/root/main/patinfo/items/cretno")); model.makeValue("/root/send/reqdata/orddeptcd", model.getValue("/root/main/patinfo/items/orddeptcd")); model.makeValue("/root/send/reqdata/ordtype", model.getValue("/root/main/patinfo/items/ordtype")); model.removeNodeset("/root/temp/ocrinfo/ocrtag/diaginfo"); model.removeNodeset("/root/temp/ocrinfo/ocrtag/opinfo"); submit("TRMRF03807"); } jindan1 = model.getValue("/root/temp/ocrinfo/ocrtag/diaginfo/diagengnm"); jindan2 = model.getValue("/root/temp/ocrinfo/ocrtag/diaginfo[2]/diagengnm"); opengnm1 = model.getValue("/root/temp/ocrinfo/ocrtag/opinfo/opengnm"); opengnm2 = model.getValue("/root/temp/ocrinfo/ocrtag/opinfo[2]/opengnm"); //-------------------------------------------------------------------------------------------------------------------------- var nodelist =""; var instance = document.models(0).instances(0); nodelist = instance.selectNodes("/root/main/ocrinfo/ocrlist"); f_View.PageRemove(0,0); f_View.Viewmode = 0; f_View.BackColor = parent.rgb(255,255,255) f_View.AutoRefresh = false; for(var i = 0; i < nodelist.length; i++){ trans=""; trans = "\n" + "" + "\n" + "\n" + "\n " + "\n " + "\n " + "\n
" var path; var width; path = gv_ImgeSavePath + model.getValue("/root/main/ocrinfo/ocrlist["+ (i+1) +"]/ocrfilenm") f_View.PageAppend( path ,1,1); f_View.PageCurrent = f_View.PageTotal; width = f_View.PageWidth ; f_View.PageRemove(f_View.PageTotal,f_View.PageTotal); if( i == 0) { switch(formtypecls) { case "1": trans = trans + "\n " break; case "2": trans = trans + "\n " break; case "3": if( width < 1400 ){ trans = trans + "\n " } else { trans = trans + "\n " } break; case "4": trans = trans + "\n " break; case "5": trans = trans + "\n " break; case "6": trans = trans + "\n " break; } } else { if( width < 1400 ){ trans = trans + "\n " } else { trans = trans + "\n " } } trans = trans + "\n
" + "\n" + "\n" + "\n" var a = fso.CreateTextFile(gv_ImgeSavePath + "chart" + (i + 1) + ".html", true, true); a.WriteLine(trans); a.Close(); //2012-08-10 ¿ÀÀü 9:45:48 °­ÁöÈÆ ÀüÀÚµ¿ÀǼ­ ¼­¸íÀ» À§ÇÑ ÆÄÀÏÆÐ½º°æ·Î ÀúÀå. var ocrfilepath = gv_ImgeSavePath + "chart" + (i + 1) + ".html"; model.removeNode("/root/main/ocrinfo/ocrfilepath"); model.makeValue("/root/main/ocrinfo/ocrfilepath", ocrfilepath); f_View.PageAppend(ocrfilepath,1,1); } f_View.PageCurrent = 1; f_View.AutoRefresh = true; } function pause(numberMillis) { var now = new Date(); var exitTime = now.getTime() + numberMillis; while (true) { now = new Date(); if (now.getTime() > exitTime) return; } } function fBarcodeCheck(OCRno) { var fso = new ActiveXObject("Scripting.FileSystemObject"); var chkFlag = false; while(chkFlag == false){ var j = 0; var k = 0; fOCRReplace(OCRno); j = j + 1; //¹ÙÄÚµå üũ for(var i = 1; i <= f_View.Pagetotal ; i++){ var r = fso.OpenTextFile(gv_ImgeSavePath + "chart" + i + ".html", 1, false, -1) var databuffer = ""; while (!r.AtEndOfStream) { databuffer = r.ReadLine(); if(databuffer.substr(1, 18) == "@VAR_PRINT_BARCODE"){ if ( databuffer.indexOf("+") == -1 ) { k = k + 1; } } if (i == k) { chkFlag = true; } if (j >= 30 ) { chkFlag = true; } } r.Close(); } if( chkFlag == false ) { //ÀÌÀ±ÁÖ(LCTECH ¿äû-20130414) //pause(j * 1000); model.makeValue("/root/send/reqdata/ocrtag",OCRno); model.makeValue("/root/send/reqdata/ipaddr",getUserInfo("ipaddr")); model.makeValue("/root/send/reqdata/instrid",getUserInfo("userid")); if(submit("TXMRF03806")){ model.removeNodeset("/root/send/reqdata"); return true; } } } } function fOCRReplace(OCRno) { var fso = new ActiveXObject("Scripting.FileSystemObject"); var formtypecls = model.getValue("/root/main/forminfo/formtypecls"); model.makeValue("/root/main/exist", "N"); if(model.getValue("/root/hidden/parentflag") == "PRNT"){ if(parent.swt_ocrinfoflag.selectedIndex == "1"){ parent.btn_prnt.disabled = true; } else { var parentauth = parent.model.getValue("/root/properties/auth") if(parentauth.charAt(1) == '1'){ //20100727-kys-½ÇÇà±ÇÇÑÀÌ ÀÖÀ»½Ã¿¡¸¸ disableº¯°æÃ³¸®.(¿äû¹øÈ£ : 11292) parent.btn_prnt.disabled = false; } } } if(OCRno != ""){ OCRno = OCRno.replace("+",""); OCRno = OCRno.replace("+",""); OCRno = OCRno.replace("+",""); OCRno = OCRno.replace("+",""); OCRno = OCRno.replace("+",""); OCRno = OCRno.replace("+",""); model.makeValue("/root/main/ocrinfo/ocrtag/tag", OCRno); } for(var i = 1; i <= f_View.Pagetotal ; i++){ //[2012.04.27 ±â°üÄÚµå Ãß°¡ ] var pInstcd = parent.model.getValue("/root/main/ordinfo/instcd"); if(pInstcd ==""){ pInstcd =getUserInfo("dutplceinstcd"); } var OCR = ""; OCR = "+" + OCRno + "+"; var r = fso.OpenTextFile(gv_ImgeSavePath + "chart" + i + ".html", 1,false, -1) var databuffer = ""; var trans =""; //[2012.04.27 ±â°üÄÚµå Ãß°¡ ] //f_View.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+pInstcd+".jpg"); while (!r.AtEndOfStream) { databuffer = r.ReadLine(); if(databuffer.substr(1, 10) == "@VAR_OCR_L"){ databuffer = " @VAR_OCR_LEFT = " + OCR } if(databuffer.substr(1, 10) == "@VAR_OCR_R"){ if(OCRno == "[ȯÀÚ º¸°ü¿ë]") { databuffer = " @VAR_OCR_RIGHT = " } else { databuffer = " @VAR_OCR_RIGHT = " + OCR } } if( formtypecls != "6" ){ if(databuffer.substr(1, 18) == "@VAR_PRINT_BARCODE"){ databuffer = " @VAR_PRINT_BARCODE = *" + OCRno + "0" + i + "*" } } trans += databuffer + "\n"; } r.Close(); var a = fso.CreateTextFile(gv_ImgeSavePath + "chart" + i + ".html", true, true); a.WriteLine(trans); a.Close(); f_View.ActionParamINT1 = i; f_View.ActionSingle = 1; } } function fBarCodeReplace(OCRno) { for(var i = 1; i <= f_View.Pagetotal ; i++){ var OCR = ""; OCR = OCRno OCR = OCR.replace("+",""); OCR = OCR.replace("+",""); OCR = OCR.replace("+",""); OCR = OCR.replace("+",""); OCR = OCR.replace("+",""); OCR = OCR.replace("+",""); var fso = new ActiveXObject("Scripting.FileSystemObject"); var r = fso.OpenTextFile(gv_ImgeSavePath + "chart" + i + ".html", 1,false, -1) var databuffer = ""; var trans =""; while (!r.AtEndOfStream) { databuffer = r.ReadLine(); if(databuffer.substr(1, 18) == "@VAR_PRINT_BARCODE"){ OCR = OCR.replace("+","*"); OCR = OCR.replace("+","*"); databuffer = " @VAR_PRINT_BARCODE = " + "*" + OCR + "0" + i + "*" } trans += databuffer + "\n"; } r.Close(); var a = fso.CreateTextFile(gv_ImgeSavePath + "chart" + i + ".html", true, true); a.WriteLine(trans); a.Close(); f_View.ActionParamINT1 = i; f_View.ActionSingle = 1; } } /** * @desc : Footer ¹× Header Á¤º¸»ý¼º * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fInitCreateHtml() { var stype = ""; var cover_header =""; var cover_footer =""; var body_header =""; var body_footer =""; var headertitle =""; var local_path =""; var local_file =""; var trans = ""; var formtypecls = model.getValue("/root/main/forminfo/formtypecls"); var ocrtagprnt = model.getValue("/root/main/forminfo/ocrtagprntyn"); // TAGÃâ·Â¿©ºÎ - TAGÃâ·Â¿©ºÎ°¡ NÀμ­½ÄÀº // ocrtag¹øÈ£ ¹× ¹ÙÄÚµå ¼­½Ä¿¡¼­ »ý¼ºÇÏÁö ¾ÊÀ½ 2012-11-05 ±èÀ¯¼º local_path = gv_ImgeSavePath + "template\\" ; var fso = new ActiveXObject("Scripting.FileSystemObject"); if( fso.FolderExists(gv_ImgeSavePath) == false) { fso.CreateFolder(gv_ImgeSavePath) } if( fso.FolderExists(local_path) == false) { fso.CreateFolder(local_path) } //Free 3 of 9 if(ocrtagprnt == "N"){ cover_footer = " " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
/
" + "\n
" + "\n " + "\n " + "\n "; body_header = " " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
| Áø·á°ú : | Áֹεî·Ï¹øÈ£ : | Áø·áÀÏ : 
" + "\n
" + "\n " + "\n " + "\n "; body_footer = " " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
/
" + "\n
" + "\n " + "\n " + "\n "; }else{ if( formtypecls == "6" ){ // type6ÀÎ °æ¿ì ocrtag ¾ø¾Ö°í ¹ÙÄÚµå´Â ¿À¸¥ÂÊ À§·Î, ȯÀÚÁ¤º¸ º¸ÀÌ°Ô cover_footer = " " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
/
" + "\n
" + "\n " + "\n " + "\n "; body_header = " " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + //"\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
| Áø·á°ú : | Áֹεî·Ï¹øÈ£ : | Áø·áÀÏ : 
" + "\n
" + "\n " + "\n " + "\n "; body_footer = " " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
/
" + "\n
" + "\n " + "\n " + "\n "; }else{ cover_footer = " " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
/
" + "\n
" + "\n " + "\n " + "\n "; body_header = " " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
| Áø·á°ú : | Áֹεî·Ï¹øÈ£ : | Áø·áÀÏ : 
" + "\n
" + "\n " + "\n " + "\n "; body_footer = " " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
/
" + "\n
" + "\n " + "\n " + "\n "; } } if(fso.FileExists(local_path + "cover_footer.html") == true) { fso.DeleteFile(local_path + "cover_footer.html", true) } var a = fso.CreateTextFile( local_path + "cover_footer.html" , true, true); a.WriteLine(cover_footer); a.Close(); if(fso.FileExists(local_path + "body_header.html") == true) { fso.DeleteFile(local_path + "body_header.html", true) } var a = fso.CreateTextFile( local_path + "body_header.html" , true, true); a.WriteLine(body_header); a.Close(); if(fso.FileExists(local_path + "body_footer.html") == true) { fso.DeleteFile(local_path + "body_footer.html", true) } var a = fso.CreateTextFile( local_path + "body_footer.html" , true, true); a.WriteLine(body_footer); a.Close(); } /** * @desc : Typeº° Á¤º¸¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fBaseCreateHtml(formtypecls) { var stype = ""; var cover_header =""; var headertitle =""; var local_path =""; var local_file =""; var trans = ""; local_path = gv_ImgeSavePath + "template\\" ; var fso = new ActiveXObject("Scripting.FileSystemObject"); if( fso.FolderExists(gv_ImgeSavePath) == false) { fso.CreateFolder(gv_ImgeSavePath); } if( fso.FolderExists(local_path) == false) { fso.CreateFolder(local_path); } var ocrtagprnt = model.getValue("/root/main/forminfo/ocrtagprntyn"); // TAGÃâ·Â¿©ºÎ - TAGÃâ·Â¿©ºÎ°¡ NÀμ­½ÄÀº // ocrtag¹øÈ£ ¹× ¹ÙÄÚµå ¼­½Ä¿¡¼­ »ý¼ºÇÏÁö ¾ÊÀ½ 2012-11-05 ±èÀ¯¼º if(ocrtagprnt == "N"){ cover_header = "" + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n
" + "\n
"; }else{ if( formtypecls == "6" ){ cover_header = "" + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + // "\n " + "\n " + "\n
" + "\n
"; }else{ cover_header = "" + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n
"; } } //[2012.04.27 ±â°üÄÚµå Ãß°¡ ] var pInstcd = parent.model.getValue("/root/main/ordinfo/instcd"); if(pInstcd ==""){ pInstcd =getUserInfo("dutplceinstcd"); } //[2012.04.27 ±â°üÄÚµå Ãß°¡ ] //f_View.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+pInstcd+".jpg"); var getformnm = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/formprntnm"); var arryformnm = getformnm.split("\n"); var langflag = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/langflag"); headertitle = "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n "; if(arryformnm.length == 2){ headertitle = headertitle + "\n " + "\n " + "\n "; } headertitle = headertitle + "\n
" + "\n
" + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n
" + "\n
" ; footer = "\n
" + "\n
" + "\n " + "\n " + "\n "; switch(formtypecls) { case "1": local_file = "cover_header1.html"; if(fso.FileExists(local_path + local_file) == true) { fso.DeleteFile(local_path + local_file, true) } if(fso.FileExists(local_path + local_file) == false) { cover_header = cover_header + headertitle + "\n
" + "\n " + "\n " + "\n
" + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n Áø´Ü¸í " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n   " + "\n
" + "\n   " + "\n
" + "\n
" + "\n   ¼ö¼ú¸í
(óġ/°Ë»ç) " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n   " + "\n
" + "\n   " + "\n
" + "\n
" + "\n " + "\n " + "\n
" + footer } break; case "2": local_file = "cover_header2.html"; if(fso.FileExists(local_path + local_file) == true) { fso.DeleteFile(local_path + local_file, true) } if(fso.FileExists(local_path + local_file) == false) { cover_header = cover_header + headertitle + "\n
" + "\n " + "\n " + "\n
" + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n " + "\n
Áø´Ü¸í  " + "\n " + "\n
  " + "\n " + "\n
" + "\n " + "\n " + "\n
" + footer } break; case "3": local_file = "cover_header3.html"; if(fso.FileExists(local_path + local_file) == true) { fso.DeleteFile(local_path + local_file, true) } if(fso.FileExists(local_path + local_file) == false) { cover_header = cover_header + headertitle + footer } break; case "4": local_file = "cover_header4.html"; if(fso.FileExists(local_path + local_file) == true) { fso.DeleteFile(local_path + local_file, true) } if(fso.FileExists(local_path + local_file) == false) { cover_header = cover_header + headertitle + footer } break; case "5": local_file = "cover_header5.html"; if(fso.FileExists(local_path + local_file) == true) { fso.DeleteFile(local_path + local_file, true) } if(fso.FileExists(local_path + local_file) == false) { cover_header = cover_header + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n " + "\n " + "\n " + "\n " + "\n
" + "\n
" + footer } break; case "6": local_file = "cover_header6.html"; if(fso.FileExists(local_path + local_file) == true) { fso.DeleteFile(local_path + local_file, true) } if(fso.FileExists(local_path + local_file) == false) { cover_header = cover_header + headertitle + footer } break; default: local_file = "cover_header3.html"; if(fso.FileExists(local_path + local_file) == true) { fso.DeleteFile(local_path + local_file, true) } if(fso.FileExists(local_path + local_file) == false) { cover_header = cover_header + headertitle + footer } break; break; } var a = fso.CreateTextFile( local_path + local_file , true, true); a.WriteLine(cover_header); a.Close(); } /** * @desc : OCR Ãâ·Â * * @param : prntflag : A-ÀçÃâ·Â * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fPrint(prntflag) { var insyn; var existyn; var ocrDataCnt = model.getValue("/root/main/ocrinfo/ocrdatacnt"); var currentpage = model.getValue("/root/main/ocrinfo/currentpage"); var prntcnt = 1; var succ_Prnt = false; var save_ocrtag = ""; var doubyn = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/doubyn"); if(model.getValue("/root/hidden/parentflag") == "PRNT"){ parent.btn_prnt.disabled = true; } //ÀÌÀ±ÁÖ ¼öÁ¤ 20160912 formtypecls=6 Àΰæ¿ì´Â À̹ÌÁö¸¸ Ãâ·Â var formtypecls = model.getValue("/root/main/forminfo/formtypecls"); if (formtypecls == "6") { fPrintOCR(); return; } if((prntflag == 'A') || (prntflag == 'P')){ model.makeValue("/root/main/temp/ocrtag/tag", "+" + model.getValue("/root/main/ocrinfo/ocrtag/tag") + "+"); fOCRReplace(model.getValue("/root/main/temp/ocrtag/tag")); fOCRReplace(model.getValue("/root/main/temp/ocrtag/tag")); if(ocrDataCnt > 0){ if(prntflag == 'P'){ for(var doubcnt = 1; doubcnt <= doubyn; doubcnt++){ if(doubcnt == 1){ // 2008-08-31 ȯÀÚ¿ë Ãâ·Â½Ã ¹ÙÄÚµå Á¤º¸´Â Ãâ·ÂÇÏÁö ¾Ê´Â´Ù //--Yoo fSetBarCode(); // 20090715 OCRTAG Ãâ·Â¿©ºÎ °ª¿¡ µû¸¥ ¼öÁ¤ if(model.getValue("/root/main/forminfo/ocrtagprntyn") == "N"){ fOCRReplace(""); } else { fOCRReplace(model.getValue("/root/main/temp/ocrtag/tag")); } } else { fOCRReplace("[ȯÀÚ º¸°ü¿ë]"); } opt_pagecnt.attribute("text") = model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt"); succ_Prnt = fPrintOCR(); } } else if (prntflag == 'A'){ // ÀçÃâ·Â for(var doubcnt = 1; doubcnt <= doubyn; doubcnt++){ for(prntcnt = 1; prntcnt <= ocrDataCnt; prntcnt++){ model.makeValue("/root/main/ocrinfo/doubcnt", doubcnt); //--Yoo fMovePage('1'); // 2009-07-27 nj OCT TYPE5 ¹öÀü ¼öÁ¤ // if((prntcnt != 1) && (model.getValue("/root/main/forminfo/formtypecls") != "5")){ if(prntcnt != 1){ model.makeValue("/root/main/ocrinfo/currentpage", prntcnt); opt_pagecnt.attribute("text") = model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt"); if(doubcnt != 1){ // 2008-08-31 ȯÀÚ¿ë Ãâ·Â½Ã ¹ÙÄÚµå Á¤º¸´Â Ãâ·ÂÇÏÁö ¾Ê´Â´Ù fOCRReplace("[ȯÀÚ º¸°ü¿ë]"); } else { fOCRReplace(model.getValue("/root/main/temp/ocrtag/tag")); } } else { model.makeValue("/root/main/ocrinfo/currentpage", prntcnt); opt_pagecnt.attribute("text") = model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt"); if(doubcnt != 1){ // 2008-08-31 ȯÀÚ¿ë Ãâ·Â½Ã ¹ÙÄÚµå Á¤º¸´Â Ãâ·ÂÇÏÁö ¾Ê´Â´Ù fOCRReplace("[ȯÀÚ º¸°ü¿ë]"); } else { fOCRReplace(model.getValue("/root/main/temp/ocrtag/tag")); } } model.makeValue("/root/main/ocrinfo/currentpage", prntcnt); } succ_Prnt = fPrintOCR(); } } } if(succ_Prnt){ //messageBox("Ãâ·ÂÀÌ", "I002"); } else { messageBox("Ãâ·ÂÀ»", "E009"); return; } } else{ var n_ocrtag; n_ocrtag = fmakeOCRTag() fOCRReplace(n_ocrtag); //fBarcodeCheck¿¡¼­ fOCRReplace¸¦ ½ÇÇàÇÑ´Ù. //fOCRReplace(n_ocrtag); fBarcodeCheck(n_ocrtag); // À̷°ü·ÃÇØ¼­ ÀúÀåÈÄ Ãâ·ÂÀ¸·Î ÀӽüöÁ¤(20090225) //fSaveOCR(); //--Yoo fMovePage('1'); save_ocrtag = fSaveOCR(); insyn = model.getValue("/root/hidden/insocrtag/insyn"); if(insyn == "Y"){ if(ocrDataCnt > 0){ for(var doubcnt = 1; doubcnt <= doubyn; doubcnt++){ for(prntcnt = 1; prntcnt <= ocrDataCnt; prntcnt++){ model.makeValue("/root/main/ocrinfo/doubcnt", doubcnt); //--Yoo fMovePage('1'); // 2009-07-27 nj OCT TYPE5 ¹öÀü ¼öÁ¤ // if((prntcnt != 1) && (model.getValue("/root/main/forminfo/formtypecls") != "5")){ if(prntcnt != 1){ model.makeValue("/root/main/ocrinfo/currentpage", prntcnt); opt_pagecnt.attribute("text") = model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt"); //--Yoo fSetBottomInfo(); if(doubcnt != 1){ // 2008-08-31 ȯÀÚ¿ë Ãâ·Â½Ã ¹ÙÄÚµå Á¤º¸´Â Ãâ·ÂÇÏÁö ¾Ê´Â´Ù fOCRReplace("[ȯÀÚ º¸°ü¿ë]"); } } else { model.makeValue("/root/main/ocrinfo/currentpage", prntcnt); opt_pagecnt.attribute("text") = model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt"); if(doubcnt!= 1){ // 2008-08-31 ȯÀÚ¿ë Ãâ·Â½Ã ¹ÙÄÚµå Á¤º¸´Â Ãâ·ÂÇÏÁö ¾Ê´Â´Ù fOCRReplace("[ȯÀÚ º¸°ü¿ë]"); } } } if (gocrprntyn == "Y") { succ_Prnt = fPrintOCR(); } else { succ_Prnt = "Y"; //ÇϵåÄڵ忡 µî·ÏµÈ °ú´Â ½ÇÁ¦ Ãâ·ÂÇÏÁö ¾Ê´Â´Ù } } } } else { messageBox("Ãâ·Â(OCR)À»", "E009"); return; } if(succ_Prnt){ // À̷°ü·ÃÇØ¼­ ÀúÀåÈÄ Ãâ·ÂÀ¸·Î ÀӽüöÁ¤(20090225) //save_ocrtag = fSaveOCR(); insyn = model.getValue("/root/hidden/insocrtag/insyn"); if(insyn == "Y"){ //messageBox("Ãâ·ÂÀÌ", "I002"); } else if(insyn != "Y"){ messageBox("ÀúÀåÀ»", "E009"); return; } } else { messageBox("Ãâ·ÂÀ»", "E009"); return; } } /* if(model.getValue("/root/hidden/parentflag") == "PRNT"){ parent.btn_prnt.disabled = true; } */ model.makeValue("/root/main/ocrinfo/doubcnt", "1"); model.makeValue("/root/main/ocrinfo/currentpage", "1"); model.makeValue("/root/main/iptdiaghngnm", ""); return save_ocrtag; } function fPrintOCR() { try{ var i; f_print.DocumentBegin(f_View.PageTotal+"_"+"OCRPrint"); for(i = 1; i <= f_View.PageTotal; i++) { f_print.PageBegin(); f_print.PrintImage(f_View.PageFilePath(i), f_View.PageFilePage(i) + 1, 0, 0, f_print.PrintableWidth, f_print.PrintableHeight, 2,1,1,12); f_print.PageEnd(); } f_print.DocumentEnd(); model.makeValue("/root/main/exist", "N"); if(model.getValue("/root/hidden/parentflag") == "PRNT"){ if(parent.swt_ocrinfoflag.selectedIndex == "1"){ parent.btn_prnt.disabled = true; } else { var parentauth = parent.model.getValue("/root/properties/auth") if(parentauth.charAt(1) == '1'){ //20100727-kys-½ÇÇà±ÇÇÑÀÌ ÀÖÀ»½Ã¿¡¸¸ disableº¯°æÃ³¸®.(¿äû¹øÈ£ : 11292) parent.btn_prnt.disabled = false; } } } return true; } catch(e){ return false; } } /** * @desc : OCR µ¥ÀÌŸ ÃʱâÈ­ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fGetOCRData(inode){ var localfilenm = model.getValue("/root/main/ocrinfo/ocrlist[" + (inode) + "]/ocrfilenm"); // knuh 20111128 ÃÖ¿øµ· ³×¹øÂ° ÀÎÀÚ¿¡ µ¿±â/ºñµ¿±âÀÎÁö ¿©ºÎ¸¦ ÁöÁ¤ÇÒ¼ö ÀÖµµ·Ï ºä¾î¸¦ ÆÐÄ¡ // ÁÖÀÇ : µ¿±â½ÄÀ¸·Î ÁöÁ¤ ½Ã ¼Óµµ°¡ ´Ù¼Ò ´Ê¾îÁö´Â Çö»óÀÌ ÀÖÀ¸¹Ç·Î ÇÊ¿äÇÑ °æ¿ì¿¡¸¸ ¼³Á¤ÇؾßÇÔ. // sample : // var async = false; //ºñµ¿±â½Ä (defalut : true [µ¿±â½Ä]) // var ui = false; // // model1.download("http://his031edu.knu.ac.kr/himed/webapps/com/hismainweb/images/login_mis_dev.jpg", "C:\\temp\\download\\login_mis_dev.jpg", ui, async); // ¿øº» : model.download(getActionURL("TRMRF03802")+ getUserSessionString() +"&ocrseq=" + model.getValue("/root/main/ocrinfo/ocrlist[" + (inode) + "]/ocrseq"), gv_ImgeSavePath+localfilenm, false); model.download(getActionURL("TRMRF03802")+ getUserSessionString() +"&ocrseq=" + model.getValue("/root/main/ocrinfo/ocrlist[" + (inode) + "]/ocrseq"), gv_ImgeSavePath+localfilenm, false, false); } /** * @desc : Æú´õ ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fFolderSet(folderpath, delflag) { var fso; var haveFile; var currFile; fso = new ActiveXObject("Scripting.FileSystemObject"); if(fso.FolderExists(folderpath) == false){ fso.CreateFolder(folderpath); } if (delflag == "D"){ haveFile = fso.GetFolder(gv_ImgeSavePath); currFile = new Enumerator(haveFile.Files); for( ; !currFile.atEnd(); currFile.moveNext()){ //20130418 ±èµ¿ÁØ start try Catch Ãß°¡ try{ fso.DeleteFile(currFile.item().path, true); } catch(e){ } //20130418 ±èµ¿ÁØ end } } } /** * @desc : ȯÀÚ Á¤º¸ ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetPatInfo(formcd, pid, orddd, cretno, ordtype){ var pidinfo = ""; var patnminfo = ""; var orddept = ""; var drinfo = ""; var sainfo = ""; var inroomcd = ""; var prnt_patnminfo = ""; var tmp_patnminfo = ""; var getdate = ""; if(model.getValue("/root/hidden/parentflag") == "ETC"){ pidinfo = model.getValue("/root/main/patinfo/items/pid"); patnminfo = model.getValue("/root/main/patinfo/items/patnm"); orddept = model.getValue("/root/main/patinfo/items/orddeptnm"); drinfo = model.getValue("/root/main/patinfo/items/drnm"); sainfo = model.getValue("/root/main/patinfo/items/sa"); /* if(sainfo.indexOf("M") >= 0){ model.setValue("/root/main/patinfo/items/rrgstno", model.getValue("/root/main/patinfo/items/rrgstno") + "-1XXXXXX"); } else if(sainfo.indexOf("F") >= 0){ model.setValue("/root/main/patinfo/items/rrgstno", model.getValue("/root/main/patinfo/items/rrgstno") + "-2XXXXXX"); } */ model.makeValue("/root/main/patinfo/items/rrgstno", model.getValue("/root/main/patinfo/items/rrgstno")); model.makeValue("/root/main/patinfo/items/centcd", model.getValue("/root/main/patinfo/items/centcd")); model.makeValue("/root/main/patinfo/items/centnm", model.getValue("/root/main/patinfo/items/centnm")); model.makeValue("/root/main/patinfo/items/centengabbr", model.getValue("/root/main/patinfo/items/centengabbr")); } else if (model.getValue("/root/hidden/parentflag") == "PRNT"){ pidinfo = parent.model.getValue("/root/main/ordinfo/pid"); patnminfo = parent.model.getValue("/root/main/ordinfo/patnm"); orddept = parent.model.getValue("/root/main/ordinfo/orddeptnm"); drinfo = parent.model.getValue("/root/main/ordinfo/drnm"); sainfo = parent.model.getValue("/root/main/ordinfo/sa"); /* 2009-03-16 Edited by Nj if(parent.swt_trgtmanlist.selectedIndex == 0){ ordtype = 'O'; } else if(parent.swt_trgtmanlist.selectedIndex == 1){ ordtype = 'I'; } else if(parent.swt_trgtmanlist.selectedIndex == 2){ ordtype = 'E'; } */ model.makeValue("/root/main/patinfo/items/pid", parent.model.getValue("/root/main/ordinfo/pid")); model.makeValue("/root/main/patinfo/items/orddd", parent.model.getValue("/root/main/ordinfo/orddd")); model.makeValue("/root/main/patinfo/items/ordtype", parent.model.getValue("/root/main/ordinfo/ordtype")); model.makeValue("/root/main/patinfo/items/orddeptcd", parent.model.getValue("/root/main/ordinfo/orddeptcd")); model.makeValue("/root/main/patinfo/items/patnm", parent.model.getValue("/root/main/ordinfo/patnm")); model.makeValue("/root/main/patinfo/items/orddeptnm", parent.model.getValue("/root/main/ordinfo/orddeptnm")); model.makeValue("/root/main/patinfo/items/drid", parent.model.getValue("/root/main/ordinfo/drid")); model.makeValue("/root/main/patinfo/items/drnm", parent.model.getValue("/root/main/ordinfo/drnm")); model.makeValue("/root/main/patinfo/items/sa", parent.model.getValue("/root/main/ordinfo/sa")); model.makeValue("/root/main/patinfo/items/inroomcd", parent.model.getValue("/root/main/ordinfo/inroomcd")); model.makeValue("/root/main/patinfo/items/cretno", parent.model.getValue("/root/main/ordinfo/cretno")); model.makeValue("/root/main/patinfo/items/rrgstno", parent.model.getValue("/root/main/ordinfo/rrgstno")); model.makeValue("/root/main/patinfo/items/centcd", parent.model.getValue("/root/main/ordinfo/centcd")); model.makeValue("/root/main/patinfo/items/centnm", parent.model.getValue("/root/main/ordinfo/centnm")); model.makeValue("/root/main/patinfo/items/centengabbr", parent.model.getValue("/root/main/ordinfo/centengabbr")); } patnminf = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/patnm"); // º´¿øº° µî·Ï¹øÈ£ Ç¥½Ã¹æ¹ý ¿©ºÎ(HardCode Å×À̺í ÀÌ¿ë) - 2009/06/01 Ãß°¡ mmbfGetHardCodeInfoNm("/root/send/harddata","/root/temp/hardcode", 3801); //OCR¼­½ÄÀÇ µî·Ï¹øÈ£ üũ·ÎÁ÷ Ç¥½Ã ¿©ºÎ var hardcd = model.getValue("/root/temp/hardcode/hardcd/hardcd"); if (hardcd == "Y") { for(var i = pidinfo.length; i <= 8; i++){ if(i < 8){ pidinfo = "0"+pidinfo; } } var str1 = pidinfo.substr(0, 3); var str2 = pidinfo.substr(3, 2); var str3 = pidinfo.substr(5, 2); var str4 = pidinfo.substr(7, 1); pidinfo = str1 + " " + str2 + " " + str3 + "-" + str4; } obj_BCP.setParam("rgst_no", pidinfo); getdate = model.getValue("/root/main/patinfo/items/orddd"); // ȯÀÚ¸í 5Àڱ ¼öÁ¤ if (patnminfo.length > 5 && patnminfo.length <= 10) { prnt_patnminfo = patnminfo } else if (patnminfo.length > 11) { prnt_patnminfo = patnminfo.substring(0, 10); } else { for(var i = 0; i <= patnminfo.length; i++){ tmp_patnminfo = patnminfo.substring(i, i+1); if(i == patnminfo.length){ break; } prnt_patnminfo = prnt_patnminfo + tmp_patnminfo.concat(" "); } } /* ¿ø source for(var i = 0; i <= patnminfo.length; i++){ tmp_patnminfo = patnminfo.substring(i, i+1); if(i == patnminfo.length){ break; } prnt_patnminfo = prnt_patnminfo + tmp_patnminfo.concat(" "); } */ obj_BCP.setParam("pat_nm", prnt_patnminfo); model.makeValue("/root/send/reqdata/deptcd", model.getValue("/root/main/patinfo/items/orddeptcd")); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/patinfo/items/orddd")); // ºÎ¼­¾à¾î °¡Á®¿À±â submit("TRMRF03805"); obj_BCP.setParam("orddept", model.getValue("/root/main/deptinfo/info/deptengabbr")); obj_BCP.setParam("rrgstno", model.getValue("/root/main/patinfo/items/rrgstno")); obj_BCP.setParam("fromdd", getdate.substr(0, 4) + "/" + getdate.substr(4, 2) + "/" + getdate.substr(6, 2)); /* obj_BCP.setParam("sa", "³ªÀÌ / ¼ºº° : " + sainfo); switch(ordtype){ case 'O': obj_BCP.setParam("orddetp_orddr", "Áø·á°ú/¿Ü·¡ : " + orddetp_drinfo); break; case 'I': if(model.getValue("/root/hidden/parentflag") == "ETC"){ inroomcd = model.getValue("/root/main/patinfo/items/inroomcd"); } else { inroomcd = parent.model.getValue("/root/main/ordinfo/inroomcd"); } obj_BCP.setParam("orddetp_orddr", "Áø·á°ú/º´½Ç : " + orddetp_drinfo+"/"+inroomcd); break; case 'E': obj_BCP.setParam("orddetp_orddr", "Áø·á°ú/ÀÀ±Þ : " + orddetp_drinfo); break; } */ // 2009.11.16. ÇöÀç Àç¿øÁßÀÎ º´½ÇÁ¤º¸ °¡Á®¿À±â.. & º´½ÇÁ¤º¸ Ãâ·ÂÇϱâ.. obj_BCP.setParam("inroomcd", ""); var ordtype = model.getValue("/root/main/patinfo/items/ordtype"); if (ordtype == 'I') { model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/patinfo/items/pid")); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/patinfo/items/orddd")); model.makeValue("/root/send/reqdata/cretno", model.getValue("/root/main/patinfo/items/cretno")); submit("TRMRF03809"); var inroomcd = model.getValue("/root/main/inroominfo/inroomlist/roomcd"); if (inroomcd != "False" && inroomcd != "" ) { //obj_BCP.setParam("inroomcd", "º´½Ç : " + inroomcd); //lyj 2011/11/29 obj_BCP.setParam("rgst_no", pidinfo +" ("+inroomcd+")"); } } } /** * @desc : ŸÀÌÆ² Á¤º¸ ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetTitle(){ var getformnm = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/formprntnm"); var arryformnm = getformnm.split("\n"); var langflag = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/langflag"); if(arryformnm.length == 2){ obj_BCP.setParam("formnm1", arryformnm[0]); obj_BCP.setParam("formnm2", arryformnm[1]); } else if(arryformnm.length == 1){ obj_BCP.setParam("formnm", arryformnm[0]); } //obj_BCP.setParam("centnm", "¼¾Å͸í : " ); // + model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt")); switch(langflag){ case "KO": obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); if(model.getValue("/root/main/ocrinfo/doubcnt") != "1"){ obj_BCP.setParam("useflag", "[ȯÀÚ º¸°ü¿ë]"); } break; case "EN": obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+"e.jpg"); if(model.getValue("/root/main/ocrinfo/doubcnt") != "1"){ obj_BCP.setParam("useflag", "\"" + "For Patient Use" + "\""); } break; default: obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); if(model.getValue("/root/main/ocrinfo/doubcnt") != "1"){ obj_BCP.setParam("useflag", "[ȯÀÚ º¸°ü¿ë]"); } break; } //obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/logo012.gif"); } /** * @desc : OCR Å×±× ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- * 20090715 fSetOCRTag ÆÄ¶ó¸ÞÅÍ ¼öÁ¤ fSetOCRTag(flag) - > fSetOCRTag(flag, ocrtagprntyn) */ function fSetOCRTag(flag, ocrtagprntyn){ var getocrtag; model.removeNodeset("/root/send/reqdata"); //copyNodeset("/root/send/reqdata", "/root/main/patinfo/items"); //model.makeValue("/root/send/reqdata/formcd", model.getValue("/root/main/ocrinfo/ocrlist/formcd")); //model.makeValue("/root/send/reqdata/formfromdt", model.getValue("/root/main/ocrinfo/ocrlist/formfromdt")); //submit("TRMRF03804"); //getocrtag = model.getValue("/root/main/ocrinfo/ocrtag/tag"); // »õ·Î OCRTag¸¦ »ý¼ºÀ¸·Î ¹Ù²Þ. // °£È£ºÐ¸¸ÇÁ·Î±×·¥¿¡¼­ ȯÀÚ°¡ µÎ ¸íÀÇ ¾ÆÀ̸¦ ºÐ¸¸ÇÏ¿´À» °æ¿ì, // °¢°¢ OCRTAG°¡ °³º°ÀûÀ¸·Î »ý¼ºÀÌ µÇ¾î¾ß ÇÑ´Ù. // MRI µ¿ÀǼ­ °°Àº °æ¿ì °¢°¢ µ¿ÀǼ­°¡ Ãâ·ÂµÇ¾î¾ß Çϰí OCRTAGµµ °¢°¢ Ãâ·ÂÀÌ µÇ¾î¾ß ÇÔ. // ¼öÁ¤ÀÏ 2007.12.10 model.makeValue("/root/main/exist", "N"); if(model.getValue("/root/hidden/parentflag") == "PRNT"){ if(parent.swt_ocrinfoflag.selectedIndex == "1"){ parent.btn_prnt.disabled = true; } else { var parentauth = parent.model.getValue("/root/properties/auth") if(parentauth.charAt(1) == '1'){ //20100727-kys-½ÇÇà±ÇÇÑÀÌ ÀÖÀ»½Ã¿¡¸¸ disableº¯°æÃ³¸®.(¿äû¹øÈ£ : 11292) parent.btn_prnt.disabled = false; } } } if(flag != ""){ // 20090715 ocrtag Ãâ·Â±¸ºÐ °ªÀ¸·Î Ãâ·Â¿©ºÎ ÆÇ´Ü ¼öÁ¤ nj // obj_BCP.setParam("ocrtag", "+"+flag+"+"); if(ocrtagprntyn == "N"){ obj_BCP.setParam("ocrtag", ""); } else { obj_BCP.setParam("ocrtag", "+"+flag+"+"); } model.makeValue("/root/main/ocrinfo/ocrtag/tag", flag); fSetBarCode(); } /* if(getocrtag == ""){ model.setValue("/root/main/exist", "N"); if(model.getValue("/root/hidden/parentflag") == "PRNT"){ parent.btn_prnt.disabled = false; } } else { model.setValue("/root/main/exist", "Y"); obj_BCP.setParam("ocrtag", "+"+getocrtag); fSetBarCode(); if(model.getValue("/root/hidden/parentflag") == "PRNT"){ parent.btn_prnt.disabled = true; } } */ obj_BCP.Refresh(); } /** * @desc : OCR Å×±× »ý¼º * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fmakeOCRTag(){ /* OCRTag´Â ÀϷùøÈ£¸¦ »ç¿ëÇϱâ·ÎÇÔ. ÀϽÃ+ÀϷùøÈ£ »ç¿ë */ var ocrtag = null; var tmptag; var prntocrtag = ""; model.removeNode("/root/main/ocrinfo/ocrtag/tag"); model.makeValue("/root/send/reqdata/date", getCurrentDate()); submit("TRMRF03806"); ocrtag = getCurrentDate() + model.getValue("/root/main/ocrtag/seq"); for(var i = 0; i <= ocrtag.length; i++){ tmptag = ocrtag.substring(i, i+1); if(i == ocrtag.length){ break; } // ±ÛÀÚ »çÀÌÀÇ °ø¹éÀ» Á¦°Å // prntocrtag = prntocrtag + tmptag.concat(" "); prntocrtag = prntocrtag + tmptag; } model.makeValue("/root/main/ocrinfo/ocrtag/tag", prntocrtag); model.makeValue("/root/main/temp/ocrtag/tag", "+"+prntocrtag+"+"); model.removeNode("/root/send/reqdata/date"); return model.getValue("/root/main/temp/ocrtag/tag"); } /** * @desc : OCR ÀúÀå µ¥ÀÌŸ ¼ÂÆÃ ÈÄ ÀúÀå * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSaveOCR(){ var savepath = "/root/send/reqdata/"; model.makeValue(savepath + "ocrtag", model.getValue("/root/main/ocrinfo/ocrtag/tag")); model.makeValue(savepath + "pid", model.getValue("/root/main/patinfo/items/pid")); model.makeValue(savepath + "orddd", model.getValue("/root/main/patinfo/items/orddd")); model.makeValue(savepath + "cretno", model.getValue("/root/main/patinfo/items/cretno")); model.makeValue(savepath + "ordtype", model.getValue("/root/main/patinfo/items/ordtype")); model.makeValue(savepath + "orddeptcd", model.getValue("/root/main/patinfo/items/orddeptcd")); model.makeValue(savepath + "orddrid", model.getValue("/root/main/patinfo/items/drid")); model.makeValue(savepath + "instcd", getUserInfo("dutplceinstcd")); model.makeValue(savepath + "formcd", model.getValue("/root/main/ocrinfo/ocrlist/formcd")); model.makeValue(savepath + "formfromdt", model.getValue("/root/main/ocrinfo/ocrlist/formfromdt")); model.makeValue(savepath + "fstprntdt", getCurrentDate()+getCurrentTime()); model.makeValue(savepath + "fstprntdeptcd", getUserInfo("dutplcecd")); model.makeValue(savepath + "fstprntid", getUserInfo("userid")); model.makeValue(savepath + "updtdt", getCurrentDate()+getCurrentTime()); model.makeValue(savepath + "updtdeptcd", getUserInfo("dutplcecd")); model.makeValue(savepath + "updtuserid", getUserInfo("userid")); model.makeValue(savepath + "diagnm", model.getValue("/root/main/diaginfo/diaghngnm")); model.makeValue(savepath + "opnm", model.getValue("/root/main/opinfo/ophngnm")); model.makeValue(savepath + "pagecnt", model.getValue("/root/main/ocrinfo/ocrdatacnt")); if (gocrprntyn == "N") { model.makeValue(savepath + "updtresncnts", "½ÇÁ¦ Ãâ·ÂÀº ÇÏÁö ¾ÊÀ½"); model.makeValue(savepath + "realprntyn", "N"); } model.addlog("ocrtag:" + model.getValue(savepath + "ocrtag")); model.addlog("pid:" + model.getValue(savepath + "pid")); model.addlog("orddd:" + model.getValue(savepath + "orddd")); model.addlog("cretno:" + model.getValue(savepath + "cretno")); model.addlog("ordtype:" + model.getValue(savepath + "ordtype")); model.addlog("orddeptcd:" + model.getValue(savepath + "orddeptcd")); model.addlog("orddrid:" + model.getValue(savepath + "orddrid")); model.addlog("instcd:" + model.getValue(savepath + "instcd")); model.addlog("formcd:" + model.getValue(savepath + "formcd")); model.addlog("formfromdt:" + model.getValue(savepath + "formfromdt")); model.addlog("fstprntdt:" + model.getValue(savepath + "fstprntdt")); model.addlog("fstprntdeptcd:" + model.getValue(savepath + "fstprntdeptcd")); model.addlog("fstprntid:" + model.getValue(savepath + "fstprntid")); model.addlog("updtdt:" + model.getValue(savepath + "updtdt")); model.addlog("updtdeptcd:" + model.getValue(savepath + "updtdeptcd")); model.addlog("updtuserid:" + model.getValue(savepath + "updtuserid")); model.addlog("pagecnt:" + model.getValue(savepath + "pagecnt")); if(submit("TXMRF03805")){ return model.getValue("/root/main/ocrinfo/ocrtag/tag"); } //model.removeNodeset("/root/send/reqdata"); } /** * @desc : OCR ÆäÀÌÁö À̵¿ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fMovePage(pageno){ var formtype = model.getValue("/root/main/forminfo/formtypecls"); var pid = model.getValue("/root/main/patinfo/items/pid"); var orddd = model.getValue("/root/main/patinfo/items/orddd"); var ordtype = model.getValue("/root/main/patinfo/items/ordtype"); var cretno = model.getValue("/root/main/patinfo/items/cretno"); var formcd = model.getValue("/root/main/ocrinfo/ocrlist/formcd"); var ocrtag = model.getValue("/root/main/ocrinfo/ocrtag/tag"); var ocrtagprntyn = model.getValue("/root/main/forminfo/ocrtagprntyn"); var topinfoprntyn = parent.window.javascript.getParameter("topinfoprntyn"); if(pageno == '1'){ /* switch(formtype){ case '1': fSetInitFile1(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn); break; case '2': fSetInitFile2(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn); break; case '3': fSetInitFile3(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn); break; case '4': fSetInitFile4(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn); break; case '5': fSetInitFile5(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn); break; } */ } else if ( topinfoprntyn != "Y") { /* 2009-07-27 nj OCR TYPE5 ¼öÁ¤ if(formtype != "5"){ obj_BCP.LoadChart(gv_BCPINIPath+"default.ini"); fSetDefault(); fSetBottomInfo(); fSetBarCode(); }*/ //obj_BCP.LoadChart(gv_BCPINIPath+"default.ini"); //fSetDefault(); //fSetBottomInfo(); //fSetBarCode(); } opt_pagecnt.attribute("text") = model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt"); //--Yoo obj_BCP.setParam("bg_path", gv_ImgeSavePath + model.getValue("/root/main/ocrinfo/ocrlist["+pageno+"]/ocrfilenm")); //--Yoo obj_BCP.Refresh(); f_View.Pagecurrent = pageno; } /** * @desc : ±âÁØÆäÀÌÁö¿¡¼­ ´ÙÀ½ ÆäÀÌÁö * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fPostPage(){ var currpage = parseInt(model.getValue("/root/main/ocrinfo/currentpage")); if( currpage == f_View.Pagetotal ) { } else { currpage = currpage+1; model.makeValue("/root/main/ocrinfo/currentpage", currpage); fMovePage(currpage); btn_prepage.attribute("visibility") = "visible"; if(parseInt(currpage) == parseInt(model.getValue("/root/main/ocrinfo/ocrdatacnt"))){ btn_postpage.disabled = true; btn_prepage.disabled = false; }else { btn_postpage.disabled = false; btn_prepage.disabled = false; } } } /** * @desc : ±âÁØÆäÀÌÁö¿¡¼­ ÀÌÀü ÆäÀÌÁö * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fPrePage(){ var currpage = parseInt(model.getValue("/root/main/ocrinfo/currentpage")); if(currpage == 1){ } else { currpage = currpage-1; model.makeValue("/root/main/ocrinfo/currentpage", currpage); fMovePage(currpage); if(currpage == 1){ btn_prepage.disabled = true; btn_postpage.disabled = false; } else { btn_prepage.disabled = false; btn_postpage.disabled = false; } } } /** * @desc : ¹ÙÄÚµå ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetBarCode(){ var barcode = ""; var pageno = 0; barcode = model.getValue("/root/main/ocrinfo/ocrtag/tag"); pageno = model.getValue("/root/main/ocrinfo/currentpage"); if(pageno.length == 1){ pageno = "0"+pageno; } obj_BCP.setParam("barcode", "*"+barcode+pageno+"*"); } /** * @desc : Áø´Ü¸í ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetDiag(pid, orddd, cretno, ordtype){ model.removeNodeset("/root/send/reqdata"); if(model.getValue("/root/main/exist") == "Y"){ // obj_BCP.setParam("tag_diagnm", "Áø´Ü¸í"); // obj_BCP.setParam("diagnm", model.getValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm")); } else if(model.getValue("/root/main/exist") == "N" && model.getValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm") == ""){ model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/patinfo/items/pid")); model.makeValue("/root/send/reqdata/orddd", model.getValue("/root/main/patinfo/items/orddd")); model.makeValue("/root/send/reqdata/cretno", model.getValue("/root/main/patinfo/items/cretno")); model.makeValue("/root/send/reqdata/orddeptcd", model.getValue("/root/main/patinfo/items/orddeptcd")); model.makeValue("/root/send/reqdata/ordtype", model.getValue("/root/main/patinfo/items/ordtype")); submit("TRMRF03807"); // obj_BCP.setParam("tag_diagnm", "Áø´Ü¸í") // obj_BCP.setParam("diagnm", model.getValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm")); } obj_BCP.setParam("tag_diagnm", "Áø´Ü¸í") obj_BCP.setParam("diagnm", model.getValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm")); obj_BCP.Refresh(); } /** * @desc : ¼ö¼ú¸í ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetOp(pid, orddd, cretno, ordtype){ obj_BCP.setParam("tag_opnm", "¼ö¼ú¸í"); obj_BCP.setParam("tag_opnm1", "(óġ/°Ë»ç)"); } /** * @desc : ÇÏ´ÜÁ¤º¸(Ãâ·ÂÀϽÃ, Ãâ·ÂÀÚ, ÆäÀÌÁö) ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetBottomInfo(){ var getdate = getCurrentDate(); var gettime = getCurrentTime(); var getuser = getUserName(); var getuseren = getUserInfo("userengnm"); 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 langflag = model.getValue("/root/main/ocrinfo/ocrlist["+ 1 +"]/langflag"); var ipaddr = getUserInfo("ipaddr"); switch(langflag){ case "KO": obj_BCP.setParam("bottom_time", "Ãâ·ÂÀϽà : " + dateprnt + " " + timeprnt); obj_BCP.setParam("bottom_user", "Ãâ·ÂÀÚ : " + getuser ); obj_BCP.setParam("pagecnt", "ÆäÀÌÁö : " + model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt")); break; case "EN": obj_BCP.setParam("bottom_time", "Print Date : " + dateprnt + " " + timeprnt); if((getuseren == null)||(getuseren == "")){ obj_BCP.setParam("bottom_user", "Printed by : " + getuser); } else { // ¿µ¹®µ¿ÀǼ­µµ Ãâ·ÂÀÚ´Â Çѱ۸íÀ¸·Î Ç¥½ÃµÇ¾î¾ß ÇÔ. 2008-09-17 ±è¹Ì¼± ¼±»ý´Ô ¿äû obj_BCP.setParam("bottom_user", "Printed by : " + getuser); //obj_BCP.setParam("bottom_user", "Printed by : " + getuseren.substring(0, 7)); } obj_BCP.setParam("pagecnt", "Page : " + model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt")); break; default: obj_BCP.setParam("bottom_time", "Ãâ·ÂÀϽà : " + dateprnt + " " + timeprnt); obj_BCP.setParam("bottom_user", "Ãâ·ÂÀÚ : " + getuser); obj_BCP.setParam("pagecnt", "ÆäÀÌÁö : " + model.getValue("/root/main/ocrinfo/currentpage") + "/" + model.getValue("/root/main/ocrinfo/ocrdatacnt")); break; } var centnm = model.getValue("/root/main/patinfo/items/centnm"); //if (centnm != "") if (centnm != "False" && centnm != "" ) { obj_BCP.setParam("centnm", "¼¾Å͸í : " + centnm+'('+ipaddr+')'); } else { obj_BCP.setParam("centnm", ipaddr); } } /** * @desc : ÆÄÀÏ¼ÂÆÃ1 * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- * 20090715 fSetInitFile1 ÆÄ¶ó¸ÞÅÍ ¼öÁ¤ fSetInitFile1(formcd, pid, orddd, cretno, ordtype, ocrtag) - > fSetInitFile1(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn) nj */ function fSetInitFile1(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn){ obj_BCP.LoadChart(gv_BCPINIPath+"set_ocrtype1.ini"); fSetPatInfo(formcd, pid, orddd, cretno, ordtype); if(model.getValue("/root/main/ocrinfo/doubcnt") == "1"){ // 20090715 fSetOCRTag È£Ãâ½Ã OCRTAG Ãâ·Â¿¡ ¿©ºÎ¿¡ µû¸¥ ÆÄ¶ó¸ÞÅÍ Ãß°¡·Î ³Ñ±è nj // 20090715 fSetOCRTag(ocrtag); fSetOCRTag(ocrtag, ocrtagprntyn); } fSetTitle(); fSetDiag(pid, orddd, cretno, ordtype); fSetOp(pid, orddd, cretno, ordtype); fSetBottomInfo(); } /** * @desc : ÆÄÀÏ¼ÂÆÃ2 * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- * 20090715 fSetInitFile2 ÆÄ¶ó¸ÞÅÍ ¼öÁ¤ fSetInitFile2(formcd, pid, orddd, cretno, ordtype, ocrtag) - > fSetInitFile2(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn) nj */ function fSetInitFile2(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn){ obj_BCP.LoadChart(gv_BCPINIPath+"set_ocrtype2.ini"); fSetPatInfo(formcd, pid, orddd, cretno, ordtype); if(model.getValue("/root/main/ocrinfo/doubcnt") == "1"){ // 20090715 fSetOCRTag È£Ãâ½Ã OCRTAG Ãâ·Â¿¡ ¿©ºÎ¿¡ µû¸¥ ÆÄ¶ó¸ÞÅÍ Ãß°¡·Î ³Ñ±è nj // 20090715 fSetOCRTag(ocrtag); fSetOCRTag(ocrtag, ocrtagprntyn); } fSetTitle(); fSetDiag(pid, orddd, cretno, ordtype); fSetBottomInfo(); } /** * @desc : ÆÄÀÏ¼ÂÆÃ3 * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- * 20090715 fSetInitFile3 ÆÄ¶ó¸ÞÅÍ ¼öÁ¤ fSetInitFile3(formcd, pid, orddd, cretno, ordtype, ocrtag) - > fSetInitFile3(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn) nj */ function fSetInitFile3(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn){ obj_BCP.LoadChart(gv_BCPINIPath+"set_ocrtype3.ini"); fSetPatInfo(formcd, pid, orddd, cretno, ordtype); if(model.getValue("/root/main/ocrinfo/doubcnt") == "1"){ // 20090715 fSetOCRTag È£Ãâ½Ã OCRTAG Ãâ·Â¿¡ ¿©ºÎ¿¡ µû¸¥ ÆÄ¶ó¸ÞÅÍ Ãß°¡·Î ³Ñ±è nj // 20090715 fSetOCRTag(ocrtag); fSetOCRTag(ocrtag, ocrtagprntyn); } fSetTitle(); fSetBottomInfo(); } /** * @desc : ÆÄÀÏ¼ÂÆÃ4 * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- * 20090715 fSetInitFile4 ÆÄ¶ó¸ÞÅÍ ¼öÁ¤ fSetInitFile4(formcd, pid, orddd, cretno, ordtype, ocrtag) - > fSetInitFile4(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn) nj */ function fSetInitFile4(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn){ obj_BCP.LoadChart(gv_BCPINIPath+"set_ocrtype4.ini"); fSetPatInfo(formcd, pid, orddd, cretno, ordtype); if(model.getValue("/root/main/ocrinfo/doubcnt") == 1){ // 20090715 fSetOCRTag È£Ãâ½Ã OCRTAG Ãâ·Â¿¡ ¿©ºÎ¿¡ µû¸¥ ÆÄ¶ó¸ÞÅÍ Ãß°¡·Î ³Ñ±è nj // 20090715 fSetOCRTag(ocrtag); fSetOCRTag(ocrtag, ocrtagprntyn); } fSetTitle(); fSetBottomInfo(); } /** * @desc : ÆÄÀÏ¼ÂÆÃ5 * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- * 20090715 fSetInitFile5 ÆÄ¶ó¸ÞÅÍ ¼öÁ¤ fSetInitFile5(formcd, pid, orddd, cretno, ordtype, ocrtag) - > fSetInitFile5(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn) nj */ function fSetInitFile5(formcd, pid, orddd, cretno, ordtype, ocrtag, ocrtagprntyn){ obj_BCP.LoadChart(gv_BCPINIPath+"set_ocrtype5.ini"); fSetPatInfo(formcd, pid, orddd, cretno, ordtype); // 2009-07-27 nj Ãß°¡ var langflag = model.getValue("/root/main/ocrinfo/ocrlist["+ 1 +"]/langflag"); // formprntnmÀ¸·Î Ãâ·Â¸í º¯°æ var getformnm = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/formprntnm"); var arryformnm = getformnm.split("\n"); if(arryformnm.length == 2){ obj_BCP.setParam("formnm1", arryformnm[0]); obj_BCP.setParam("formnm2", arryformnm[1]); } else if(arryformnm.length == 1){ obj_BCP.setParam("formnm", arryformnm[0]); } fSetOCRTag(ocrtag, ocrtagprntyn); switch(langflag){ case "KO": obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); break; case "EN": obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+"e.jpg"); break; default: obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); break; } fSetBottomInfo(); } /** * @desc : Áø´Ü¸íÀ̳ª opnm ¼ÂÆÃ * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetDiagOpnm(){ var iptflag = model.getValue("/root/main/iptnmflag"); if(iptflag == "diagnm") { obj_BCP.setParam("diagnm", model.getValue("/root/main/iptdiaghngnm")); model.makeValue("/root/main/ocrinfo/ocrtag/diaginfo/diagengnm", model.getValue("/root/main/iptdiaghngnm")); } else if(iptflag == "opnm") { obj_BCP.setParam("opnm", model.getValue("/root/main/iptdiaghngnm")); model.makeValue("/root/main/ocrinfo/ocrtag/opinfo/opengnm", model.getValue("/root/main/iptdiaghngnm")); } obj_BCP.Refresh(); } /** * @desc : OCR ¼­½Ä º´¿ø º¸°ü¿ë Default Á¤º¸ Ãâ·Â * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetDefault(){ var getdate = model.getValue("/root/main/patinfo/items/orddd"); // Default page Ãâ·Â¸íĪ À¸·Î ¼öÁ¤ // var getformnm = model.getValue("/root/main/ocrinfo/ocrlist/formnm"); var dateprnt = getdate.substr(0, 4) + "/" + getdate.substr(4, 2) + "/" + getdate.substr(6, 2); var pidinfo = model.getValue("/root/main/patinfo/items/pid"); var langflag = model.getValue("/root/main/ocrinfo/ocrlist["+ 1 +"]/langflag"); // formprntnmÀ¸·Î Ãâ·Â¸í º¯°æ var getformnm = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/formprntnm"); var arryformnm = getformnm.split("\n"); if(arryformnm.length == 2){ obj_BCP.setParam("formnm1", arryformnm[0]); obj_BCP.setParam("formnm2", arryformnm[1]); } else if(arryformnm.length == 1){ obj_BCP.setParam("formnm", arryformnm[0]); } // º´¿øº° µî·Ï¹øÈ£ Ç¥½Ã¹æ¹ý ¿©ºÎ(HardCode Å×À̺í ÀÌ¿ë) - 2009/06/01 Ãß°¡ mmbfGetHardCodeInfoNm("/root/send/harddata","/root/temp/hardcode", 3801); //OCR¼­½ÄÀÇ µî·Ï¹øÈ£ üũ·ÎÁ÷ Ç¥½Ã ¿©ºÎ var hardcd = model.getValue("/root/temp/hardcode/hardcd/hardcd"); if (hardcd == "Y") { for(var i = pidinfo.length; i <= 8; i++){ if(i < 8){ pidinfo = "0"+pidinfo; } } var str1 = pidinfo.substr(0, 3); var str2 = pidinfo.substr(3, 2); var str3 = pidinfo.substr(5, 2); var str4 = pidinfo.substr(7, 1); pidinfo = str1 + " " + str2 + " " + str3 + "-" + str4; } obj_BCP.setParam("rgst_no", pidinfo); // ȯÀÚ¸í 5ÀڷΠ¥¸£±â var pat_nm = model.getValue("/root/main/patinfo/items/patnm"); if (pat_nm.length > 10) { pat_nm = pat_nm.substr(0, 10); } //obj_BCP.setParam("pat_nm", model.getValue("/root/main/patinfo/items/patnm")); obj_BCP.setParam("pat_nm", pat_nm); // obj_BCP.setParam("formnm", getformnm); // 2009-07-27 OCRTAG Ãâ·Â¿©ºÎ ¼öÁ¤ if(model.getValue("/root/main/forminfo/ocrtagprntyn") == "N"){ obj_BCP.setParam("ocrtag", ""); } else { obj_BCP.setParam("ocrtag", model.getValue("/root/main/temp/ocrtag/tag")); } switch(langflag){ case "KO": obj_BCP.setParam("fromdd", "Áø·áÀÏ : " + dateprnt); obj_BCP.setParam("orddept", "Áø·á°ú : " + model.getValue("/root/main/deptinfo/info/deptengabbr")); obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); obj_BCP.setParam("rrgstno", "Áֹεî·Ï¹øÈ£: " + model.getValue("/root/main/patinfo/items/rrgstno")); break; case "EN": obj_BCP.setParam("fromdd", "Date : " + dateprnt); obj_BCP.setParam("orddept", "Dept : " + model.getValue("/root/main/deptinfo/info/deptengabbr")); obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+"e.jpg"); obj_BCP.setParam("rrgstno", "SN : " + model.getValue("/root/main/patinfo/items/rrgstno")); break; default: obj_BCP.setParam("fromdd", "Áø·áÀÏ : " + dateprnt); obj_BCP.setParam("orddept", "Áø·á°ú : " + model.getValue("/root/main/deptinfo/info/deptengabbr")); obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); obj_BCP.setParam("rrgstno", "Áֹεî·Ï¹øÈ£: " + model.getValue("/root/main/patinfo/items/rrgstno")); break; } } /** * @desc : OCR ¼­½Ä ȯÀÚ º¸°ü¿ë Default Á¤º¸ Ãâ·Â * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSetDefaultPat(){ var getdate = model.getValue("/root/main/patinfo/items/orddd"); // Default page Ãâ·Â¸íĪ À¸·Î ¼öÁ¤ // var getformnm = model.getValue("/root/main/ocrinfo/ocrlist/formnm"); var dateprnt = getdate.substr(0, 4) + "/" + getdate.substr(4, 2) + "/" + getdate.substr(6, 2); var pidinfo = model.getValue("/root/main/patinfo/items/pid"); var langflag = model.getValue("/root/main/ocrinfo/ocrlist["+ 1 +"]/langflag"); // formprntnmÀ¸·Î Ãâ·Â¸í º¯°æ var getformnm = model.getValue("/root/main/ocrinfo/ocrlist[" + 1 + "]/formprntnm"); var arryformnm = getformnm.split("\n"); if(arryformnm.length == 2){ obj_BCP.setParam("formnm1", arryformnm[0]); obj_BCP.setParam("formnm2", arryformnm[1]); } else if(arryformnm.length == 1){ obj_BCP.setParam("formnm", arryformnm[0]); } // º´¿øº° µî·Ï¹øÈ£ Ç¥½Ã¹æ¹ý ¿©ºÎ(HardCode Å×À̺í ÀÌ¿ë) - 2009/06/01 Ãß°¡ mmbfGetHardCodeInfoNm("/root/send/harddata","/root/temp/hardcode", 3801); //OCR¼­½ÄÀÇ µî·Ï¹øÈ£ üũ·ÎÁ÷ Ç¥½Ã ¿©ºÎ var hardcd = model.getValue("/root/temp/hardcode/hardcd/hardcd"); if (hardcd == "Y") { for(var i = pidinfo.length; i <= 8; i++){ if(i < 8){ pidinfo = "0"+pidinfo; } } var str1 = pidinfo.substr(0, 3); var str2 = pidinfo.substr(3, 2); var str3 = pidinfo.substr(5, 2); var str4 = pidinfo.substr(7, 1); pidinfo = str1 + " " + str2 + " " + str3 + "-" + str4; } obj_BCP.setParam("rgst_no", pidinfo); // ȯÀÚ¸í 5ÀڷΠ¥¸£±â var pat_nm = model.getValue("/root/main/patinfo/items/patnm"); if (pat_nm.length > 10) { pat_nm = pat_nm.substr(0, 10); } //obj_BCP.setParam("pat_nm", model.getValue("/root/main/patinfo/items/patnm")); obj_BCP.setParam("pat_nm", pat_nm); // obj_BCP.setParam("formnm", getformnm); switch(langflag){ case "KO": obj_BCP.setParam("fromdd", "Áø·áÀÏ : " + dateprnt); obj_BCP.setParam("orddept", "Áø·á°ú : " + model.getValue("/root/main/deptinfo/info/deptengabbr")); obj_BCP.setParam("useflag", "[ȯÀÚ º¸°ü¿ë]"); obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); obj_BCP.setParam("rrgstno", "Áֹεî·Ï¹øÈ£: " + model.getValue("/root/main/patinfo/items/rrgstno")); break; case "EN": obj_BCP.setParam("fromdd", "Date : " + dateprnt); obj_BCP.setParam("orddept", "Dept : " + model.getValue("/root/main/deptinfo/info/deptengabbr")); obj_BCP.setParam("useflag", "\"" + "For Patient Use" + "\""); obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+"e.jpg"); obj_BCP.setParam("rrgstno", "SN : " + model.getValue("/root/main/patinfo/items/rrgstno")); break; default: obj_BCP.setParam("fromdd", "Áø·áÀÏ : " + dateprnt); obj_BCP.setParam("orddept", "Áø·á°ú : " + model.getValue("/root/main/deptinfo/info/deptengabbr")); obj_BCP.setParam("useflag", "[ȯÀÚ º¸°ü¿ë]"); obj_BCP.setParam("logo_imge", gv_Logo_ImgePath + "/biglogo"+getUserInfo("dutplceinstcd")+".jpg"); obj_BCP.setParam("rrgstno", "Áֹεî·Ï¹øÈ£: " + model.getValue("/root/main/patinfo/items/rrgstno")); break; } } /** * @desc : ¼ö°¡¿Í ¸ÅÇÎµÈ ¼­½Ä Á¶È¸¸¦ À§ÇÑ ÀÎÅÍÆäÀ̽º * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fCalcScorInterface(pid, orddd, cretno, ordtype, calcscorcd, ocrprntyn){ if((pid == null) || (orddd == null) || (cretno == null) || (ordtype == null)){ messageBox("¿ø¹«Á¢¼ö Á¤º¸°¡", "I004"); return; } if ( ocrprntyn == "N" ){ gocrprntyn = "N"; } var formtypecls = ""; var ocrtagprntyn = ""; var formcd = ""; var formfromddt = ""; var calcscorcdList = ""; var arrycalcscorcd = calcscorcd.split("¢Ë"); var formcd_calc = ""; var prcp_rtn = ""; var popyn = ""; var node = getGlobalVariable("paminfo"); setCSVToNode("/root/main/paminfo", node); for(var i = 1; i <= arrycalcscorcd.length -1; i++){ calcscorcdList = calcscorcdList + arrycalcscorcd[i-1]; if(i < arrycalcscorcd.length -1){ calcscorcdList = calcscorcdList + ","; } } model.makeValue("/root/send/reqdata/calcscorcd", calcscorcdList); submit("TRMRF03808"); //¼­½Äº° µ¿ÀǼ­ Ãâ·Â ¿¹¿ÜºÎ¼­(20171230) var excnt = getNodesetCount("/root/main/calcscor/list2[trgtcdnm = '"+arrycalcscorcd[0]+"']"); if (excnt> 0) { return "X"; } //½ÃÇàºÎ¼­ ó¹æ¿¡¼­ µ¿ÀǼ­ Ãâ·ÂÀ¯¹« var openWin = getOpenWindow("SMMMO00200"); var popcnt = getNodesetCount("/root/main/calcscor/list[popyn = 'Y']"); if (openWin != null && popcnt> 0) { if ( 6 != messageBox("µ¿ÀǼ­¸¦ Ãâ·ÂÇϽðڽÀ´Ï±î?","Q") ) { return "X"; } } var formList = getNodesetCount("/root/main/calcscor/list"); for(var i = 1; i <= formList; i++){ formcd = model.getValue("/root/main/calcscor/list["+i+"]/formcd"); formfromdt = model.getValue("/root/main/calcscor/list["+i+"]/formfromdt"); formtypecls = model.getValue("/root/main/calcscor/list["+i+"]/formtypecls"); ocrtagprntyn = model.getValue("/root/main/calcscor/list["+i+"]/ocrtagprntyn"); formcd_calc = model.getValue("/root/main/calcscor/list["+i+"]/calcscorcd"); popyn = model.getValue("/root/main/calcscor/list["+i+"]/popyn"); fGetOCRInfo(formcd, pid, orddd, cretno, ordtype, formtypecls, ocrtagprntyn); var save_ocrtag = fPrint(); var arry_calccd = formcd_calc.split(","); for(var samecnt = 0; samecnt < arry_calccd.length; samecnt++){ prcp_rtn = prcp_rtn + arry_calccd[samecnt] + "¢Ë" + save_ocrtag + "¢Ë"; } } return prcp_rtn; } /** * @desc : OCR Á¤º¸ ÀúÀå * * @param : * @return : * @author : HIT EMR Team * @--------------------------------------------------- */ function fSaveOCRIF(ocrtag, pid, orddd, cretno, ordtype, orddeptcd, orddrid, formcd, formfromdt, diaghngnm, ophngnm, pagecnt, rtnyn){ model.addlog("fSaveOCRIF: " + ocrtag + "," + pid + "," + orddd + "," + cretno + "," + ordtype + "," + orddeptcd + "," + orddrid + "," + formcd + "," + formfromdt + "," + diaghngnm + "," + ophngnm + "," + pagecnt); var savepath = "/root/send/reqdata/"; model.makeValue(savepath + "ocrtag", ocrtag); model.makeValue(savepath + "pid", pid); model.makeValue(savepath + "orddd", orddd); model.makeValue(savepath + "cretno", cretno); model.makeValue(savepath + "ordtype", ordtype); model.makeValue(savepath + "orddeptcd", orddeptcd); model.makeValue(savepath + "orddrid", orddrid); model.makeValue(savepath + "instcd", getUserInfo("dutplceinstcd")); model.makeValue(savepath + "formcd", formcd); model.makeValue(savepath + "formfromdt", formfromdt); model.makeValue(savepath + "fstprntdt", getCurrentDate()+getCurrentTime()); model.makeValue(savepath + "fstprntdeptcd", getUserInfo("dutplcecd")); model.makeValue(savepath + "fstprntid", getUserInfo("userid")); model.makeValue(savepath + "updtdt", getCurrentDate()+getCurrentTime()); model.makeValue(savepath + "updtdeptcd", getUserInfo("dutplcecd")); model.makeValue(savepath + "updtuserid", getUserInfo("userid")); model.makeValue(savepath + "diagnm", diaghngnm); model.makeValue(savepath + "opnm", ophngnm); model.makeValue(savepath + "pagecnt", pagecnt); if(submit("TXMRF03805")){ if(rtnyn == "Y"){ //hardcdno : 9950 ÀÚµ¿¹Ý³³°ü¸® sleep(1000); model.makeValue(savepath + "barcode", ocrtag); model.makeValue(savepath + "updtdt", getCurrentDate()+getCurrentTime()); model.makeValue(savepath + "lstupdtdt", getCurrentDate()+getCurrentTime()); model.makeValue(savepath + "lstupdtuserid", getUserInfo("userid")); model.makeValue(savepath + "lstupdtdeptcd", getUserInfo("dutplcecd")); model.makeValue(savepath + "updtresncnts", ""); model.makeValue(savepath + "statcd", "R"); model.makeValue(savepath + "scanyn", "N"); model.makeValue(savepath + "scancnt", "0"); if(!submit("TXMRF02901")){ messageBox("ÀÚµ¿¹Ý³³ÀúÀåÀ» ½ÇÆÐÇÏ¿´½À´Ï´Ù"); } } model.removeNodeset("/root/send/reqdata"); return true; } else { model.removeNodeset("/root/send/reqdata"); return false; } } // µô·¹ÀÌ function function sleep(msecs){ var start =new Date().getTime(); var cur=start; while(cur-start