/** * MMR07201.js * SMMMR07201_Àü°ú±â·ÏJCI.xrw */ /** * @desc : [itemÄÚµå¸ñ·Ï] * "0000960003" //Áø´Ü¸í * "0000931001" //ÁÖÈ£¼Ò ¶Ç´Â ÀÔ¿ø»çÀ¯ * "0000062001" //°æ°ú ¹× ƯÀÌ¼Ò°ß * "0000500001" //¼ö¼ú ¹× ½Ã¼ú * "0001113001" //Åõ¾à³»¿ª * "0000792001" //Àü°ú»çÀ¯ * "0022830001" //Àü°ú½Ã ȯÀÚ»óÅ * [¹öư¸ñ·Ï] * "btn_medprcp_0001113001"//Åõ¾àó¹æÁ¶È¸ */ var gItemCds = new Array( "0000960003" //Áø´Ü¸í , "0000931001" //ÁÖÈ£¼Ò ¶Ç´Â ÀÔ¿ø»çÀ¯ , "0000062001" //°æ°ú ¹× ƯÀÌ¼Ò°ß , "0000500001" //¼ö¼ú ¹× ½Ã¼ú , "0001113001" //Åõ¾à³»¿ª , "0000792001" //Àü°ú»çÀ¯ , "0022830001" //Àü°ú½Ã ȯÀÚ»óÅ ); var gItemCdsTextArea = new Array( "0000960003" //Áø´Ü¸í , "0000931001" //ÁÖÈ£¼Ò ¶Ç´Â ÀÔ¿ø»çÀ¯ , "0000062001" //°æ°ú ¹× ƯÀÌ¼Ò°ß , "0000500001" //¼ö¼ú ¹× ½Ã¼ú , "0001113001" //Åõ¾à³»¿ª , "0000792001" //Àü°ú»çÀ¯ , "0022830001" //Àü°ú½Ã ȯÀÚ»óÅ ); /** * @desc : È®Àå¹öư(À̹ÌÁö,°¡°èµµ,Ãß°¡±â·Ï)À» ±â·Ï¿©ºÎ¿¡ µû¶ó Ç¥½Ã¸¦ À§ÇÑ ¹öư¸ñ·Ï * @id : * @authur : ¾ÈÄ¡¿ø * @history : 2009.09.09 ½Å±Ô ¾ÈÄ¡¿ø ACW_090909A var gExtnBtnIds = new Array( "btn_imge_0008224001" //S&O À̹ÌÁö¹öư , "btn_fmy_0008224001" //S&O °¡°èµµ¹öư , "btn_etcrec_0008224001" //S&O Ãß°¡±â·Ï¹öư , "btn_diag_0001129001" //A Áø´Ü¹öư , "btn_imge_0001129001" //A À̹ÌÁö¹öư , "btn_etcrec_0001129001" //A Ãß°¡±â·Ï¹öư , "btn_prcp_0000080001" //P 󹿹öư , "btn_imge_0000080001" //P À̹ÌÁö¹öư , "btn_etcrec_0000080001" //P Ãß°¡±â·Ï¹öư ); */ var gExtnBtnIds = new Array( "btn_medprcp_0001113001"//Åõ¾àó¹æÁ¶È¸ ); /** * @desc : ±â·Ïµ¥ÀÌÅÍ Á¶È¸ * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fLoadData() { InitPgmFormData(); InitUnitFormData(gItemCds); } /** * @desc : ¼­½Ä µ¥ÀÌÅÍ Clear * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fClearComnFormData() { if (gMaxSectionID != "") { var MaxObj = document.controls("lbl_" + gMaxSectionID); MaxObj.dispatch("onclick"); } ClearComnFormData(gItemCds); clearData(); //ÃʱâÈ­ ÈÄ ±âº»³»¿ë Á¶È¸ fExtnInitFormRec(); //Æ÷Ä¿½º ó¸® SetDefFocusMTX(gItemCds); } /** * @desc : ±â·Ï ÀνºÅϽº ¿¬°á * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fSetRecItemValue(reciteminfo) { return SetCommMediFormValue(gItemCds, reciteminfo); } /** * @desc : È®Àå¼­½Ä ±â·Ï Ãʱ⠼³Á¤ * @ * @param : * @return : * @authur : ¹ÚÁ¾ÈÆ */ function fExtnInitFormRec() { if (parent.window.javascript.fGetFormRec("status") == "C") { // alert("MMR07201.js:::fExtnInitFormRec::: fGetDiagNM::"+parent.instance1.selectSingleNode("/root/main/recinfo/formrec")); // ivw_0000960003.window.javascript.fGetDiagNm(parent.instance1.selectSingleNode("/root/main/recinfo/formrec")); //ȯÀÚÁ¤º¸·Î Áø´Ü¸í Á¶È¸ } } /** * @desc : ¼­½Ä Áø´Ü¸í »çÀÌÁî Á¶Àý * @ * @param : * @return : * @--------------------------------------------------- */ function fSetSizeFormDiag() { ivw_0000960003.window.javascript.fInitPage(false, parseInt(ivw_0000960003.attribute("height")), parseInt(ivw_0000960003.attribute("width"))); } var gLoadFormCnts = 0; /** * @group : * @ver : 2008.06.13 * @by : snoweye * @--------------------------------------------------- * @type : function * @access : private * @desc : È­¸é ·Îµå½Ã ÃʱâÈ­ ÀÛ¾÷À» ¼öÇà * @param : * @return : * @--------------------------------------------------- */ function fFormReady() { grup_base.attribute("border-style") = "none"; //¼½¼Ç»çÀÌÁîÃʱâÈ­ setSectionSize(gItemCds, 0, 683); /* //¼½¼Çº° ¹öưÃʱâÈ­ InitBtnImge(gItemCds); InitBtnFmy(gItemCds); InitBtnComn(gItemCds); InitBtnDiag("0001129001"); InitBtnPrcp("0000080001"); InitBtnEtcRec(gItemCds); */ //±âº» ù¹øÂ° ºÎºÐ¼­½ÄÀ» ·ÎµùÇØ¼­ º¸¿©ÁØ´Ù. dispOnLoadComplete(COMN_FORM);//COMN_FORM : 1 } /** * @desc : ºÎºÐ¼­½Ä ºÒ·¯¿À±â * @id : * @event : onloadcomplete * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fLoadUnitForm() { initSection(gItemCds); } /** * @desc : ºÎºÐ¼­½ÄÀÌ ·Îµù ¿Ï·á µÇ¾úÀ»¶§ ¹ß»ýÇÏ´Â À̺¥Æ® * @id : * @event : xforms-ready * @return : void * @authur : ¹ÚÁ¾ÈÆ */ function fOnLoadComplete() { var curLoadFormCd = getParameter("loadformcd"); var fstLevlItemCd = model.getValue(gPageInfo.forminfoRef + "/unitformmast[formcd='" + curLoadFormCd + "' and loaded != 'true']/orgsupdegnitemcd"); var ivwObj = document.controls("ivw_" + fstLevlItemCd); var unitformload = model.getValue(gPageInfo.forminfoRef + "/unitformmast[formcd='" + curLoadFormCd + "' and loaded != 'true']/loaded"); if(ivwObj != null && unitformload != "true") { setFstLevlItemCd(ivwObj, curLoadFormCd); model.setValue(gPageInfo.forminfoRef + "/unitformmast[formcd='" + curLoadFormCd + "']/loaded", "true"); } //Áø´Ü¸í ºÎºÐ¼­½Ä ·ÎµùÈÄ Ã³¸® if(fstLevlItemCd == '0000960003') { fSetSizeFormDiag(); } gLoadFormCnts++; if(gItemCds.length == gLoadFormCnts) { fExtnInitFormRec(); dispOnLoadComplete(UNIT_FORM); // if (parent.window.javascript.fGetFormRec("status") == "C") // { // SetDefFocusMTX(gItemCds); // } } } /** * @group : * @ver : 2008.11.28 * @by : jonghun * @--------------------------------------------------- * @type : function * @access : private * @desc : µ¿ÀÏ ¼­½ÄÀÌ ¶°ÀÖÀ» °æ¿ì ³»ºÎ ÀνºÅϽº ·Îµù ÈÄ µðÆúÆ® Á¶È¸³»¿ë Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fGetDefData() { dispOnLoadComplete(UNIT_FORM); // if (parent.window.javascript.fGetFormRec("status") == "C") // { // SetDefFocusMTX(gItemCds); // } } /** * @desc : Àü°ú½Ã ȯÀÚ»óÅ ȭ¸é ·Îµù ÈÄ »çÀÌÁî Á¶Àý * @id : * @event : xforms-ready * @return : void * @authur : dhkim */ function fSetSizeFormCC(gItemCd_MMR07201) { //Care Plan È­¸é ·Îµù if(gItemCd_MMR07201 == "0022830001") ivw_0022830001.window.javascript.fInitPage(false, parseInt(ivw_0022830001.attribute("height")), parseInt(ivw_0022830001.attribute("width"))); } /** * 20091231 dhkim Ãß°¡ * MMR01100.js¿¡¼­ ¼­½Äload¸¦ ¿Ï·áÇÑ ÈÄ¿¡ È£ÃâÇÑ´Ù. * @return */ function initFormAtLast_MMR01100I() { var srcformcd = parent.window.javascript.fGetFormMast("srcformcd"); // alert("srcformcd ::::" + srcformcd + " status:::"+parent.window.javascript.fGetFormRec("status")); if (srcformcd == "0000001595"){//ÀüÀÔ±â·ÏÀÇ ±âº»¼­½ÄÄÚµå : 0000001595 //½Å±Ô¼­½Ä·ÎµùÀÇ °æ¿ì¸¸ ÀüÃâ±â·Ï -> ÀüÀÔ±â·Ï ¿¬µ¿ if (parent.window.javascript.fGetFormRec("status") == "C"){ model.makeValue("/root/send/extninfo/infoflag", "recdata"); model.makeValue("/root/send/extninfo/recdataflag", "transferIn"); model.makeValue("/root/send/extninfo/pid", parent.window.javascript.fGetFormRec("pid")); model.makeValue("/root/send/extninfo/orddd", parent.window.javascript.fGetFormRec("orddd")); model.makeValue("/root/send/extninfo/cretno", parent.window.javascript.fGetFormRec("cretno")); model.makeValue("/root/send/extninfo/fromsrcformcd", "0000001596"); //ÀüÃâ±â·ÏÀÇ ±âº»¼­½ÄÄÚµå model.makeValue("/root/send/extninfo/toformcd", parent.window.javascript.fGetFormMast("formcd")); //2010.01.14 dhkim - srcformcd ÆÄ¶ó¹ÌÅÍ ´©¶ôµÇ¾î Ãß°¡ model.makeValue("/root/send/extninfo/srcformcd", srcformcd);//ÀüÀÔ±â·Ï //2010.03.08 dhkim formrecddÃß°¡ model.makeValue("/root/send/extninfo/formrecdd", parent.window.javascript.fGetFormRec("formrecdd")); model.removenode("/root/main/extninfo"); model.makenode("/root/main/extninfo"); if (submit("TRMMR01302")) { //copyNodeset(gPageInfo.recItemRef, "/root/main/extninfo/recitem", "replace", model, model); copyNodeset(gPageInfo.recItemRef2, "/root/main/extninfo/recitem", "replace", model, model); fLoadData(); model.refresh(); } } //ÀüÀÔ±â·Ï½Ã Åõ¾à󹿹öư hidden btn_medprcp_0001113001.visible = false; } else if (srcformcd == "0000001596"){//ÀüÃâ±â·ÏÀÇ ±âº»¼­½ÄÄÚµå : 0000001596 //ÀüÃâ±â·Ï½Ã Åõ¾à󹿹öư visible btn_medprcp_0001113001.visible = true; //2010.01.12 ¾ÈÄ¡¿ø - ÀÔ¿øÃÊÁøÀÇ ÁÖÈ£¼Ò -> ÀüÃâ±â·ÏÀÇ ÁÖÈ£¼Ò if (parent.window.javascript.fGetFormRec("status") == "C"){ model.makeValue("/root/send/extninfo/infoflag", "rectext"); model.makeValue("/root/send/extninfo/pid", parent.window.javascript.fGetFormRec("pid")); model.makeValue("/root/send/extninfo/orddd", parent.window.javascript.fGetFormRec("orddd")); model.makeValue("/root/send/extninfo/cretno", parent.window.javascript.fGetFormRec("cretno")); model.makeValue("/root/send/extninfo/srcformcd", "0000000003"); //ÀÔ¿øÃÊÁø±â·ÏÀÇ ±âº»¼­½ÄÄÚµå(ÀÔ¿øÃÊÁøÀÇ ÁÖÈ£¼Ò¸¦ default ¿¬µ¿À§ÇØ) model.makeValue("/root/send/extninfo/fstlevlitembasecds", "0000931"); model.removenode("/root/main/extninfo"); model.makenode("/root/main/extninfo"); if (submit("TRMMR01302")) { var itemVal = new ITEMVAL(); itemVal.reccnts = model.getValue("/root/main/extninfo/rectextinfo[fstlevlitembasecd='0000931']/viewcnts"); setFormItemValue("0000931", itemVal,false); model.refresh(); } //Åõ¾à󹿳»¿ªÀÌ ¾øÀ»¶§ default·Î Åõ¾à󹿳»¿ª ¿¬µ¿ var degnitemlevlcd = "0001113"; var itemCd = "0001113001"; var pageInfo = new PAGEINFO(); var node = instance1.selectSingleNode(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts"); var prcpList = ""; if(node != null){ prcpList = node.text; } if(prcpList == ""){ GetPatDrugPrcpList_MMR07201(itemCd);//Åõ¾àó¹æÁ¶È¸ } } } //2010.01.19 dhkim - ÅëÇÕ±â·ÏÁ¶È¸¿ë JCI±¸ºÐÀÚÃß°¡ //parent.window.javascript.fSetFormRec("xsltflag", "JCI");//fSetXsltFlag¾ø¾Ö°í getSubmitID_MMR01300I·Î À̵¿ } /** * MMR01300.js¿¡¼­ submitÁ÷Àü¿¡ submitID¸¦ ¼³Á¤Çϱâ À§Çؼ­ È£ÃâÇÑ´Ù. * @return */ function getSubmitID_MMR01300I() { //2010.02.23 dhkim - ÅëÇÕ±â·ÏÁ¶È¸¿ë JCI±¸ºÐÀÚÃß°¡(fSetXsltFlag¾ø¾Ö°í getSubmitID_MMR01300I·Î À̵¿) parent.window.javascript.fSetFormRec("xsltflag", "JCI"); return TX_SUBMIT_EXTN_FORM; } /** * ÀüÃâ±â·ÏÀÇ Åõ¾àó¹æÁ¶È¸ */ function GetPatDrugPrcpList_MMR07201(itemCd) { var pageInfo = new PAGEINFO(); var prcpdd = ""; var bfflag = "bfprcp"; var flag = ""; var todd = ""; var pid = parent.model.getValue(pageInfo.recMastRef + "/pid"); var orddd = parent.model.getValue(pageInfo.recMastRef + "/orddd"); var cretno = parent.model.getValue(pageInfo.recMastRef + "/cretno"); var orddrid = parent.model.getValue(pageInfo.recMastRef + "/orddrid"); var orddeptcd = parent.model.getValue(pageInfo.recMastRef + "/orddeptcd"); var prcpgenrflag = parent.model.getValue(pageInfo.recMastRef + "/chosflag"); if (prcpgenrflag == "I" || prcpgenrflag == "E" || prcpgenrflag == "D") { prcpdd = parent.model.getValue(pageInfo.recMastRef + "/formrecdd");//ÀüÃâÀÏ Àü³¯ } else { prcpdd = orddd; } //JCI¿äû»çÇ× (2010.03.04 dhkim ) - Á¶È¸ÇÒ Ã³¹æÀÏÀÚ´Â ÀüÃâÀÏ Àü³¯ prcpdd = prcpdd.toDate('YYYYMMDD').getAddDate(-1, "D").getDateFormat('YYYYMMDD');//ÇÏ·çÀü //ó¹æÁ¤º¸ °¡Á®¿À±â(Åð¿øÃ³¹æ prcpkindcd = 60) if(fBfPrcpSrchCom(pid, orddd, prcpdd, bfflag, flag, orddrid, todd, prcpgenrflag, orddeptcd, cretno, "TRMMO00100", true)) { //Åõ¾à //JCI¿äû»çÇ× (2010.03.04 dhkim ) //- ÀüÃâ°úÀÇ ¾à/Áֻ翡 ÇÑÇØ ÀüÀÏ Á¤±Ôó¹æ //- ÀüÀÏ ±âÁؼ³Á¤ : ÀüÃâ±â·Ï ¹ÌÀÛ¼º½Ã, ÇØ´çȯÀÚÀÇ ÀüÃâó¹æ(=Àü°ú½Åû) Â÷´Ü ¿äûµÇ¾îÀÖÀ½. //- ÀüÃâ±â·ÏÀÛ¼º½ÃÁ¡ ÀüÀÏ Ã³¹æÀ» ´ë»óÀ¸·Î ¿¬µ¿Ã³¸® model.addLog("dutplcecd:" + getUserInfo("dutplcecd")); var nodelistDrugPrcpinfo = model.instances(0).selectNodes("/root/prcpsrch/prcplist[(prcpkindcd = '10' and prcphistcd != 'C' and prcphistcd != 'L' and prcphistcd != 'E') and (prcpclscd = 'A2' or prcpclscd = 'A4' or prcpclscd = 'A6') and (rgstdeptcd = '"+getUserInfo("dutplcecd")+"')]"); } var prcpkind = ""; //ó¹æÁ¾·ù var orgprcpnm = ""; //󹿏í var drugmthdspccdnm = ""; //¿ë¹ý var prcpdelivefact = ""; //Àü´Þ»çÇ× var prcplist = ""; var prcphistcd = ""; //ÀÓ½Ã,ÀÎÁõ±¸ºÐ var prcpclscd = ""; var tmpdrugmthdspccdnm = ""; if(nodelistDrugPrcpinfo.length >= 1){ for(var i = 1; i <= nodelistDrugPrcpinfo.length; i++) { var subNode = nodelistDrugPrcpinfo.item(i - 1); //orgprcpnm = subNode.selectSingleNode("orgprcpnm").text; tmpdrugmthdspccdnm = subNode.selectSingleNode("drugmthdspccdnm").text; prcpkind = subNode.selectSingleNode("tempcol13").text; orgprcpnm = subNode.selectSingleNode("tempcol6").text; drugmthdspccdnm = subNode.selectSingleNode("tempcol7").text; prcpclscd = subNode.selectSingleNode("prcpclscd").text; drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, ""); drugmthdspccdnm = drugmthdspccdnm.replace("[±Þ]", ""); drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÏ]", ""); drugmthdspccdnm = drugmthdspccdnm.replace("[º»]", ""); drugmthdspccdnm = drugmthdspccdnm.replace("(Áý)", ""); drugmthdspccdnm = drugmthdspccdnm.replace("[home]", ""); drugmthdspccdnm = drugmthdspccdnm.replace("[ÀÓ»ó]", ""); drugmthdspccdnm = drugmthdspccdnm.replace("[prn]", ""); prcpdelivefact = subNode.selectSingleNode("prcpdelivefact").text; prcphistcd = subNode.selectSingleNode("prcphistcd").text; if(prcphistcd == "T") { if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") { prcplist += "[ÀÓ] " + orgprcpnm + " " + drugmthdspccdnm + "\n" } else { prcplist += "[ÀÓ] " + orgprcpnm + "\n" } } else { if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") { prcplist += orgprcpnm + " " + drugmthdspccdnm + "\n" } else { prcplist += orgprcpnm + "\n" } } } } var prerec = model.getValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts"); if (prerec != "") { prerec = prerec + "\n" + prcplist + "\n"; } else { prerec = prcplist + "\n" } model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", prerec); model.refresh(); }