/* --------------------------------------------------------------------- SPMNP01801_¼ö¼ú¸¶Ãë¾à¼Óó¹æÁ¶È¸IMPORT.xrw (SMMNP01801.xfm - JScript ) - Version : 1) : Ver.1.00.01 : Create By Francis Choi : 2015.05.02 ---------------------------------------------------------------------- */ // var AloneFlag = "Y"; // ´Üµ¶½ÇÇà¿©ºÎ // Global Main Path var gPathCart = "/root/main/MnphcagoLists" + " " // 0 Cart¹°Ç° + "/root/main/MnpmcartList" + " " // 1 CartCode + "/root/main/MmbhppdsLists" + " " // 2 óġó¹æ + "/root/init/Wk1802/DelMnphcagoListss" + " " // 3 »èÁ¦Cart¹°Ç° + "/root/init/Wk1802/codelists" + " " // 4 Save Cart Master + "/root/init/Wk1802/MnphcagoLists" + " " // 5 Save ¹°Ç° ³»¿ª + "/root/main/MmohoprsLists/mmohoprslist" + " " // 6 ¿¹¾àÁ¤º¸ Path + "/root/main/operation/list" + " " // 7 ¼ö¼ú¿¹¾à »ó´ÜÁ¤º¸ + "/root/main/CartOrdData" ; // 8 Cart Order Display Data Instance Path var gCartPath = gPathCart.split(" "); // CCDS Display Instance Path var tPathName = "/orddeptcd" + " " // 0 Áø·á°ú + "/perfid" + " " // 1 ÁýµµÀÇ + "/ccrtno" + " " // 2 CartÄÚµå + "/cp_orddeptcd" + " " // 3 Áø·á°ú + "/cp_perfid" + " " // 4 ÁýµµÀÇ + "/cp_ccrtno" ; // 5 CartÄÚµå var tPathNode = tPathName.split(" "); //gPathNode[1]+tPathNode // CCDS Clear Path var PathClearNm = "/root/main/MnpmcartList/orddeptcd/codelist" + " " // 0 Áø·á°ú + "/root/main/MnpmcartList/perfid/codelist" + " " // 1 ÁýµµÀÇ + "/root/main/MnpmcartList/ccrtno/codelist" + " " // 2 CartÄÚµå + "/root/main/MnphcagoLists/mnphcagolist" + " " // 3 ¹°Ç° + "/root/main/MnpmcartList/cp_orddeptcd/codelist" + " " // 4 Áø·á°ú + "/root/main/MnpmcartList/cp_perfid/codelist" + " " // 5 ÁýµµÀÇ + "/root/main/MnpmcartList/cp_ccrtno/codelist" + " " // 6 CartÄÚµå + "/root/main/CMnphcagoLists/mnphcagolist" + " " // 7 ¹°Ç° + "/root/init/Wk1802/scond/ccrtno" ; // 8 CartÄÚµå var PathClear = PathClearNm.split(" "); // Refresh Document Id var wRefreshDoc = "cmb_orddept" + " " // 0 Áø·á°ú + "grd_perfid" + " " // 1 ÁýµµÀÇ + "grd_ccrtno" + " " // 2 CartÄÚµå + "grd_good" + " " // 3 ¹°Ç° + "cmb_cp_orddept" + " " // 4 Áø·á°ú + "cmb_cp_ccrtno" + " " // 5 CartÄÚµå + "cmb_cp_perfdr" + " " // 6 ÁýµµÀÇ + "grd_cgood" ; // 7 ¹°Ç° var wRefresh = wRefreshDoc.split(" "); var sOproomcd = ""; // ȯÀÚÀÇ ¼ö¼ú¹æÄÚµå var sCartgubn = ""; // -------------------------------------------------- // È­¸é Loading½Ã ó¸®ÇÏ´Â ÇÔ¼ö // ¾à¼Óó¹æ TreeÁ¤º¸ °¡Á®¿À±â // -------------------------------------------------- function fInit1802() { sOproomcd = opener.javascript.getParameter("SPMNP01802_oproomcd"); opener.javascript.setParameter("SPMNP01802_oproomcd",""); sCartgubn = opener.javascript.getParameter("SPMNP01802_cartgubn"); opener.javascript.setParameter("SPMNP01601_cartgubn", ""); sInsuKind = opener.javascript.getParameter("SPMNP01802_insukindcd"); opener.javascript.setParameter("SPMNP01802_insukindcd", ""); model.setValue("/root/hidden/cartgubn", sCartgubn); model.setValue("/root/init/Wk1802/cond/insukind", sInsuKind); grd_good.fixedcellcheckbox(0,0) = true; model.removenode("/root/send"); model.makeValue("/root/send/reqdata/cdgrupid", "106");//º´¿øº° Display ¿©ºÎ model.makeValue("/root/send/reqdata/supcdid", "");//¼­ºê±¸ºÐ model.makeValue("/root/send/reqdata/cdid", "");//¼­ºê±¸ºÐ submit("TRMNP04903", false); //20101229_KNUH_Start model.makeValue("/root/send/reqdata/cdgrupid", "OP"); submit("TRMND03901"); model.makeNode("/root/init/basecodeinfo"); model.copynode("/root/init/basecodeinfo", "/root/main/baseinfo"); model.setValue(cmb_grupcd.attribute("ref"), "02"); cmb_grupcd.refresh(); //20101229_KNUH_End model.setValue("/root/init/Wk1802/cond/payflagcd", model.getValue("/root/init/hardcodeinfo/cdid").substr(6, 1)); if( model.getValue("/root/init/hardcodeinfo/cdid").substr(6, 1) == "Y" ) {//±ÞºñÄ÷³ grd_good.colWidth(grd_good.colRef("goodengnm")) = "190"; grd_good.colWidth(grd_good.colRef("goodspec")) = "80"; grd_good.colWidth(grd_good.colRef("goodmodel")) = "75"; grd_good.colWidth(grd_good.colRef("makernm")) = "75"; grd_good.colWidth(grd_good.colRef("prcpunit")) = "45"; grd_good.colWidth(grd_good.colRef("payflagcd")) = "45"; grd_good.colWidth(grd_good.colRef("goodqty")) = "40"; }else { grd_good.colWidth(grd_good.colRef("goodengnm")) = "200"; grd_good.colWidth(grd_good.colRef("goodspec")) = "90"; grd_good.colWidth(grd_good.colRef("goodmodel")) = "85"; grd_good.colWidth(grd_good.colRef("makernm")) = "80"; grd_good.colWidth(grd_good.colRef("prcpunit")) = "50"; grd_good.colWidth(grd_good.colRef("payflagcd")) = "0"; grd_good.colWidth(grd_good.colRef("goodqty")) = "40"; } fMnpmcartData_Read( 0 , grd_orddept); // CartÁ¤º¸ °¡Á®¿À±â } /* ------------------------------------------------- */ /* SMMNP01800_¹°Ç°µî·Ï */ /* On Load ½Ã Call */ /* ------------------------------------------------- */ /* group : EMR °£È£ ¼ö¼ú¸¶Ãë */ /* ver : 2015.05.15 */ /* by : ÃÖÇÐ·Ï */ /* ------------------------------------------------- */ /* SMMNP01800_Case Cart ¹°Ç° */ /* On Load ½Ã Call */ /* desc :Case Cart MASTER Á¤º¸ °¡Á®¿À±â */ /* --------------------------------------------------*/ function fMnpmcartData_Read(pIdx, pId, pDept, pDr ,pCcrtno ) { if (chk_useyn.value == "Y") { model.setValue("/root/init/Wk1802/cond/useflag", "Y"); // »ç¿ë¿©ºÎ } else { model.setValue("/root/init/Wk1802/cond/useflag", "A"); // »ç¿ë¿©ºÎ } model.removenode("/root/send"); model.makeValue("/root/send/orddeptcd" , model.getValue(pDept )); // Áø·á°ú model.makeValue("/root/send/perfid" , model.getValue(pDr )); // ÁýµµÀÇ model.makeValue("/root/send/ccrtno" , model.getValue(pCcrtno )); // CaseCart ¹øÈ£ model.makeValue("/root/send/countyn" ,"N" ); // CART¹°Ç°Àִ°͸¸ ¿©ºÎ model.makeValue("/root/send/instcd" , "" ); // ±â°üÄÚµå model.makeValue("/root/send/useflag" , model.getValue("/root/init/Wk1802/cond/useflag")); // »ç¿ë¿©ºÎ model.makeValue("/root/send/cartgubn" , sCartgubn ); // cart ±¸ºÐ model.makeValue("/root/send/qryflag" , model.getValue("/root/init/Wk1802/cond/qryflag")); // Query ±¸ºÐ 1:Áø·á°ú,2:ÁýµµÀÇ,2:CART ÄÚµå model.makeValue("/root/send/opnm" , model.getValue("/root/init/Wk1802/cond/opnm")); // Query ±¸ºÐ 1:Áø·á°ú,2:ÁýµµÀÇ,2:CART ÄÚµå model.makeNode("/root/send/refnm");//°Ë»ö¸í model.makeNode("/root/send/condflag");//Çѱۿµ¹®±¸ºÐ submit("TRMNP01601"); // Cart MASTER Á¤º¸¸¦ °¡Á®¿Â´Ù. model.copyNode(gCartPath[1]+tPathNode[pIdx] , gCartPath[4]); model.removenode(gCartPath[4]); pId.row = 1; pId.refresh(); } function fMnphcagoRead(pIdx, pId, pCcrtno, pCartGoodseq ) { model.removenode("/root/send"); model.makeValue("/root/send/ccrtno" , pCcrtno ); // CaseCart ¹øÈ£ model.makeValue("/root/send/cartgoodseq" , pCartGoodseq ); // Cart¹°Ç°¼ø¹ø model.makeValue("/root/send/instcd" , "" ); // ±â°üÄÚµå model.makeValue("/root/send/prcpflag" , "Y" ); // Áø·áó¹æÀÚ·áÁ¸À籸ºÐ model.makeValue("/root/send/oproomcd" , sOproomcd ); // ¼ö¼ú¹æ ÄÚµå model.makeValue("/root/send/cartgubn" , sCartgubn ); // Cart±¸ºÐ model.makeValue("/root/send/menuparam" , "S" ); // »ç¿ë±¸ºÐ model.makeValue("/root/send/insukind" , model.getValue("/root/init/Wk1802/cond/insukind")); // ȯÀÚº¸ÇèÀ¯Çü model.makeValue("/root/send/payflagcd" , model.getValue("/root/init/Wk1802/cond/payflagcd")); // ±Þºñ¿©ºÎ submit("TRMNP01602"); // Cart MASTER Á¤º¸¸¦ °¡Á®¿Â´Ù. model.copyNode(gCartPath[pIdx] , gCartPath[5]); pId.refresh(); } function fRemoveNode(pIdx){ model.removeNodeset(PathClear[pIdx]); eval(wRefresh[pIdx]).refresh(); } function fCopyGood(){ var sCopyOrderXpath = "/root/main/MnphcagoLists/mnphcagolist"; var nIdx = getNodesetCount(sCopyOrderXpath); var grupcd = model.getValue(cmb_grupcd.attribute("ref")); if (nIdx < 1) { messageBox("¼±ÅÃµÈ ¹°Ç°ÀÌ ", "I004"); return; } if( grupcd == "") { messageBox("¼±ÅÃµÈ ±×·ìÀÌ ¾ø½À´Ï´Ù.", "E"); return; } var sSendData = ""; for (var i = 1; i <= nIdx; i++) { if (model.getValue(sCopyOrderXpath+"["+i+"]/fcheck")=="true"){ //2008-08-05 ¿ÀÈÄ 4:36:34 taebum CCR¿¡¼­ °ü¸®ÇÏÁö ¾Ê´Â Àç·á¿¡ ´ëÇØ¼­ break /* var sCcrGoodcd = model.getValue(sCopyOrderXpath+ "["+i+"]/checkgoodcd"); var sPrcpclscd = model.getValue(sCopyOrderXpath+ "["+i+"]/prcpclscd"); var sGoodcd = model.getValue(sCopyOrderXpath+ "["+i+"]/goodcd"); var sGoodengnm = model.getValue(sCopyOrderXpath+ "["+i+"]/goodengnm"); if(sPrcpclscd == "M2" && (sCcrGoodcd == "" || sCcrGoodcd == null || sCcrGoodcd == "undefined")){ model.alert(sGoodcd+" - "+sGoodengnm+" ´Â µî·ÏµÇÁö ¾ÊÀº Àç·áó¹æÀÔ´Ï´Ù. CCR¿¡ ¹®ÀÇÇϽñ⠹ٶø´Ï´Ù. "); return; }else{ */ //ó¹æºÒ°¡ ¹°Ç°Àº ó¹æ ¾ÈµÇ°Ô ¸·À½, »èÁ¦´Â Á¦¿Ü 2009.08.31 K.J.M //±¸¸ÅÁ¤º¸¿¡ ¼ö°¡°¡ ÀÖ¾î¾ß ÇÏ´Â °æ¿ì¸¸ üũ 2010.03.15 K. J. M var sTmpReqmthd = model.getValue(sCopyOrderXpath+ "["+i+"]/reqmthd"); var sGoodcd = model.getValue(sCopyOrderXpath+ "["+i+"]/goodcd"); if( sTmpReqmthd == "X"&&model.getValue(sCopyOrderXpath+"["+i+"]/insuyn")=="Y" ) { messageBox(sGoodcd+"ÄÚµå ó¹æºÒ°¡À̹ǷΠó¹æ ÇÒ ¼ö ¾ø½À´Ï´Ù.!", "E000"); return; } if( model.getValue(sCopyOrderXpath+"["+i+"]/insuyn")=="Y"&&model.getValue(sCopyOrderXpath+"["+i+"]/calcscorcd")=="" ) { var goodcd = model.getValue(sCopyOrderXpath+ "["+i+"]/goodcd"); messageBox(goodcd+"ÄÚµå ó¹æ ÇÒ ¼ö ¾ø½À´Ï´Ù.!", "E000"); //}else if( sTmpReqmthd == ""&&model.getValue(sCopyOrderXpath+"["+i+"]/calcscorcd") == ""&&model.getValue(sCopyOrderXpath+"["+i+"]/insuyn") == ""&&model.getValue(sCopyOrderXpath+"["+i+"]/prcpclscd") == "" ) {//±¸¸Å, ó¹æ ¸¶½ºÅÍ¿¡ »ì¾ÆÀִµ¥ÀÌÅͰ¡ ¾øÀ» ¶§ ¸·À½ 2010.01.04 K.J.M // messageBox(sGoodcd+"ÄÚµå ó¹æÇÒ ¼ö ¾ø½À´Ï´Ù.!", "E000"); // return; }else { sSendData = sSendData + model.getValue(sCopyOrderXpath+ "["+i+"]/goodcd" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/allsizespecid") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/goodcls" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/goodqty" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/payflagcd" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/goodqty" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/goodengnm" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/goodspec" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/makernm" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/goodmodel" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/prcpunit" ) + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/drugmthdspccd") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/stocqty") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/acmlbaseqty") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/prcpclscd") + "¢È" + //°£È£¾à¼Óó¹æ prcpcls¿ëµµ model.getValue(sCopyOrderXpath+ "["+i+"]/reqmthd") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/purcflag") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/calculyn") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/insuyn") + "¢È" + model.getValue(sCopyOrderXpath+ "["+i+"]/calcscorcd") + "¢È" + model.getValue(cmb_grupcd.attribute("ref")) + "¢Ê" ; } /* } */ } } //¼±ÅÃµÈ ³»¿ªÀÌ ÀÖÀ» °æ¿ì¿¡´Â ¼ö¼ú¸¶Ã밣ȣó¹æÀ¸·Î 󹿏®½ºÆ®¸¦ Àü´ÞÇÔ. if(sSendData != ""){ if(checkOpener()){ opener.javascript.fNurseOrderMake(sSendData); window.close(); } } } function fSearchOpnm() { fRemoveNode(2); fRemoveNode(3); model.setValue("/root/init/Wk1802/cond/qryflag", "3" ); fMnpmcartData_Read( 2, grd_ccrtno,"/root/main/MnpmcartList/orddeptcd/codelist["+grd_orddept.row+ "]/datacd" ,"/root/main/MnpmcartList/perfid/codelist["+grd_perfid.row+ "]/datacd"); } /* ------------------------------------------------- */ /* ------End Of List ------------------------------- */ /* -------------------------------------------------- */