/*
- ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì
»ó¼¼±â·Ïº¸±â ( SPMRI02400_»ó¼¼±â·Ï.xrw - JScript )
- Version :
1) : Ver.1.00.01
- ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì
*/
var splittxt = "";
var nurprog = "";
/**
* @desc : ȸéÃʱâÈ
* @id :
* @event : xforms-ready
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fInitalize()
{
var menuparam = getScreenMenuParameter();
var certinfo = "";
var cnt = 0;
if (menuparam != "null" && menuparam != "" && menuparam.length == 4 ) {
btn_copyprt.attribute("visibility") = "hidden";
var node = getGlobalVariable("paminfo");
model.removeNodeset("/root/main/paminfo");
setCSVToNode("/root/main", node, "paminfo")
var pid = model.getValue("/root/main/paminfo/pid");
var hardcdno = menuparam ;
if(pid == "" || isNull(pid)) {
return;
}
model.makeValue("/root/send/reqdata/pid",pid);
model.makeValue("/root/send/reqdata/hardcdno",hardcdno);
if(submit("TRMRI02410")) {
cnt = getNodeSetCnt("/root/signnoinfo/signnolist");
if (cnt == 0) {
messageBox("ÀÛ¼ºµÈ ¼½ÄÀÌ ¾ø½À´Ï´Ù!","I");
return;
}
for( i=1; i <= cnt; i++){
certinfo += "E"
+ "¢Ë" + model.getValue("/root/signnoinfo/signnolist["+i+"]/signno")
+ "¢Ë" + model.getValue("/root/signnoinfo/signnolist["+i+"]/formcd")
+ "¢Ì";
}
}
}
else {
certinfo = opener.window.javascript.getParameter("SPMRI02400_prtrecinfo"); //oldflag¢Ësignno¢Ëformcd¢Ì
//var certinfo = "E¢Ë800000000024067¢Ë0000000002¢ÌI¢Ë1083621¢ËIA000¢ÌE¢Ë800000000024008¢Ë0000000004¢Ì";
var prtyn = opener.window.javascript.getParameter("SPMRI02400_prtyn"); //Ãâ·Â¿©ºÎ
var defaultvw = opener.window.javascript.getParameter("SPMRI02400_defaultvw"); //±âº»ºä¸ðµå
var copybtn = opener.window.javascript.getParameter("SPMRI02400_copybtn"); //copy¹öư
nurprog = opener.window.javascript.getParameter("SPMRI02400_NurProg"); //Àӽ÷Π»ý¼º (°£È£, Áø·á¸ðµâ´Ù¸¥¹®Á¦·ÎÀÎÇØ)
//20130812 ÀÌÀ±ÁÖ Ãß°¡
model.makeValue("/root/inisend/prtyn", prtyn);
if ( model.getValue("/root/inisend/prtyn") == "N") {
btn_copyprt.attribute("visibility") = "hidden";
}
if ( copybtn != "") {
btn_txtcopy.attribute("visibility") = "visible";
}
mmbfGetHardCodeInfo("/root/send/reqdata", "/root/init/pidynhcd", 3801);
//2014.03.25 Start »çº»¹ßÇà½Ã Split±¸ºÐ°ª ¼³Á¤
mmbfGetHardCodeInfo("/root/send/reqdata", "/root/temp/hardcd4", 5623);
splittxt = model.getValue("/root/temp/hardcd4/hardcd/hardcd");
//2014.03.25 End
}
if (certinfo != "")
{
var certArr = certinfo.split("¢Ì");
var tmpsignno = ""; //EMR±â·Ï ÀÎÁõ¹øÈ£
var tmptreatno = ""; //¿µ»óÂ÷Æ® ۰ª
var tmpeformcd = ""; //EMR±â·Ï ¼½ÄÄÚµå
var tmpiformcd = ""; //¿µ»óÂ÷Æ® ¼½ÄÄÚµå
var ieflag = "";
var itemindxseq = "";
for(var i = 0; i < (certArr.length - 1); i++)
{
ieflag = certArr[i].split("¢Ë")[0];
if (ieflag == "I")
{
tmptreatno += certArr[i].split("¢Ë")[1]+ ",";
tmpiformcd += certArr[i].split("¢Ë")[2]+ ",";
}
else
{
tmpsignno += certArr[i].split("¢Ë")[1]+ ",";
tmpeformcd += certArr[i].split("¢Ë")[2]+ ",";
}
}
if( certArr[0].split("¢Ë")[3] == null ){
itemindxseq = "";
}else{
itemindxseq = certArr[0].split("¢Ë")[3];
}
if (tmpsignno != "" && itemindxseq == "" ) //EMR±â·ÏÀÌ ÇÔ²² ³Ñ¾î¿À´Â °æ¿ì
{
model.removeNodeset("/root/inisend");
model.removeNodeset("/root/prthist");
model.makeValue("/root/inisend/signno", tmpsignno.substring(0, tmpsignno.length - 1));
model.makeValue("/root/inisend/dispall", "Y");
if(submit("TRMRI02401"))
{
var certnodeList = instance1.selectNodes("/root/tmpinicert/iniinfo");
var foldernm = "C:/CertrecPrnt";
if (certnodeList.length <= 0)
{
return;
}
fExistFolder(foldernm);
var emrpath = "";
var emrorddate = "";
var emrformnm = "";
var emrformcd = "";
var emrdeptnm = "";
var emrdeptcd = "";
var emrpage = "";
var emrhiddenmsg = "";
var k = "";
var pid = "";
var ptnm = "";
var depthngnm = "";
var deptengabbr = "";
var rgstno = "";
var sa = "";
var disporddd = "";
var orddd = "";
var drid = "";
var roomcd = "";
var ordtype = "";
var chosflag = "";
var orddeptcd = "";
var signflag = "";
var langflag = "";
var signno = 0;
var formcd = "";
var srcformcd = "";
var formnm = "";
var formprogflag = "";
var recdt = "";
var wardheader = "";
var dateheader = "";
var doctorheader = "";
var printheader = "";
var pageheader = "";
var imgepath = "";
var formrecdt = "";
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 surgeon = "";
var cover_header = "";
var cover_footer = "";
var default_cover_header = "";
var default_cover_footer = "";
var i = 0;
var cover_header1 = "";
var cover_header2 = "";
var cover_header3 = "";
var cover_header4 = "";
var cover_header10 = "";
var cover_footer1 = "";
var cover_footer2 = "";
var makebodyfilecnt =0;
var cover_header_filenm = "";
var cover_footer_filenm = "";
var trans="";
var signgenrflag = "";
var prtnunm = getUserInfo("usernm");
var prtndeptnm = getUserInfo("dutplcenm");
var copytext = "ÀÌ ¼½ÄÀº »çº»ÀÔ´Ï´Ù(¿øº»´ëÁ¶ÇÊ)";
//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;
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");
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");
langflag = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/langflag");
formrecdt = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/formrecdt");
formrecdt = formrecdt.toDate().getDateFormat("YYYY/MM/DD");
fstrgstrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/fstrgstrusrnm");
lastupdtrusrnm = model.getValue("/root/tmpinicert/iniinfo[" + i + "]/lastupdtrusrnm");
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 = "ÆäÀÌÁö : ";
copytext = "ÀÌ ¼½ÄÀº »çº»ÀÔ´Ï´Ù(¿øº»´ëÁ¶ÇÊ)";
}
else
{
if (chosflag == "O" || chosflag == "S")
{
wardheader = "Dept : ";
}
else
{
wardheader = "Room : ";
}
dateheader = "Date : ";
doctorheader = "Doctor : ";
printheader = "Print date : ";
prtndeptnm = getUserInfo("deptengnm");
copytext = "ÀÌ ¼½ÄÀº »çº»ÀÔ´Ï´Ù(¿øº»´ëÁ¶ÇÊ)";
imgepath = "com/commonweb/images/biglogo" + getUserInfo("dutplceinstcd") + "e.jpg"
if (prtndeptnm == "" || prtndeptnm == null)
{
prtndeptnm = getUserInfo("dutplcenm");
}
pageheader = "Page : ";
}
model.makeValue("/root/prthist[" + i + "]/pid", pid);
model.makeValue("/root/prthist[" + i + "]/signno", signno);
model.makeValue("/root/prthist[" + i + "]/reckind", "01");
model.makeValue("/root/prthist[" + i + "]/readprtflag", "P");
model.makeValue("/root/prthist[" + i + "]/formcd", formcd);
model.makeValue("/root/prthist[" + i + "]/signflag", signflag);
model.makeValue("/root/prthist[" + i + "]/orddd", orddd);
model.makeValue("/root/prthist[" + i + "]/chosflag", chosflag);
model.makeValue("/root/prthist[" + i + "]/refusge", "");
model.makeValue("/root/prthist[" + i + "]/refremark", "");
if(trans == "")
trans = "
Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.Ãâ·ÂÈ¸é ±¸ÇöÁßÀÔ´Ï´Ù.";
var instcd = getUserInfo("dutplceinstcd");
switch(srcformcd){
case "0800000489"://¼¼Æ÷À¯Àü
case "0000002916"://º»¸Þ·Î
case "0800000494"://Àü±â¿µµ¿
case "0800000490"://Immunophenotyping report
cover_header = "emr/recmngtweb/html/cover_header2_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer3.html";
break;
case "0000000003"://ÀÔ¿øÃÊÁø
cover_header = "emr/recmngtweb/html/cover_header2_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer.html";
break;
case "0000000676"://¼ö¼ú±â·Ï
cover_header = "emr/recmngtweb/html/cover_header_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer2.html";
break;
case "0000000679"://ÀÀ±Þ½Ç±â·Ï
cover_header = "emr/recmngtweb/html/cover_header3_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer.html";
break;
case "0000000680"://ÀÔÅð¿ø¿ä¾à
cover_header = "emr/recmngtweb/html/cover_header1_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer1.html";
break;
case "0000002022"://¸¶Ãë±â·ÏÁö
cover_header = "emr/recmngtweb/html/cover_header4_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer.html";
break;
//case "0000003325"://DSC±â·Ï
case "0000003169"://Brief OP Note
cover_header = "emr/recmngtweb/html/cover_header_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer.html";
break;
default:
if(formprogflag == "-" || formprogflag == "MAIN" || mainyn == "Y"){
cover_header = "emr/recmngtweb/html/cover_header10_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer.html";
}else{
cover_header = "emr/recmngtweb/html/cover_header_"+instcd+".html";
cover_footer = "emr/recmngtweb/html/cover_footer.html";
}
break;
}
trans = "utf16://\n" + trans + "\n";
/*
var fso = new ActiveXObject("Scripting.FileSystemObject");
var a = "";
if(signno != 0) {
a = fso.CreateTextFile(foldernm + "\\" + chosflag + "_" + signno + "_" + formcd + ".HTML", true, true);
}else if(signno == 0) {
a = fso.CreateTextFile(foldernm + "\\" + chosflag + "_" + orddd + "_" + formcd + ".HTML", true, true);
}
a.WriteLine(trans);
a.Close();
if(signno != 0) {
emrpath += foldernm + "\\" + chosflag + "_" + signno + "_" + formcd + ".HTML|";
} else if(signno == 0) {
emrpath += foldernm + "\\" + chosflag + "_" + orddd + "_" + formcd + ".HTML|";
}
*/
// emrpath = emrpath + trans.replace(/"/g, "'") + "|";
// emrorddate += orddd + "|";
// emrformnm += formnm + "|";
// emrformcd += formcd + "|";
// emrdeptnm += deptengabbr + "|";
// emrdeptcd += orddeptcd + "|";
// //emrpage += j+"|";
// emrpage += "1|";
//
// emrhiddenmsg += formcd + "¢Ë" + signno + "¢Ë" + formnm + "¢Ë" + chosflag + "¢Ë" +pid + "¢Ë" + ptnm + "¢Ë" + deptengabbr
// + "¢Ë" + sa + "¢Ë" + rgstno + "¢Ë" + disporddd + "¢Ë" + drid + "¢Ë" + roomcd + "¢Ë" + disporddd + "¢Ë" + ordtype + "¢Ë" + "E|";
//
emrpath = emrpath + trans.replace(/"/g, "'") + splittxt ; //"|";
emrorddate += orddd + splittxt ; //"|";
emrformnm += formnm + splittxt ; //"|";
emrformcd += formcd + splittxt ; //"|";
emrdeptnm += deptengabbr + splittxt ; //"|";
emrdeptcd += orddeptcd + splittxt ; //"|";
//emrpage += j+"|";
emrpage += "1" + splittxt ; //|";
emrhiddenmsg += formcd + "¢Ë" + signno + "¢Ë" + formnm + "¢Ë" + chosflag + "¢Ë" +pid + "¢Ë" + ptnm + "¢Ë" + deptengabbr
+ "¢Ë" + sa + "¢Ë" + rgstno + "¢Ë" + disporddd + "¢Ë" + drid + "¢Ë" + roomcd + "¢Ë" + disporddd + "¢Ë" + ordtype + "¢Ë" + "E" + splittxt ; // |";
}
model.removeNodeset("/root/temp/inisend");
model.resetInstanceNode("/root/imgrec/iemr");
//À̹ÌÁö°æ·Î
model.makeValue("/root/temp/inisend/emrpath", emrpath.substring(0, emrpath.length - 1));
iviewerIemr.model.setValue("/root/main/emrpath", model.getValue("/root/temp/inisend/emrpath"));
//Áø·áÀÏ
model.makeValue("/root/temp/inisend/emrorddate", emrorddate.substring(0, emrorddate.length - 1));
iviewerIemr.model.setValue("/root/main/emrorddate", model.getValue("/root/temp/inisend/emrorddate"));
//¼½Ä¸í
model.makeValue("/root/temp/inisend/emrformnm", emrformnm.substring(0, emrformnm.length - 1));
iviewerIemr.model.setValue("/root/main/emrformnm", model.getValue("/root/temp/inisend/emrformnm"));
//¼½ÄÄÚµå
model.makeValue("/root/temp/inisend/emrformcd", emrformcd.substring(0, emrformcd.length - 1));
iviewerIemr.model.setValue("/root/main/emrformcd", model.getValue("/root/temp/inisend/emrformcd"));
//Áø·á°ú
model.makeValue("/root/temp/inisend/emrdeptnm", emrdeptnm.substring(0, emrdeptnm.length - 1));
iviewerIemr.model.setValue("/root/main/emrdeptnm", model.getValue("/root/temp/inisend/emrdeptnm"));
//Áø·á°úÄÚµå
model.makeValue("/root/temp/inisend/emrdeptcd", emrdeptcd.substring(0, emrdeptcd.length - 1));
iviewerIemr.model.setValue("/root/main/emrdeptcd", model.getValue("/root/temp/inisend/emrdeptcd"));
//ÆäÀÌÁö
model.makeValue("/root/temp/inisend/emrpage", emrpage.substring(0, emrpage.length - 1));
iviewerIemr.model.setValue("/root/main/emrpage", model.getValue("/root/temp/inisend/emrpage"));
model.makeValue("/root/temp/inisend/emrhiddenmsg", emrhiddenmsg.substring(0, emrhiddenmsg.length - 1));
iviewerIemr.model.setValue("/root/main/emrhiddenmsg", model.getValue("/root/temp/inisend/emrhiddenmsg"));
gtmptreatno = tmptreatno;
gtmpiformcd = tmpiformcd;
gemrpath = emrpath;
gemrorddate = emrorddate;
gemrformnm = emrformnm;
gemrformcd = emrformcd;
gemrdeptnm = emrdeptnm;
gemrdeptcd = emrdeptcd;
gemrpage = emrpage;
gemrhiddenmsg = emrhiddenmsg;
}
model.refresh();
model.makeValue("/root/send/iemr/itemindxseq", "");
var iemrNode = instance1.selectSingleNode("/root/send/iemr");
iviewerIemr.window.javascript.searchChart_EMR(iemrNode);
if (iviewerIemr.window.javascript.downloadChart() == true)
{
// ºä¾î ¸ðµå À¯Áö ±â´É Ãß°¡ - 20080417
var ViewMode;
ViewMode = iviewerIemr.model.getValue("/root/hidden/currentViewMode");
if (ViewMode == null || ViewMode == "")
{
iviewerIemr.window.javascript.setupChartCopy("ChartView");
}
else
{
iviewerIemr.window.javascript.setupChartCopy(ViewMode);
}
var defaultvw = opener.window.javascript.getParameter("SPMRI02400_defaultvw"); //±âº»ºä¸ðµå
if (defaultvw == null || defaultvw == "") {
iviewerIemr.window.javascript.setupChart("ThumbView");
}
else {
iviewerIemr.window.javascript.setupChart(defaultvw);
}
//ÀÚµ¿Ãâ·Â
var sAprtYn = opener.window.javascript.getParameter("SPMRI02400_autoprtYn");
opener.window.javascript.setParameter("SPMRI02400_autoprtYn", "");
if (sAprtYn == "Y")
{
if(iviewerIemr.window.javaScript.printChart("SMMRC03000"))
{
fprthist();
messageBox("Ãâ·Â", "I001");
}
else
{
messageBox("Ãâ·Â¿¡", "E009");
}
window.close();
}
}
}
else
{
model.removeNodeset("/root/inisend");
model.resetInstanceNode("/root/send/iemr");
model.setValue("/root/send/iemr/treatno", tmptreatno.substring(0, tmptreatno.length - 1));
model.setValue("/root/send/iemr/docucd", tmpiformcd.substring(0, tmpiformcd.length - 1));
model.makeValue("/root/send/iemr/itemindxseq", itemindxseq);
var iemrNode = instance1.selectSingleNode("/root/send/iemr");
iviewerIemr.window.javascript.searchChart_EMR(iemrNode);
if (iviewerIemr.window.javascript.downloadChart() == true)
{
iviewerIemr.window.javascript.setupChart("ThumbView");
//ÀÚµ¿Ãâ·Â
var sAprtYn = opener.window.javascript.getParameter("SPMRI02400_autoprtYn");
opener.window.javascript.setParameter("SPMRI02400_autoprtYn", "");
if (sAprtYn == "Y")
{
if(iviewerIemr.window.javaScript.printChart("SMMRC03000"))
{
fprthist();
messageBox("Ãâ·Â", "I001");
}
else
{
messageBox("Ãâ·Â¿¡", "E009");
}
window.close();
}
}
}
if ( nurprog != "") {
iviewerIemr.window.javascript.fNurse();
}
}
else
{
var sAprtYn = opener.window.javascript.getParameter("SPMRI02400_autoprtYn");
opener.window.javascript.setParameter("SPMRI02400_autoprtYn", "");
setParameter("SPMRI02400_NoprtList", "Y");
messageBox("Ãâ·Â´ë»ó ¸®½ºÆ®°¡", "I004");
if (sAprtYn == "Y")
{
window.close();
}
}
}
/**
* @desc : ±â·ÏÃâ·ÂÀÌ·Â
* @id :
* @event : onclick
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fprthist()
{
model.removeNodeset("/root/send");
model.makeValue("/root/send/recprt", datagrid1.getUpdateData());
if (submit("TXMRI02402"))
{
//model.removeNodeset("/root/prthist");
//model.refresh();
}
}
/* @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);
}
/**
* @desc : ȸéÃʱâÈ
* @id :
* @event : xforms-ready
* @return : void
* @authur : ¹ÚÁ¾ÈÆ
*/
function fClickPrtBtn()
{
if(iviewerIemr.window.javaScript.printChart("SMMRC03000"))
{
fprthist();
messageBox("Ãâ·Â", "I001");//󸮵Ǿú½À´Ï´Ù.
//2008-09-21 ÀÌâ·Ï ¼öÁ¤ (¼±ÅÃÇÑ ÆäÀÌÁö ¸Å¼ö Àü´Þ)
oprnerId = opener.window.javascript.getScreenID();
if(oprnerId == "SMMRC01100")
{
var pageCnt = iviewerIemr.model.getValue("/root/main/chartinfo/pagecurrent");
if(pageCnt==0){
var pageCurrent = iviewerIemr.model.getValue("/root/main/chartinfo/pagetotal");
opener.window.javascript.fGetShtNo(pageCurrent);
}else if(pageCnt>0){
var pageCurrent = iviewerIemr.model.getValue("/root/main/chartinfo/pagecurrent");
opener.window.javascript.fGetShtNo(pageCurrent);
}
}
}
else
{
messageBox("Ãâ·Â¿¡", "E009"); //½ÇÆÐÇÏ¿´½À´Ï´Ù.
}
//window.close();
}
function fPrtAll()
{
//pagetotal
iviewerIemr.window.javascript.setupChart("ThumbView");
iviewerIemr.window.javaScript.printChart("SMMRC03000");
iviewerIemr.window.javascript.setupChart("ChartView");
//fprthist();
}
/**
* ¼ ½Ä Header & Footer Á¤ÀÇ 2013.08.16 CYW
* @param srcformcd
* @returns
*/
function MakerHeaderNFooter( srcformcd , formprogflag , mainyn ){
var instcd = getUserInfo("dutplceinstcd");
var formcd = srcformcd; // ¼½ÄÄÚµå
var cover_header = "";
var cover_header_start = "";
var cover_header_txt = "";
var cover_header_end = "";
var cover_footer = "";
var cover_footer_start = "";
var cover_footer_txt = "";
var cover_footer_end = "";
var cover_footer_etc = "";
var body_header = "";
var body_footer = "";
var logo = "com/commonweb/images/logo_lctech.png";
// Cover Header ºÎºÐ ---------------------------------------------------------------------------------------------------
cover_header_start =" " +
"\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
";
cover_header_end = "\n"+
"\n";
// Cover Footer ºÎºÐ ---------------------------------------------------------------------------------------------------
cover_footer_start = ""+
"\n"+
"\n"+
"\n"+
"\n
"+
"\n ";
cover_footer_end = "\n"+
"\n
"+
"\n "+
"\n ÆäÀÌÁö:/ | "+
"\n | "+
"\n | "+
"\n | "+
"\n
"+
"\n
"+
"\n
"+
"\n "+
"\n | "+
"\n
"+
"\n
"+
"\n
"+
"\n"+
"\n"+
"\n";
cover_footer_etc = ""+
"\n"+
"\n"+
"\n"+
"\n
"+
"\n "+
"\n ÆäÀÌÁö:/ | "+
"\n | "+
"\n | "+
"\n | "+
"\n
"+
"\n
"+
"\n
"+
"\n "+
"\n | "+
"\n
"+
"\n
"+
"\n
"+
"\n"+
"\n"+
"\n";
//Body Header ºÎºÐ ---------------------------------------------------------------------------------------------------
body_header = ""+
"\n "+
"\n "+
"\n"+
"\n
"+
"\n "+
"\n | "+
"\n | "+
"\n | "+
"\n | "+
"\n | "+
"\n
"+
"\n
"+
"\n
"+
"\n "+
"\n "+
"\n";
// Body Footer ºÎºÐ ---------------------------------------------------------------------------------------------------
body_footer = ""+
"\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";
// ----------------------------------------------------------------------------------------------------------------------
/*
if( srcformcd == "0800000489"){ // ¼¼Æ÷À¯Àü
}else if( srcformcd == "0000002916"){ // º»¸Þ·Î
}else if( srcformcd == "0800000494"){ // Àü±â¿µµ¿
}else if( srcformcd == "0800000490"){ // Immunophenotyping report
cover_header = cover_header_start + cover_header_end;
cover_footer = cover_footer_start + cover_footer_end;
}else if( srcformcd == "0000000001"){ //¿Ü·¡ÃÊÁø
}else if( srcformcd == "0000000002"){ //¿Ü·¡ÀçÁø
}else if( srcformcd == "0000000004"){ //ÀÔ¿ø°æ°ú
}else */
if( srcformcd == "0000000003"){ //Immunophenotyping report
cover_header = cover_header_start + cover_header_end;
cover_footer = cover_footer_etc;
}else if( srcformcd == "0000000003"){ //ÀÔ¿øÃÊÁø
cover_header_txt = "\n " +
"\n
" +
"\n ÀÔ¿øÀÏÀÚ : |
" +
"\n ÀÔ ¿ø °ú : |
" +
"\n
" +
"\n
";
cover_header = cover_header_start + cover_header_txt + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | " +
"\n
" +
"\n
" +
"\n
";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}else if( srcformcd == "0000000676"){ //¼ö¼ú±â·Ï
cover_header = cover_header_start + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â Surgeon : | "+
"\n "+
"\n "+
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | "+
"\n
"+
"\n "+
"\n";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}else if( srcformcd == "0000000679"){ //ÀÀ±Þ½Ç±â·Ï
cover_header_txt = "\n" +
"\n
" +
"\n Áø·áÀÏÀÚ : |
" +
"\n Áø ·á °ú : |
" +
"\n |
" +
"\n [ȯÀÚ ³»¿ø½Ã°£] : |
" +
"\n
" +
"\n
";
cover_header = cover_header_start + cover_header_txt + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | " +
"\n " +
"\n " +
"\n ";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}else if( srcformcd == "0000000680"){ //ÀÔÅð¿ø¿ä¾à
cover_header_txt = "\n" +
"\n
" +
"\n [ÀÔÅð¿øÁ¤º¸] |
" +
"\n ÀÔ¿øÀÏ/ÀÔ¿ø°ú : |
" +
"\n Åð¿øÀÏ/Åð¿ø°ú : |
" +
"\n
" +
"\n
";
cover_header = cover_header_start + cover_header_txt + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â StaffÀÛ¼º ¹× È®ÀÎ : | "+
"\n "+
"\n "+
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | "+
"\n ¢Â Àǹ«±â·Ï»ç : | "+
"\n
"+
"\n "+
"\n";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}else if( srcformcd == "0000002022"){ //¸¶Ãë±â·ÏÁö
cover_header = cover_header_start + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | " +
"\n " +
"\n " +
"\n ";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}else if( srcformcd == "0000003325"){ //DSC±â·Ï
}else if( srcformcd == "0000003169"){ //Brief OP Note
cover_header = cover_header_start + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | " +
"\n " +
"\n " +
"\n ";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}else{
if(formprogflag == "-" || formprogflag == "MAIN" || mainyn == "Y"){
cover_header_txt = "\n" +
"\n
" +
"\n Áø·áÀÏÀÚ : |
" +
"\n Áø ·á °ú : |
" +
"\n
" +
"\n
";
cover_header = cover_header_start + cover_header_txt + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | " +
"\n " +
"\n " +
"\n ";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}else{
cover_header = cover_header_start + cover_header_end;
cover_footer_txt = "\n ¢Â ÃÖÃÊÀÛ¼ºÀÚ : | " +
"\n ¢Â ÃÖÁ¾ÀÛ¼ºÀÚ : | " +
"\n " +
"\n " +
"\n ";
cover_footer = cover_footer_start + cover_footer_txt + cover_footer_end;
}
}
var txt = cover_header + "¢¾" + cover_footer + "¢¾" + body_header + "¢¾" + body_footer;
return txt;
}
function MakeRecFile( hfflag, txt, htmltxt ){
var foldernm = "C:/CertrecPrnt";
var local_path ="";
local_path = foldernm + "\\";
if( hfflag == "h" ){
var headso = new ActiveXObject("Scripting.FileSystemObject");
if(headso.FileExists(local_path +txt + "_cover_header.html") == true)
{
headso.DeleteFile(local_path + txt + "_cover_header.html", true)
}
var h = headso.CreateTextFile( local_path + txt + "_cover_header.html" , true, true);
h.WriteLine(htmltxt);
h.Close();
}
if( hfflag == "f" ){
var footso = new ActiveXObject("Scripting.FileSystemObject");
if(footso.FileExists(local_path + txt + "_cover_footer.html") == true)
{
footso.DeleteFile(local_path + txt + "_cover_footer.html", true)
}
var f = footso.CreateTextFile( local_path + txt + "_cover_footer.html" , true, true);
f.WriteLine(htmltxt);
f.Close();
}
}