/* °¡Á¤°£È£ ¹æ¹®±â·Ï(SMMNF00400.xrw - JScript ) - Version : 1) : Ver.1.00.01 */ //**Àü¿ªº¯¼ö**// var selRsrvdd = ""; var selPid = ""; var sXml = ""; var XmlInstNm = "aterlprelist/aterlprespec" + " " // AP + "veinprecntslist/veinprecntsspec" + " " // VP + "cruedrugspeclist" + " " // óġ ¹× Åõ¾à ³»¿ª + "nbpsinspspeclist" + " " // ÀÓ»ó°Ë»ç ³»¿ª + "dialrecspeclist" + " " // Åõ¼®±â·Ï ³»¿ª + "dialvitalsigninspspeclist" ; // Vital Sign ³»¿ª /** * @group : * @ver : 2007.05.31 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : È­¸é ÃʱâÈ­ * @param : * @return : * @--------------------------------------------------- */ function fDone(){ //**±×¸®µå ÃʱâÈ­**// model.removeNodeset("/root/main/rsrvpatlist" ); // ¿¹¾àȯÀÚ ¸®½ºÆ® model.removeNodeset("/root/main/spcffactlist"); // ƯÀÌ»çÇ× ¸®½ºÆ® model.removeNodeset("/root/main/reclist/recinfo/cruedrugspeclist/cruedrugspec"); // óġ ¹× Åõ¾à ¸®½ºÆ® model.removeNodeset("/root/main/reclist/recinfo/nbpsinspspeclist/nbpsinspspec"); // ÀÓ»ó°Ë»ç ¸®½ºÆ® model.removeNodeset("/root/main/reclist/recinfo/dialrecspeclist/dialrecspec" ); // Åõ¼®±â·Ï ¸®½ºÆ® model.removeNodeset("/root/main/reclist/recinfo/dialvitalsigninspspeclist/dialvitalsigninspspec"); // Vital Sign ¸®½ºÆ® //**°øÅëÄÚµå °¡Á®¿À±â**// zbcfGetCodeList( new Array ( "M0083" // Ç÷°üÁ¾·ù , "M0127" // Ç÷¾×Åõ¼®±âÁ¾·ù , "M0128" // Ç÷¾×Åõ¼®±â , "M0129" // Åõ¼®Àå¼Ò , "M0345" // Ç÷¾×Åõ¼®¾× ) , new Array ( "/root/init/M0083list" // Ç÷°üÁ¾·ù , "/root/init/M0127list" // Ç÷¾×Åõ¼®±âÁ¾·ù , "/root/init/M0128list" // Ç÷¾×Åõ¼®±â , "/root/init/M0129list" // Åõ¼®Àå¼Ò , "/root/init/M0345list" // Ç÷¾×Åõ¼®¾× ) ); //** »ó´ÜȯÀÚ È­¸é¼³Á¤ **// var node = getGlobalVariable("paminfo"); setCSVToNode("/root/temp/paminfo", node); if(getNodesetCount("/root/temp/paminfo/list") > 0) { model.makeValue("/root/main/condition/pid", model.getValue("/root/temp/paminfo/list/pid")); // µî·Ï¹øÈ£ } else { model.makeValue("/root/main/condition/rsrvdd", getCurrentDate()); // ¿¹¾àÀÏÀÚ(default) ¼³Á¤ } fSrchRsrvPatList(); // ¿¹¾àȯÀÚ ¸®½ºÆ® Á¶È¸ if(getNodesetCount("/root/temp/paminfo/list") > 0) { fInitInfo(); // È­¸é ÃʱâÈ­ fGetSelPatInfo("2"); // ȯÀÚÁ¤º¸¼³Á¤ fPastDialRecInfo(); // ÀÌÀü Ç÷¾×Åõ¼®°£È£±â·Ï Á¶È¸ fSrchSpcfFactList(); // ƯÀÌ»çÇ× ¸®½ºÆ® Á¶È¸ // fDialRecSpecList(); // Åõ¼®±â·Ï ¸®½ºÆ® Á¶È¸ } } /** * @group : * @ver : 2007.06.19 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : È­¸é»ó´Ü Á¤º¸¼³Á¤ * @param : * @return : * @--------------------------------------------------- */ function fSetHngBaseInfo(){ var iRow = grd_rsrvpatinfo.row -1; // »ó´Ü ȯÀÚÁ¤º¸ parameter var sIoflag = model.getValue("/root/main/rsrvpatlist/rsrvpatinfo["+iRow+"]/ioflag"); var sPid = model.getValue("/root/main/rsrvpatlist/rsrvpatinfo["+iRow+"]/pid"); var sRsrvdd = model.getValue("/root/main/rsrvpatlist/rsrvpatinfo["+iRow+"]/rsrvdd"); model.removenode ("/root/send"); model.makeNode ("/root/send"); model.makeValue ("/root/send/reqdata/pid" , sPid ); model.makeValue ("/root/send/reqdata/ioflag", sIoflag); model.makeValue ("/root/send/reqdata/rsrvdd", sRsrvdd); model.removeNodeset("/root/temp/gettoplist"); submit("TRMND00707"); var sCretno = model.getValue("/root/temp/gettoplist/gettopinfo/cretno" ); //»ý¼º¹øÈ£ var sSeqno = model.getValue("/root/temp/gettoplist/gettopinfo/seqno" ); //ÀϷùøÈ£ var sInstcd = model.getValue("/root/temp/gettoplist/gettopinfo/instcd" ); //±â°üÄÚµå var sIndd = model.getValue("/root/temp/gettoplist/gettopinfo/indd" ); //ÀÔ¿øÀÏÀÚ var sOrddd = model.getValue("/root/temp/gettoplist/gettopinfo/orddd" ); //Áø·áÀÏÀÚ var sAcptseqno = model.getValue("/root/temp/gettoplist/gettopinfo/acptseqno"); //µî·ÏÀϷùøÈ£ var sOrgorddd = model.getValue("/root/temp/gettoplist/gettopinfo/orgorddd" ); //¿øÁø·áÀÏÀÚ var sParam; if(sIoflag == "O") { //¿Ü·¡È¯ÀÚÀÏ °æ¿ì(histstat : "O") sParam = (sIoflag + "¢Ë" + sPid + "¢Ë" + sOrddd + "¢Ë" + sCretno + "¢Ë" + sInstcd + "¢Ë" + sAcptseqno + "¢Ë" + sOrgorddd ); } else { //ÀÔ¿ø/ÀÀ±ÞȯÀÚÀÏ °æ¿ì(histstat : "I", "E") sParam = (sIoflag + "¢Ë" + sPid + "¢Ë" + sIndd + "¢Ë" + sCretno + "¢Ë" + sInstcd + "¢Ë" ); } setParameter("condparam", sParam); modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;"); model.removeNode("/root/temp/paminfo"); model.makeNode("/root/temp/paminfo"); var node = getGlobalVariable("paminfo"); setCSVToNode("/root/temp/paminfo", node); selPid = model.getValue("/root/temp/paminfo/list/pid"); // ¼±ÅÃȯÀÚ µî·Ï¹øÈ£ } /** * @group : * @ver : 2007.06.19 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : Åõ¼®±â·Ï ÆË¾÷ * @param : * @return : * @--------------------------------------------------- */ function fPopDialRec(){ var ioflag = model.getValue("/root/main/reclist/recinfo/recinfolists/ioflag"); var sPid = model.getValue("/root/main/reclist/recinfo/recinfolists/pid"); var sRsrvdd = model.getValue("/root/main/reclist/recinfo/recinfolists/rsrvdd"); var sDialfalg = model.getValue("/root/main/reclist/recinfo/recinfolists/dialflag"); var sInstcd = model.getValue("/root/main/reclist/recinfo/recinfolists/instcd"); parammsg = "recflag¢Ëdutplaccd¢Ëreclnkkey¢ÌL¢Ë¢Ë"+sPid+","+sRsrvdd+","+sDialfalg+","+sInstcd+"¢Ì"; setParameter("SMMNR00700_ParamBase", parammsg); // ÆÄ¶ó¹ÌÅÍ ¼³Á¤ modal("SMMNR00700",1,"5","5"); // °£È£ÀÏÁöI È­¸é ÆË¾÷ } /** * @group : * @ver : 2007.06.03 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : Åõ¼®±â·Ï ¸®½ºÆ® Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fDialRecSpecList(){ var sPid = model.getValue("/root/main/reclist/recinfo/recinfolists/pid"); var sRsrvdd = model.getValue("/root/main/reclist/recinfo/recinfolists/rsrvdd"); var sDialfalg = model.getValue("/root/main/reclist/recinfo/recinfolists/dialflag"); var sInstcd = model.getValue("/root/main/reclist/recinfo/recinfolists/instcd"); model.removeNode("/root/temp/paminfo"); model.makeNode("/root/temp/paminfo"); var node = getGlobalVariable("paminfo"); setCSVToNode("/root/temp/paminfo", node); model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/reqdata/pid" , model.getValue("/root/temp/paminfo/list/pid" )); // µî·Ï¹øÈ£ - Çʼö model.makeValue("/root/send/reqdata/indd" , model.getValue("/root/temp/paminfo/list/indd" )); // ÀÔ¿øÀÏÀÚ (ÀÔ¿øÈ¯ÀÚÀÇ °æ¿ì) model.makeValue("/root/send/reqdata/orddd" , model.getValue("/root/temp/paminfo/list/orddd" )); // Áø·áÀÏÀÚ (¿Ü·¡È¯ÀÚÀÇ °æ¿ì) model.makeValue("/root/send/reqdata/cretno" , model.getValue("/root/temp/paminfo/list/cretno")); // »ý¼º¹øÈ£ - Çʼö model.makeValue("/root/send/reqdata/ioflag" , model.getValue("/root/temp/paminfo/list/ioflag")); // I/O ±¸ºÐ (I : ÀÔ¿øÀÏÀÚ, O : Áø·áÀÏÀÚ Çʼö ÀÔ·Â) - Çʼö model.makeValue("/root/send/reqdata/dnarflag" , "%" ); // dnar±¸ºÐ (Àüü : %) - Çʼö model.makeValue("/root/send/reqdata/sortseq" , "D" ); // Á¤·Ä¼ø¼­ (¿À¸§Â÷¼ø : A, ³»¸²Â÷¼ø : D) - Çʼö model.makeValue("/root/send/reqdata/recflag" , "L" ); // ±â·Ï±¸ºÐ - Çʼö (L: Àΰø½ÅÀå½Ç) model.makeValue("/root/send/reqdata/reclnkkey", sPid+","+sRsrvdd+","+sDialfalg+","+sInstcd ); // ±â·Ï¿¬°èŰ - Çʼö model.makeValue("/root/send/reqdata/instcd" , model.getValue("/root/temp/paminfo/list/instcd")); // ±â°üÄÚµå - Çʼö model.makeValue("/root/send/reqdata/prestdt" , getCurrentDate()+getCurrentTime() ); // ÇöÀçÀϽÃ(14ÀÚ¸®) - Çʼö model.removeNodeset("/root/main/reclist/recinfo/dialrecspeclist/dialrecspec/dialrec"); //** Åõ¼®±â·Ï ¸®½ºÆ® Á¶È¸ **// submit("TRMND00703"); } /** * @group : * @ver : 2007.05.31 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : ¿¹¾àȯÀÚ ¸®½ºÆ® Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fSrchRsrvPatList(){ //** ÃʱâÈ­ **// var xPath = "/root/main/reclist/recinfo/recinfolists/"; fInitInfo(); // È­¸é ÃʱâÈ­ // ¿¹¾àȯÀÚ ¸®½ºÆ® ¼¿ »ö»ó ÃʱâÈ­ (white) for(var i=1; i<=grd_rsrvpatinfo.rows; i++) { grd_rsrvpatinfo.cellstyle("background-color", i, 1, i, 5) = "white"; } model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/reqdata/pid" ,model.getValue("/root/main/condition/pid")); model.makeValue("/root/send/reqdata/rsrvdd",model.getValue("/root/main/condition/rsrvdd")); model.removeNodeset("/root/main/rsrvpatlist"); submit("TRMND00701"); } /** * @group : * @ver : 2007.05.31 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : ¼±ÅÃȯÀÚ µî·Ï¹øÈ£, ¿¹¾àÀÏÀÚ ¾ò¾î¿È * @param : * @return : * @--------------------------------------------------- */ function fGetSelPatInfo(iRow){ selPid = grd_rsrvpatinfo.textmatrix(iRow, 1); // ¼±ÅÃÇÑ È¯ÀÚÀÇ µî·Ï¹øÈ£ selRsrvdd = grd_rsrvpatinfo.textmatrix(iRow, 5); // ¼±ÅÃÇÑ È¯ÀÚÀÇ ¿¹¾àÀÏÀÚ(Àü¿ªº¯¼ö) var sIoflag = grd_rsrvpatinfo.textmatrix(iRow, 6); // ¼±ÅÃÇÑ È¯ÀÚÀÇ ÀÔ¿ø¿Ü·¡±¸ºÐ // ¿¹¾àȯÀÚ ¸®½ºÆ® ¼¿ »ö»ó ÃʱâÈ­ (white) for(var i=1; i<=grd_rsrvpatinfo.rows; i++) { grd_rsrvpatinfo.cellstyle("background-color", i, 1, i, 5) = "white"; } // ¼±Åà Çà ¼¿ »ö»ó ÁöÁ¤ grd_rsrvpatinfo.cellstyle("background-color", iRow, 1, iRow, 5) = "#ffd9ff"; // ¼±ÅÃÇÑ È¯ÀÚÀÇ µî·Ï¹øÈ£ ¹× ¿¹¾àÀÏÀÚ, ÀÔ¿ø¿Ü·¡±¸ºÐ ÁöÁ¤ model.removenode("root/temp/pid"); model.makeValue("root/temp/pid", selPid); model.removenode("/root/main/reclist/recinfo/recinfolists/pid"); model.makeValue("/root/main/reclist/recinfo/recinfolists/pid", selPid); model.removenode("/root/main/reclist/recinfo/recinfolists/rsrvdd"); model.makeValue("/root/main/reclist/recinfo/recinfolists/rsrvdd", selRsrvdd); model.removenode("/root/main/reclist/recinfo/recinfolists/ioflag"); model.makeValue("/root/main/reclist/recinfo/recinfolists/ioflag", sIoflag); model.makeValue("/root/main/reclist/recinfo/recinfolists/dialflag", "H"); //Åõ¼®±¸ºÐ // ƯÀÌ»çÇ× ¸®½ºÆ® ¹öư Ȱ¼ºÈ­ btn_addrowspcffact.disabled = false; btn_delrowspcffact.disabled = false; btn_savespcffact.disabled = false; // Åõ¼®±â·Ï ¹öư Ȱ¼ºÈ­ btn_dialrec.disabled = false; } /** * @group : * @ver : 2007.06.01 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : ƯÀÌ»çÇ× ¸®½ºÆ® Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fSrchSpcfFactList(){ model.removenode("/root/send"); model.makeNode ("/root/send"); model.makeValue("/root/send/reqdata/pid", selPid); model.removeNodeset("/root/main/spcffactlist"); submit("TRMND00702"); } /** * @group : * @ver : 2007.06.05 * @by : ±èÁø¾Æ * @--------------------------------------------------- * @type : function * @access : public * @desc : ÀÌÀü Ç÷¾×Åõ¼®°£È£±â·Ï Á¤º¸ Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fPastDialRecInfo(srchflag){ var xPath = "/root/main/reclist/recinfo/recinfolists/"; // Åõ¼®±â·ÏÁ¤º¸ °æ·Î var xTmpPath = "/root/temp/recinfolists/"; // Åõ¼®±â·ÏÁ¤º¸ ÀÓ½ÃÀúÀå °æ·Î // model.makeValue("/root/main/reclist/recinfo/recinfolists/pid", selPid); var currentDD = getCurrentDateTime(); model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/reqdata/pid" , selPid); model.makeValue("/root/send/reqdata/dialflag", "H"); model.makeValue("/root/send/reqdata/rsrvdd" , model.getValue(xPath + "rsrvdd")); //** ½Å±Ôµî·Ï½Ã **// if(srchflag == "New"){ model.makeValue("/root/send/reqdata/srchflag", "New"); submit("TRMND00704"); // model.copyNode("/root/main/reclist", "/root/temp/reclist"); var sTmpNode = "dryweig hprnfst hprnmatn bfrcd durationflag angiokindcd angiokindnm dialliqd dialmach dialmachno dialmachnm dialplaccd hdkindflag"; sTmpNode = sTmpNode.split(" "); for(var i=0; i