/*function list fBaseCdInit: ó¹æÈ­¸é °øÅëÄÚµå ÃʱâÈ­ fInitializeScreen: ó¹æÈ­¸é ¼¼ÆÃ ÃʱâÈ­ fInitializeConDone: ó¹æÈ­¸é ÃʱâÈ­ ( xforms-model-construct-done ) fInitializeReady: ó¹æÈ­¸é ÃʱâÈ­( xforms-ready ) fDetlVw: ó¹æ»ó¼¼º¸±â fPrcpSrch: ó¹æ°Ë»ö(ó¹æ ±×¸®µå¿¡¼­ ó¹æ¸í ¾²°í ¿£ÅÍÄ¡¸é ½ÇÇà) fPrcpDetl: ó¹æ»ó¼¼ÆË¾÷ fPrcpDetlApp: ó¹æ»ó¼¼ ÀԷ³»¿ëÀ» ¸ÞÀο¡ Àû¿ë fMouseRghtBtnPopup: ¿À¸¥ÂÊ ¸¶¿ì½º ÆË¾÷ fDrugInfo: ¿À¸¥ÂÊ ¸¶¿ì½º ÆË¾÷ ¾àÁ¤º¸ fDeleteRow: ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ »èÁ¦ fCnclDel: ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ »èÁ¦,D/C Ãë¼Ò fPrcpBuffer: ÇÔ¼ö È£Ãâ½Ã ¼±ÅÃµÈ µ¥ÀÌÅ͸¦ ƯÁ¤ ³ëµå¿¡ ´ã¾ÆµÐ´Ù. fDelUndo: ¸¶Áö¸· »èÁ¦½Ã ¹öÆÛ¿¡ ´ã°ÜµÐ °ÍÀ» µÇ»ì¸°´Ù. fGridDrag: drag ½Ã À̵¿ÇÒ grid ÀνºÅϽº ÀúÀå fGridDrop: dropÀ§Ä¡¿¡ ÀνºÅϽº mapping, º»Ã¼ remove, À̵¿ÇÑ row select fSaveExistCheck: ó¹æ µ¥ÀÌÅÍ ÀúÀå½Ã ÀúÀåÇÒ µ¥ÀÌÅͰ¡ ÀÖ´Â Áö check fPrcpSave: ó¹æ µ¥ÀÌÅÍ ÀúÀå fPrcpSavePatList: Áø·á´ë»óÀÚ ¸®½ºÆ®¿¡¼­ ȯÀÚ È£Ãâ½Ã ÀúÀåÇÒ µ¥ÀÌÅͰ¡ ÀÖÀ» ½Ã ÀúÀåÇÑ´Ù. fPrcpSort: ó¹æÁ¤·Ä bfDrugCalc: ¿ë·®, ¼ö·®, Ƚ¼öÀÇ ¼öÁ¤Àü °ªÀ» instance¿¡ ³Ö¾îµÐ´Ù. DrugCalc: ¿ë·®, ¼ö·®, Ƚ¼ö¸¦ ¼öÁ¤ÇßÀ» ¶§ °ª°è»ê fPreWorkUp: PreWorkUp ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ ( BMT ) fPrcpDdCheck: Á¤±Ô, Ãß°¡Ã³¹æ ó¸® fTempPrcp: ÀÓ½Ãó¹æ fDiagSrch: Áø´Ü°Ë»ö fDaigMouseRghtBtnPopup: Áø´Ü ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ fDiagDeleteRow: ȯÀÚÁø´Ü»èÁ¦ fDiagUpdate: ȯÀÚÁø´Ü¼öÁ¤ fPatDiagSrch: ȯÀÚÁø´Ü°Ë»ö fMediDayNo: Åõ¾àÀϼöÁ¶È¸ fDiagDetlVw: Áø´Ü»ó¼¼º¸±â fDentifmla: Ä¡½Ä fPrcpdelivefact: Àü´Þ»çÇ× ÀϰýÀÔ·Â fReqfrm: º´¸®ÀÇ·ÚÁö È£ÃâÇϱâ fGetSpc: Áø´Ü°Ë»ç °Ëü È£Ãâ fPrmsPrcp: ¾à¼Ó󹿵î·Ï fBaseMthd: °æ±¸¾à ±âº»¿ë¹ý Á¶È¸ fScrnInitialize: ó¹æÈ­¸é ÃʱâÈ­ fPrcpCopy: ó¹æÈ­¸é ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ ó¹æº¹»ç fInitPaminfo: Àüó¹æ¿¡¼­ ±Þºñº¯°æÈÄ È¯ÀÚÁ¤º¸ ´Ù½Ã SETTING fPrcpWndClose : ó¹æÈ­¸é close fSubjPrcpChk : Àӻ󿬱¸ÅÇ view°¡´É ¿©ºÎ üũ fInitPrcpWnd : ó¹æÈ­¸é ÃʱâÈ­ fXformsReady : ó¹æÈ­¸é ÃʱâÈ­ (óÀ½ ¿­¸° °æ¿ì ) fXReReady : ó¹æÈ­¸é ÃʱâÈ­ (´Ù½Ã ¿­¸° °æ¿ì) */ //º¯¼ö¼±¾ð var prcpclscd = 2; var prcpKindCdCol = 3; //ó¹æÁ¾·ù index var prcpnmCol = 5; //󹿏í Ä÷³ index var prcpVolCol = 6; //¿ë·® Ä÷³ index var prcpQtyCol = 8; //¼ö·® Ä÷³ index var prcpTimsCol = 10; //Ƚ¼ö Ä÷³ index var prcpDayNoCol = 11; //Àϼö Ä÷³ index var prcpDeliveFactCol = 15; //Àü´Þ»çÇ× Ä÷³ index var prcpHopeHdCol = 18; //Èñ¸ÁÀÏÀÚ Ä÷³ index var ContPrcpDdRow = 6; //ÁöÁ¤ÀÏ instance row var prcpNode = "/root/main/prcp/prcplist"; var diagNode = "/root/main/diaginfo/diagcdlist"; var prcpgenrflag = ""; //¿Ü·¡ÀÔ¿ø±¸ºÐ var bfPrcpdd = ""; //ó¹æÀÏÀÚ¸¦ ¹Ù²Ù±â ÀüÀÇ °ªÀ» ´ã¾ÆµÒ var diagnmCol = 4; var SubmitTF_SMMMO00110 = false; //MM)00101.js ¿¡¼­ fPrcpSave()¸¦ È£Ãâ ½Ã, ¼­ºê¹Ô ¼º°ø¿©ºÎ ´ãÀ½.(2008.01.29) /**@desc : ó¹æÈ­¸é °øÅëÄÚµå ÃʱâÈ­ * @id : model1 * @event : xforms-model-construct-done * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 14 */ function fBaseCdInit() { mmbfGetDeptCodeComboList("/root/temp/reqdata", "/root/issdept", "I"); fPrcpExecDeptSrch("all"); zbcfGetCodeList(new Array("M0003", "M0005", "M0011", "P0034", "M0029", "M0040", "M0046", "M0007", "M0545"), new Array("/root/init/prcpkindcd", "/root/init/prcpclscd", "/root/init/prcpstatcd", "/root/init/hosinprcpresncd", "/root/init/payflagcd", "/root/init/M0040", "/root/init/rehbprcpcurepartcd", "/root/init/opansflagcd", "/root/init/conttestintvlflag")); fGetHardCDList("N", 274, 0 , "/root/hidden/c6specdrlist"); fGetHardCDList("N", 275, 0 , "/root/init/autosetprcplist"); fGetHardCDList("N", 282, 0 , "/root/hidden/securelimitdeptlist"); fGetHardCDList("N", 285, 0 , "/root/hidden/specprcpdrinfo"); // ¿µ»óÀÇÇаú ¼±ÅÃÁø·á ±³¼ö ÀÚµ¿ ¹èÁ¤ fGetHardCDList("N", 287, 0 , "/root/hidden/d2specdrlist"); // º´¸®°ú ÀÇ»ç ÀÚµ¿¹èÁ¤ fGetHardCDList("N", 289, 0 , "/root/hidden/b2specdrlist"); // Áø°Ë ¼±ÅÃÁø·á ÀÇ»ç ÀÚµ¿¹èÁ¤ fGetHardCDList("N", 270, 0 , "/root/init/operationroominfo"); // ÀÏÀϼö¼ú½Ç ¼ö¼ú¹æÀ» Á¶È¸ÇÑ´Ù. //20110211 mjm Ãß°¡ ¼±ÅÃÁø·áÀÇ ·Î±×ÀÎ ÇßÀ» ¶§ °¡Á®¿À´Â °ÍÀ¸·Î ¼öÁ¤ var srcNodes = instance1.selectNodes("/root/initsrch/usercombo"); if ( srcNodes.length > 0 ) { var specdrinfoNodes = instance1.selectNodes("/root/init/specdrinfo/usercombo"); if ( specdrinfoNodes.length < 2 ) { var targetNodes = instance1.selectSingleNode("/root/init/specdrinfo"); for(i=0; i 30) { // 30ÀÏ ÀÌ»ó Àå±âÀç¿øÈ¯ÀÚ Àç¿øÀϼö Ç¥½Ã 2017.01.19 ¾ö¿µ¸¸ vopt_patinfo = vopt_patinfo + " HD[" + nHospitalDay + "]"; } } model.setValue ( "/root/init/patinfo", vopt_patinfo ); if (insukindcd == "21"){ vopt_insuinfo = "ÀÇ·á±Þ¿©1"; }else if (insukindcd == "22"){ vopt_insuinfo = "ÀÇ·á±Þ¿©2"; }else if (insukindcd == "81"){ vopt_insuinfo = "Àå±â¿ä¾ç"; }else{ vopt_insuinfo = getPatientInfo("insukind"); } vopt_insuinfo = vopt_insuinfo + " " + getPatientInfo("suppkind"); model.setValue ( "/root/init/insuinfo", vopt_insuinfo ); var sReMark = ""; if( prcpgenrflag == "O" && model.getValue( "/root/paminfo/list/durdiagyn") == "Y") { // ´çÀÏ ¹èÄ¡·Î ½ÇÇàµÈ DUR ƯÁ¤Áúº´ Á¡°Ë¿¡¼­ ³»¿ëÀÌ Á¸ÀçÇϸé 2015.06.23 ¾ö¿µ¸¸ sReMark = sReMark + "[DUR Áúº´Á¡°Ë] ¹öưÀ» Ŭ¸¯ÇÏ¿© °ü·Ã ³»¿ëÀ» È®ÀÎÇϼ¼¿ä.\n\n"; // DUR ƯÁ¤Áúȯ Á¡°Ë ³»¿ëÀÌ ÀÖÀ»°æ¿ì } var sWarnMsg = model.getValue("/root/paminfo/list/warnmsg"); if(!isNull(sWarnMsg)) {// ÁÖÀÇ¿ä¸Á ȯÀÚ ¸Þ¼¼Áö sReMark = sReMark + sWarnMsg + "\n\n"; } if ( insukindcd == "31" || insukindcd =="41"){ if (getPatientInfoDetail("ioflag") == "O"){ sReMark = sReMark + "ÀÚº¸/»êÀç ȯÀÚÀÔ´Ï´Ù. \n°ü·Ã ó¹æÀ» ¸ðµÎ [±Þ¿©]·Î ó¹æÇÏ¿© Áֽñ⠹ٶø´Ï´Ù.\n±â¿ÕÁõÀº °Ç°­º¸ÇèÀ¸·Î ÀçÁ¢¼öÇÏ¿© ó¹æÇØ Áֽñ⠹ٶø´Ï´Ù."; }else { sReMark = sReMark + "ÀÚº¸/»êÀç ȯÀÚÀÔ´Ï´Ù. \n°ü·Ã ó¹æÀº ¸ðµÎ [±Þ¿©]·Î ó¹æÇÏ¿© Áֽñ⠹ٶø´Ï´Ù. \n±× ¿Ü ó¹æÀº ó¹æ »ó¼¼ÆË¾÷¿¡¼­ ±â¿ÕÁõ üũ ÈÄ Ã³¹æÇØ Áֽñ⠹ٶø´Ï´Ù."; } } if(!isNull(sReMark)) { model.makeValue ( "/root/paminfo/list/remark", sReMark); group_rmk.visible = true; } } //Á¾¼Ó󹿹øÈ£, ¹Í½º¹øÈ£, hsctlnkno ÃʱâÈ­ model.setValue ( "/root/init/inclprcpno", 0 ); model.setValue ( "/root/init/hsctlnkno", 0 ); model.setValue ( "/root/init/prcpmixno", 0 ); //PRN Àû¿ë¿©ºÎ¸¦ ½Ç½Ã°£À¸·Î °¡Á®¿Í¼­ üũÇÑ´Ù. 2010-01-02 by LYJ reqHardCodeInfo("/root/hidden/prnprcpyninfo", "/root/hidden/prnprcpyninfo", "173"); model.makeValue( "/root/save/saveflaginfo/prnprcpyninfo", model.getValue("/root/hidden/prnprcpyninfo/hardcd/hardcd") ); if ( prcpgenrflag == "O" || prcpgenrflag == "S" ){ //¿Ü·¡À϶§ cmb_prcpkind.visible = false; cmb_prcpdd.visible = false; cmb_issdept.visible = true; cmb_hosinprcpresn.visible = true; btn_issdept.visible = true; caption1.visible = true; // 2016.10.27 ¾ö¿µ¸¸ µÇÀÇ·Ú¹öư »ç¿ëÇÏÁö ¾ÊÀ½ ó¸® //button21.visible = true; //kimsj µÇÀÇ·Ú¹öư cmb_issdept.attribute ( "left" ) = "454"; btn_issdept.attribute ( "left" ) = "558"; cmb_hosinprcpresn.attribute( "left" ) = "695"; cmb_hosinprcpresn.attribute( "width" )= "240"; //298-58=240 btn_prcpsave2.disabled = false; // Áø·á¿¹¾à + ÀÎÁõÀúÀå //btn_prcpsave3.disabled = false; // °¡¼Å¾ßÇÒ °÷ Ãâ·Â ¹× ÀÎÁõÀúÀå bool_patgolistprtyn.disabled = false; btn_prtpattogo.visible = true; grd_prcplist.colHidden(prcpKindCdCol) = true; model.setValue ( "/root/init/prcpkindcd", "20" ); //ó¹æÁ¾·ù(Ãß°¡) model.setValue ( "/root/init/prcpdd", model.getValue ( "/root/paminfo/list/orddd" )); //20110104. mjm¼öÁ¤. °æºÎÀÇ ¿ø¹« ÇÁ·Î¼¼½º»ó ¿ø¹«ÀÇ È¯ÀÚ¿ø³» »çÀ¯¸¦ °¡Á®¿ÀÁö ¾Ê°Ô ÁÖ¼®Ã³¸® //2013.08.08 ¾ö¿µ¸¸ ¼öÁ¤ Á¤½Å°ú ÇØ¹Ù¶ó±â¼¾ÅÍ ÀÇ·Ú È¯ÀÚÀÇ ¿ø³» »çÀ¯ ¼³Á¤. if( "2030000000" == model.getValue("/root/paminfo/list/orddeptcd") && "29" == model.getValue("/root/paminfo/list/hosoutexptresncd") ) { model.setValue ( "/root/init/hosinprcpresncd", "29"); // ÇùÁø(ÇÑ¾ç¹æ, ¾çÇѹæ, ¾ç¾ç¹æ)ȯÀÚ Á¤½Å°ú ÇØ¹Ù¶ó±â¼¾ÅÍ ÀÇ·Ú È¯ÀÚ Ã¼Å© } else { //2013/09/30 ÀÎÁõ ÀúÀ嵯À»½Ã ÀÎÁõÀúÀå µÈ °ªÀ¸·Î ¿ø³»Ã³¹æ»çÀ¯¸¦ ¼¼ÆÃ(ÀÌÁ¤ÅÃ) if(saveFlag=="save"){ model.setValue ( "/root/init/hosinprcpresncd", model.getValue("/root/paminfo/list/hosoutexptresncd")); }else{ model.setValue ( "/root/init/hosinprcpresncd", "00"); } } //20080927 ¸¶Á¤¹Î ¼öÁ¤. ¿Ü·¡È¯ÀÚ°¡ ¾Ï¼¾ÅÍÀΰæ¿ì´Â ¹ßÇàó¸¦ ¾Ï¼¾ÅÍ·Î ÇÑ´Ù. // 20101227 ±è¿µÇÐ ¼öÁ¤ ¿Ü·¡È¯ÀÚ°¡ ¼¾ÅÍ·Î Á¢¼öÇÑ °æ¿ì´Â ¹ßÇàó¸¦ ¼¾ÅÍ·Î ÇÑ´Ù. // 2010. 12. 31 ƯÁ¤ ¼¾Å͸¸ ¹ßÇàó¸¦ ¼¾ÅÍ·Î ÇÑ´Ù. Ä¥°îº´¿ø ±èÁø°æ ¼±»ý´Ô ¿äû var patcentcd = model.getValue ( "/root/paminfo/list/centcd" ); var patorddeptcd = model.getValue ( "/root/paminfo/list/orddeptcd" ); if(fContainsHardCD("264", patorddeptcd)) { // Áø·á°ú°¡ Æ÷ÇÔ µÇ¸é Áø·á°ú·Î ¼³Á¤ (¼¾Åͳ» ƯÁ¤Áø·á°ú¸¸ Áý°è¸¦ Ʋ¸®°Ô Çϱâ À§ÇØ) 2013.12.11 ¾ö¿µ¸¸ model.setValue ( "/root/issdept", patorddeptcd); } else if(fContainsHardCD("264", patcentcd)) { model.setValue ("/root/issdept", patcentcd); } else { model.setValue ( "/root/issdept", patorddeptcd); } } else { //ÀÔ¿ø, ÀÀ±ÞÀ϶§ if (prcpgenrflag == "I") { model.setValue ( "/root/init/hosinprcpresncd", "00"); // 2016.10.27 ¾ö¿µ¸¸ µÇÀÇ·Ú¹öư »ç¿ëÇÏÁö ¾ÊÀ½ ó¸® //button21.visible = false; //kimsj µÇÀÇ·Ú¹öư - ÀÔ¿øÀÏ °æ¿ì º¸ÀÌÁö ¾Êµµ·Ï ¼³Á¤ } else { model.setValue ( "/root/init/hosinprcpresncd", model.getValue ( "/root/paminfo/list/hosoutexptresncd" )); // 2016.10.27 ¾ö¿µ¸¸ µÇÀÇ·Ú¹öư »ç¿ëÇÏÁö ¾ÊÀ½ ó¸® //button21.visible = true; //kimsj µÇÀÇ·Ú¹öư } // ÀÀ±Þ½Ç ¹ßÇàºÎ¼­ °ü·Ã ¼ÂÆÃ. ÀÀ±Þ½Ç ȯÀÚÀÇ °æ¿ì ¼¾¼­½º¿¡ µî·ÏµÇ¾î ÀÖ´Â ºÎ¼­ÄÚµå·Î ¹ßÇàºÎ¼­¸¦ ¼ÂÆÃÇØÁØ´Ù.2012.04.24 ¾ö¿µ¸¸ var erissdeptcd = model.getValue("/root/paminfo/list/erissdeptcd"); if (prcpgenrflag == "E" && !isNull(erissdeptcd) && erissdeptcd != "-") { model.setValue ( "/root/issdept", erissdeptcd); } else { model.setValue ( "/root/issdept", model.getValue ( "/root/paminfo/list/wardcd" )); } if ( saveFlag != "save" || isNull(model.getValue ( "/root/init/prcpdd" ))) { model.setValue ( "/root/init/prcpdd", getCurrentDate()); } cmb_hosinprcpresn.visible = false; cmb_prcpkind.visible = true; cmb_prcpdd.visible = true; cmb_issdept.visible = true; caption1.visible = false; btn_issdept.visible = true; grd_prcplist.colHidden(prcpKindCdCol) = false; cmb_issdept.attribute ( "left" ) = "662"; btn_issdept.attribute ( "left" ) = "764"; btn_prcpsave2.disabled = true; // Áø·á¿¹¾à + ÀÎÁõÀúÀå bool_patgolistprtyn.disabled = true; btn_prtpattogo.visible = false; //by sonjy 20081020 ÀÔ¿ø À϶§¸¸ Á¤±Ô ó¹æ ½Ã°£ check // by ±è¿µÇÐ 2010. 12. 29 Á¤±Ôó¹æ ÀԷ½ð£À» ÇϵåÄÚµå Å×À̺í Ȱ¿ë ¼öÁ¤ ( 261¹ø) fGetHardCDList("N", 261, 0 , "/root/hidden/nomalordertm"); var nomalordrendtm = model.getValue("/root/hidden/nomalordertm/hardcd[cdseqno = '1']/hardcd"); var nomalordrstrttm = model.getValue("/root/hidden/nomalordertm/hardcd[cdseqno = '2']/hardcd"); if ( eval (getCurrentTime().substr (0,2)) <= parseInt(nomalordrendtm) && prcpgenrflag == "I") { //ó¹æÁ¾·ù: 4½ÃÀüÀ̸é Á¤±Ô model.setValue ( "/root/init/prcpkindcd", "10" ); } else if ( eval (getCurrentTime().substr (0,2)) >= parseInt(nomalordrstrttm) && prcpgenrflag == "I" ) { //9½Ã ÀÌÈĸé Á¤±Ô, ³¯Â¥´Â ´ÙÀ½³¯Â¥ model.setValue ( "/root/init/prcpkindcd", "10" ); var nextDay = getCurrentDate().toDate().getAddDate(1,"D").getDateFormat(); //´ÙÀ½³¯À» ã´Â´Ù. model.setValue ( "/root/init/prcpdd", nextDay ); } else { //Ãß°¡Ã³¹æ model.setValue ( "/root/init/prcpkindcd", "20" ); } if ( prcpgenrflag == "E" || prcpgenrflag == "D" ) { cmb_hosinprcpresn.visible = true; model.setValue ( "/root/init/prcpkindcd", "20" ); cmb_hosinprcpresn.attribute ( "left" ) = "786"; cmb_hosinprcpresn.attribute ( "width" ) = "147"; //204-57=147 } } //@@@ Á¶¿µÁ¦ ºÎÀÛ¿ë °ü¸®ÆË¾÷ Çѹø¸¸ ¶ç¿ì±â À§ÇØ °ü·Ã paramter¸¦ ÀúÀå ÈÄ¿¡ ÃʱâÈ­ Çϵµ·Ï ¼öÁ¤ (2010.07.16 JJE) clearParameter("SPAER01900_popupYN"); clearParameter("SPAER01900_prcpcd"); clearParameter("SPAER01900_lnkno"); //ÇùÁø¸íÀ» ó¹æÈ­¸é¿¡ Ç¥½Ã, 2008.04.26 ¿ÀÁöÈÆ var cnsttypenm = getPatientInfoDetail("coopteamnm"); if(cnsttypenm == ""){ opt_cnsttypenm.visible = false; //2016.10.27 ¾ö¿µ¸¸ ÇùÁøÈ¸ÀǸñ·Ï¹öư ¼û±è ó¸®, ÇùÁø¸í Ŭ¸¯ À̺¥Æ®·Î ´ëü //btn_cnstconf.visible = false; }else{ model.setValue("/root/init/cnsttypenm", cnsttypenm); opt_cnsttypenm.visible = true; //2016.10.27 ¾ö¿µ¸¸ ÇùÁøÈ¸ÀǸñ·Ï¹öư ¼û±è ó¸®, ÇùÁø¸í Ŭ¸¯ À̺¥Æ®·Î ´ëü //btn_cnstconf.visible = true; } // ¼±ÅÃÁø·á À§ÀÓ¿©ºÎ¸¦ ó¹æÈ­¸é¿¡ Ç¥½Ã , 2008. 05. 29 ±è¿µÇÐ var specordtypenm = getPatientInfoDetail("specordtypenm"); if (specordtypenm == "-" || isNull(specordtypenm)) { model.setValue("/root/init/specordtypenm", ""); opt_specordtypenm.visible = false; } else { model.setValue("/root/init/specordtypenm", specordtypenm); opt_specordtypenm.visible = true; } //ÀÇ·Ú¼­È¸½Å °ü·Ã Á¤º¸ ó¸® kimsj 20100208 ¼öÁ¤ (ȸ½ÅÁ¤º¸ ¾øÀ» °æ¿ì º¸ÀÌÁö ¾Êµµ·Ï ¼öÁ¤) if(model.getValue("/root/paminfo/list/replyn")=="N"){ model.setValue("/root/init/repltypenm", model.getValue("/root/paminfo/list/repltypenm")); } else { model.setValue("/root/init/repltypenm", ""); } //ÁßÁõµî·Ï À¯È¿±â°£ ¸¸·á Ç¥½Ã [ÁßÁõµî·Ï Á¾·áÀÏÀÚ ±âÁØ -1°³¿ù ~ +18°³¿ù] kimsj 100818 var sdoaendchk = getPatientInfoDetail("sdoaendchk"); if (sdoaendchk == "Y") { model.setValue("/root/init/sdoaendnm", "[ÁßÁõµî·Ï À¯È¿±â°£ ¸¸·á]"); opt_sdoaendnm.visible = true; } else { model.setValue("/root/init/sdoaendnm", ""); opt_sdoaendnm.visible = false; } //20080731 ¸¶Á¤¹Î ¼öÁ¤ ¼ö¼úÅÇ¿¡¼­ ¼±ÅÃÇÑ °ÍÀº ¼ö¼úÈÄ¿¡¼­ ¼ö¼úÁßÀ¸·Î ó¸® var operationFlagCvs = getGlobalVariable("operation"); if(operationFlagCvs.length != 0 ){ //cvs°¡ nullÀÌ ¾Æ´Ñ °æ¿ì¿¡¸¸ ó¸®ÇÔ. model.removeNodeSet ( "/root/operation/list" ); //»ó´ÜÈ­¸é Á¤º¸ ÃʱâÈ­ setCSVToNode ( "/root/operation", operationFlagCvs ); model.setValue ( "/root/init/prcpkindcd", "35" ); } else { model.removeNodeSet ( "/root/operation/list" ); } bfPrcpdd = model.getValue ( "/root/init/prcpdd" ); if(isNull(pamInfoCvs)){ return; } //20080818 ¸¶Á¤¹Î ¼öÁ¤. ó¹æ ÀúÀåÈÄ ºÒ·¯¿À´Â °ÇÀº app¿¡¼­ È£ÃâÇÏ´Â °É·Î ¼öÁ¤. if ( saveFlag == "save" ){ model.copyNode ( "/root/initsrchprcp", "/root/savertninfo" ); //temp¿¡ µþ·Á¿Â µ¥ÀÌÅÍ´Â »èÁ¦ÇÑ´Ù. model.removeNodeset ( "/root/initsrchprcp/prcplist" ); model.removeNodeset ( "/root/initsrchprcp/saveestmspclcs" ); model.removeNodeset ( "/root/initsrchprcp/saveserdiagappfrm" ); model.removeNodeset ( "/root/initsrchprcp/savelglydis" ); model.removeNodeset ( "/root/initsrchprcp/saverareobst" ); } else { fInitSrch(); } if ( prcpgenrflag == "O" ){ //¿Ü·¡À϶§ //20090316 ¸¶Á¤¹Î ¼öÁ¤. login Á¤º¸¿¡¼­ ´çÀμ±°Ë»ç »ç¿ë¿©ºÎ °¡Á®¿È if ( model.getValue ( "/root/initsrch/pretest/trgtcd" ) == "Y" ) { b_aftrcpt.visible = true; txt_aftrcpt.visible = true; } } else { b_aftrcpt.visible = false; txt_aftrcpt.visible = false; } //20090428 ¸¶Á¤¹Î Ãß°¡. ¿Ü·¡¼ö¼ú·Î Ãß°¡ if (!isNull(model.getValue ( "/root/operation/list/oprsrvno"))){ txt_aftrcpt.visible = false; b_aftrcpt.visible = false; cmb_prcpkind.visible = true; } if ( model.getValue ( "/root/init/setprcpyn" ) == "Y" && saveFlag != "save" ){ if ( model.getValue ( "/root/cp" ) != "Y" ) { //Àüó¹æÀÇ ·Îµù¿©ºÎ ÃʱâÈ­, bfprcpload¸¦ NÀ¸·Î ¼³Á¤ÇØ¾ß Áø·á±â·ÏÀ» ¶ç¿ï ¼ö ÀÖÀ½ 2008.02.12 ¿ÀÁöÈÆ model.setValue("/root/init/bfprcpload", "N"); btn_ivbfprcp.selected = true; ivw_prcp3.src = "SMMMO02100_Àüȸó¹æ.xrw"; } } //ivw_prcp3Ãß°¡ °ü·Ã ·ÎÁ÷ À̵¿ ¹× º¯°æ.. by sonjy 2008-08-20 start if ( model.getValue("/root/init/detlivw") == "m" ) { if ( model.getValue ( "/root/cp" ) != "Y" ) { if(ivw_prcp.visible == true )ivw_prcp.window.javascript.fIvwDetlVwCom(); }else{ if(ivw_prcp2.visible == true ) ivw_prcp2.window.javascript.fIvwDetlVwCom(); } } else if ( model.getValue( "/root/init/detlvw" ) == "m" ) { if ( model.getValue ( "/root/cp" ) != "Y" ) { if(ivw_prcp.visible == true ) fDetlVw("y"); ; }else{ if(ivw_prcp2.visible == true ) fDetlVw("y"); ; } } if( btn_ivbfprcp.selected == true ) { if ( model.getValue("/root/init/detlivw") == "m" ) { ivw_prcp3.window.javascript.fIvwDetlVwCom("bf"); } else if ( model.getValue( "/root/init/detlvw" ) == "m" ) { fDetlVw("y"); } ivw_prcp3.visible = true; if ( model.getValue ( "/root/cp" ) != "Y" ) { ivw_prcp.visible = false; }else{ ivw_prcp2.visible = false; } } //ivw_prcp3Ãß°¡ °ü·Ã ·ÎÁ÷ À̵¿ ¹× º¯°æ.. by sonjy 2008-08-20 end if ( model.getValue ( "/root/anst/paramyn") != "Y" ) { if ( !isNull(model.getValue ( "/root/operation/list/oprsrvno")) && prcpgenrflag == "O") { cmb_prcpkind.disabled = true; } else { cmb_prcpkind.disabled = false; } } // ¿Ü·¡¿¡¼­ ·Î±×ÀÎ ÇÑ ÀÇ»çÀÇ ºÎ¼­¿Í ȯÀÚÀÇ ºÎ¼­°¡ °°Áö ¾ÊÀ» °æ¿ì ÀÎÁõÀúÀå ¹öư ºñȰ¼º - 20081015 by Moonsh var orddeptcd = model.getValue("/root/paminfo/list/orddeptcd"); // ȯÀÚÀÇ Áø·á°ú var instcd = getUserInfo("dutplceinstcd"); // ·Î±×ÀÎ »ç¿ëÀÚÀÇ ±â°ü±âÈ£ var userdeptcd = getUserInfo("dutplcecd"); // ·Î±×ÀÎ »ç¿ëÀÚÀÇ ºÎ¼­ÄÚµå var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" ); // ÀÔ¿ø, ¿Ü·¡ Á¤º¸ var oprsrvinfo = model.getValue ( "/root/operation/list/oprsrvno"); var chkDisbBtnYN = "N"; //20091015 by JJE Ãß°¡ if ( prcpgenrflag == "O" ){ if ( orddeptcd != userdeptcd ) { if ( isNull(oprsrvinfo) ) { if(instcd == "032" && orddeptcd == "2110000000" && fContainsHardCD("445", userdeptcd)) { // 2014.04.01 ¾ö¿µ¸¸ Ä¥°î ¼Ò¾ÆÃ»¼Ò³â°ú ºÐ°ú °ü·Ã ÀÌÀü ó¹æÀ» DC ÇÒ¼ö ÀÖµµ·Ï Çϱâ À§ÇØ Á¶°Ç Ãß°¡ } else if(instcd == "031" && fContainsHardCD("528", orddeptcd) && fContainsHardCD("529", userdeptcd)) { // 2016.04.26 ÀÌÀ±ÁÖ º»¿ø Ä¡°ú ºÐ°ú °ü·Ã ÀÌÀü ó¹æÀ» ƯÁ¤°ú°¡ DC ÇÒ¼ö ÀÖµµ·Ï Çϱâ À§ÇØ Á¶°Ç Ãß°¡ } else { btn_prcpsave.disabled = true; btn_prcpsave2.disabled = true; btn_prcpsave.hint = "¼±»ý´ÔÀÇ ºÎ¼­¿Í ȯÀÚÀÇ ºÎ¼­°¡ °°Áö ¾Ê¾Æ¼­ ÀÎÁõ ÀúÀåÀ» ÇÒ ¼ö ¾ø½À´Ï´Ù."; btn_prcpsave2.hint = "¼±»ý´ÔÀÇ ºÎ¼­¿Í ȯÀÚÀÇ ºÎ¼­°¡ °°Áö ¾Ê¾Æ¼­ ÀÎÁõ ÀúÀåÀ» ÇÒ ¼ö ¾ø½À´Ï´Ù."; chkDisbBtnYN = "Y"; //20091015 by JJE Ãß°¡ } } } } //20140407 ¾ö¿µ¸¸ Á÷Á¾Äڵ尡 Àǻ簡 ¾Æ´Ï¸é ÀÎÁõÀúÀå ¹öư ºñȰ¼ºÈ­ ó¸® var jobkindcd = getUserInfo("jobkindcd"); if ( !fContainsHardCD("69", jobkindcd) && !fContainsHardCD("531", jobkindcd)) { // 531 Àº Å×½ºÆ® »ç¿ëÀÚ(ÀÇ»çÁ÷Á¾ À̿ܿ¡ 󹿰¡´É Á÷Á¾) btn_prcpsave.disabled = true; btn_prcpsave2.disabled = true; btn_prcpsave.hint = "ÀÇ»çÁ÷Á¾ÀÇ »ç¿ëÀÚ°¡ ¾Æ´Ï¹Ç·Î ÀÎÁõÀúÀå ÇÒ ¼ö ¾ø½À´Ï´Ù."; btn_prcpsave2.hint = "ÀÇ»çÁ÷Á¾ÀÇ »ç¿ëÀÚ°¡ ¾Æ´Ï¹Ç·Î ÀÎÁõÀúÀå ÇÒ ¼ö ¾ø½À´Ï´Ù."; chkDisbBtnYN = "Y"; //20091015 by JJE Ãß°¡ } if ( prcpgenrflag == "E" ){ var mainObj = getMainViewer(); var ordPatObj = mainObj.javascript.getOpenWindow("SMMMO04100"); if(ordPatObj != null){ //µÎ °´Ã¼°ªÀÌ ´Ù¸¥ °æ¿ì »õ·Î¿î Áø·á´ë»óÀÚ È­¸éÀ» openÇÔ var callvisityn = ordPatObj.javascript.getParameter("SMMMO04100_callvisityn"); model.makeValue("/root/tmp/callvisityn",callvisityn) if (callvisityn == "N") { btn_prcpsave.disabled = true; btn_prcpsave2.disabled = true; btn_prcpsave.hint = "ÀÀ±Þ½Ç Visit TimeÀ» µî·Ï ÇÏÁö ¾ÊÀ¸¸é ±â·Ï°ú ó¹æÀº ÀÓ½ÃÀúÀ常 °¡´É ÇÕ´Ï´Ù."; btn_prcpsave2.hint = "ÀÀ±Þ½Ç Visit TimeÀ» µî·Ï ÇÏÁö ¾ÊÀ¸¸é ±â·Ï°ú ó¹æÀº ÀÓ½ÃÀúÀ常 °¡´É ÇÕ´Ï´Ù."; chkDisbBtnYN = "Y"; } } }// ÀÀ±Þ½Ç call visit ÇÏÁö ¾ÊÀ¸¸é ó¹æ ÀÎÁõÀúÀ常 °¡´É 20100527 by LYJ //20091015 by JJE ó¹æ â »ç¿ë µµÁß ÀúÀå¹öư ºñȰ¼ºÈ­ ó¸® µÉ ¼ö ÀÖÀ¸¹Ç·Î(fChkInCnclYN() Ãß°¡¿¡ µû¶ó) È­¸é ȯÀÚ Àüȯ ½Ã Ȱ¼ºÈ­ ó¸® ÇÊ¿ä if(chkDisbBtnYN == "N"){ btn_tempsave.hint = ""; btn_prcpsave.hint = ""; btn_prcpsave2.hint = ""; btn_tempsave.disabled = false; btn_prcpsave.disabled = false; btn_prcpsave2.disabled = false; } // ó¹æ ¸ÞÀÎ refresh ´ÜÀÏÈ­¸¦ À§ÇÑ ¼ÂÆÃ - 20081212 by Moonsh var refreshInfo = getGlobalVariable("OrderMainRefresh"); if ( refreshInfo != "Y" ) { model.refresh(); } //DUR-S by sonjy 20091207 ȯÀÚ ¼±ÅÃÀÌ ¹Ù²ð¶§ ÀÌÀü difguidÃʱâÈ­ durappyn : "A:DURÀüü»ç¿ë", "Y:DURÁß ÀúÇÔ·®Á¦¿Ü", "³ª¸ÓÁö:DUR »ç¿ë¾ÈÇÔ" , "K:°æºÏ´ë¿ë DUR" if ( model.getValue( "/root/initsrch/durappyn/trgtcd" ) == "A" || model.getValue( "/root/initsrch/durappyn/trgtcd" ) == "Y") { if( saveFlag != "save" ) model.makeValue("/root/init/bf_difguid", ""); }//DUR-E if(typeof(ivw_prcpdetail) == "object" && ivw_prcpdetail.visible) { // ó¹æ »ó¼¼È­¸éÀÌ Ç¥½Ã µÇ¾î ÀÖÀ¸¸é ÃʱâÈ­ ivw_prcpdetail.window.javascript.fPrcpClick(); } } /**@desc : ó¹æÈ­¸é ÃʱâÈ­ * @id : model1 * @event : xforms-ready * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 14 */ function fInitializeReady(diag) { var patFlagCvs = getGlobalVariable("patflag"); if(patFlagCvs.length == 0 ) { messageBox ( "ȯÀÚÁ¤º¸°¡", "I004" ); window.close(); return; } //Áø´Ü°Ë»ö È£Ãâ if (isNull(diag)){ fPatDiagSrch(); } model.refresh(); //ó¹æ Lock Á¤º¸ È£Ãâ //fgetPrcpLock(); fInitializeScreen(); //CPÈ­¸é¿¡¼­´Â ¸¶Áö¸·¿¡ ó¸® if ( model.getValue ( "/root/cp" ) != "Y" ) { fDrugPrcpDc(); // °£È£ ¹Ý³³¿äû ó¹æ fConfirmTellPrcp(); // ¹ÌÈ®ÀÎ °£È£ ±¸µÎ ó¹æ fTempPrcp(); //¿Ü·¡°Ë»çó¹æ ÀÔ¿øÀüȯ ( Áֻ翬¼Óó¹æ, ¹°¸®Ä¡·á ¿¬¼Óó¹æÀº Á¦¿Ü ) fSaveRsrvPrcpCvrt(); fPainCnt(); } // ó¹æ ¸ÞÀÎ refresh ´ÜÀÏÈ­¸¦ À§ÇÑ ¼ÂÆÃ - 20081212 by Moonsh var refreshInfo = getGlobalVariable("OrderMainRefresh"); if ( refreshInfo == "Y" ) { setGlobalVariable("OrderMainRefresh", "N"); } grd_diaglist.refresh(); model.refresh(); } /**@desc : ó¹æ »ó¼¼º¸±â * @param : Àüó¹æ, ¿¬¼Óó¹æ, ó¹æ°Ë»ö Åǹöư ´­·¶À» °æ¿ì ¿øº¹ orgflag => Y * @id : btn_detlvw * @event : DOMActivate * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 12 */ function fDetlVw ( orgflag ) { var grdLeft = 383; var grdWidht = 811; var extnGrdLeft = 5; var extnGrdWidht = 1187; // var ivwLeft = 8; // var ivwWidth = 416; // var minIvwLeft = ivwLeft; // var minIvwWidth = 7; var lineX1 = grdLeft; var lineX2 = grdLeft + grdWidht; var extnLineX1 = extnGrdLeft; var extnLineX2 = lineX2; var prcpColsize = 100; var deliveColsize = 150; var drugmthdspccdnm = 72; if ( model.getValue( "/root/init/detlvw" ) == "p" && orgflag != "y" ) { grd_prcplist.attribute ( "left" ) = extnGrdLeft; grd_prcplist.attribute ( "width" ) = extnGrdWidht; // ivw_prcp.attribute ( "left" ) = minIvwLeft; // ivw_prcp.attribute ( "width" ) = minIvwWidth; ivw_prcp.visible = false; ivw_prcp3.visible = false; //by sonjy ó¹æ ±×¸®µå È®´ë½Ã Àüó¹æ¿¡ °¡·ÁÁö´Â Çö»ó ¼öÁ¤ 2008-08-20 if ( model.getValue ( "/root/cp" ) == "Y" ) { ivw_prcp2.visible = false; ivw_prcp3.visible = false; } line5.attribute ( "x1" ) = extnLineX1; line5.attribute ( "x2" ) = extnLineX2; // line2.attribute ( "x1" ) = extnLineX1; // line2.attribute ( "x2" ) = extnLineX2; if ( model.getValue ( "/root/cp" ) == "Y" ) { ivw_prcp2.visible = false; ivw_prcp3.visible = false; line5.attribute ( "x1" ) = extnLineX1; line5.attribute ( "x2" ) = extnLineX2+10; grd_prcplist.attribute ( "width" ) = parseInt(grd_prcplist.attribute ( "width" )) + 10; } model.setValue( "/root/init/detlvw", "m" ); grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) = grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) - drugmthdspccdnm; //grd_prcplist.colWidth(prcpDeliveFactCol) = grd_prcplist.colWidth(prcpDeliveFactCol) + deliveColsize; } else { grd_prcplist.attribute ( "left" ) = grdLeft; grd_prcplist.attribute ( "width" ) = grdWidht; // ivw_prcp.attribute ( "left" ) = ivwLeft; // ivw_prcp.attribute ( "width" ) = ivwWidth; if( btn_ivbfprcp.selected == true ) ivw_prcp3.visible = true; // by sonjy ó¹æ ivw_prcp3°¡ ¼û¾î¹ö¸®´Â Çö»ó ¼öÁ¤ 2008-08-20 else { //son0820 if ( model.getValue ( "/root/cp" ) != "Y" ) { ivw_prcp.visible = true; line5.attribute ( "x1" ) = lineX1; line5.attribute ( "x2" ) = lineX2; //line2.attribute ( "x1" ) = lineX1; //line2.attribute ( "x2" ) = lineX2; }else{ ivw_prcp2.visible = true; line5.attribute ( "x1" ) = lineX1; line5.attribute ( "x2" ) = lineX2+10; grd_prcplist.attribute ( "width" ) = parseInt(grd_prcplist.attribute ( "width" )) + 10; } } model.setValue( "/root/init/detlvw", "p" ); grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) = grd_prcplist.colWidth(grd_prcplist.colref("drugmthdspccdnm")) + drugmthdspccdnm; //grd_prcplist.colWidth(prcpnmCol) = grd_prcplist.colWidth(prcpnmCol) - prcpColsize; //grd_prcplist.colWidth(prcpDeliveFactCol) = grd_prcplist.colWidth(prcpDeliveFactCol) - deliveColsize; } } /**@desc : ó¹æ°Ë»ö(ó¹æ ±×¸®µå¿¡¼­ ó¹æ¸í ¾²°í ¿£ÅÍ) * @id : grd_prcplist * @event : onendedit * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 14 */ function fPrcpSrch(srchflag) { if( event.keyCode == 13 && event.button < 1 ) { //ó¹æÈ­¸é down Çö»óÀ¸·Î event.button Á¶°Ç Ãß°¡ (2010.07.12 JJE) if ((model.getValue(prcpNode+"["+grd_prcplist.row+"]/prcpflag") == "2" && model.getValue(prcpNode+"["+grd_prcplist.row+"]/drugmastspec") =="Y") || model.getValue(prcpNode+"["+grd_prcplist.row+"]/status") !="S" ){ return; } if ( gridprcpsrchflag == "Y" ) { gridprcpsrchflag = "N"; return; } var prcpnm = model.getValue ( prcpNode + "[" + grd_prcplist.row+ "]/prcpnm" ); prcpnm = prcpnm.getTrim(); if ( srchflag == "prcpcd") { prcpnm = model.getValue ( prcpNode + "[" + grd_prcplist.row+ "]/prcpcd" ); } // ½Å±Ôó¹æ ¼öÁ¤¸ðµåÀ϶§ °Ë»ö ±ÛÀÚ¼ö¿¡ ´ëÇÑ flag ¼ÂÆÃ - 20090630 by Moonsh var modiflag = model.getValue("/root/init/rowmodify/modiflag"); //by sonjy 20100405 ó¹æ°Ë»ö½Ã Á¦ÇÑ ±ÛÀÚ¼ö setting var srchprcpnmlimit = 3; var srchprcpcdlimit = 2; var srchhnglimit = 2; var nodesrchprcplimitlist = instance1.selectNodes("/root/initsrch/srchprcplimit"); if( nodesrchprcplimitlist != null && nodesrchprcplimitlist.length > 0 ){ for( var n = 1 ; n <= nodesrchprcplimitlist.length; n++ ){ if( model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcd") == "prcpnm" && !isNull(model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm")) ){ srchprcpnmlimit = model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm") ; } else if( model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcd") == "prcpcd" && !isNull(model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm")) ){ srchprcpcdlimit = model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm") ; } else if( model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcd") == "hangul" && !isNull(model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm")) ){ srchhnglimit = model.getValue("/root/initsrch/srchprcplimit[" + n + "]/trgtcdnm") ; } } } var isHangul = fIsHangul (prcpnm); //ÇѱÛÀ϶§´Â 1±ÛÀÚ¸¸ ³Ö¾îµµ °Ë»ö°¡´É if ( isNull(prcpnm)) { if ( modiflag == "Y" ) { model.setValue("/root/init/rowmodify/srchnoflag", "Y"); // °Ë»ö¾ø´Â flag ¼ÂÆÃ - 20090630 by Moonsh } messageBox ( "ó¹æ °Ë»ö¾î¸¦", "C001" ); return; } else if ( isHangul == "E" ){ //¿µ¹®,¼ýÀÚÀ϶§´Â 4±ÛÀÚ ³Ö¾î¾ß °Ë»ö°¡´É if ( srchflag == "prcpcd") { if ( prcpnm.length < parseInt(srchprcpcdlimit) ){ if ( modiflag == "Y" ) { model.setValue("/root/init/rowmodify/srchnoflag", "Y"); // °Ë»ö¾ø´Â flag ¼ÂÆÃ - 20090630 by Moonsh } messageBox ( srchprcpcdlimit + "±ÛÀÚ ÀÌ»ó", "C001" ); return; } } else { if ( prcpnm.length < parseInt(srchprcpnmlimit) ){ messageBox ( srchprcpnmlimit + "±ÛÀÚ ÀÌ»ó", "C001" ); return; } } } else if ( isHangul == "H" ) { if ( prcpnm.length < parseInt(srchhnglimit) ){ messageBox ( "ÇѱÛÀº " + srchhnglimit + "±ÛÀÚ ÀÌ»ó", "C001" ); return; } } if (prcpnm.charAt ( 0 ) == "/"){ if ( prcpnm.length == 1 ){ messageBox ( "°Ë»öÇÒ ¼ö¼ú¸íÀÌ", "I004" ); return; } var curRow = grd_prcplist.row; var srchRow = grd_prcplist.rows -1; fPrcpModal ( "SPMMO05100", 180, 80 ); } else { var containflag = false; if( srchflag != "prcpcd"){ containflag = true; } prcpnm = prcpnm.getTrim(); if ( srchflag == "prcpcd") { fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMO00100", "", false, "getPrcpCdOldSrchInfo", isHangul , containflag); } else if ( srchflag == "prcpnm") { fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMO00100", "", false, "getPrcpNmSrchInfo", isHangul , containflag); } else { fPrcpSrchCom ( prcpnm, model.getValue ( "/root/init/prcpdd" ), model.getValue ( "/root/paminfo/list/insukind"), "TRMMO00100", "", false, "getPrcpSrchInfo", isHangul , containflag); } var srchLength = model.instances(0).selectNodes( "/root/prcpsrch/prcplist" ).length; var curRow = grd_prcplist.row; var nextRow = grd_prcplist.row + 1; if( srchLength > 1) { // ó¹æ ÄÚµå ¼öÁ¤ ¸ðµå °ü·Ã import È­¸é °ü·Ã ¼ÂÆÃ - 20090630 by Moonsh // setValue => ŸºÎ¼­ ÇÁ·Î±×·¥(¸¶Ãë±â·Ï)¿¡¼­ ¿À·ù¹ß»ý => makeValue·Î ¼öÁ¤ by sonjy 20091009 model.makeValue("/root/init/rowmodify/importflag", "Y"); var modiflag = model.getValue("/root/init/rowmodify/modiflag"); var modirow = model.getValue("/root/init/rowmodify/modirow"); if ( srchLength * 23 < 323 ) { grd_prcpsrchlist.attribute ( "height" ) = ( srchLength + 1 ) * 23 + 2; btn_copy.attribute ( "top" ) = ( srchLength + 1 ) * 23 + 6; btn_cancel.attribute ( "top" ) = ( srchLength + 1 ) * 23 + 6; import1.attribute ( "height" ) = ( srchLength + 1 ) * 23 + 30 } else { grd_prcpsrchlist.attribute ( "height" ) = 323; btn_copy.attribute ( "top" ) = 326; btn_cancel.attribute ( "top" ) = 326; import1.attribute ( "height" ) = 351; } // ó¹æ ÄÚµå ¼öÁ¤ ¸ðµåÀ϶§ import È­¸é À§Ä¡ Àç¼³Á¤ - 20090630 by Moonsh if ( modiflag == "Y" ){ grd_prcplist.row = modirow; } if ( grd_prcplist.row <= 10) { import1.attribute ( "top" ) = 215 + ( grd_prcplist.row - 1) * 23; } else if ( grd_prcplist.row <= 25) { import1.attribute ( "top" ) = (grd_prcplist.row - 1) * 23 + 170 - import1.attribute ( "height" ); } else if ( grd_prcplist.row > 25 ){ import1.attribute ( "top" ) = 24 * 23 + 190 - import1.attribute ( "height" ); } model.refresh(); for ( var i=1; i <=srchLength ; i++ ) { if (model.getValue ("/root/prcpsrch/prcplist[" + i + "]/prcpclscd")=="-") { grd_prcpsrchlist.rowstyle(i, "data", "color") = "#ff0000"; } else { grd_prcpsrchlist.rowstyle(i, "data", "color") = "#000000"; } } //ó¹æ¿µ¹®¸í ºÓÀº»ö ±Û¾¾ grd_prcpsrchlist.colstyle(grd_prcpsrchlist.colRef("prcpnm"), "all", "color") = "#ff0000"; grd_prcpsrchlist.colstyle(grd_prcpsrchlist.colRef("prcpnm2"), "all", "color") = "#ff0000"; grd_prcpsrchlist.rowstyle(0, "data", "color") = "#000000"; import1.visible = true; model.refresh(); model.setfocus( "grd_prcpsrchlist" ); grd_prcpsrchlist.select( 1, 1, 1, 1) = true; } else if( srchLength == 1) { model.refresh(); model.setfocus( "grd_prcpsrchlist" ); grd_prcpsrchlist.select( 1, 1, 1, 1) = true; addPrcp ( "import", "/root/prcpsrch/prcplist", "/root/main/prcp", "N", "prcpcd", model.getValue ( "/root/prcpsrch/prcplist/prcpcd"), grd_prcpsrchlist, "Y", "00"); } else { messageBox ( "°Ë»öµÈ ³»¿ëÀÌ", "I004" ); // ó¹æ ÄÚµå ¼öÁ¤ ¸ðµå °ü·Ã °Ë»ö ³»¿ëÀÌ ¾øÀ» °æ¿ì º¯°æ Row ÃʱâÈ­ ÈÄ ¸®ÅÏ - 20090630 by Moonsh var modiflag = model.getValue("/root/init/rowmodify/modiflag"); if ( modiflag == "Y" ) { var grdcnt = grd_prcplist.rows; grdcnt = grdcnt - 1; model.setValue("/root/main/prcp/prcplist[" + grdcnt + "]/prcpcd", ""); var modirow = model.getValue("/root/init/rowmodify/modirow"); var modiprcpcd = model.getValue("/root/init/rowmodify/modiprcpcd"); model.setValue( "/root/main/prcp/prcplist[" + modirow + "]/prcpcd", modiprcpcd); grd_prcplist.row = modirow; model.resetInstanceNode ("/root/init/rowmodify"); grd_prcplist.focusColor = "#ece1ec"; // ±×¸®µå¿¡ ¼±Åà µÇ´Â rowÀÇ »ö ÁöÁ¤ } else { grd_prcplist.dispatch("onentercell"); } } } } } /**@desc : ó¹æ»ó¼¼ÆË¾÷ * @param : row: ÆË¾÷À» ¶ç¿ï row : vxpt: xÁÂÇ¥ : vypt: yÁÂÇ¥ : flag: ó¹æº¹»ç½Ã ÀÚµ¿ ÆË¾÷ÀÎÁö üũ. ÀÚµ¿ ÆË¾÷ÀÏ °æ¿ì¿¡´Â È­¸éÀ» refresh ÇØÁà ¾î´À·Î¿ì¿¡¼­ ÆË¾÷À» ¶ç¿ì´ÂÁö È®Àΰ¡´ÉÇÏ°Ô ÇÑ´Ù. * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 14 */ function fPrcpDetl( row, vxpt, vypt, flag ) { var curRow = 0; if ( isNull(row)) { curRow = grd_prcplist.row; } else { curRow = row; } var sStatus = model.getValue( prcpNode + "[" + curRow + "]/status"); var prcpClsCd = model.getValue( prcpNode + "[" + curRow + "]/prcpclscd"); var prcpinptflag = model.getValue( prcpNode + "[" + curRow + "]/prcpinptflag"); if ( sStatus == "I" || sStatus == "U" || sStatus == "-" ) { if(typeof(ivw_prcpdetail) == "object" && ivw_prcpdetail.visible) { // ó¹æÈ­¸é ó¹æ»ó¼¼ ±â´É »ç¿ë½Ã 2014.07.16 ¾ö¿µ¸¸ if(flag == "auto") { if(prcpClsCd == "B4" || prcpClsCd == "C2" || prcpClsCd == "C6" || prcpClsCd == "Z0") { // ¼öÇ÷, ¿µ»ó »ó¼¼Ã¢ ÆË¾÷ µÇµµ·Ï } else if(prcpClsCd == "K2") { //KNUH, ¾à¼Óó¹æ º¹»ç ½Ã Ä¡½Ä ÆË¾÷ÀÌ Çѹø¸¸ ¶ß°í ´Ù¸¥ Ä¡°úó¹æ¿¡ µ¿ÀÏÇÏ°Ô Àû¿ëµÇµµ·Ï ÇÔ.(2011.03.28 JJE) if(flag == "auto" && prcpinptflag == "02" && model.instances(0).selectSingleNode("/root/main/toot_prcp/prcplist") != null){ } else { event.defaultAction = "cancel"; return true; } } else { event.defaultAction = "cancel"; return true; } } else { event.defaultAction = "cancel"; return true; } } if ( isNull ( vxpt )) vxpt = 395; var xpt = window.screenleft + vxpt; var ypt = 0; if ( isNull(vypt)) { if (event.screenY < 750 ) { ypt = event.screenY + 10; } else { ypt = event.screenY - 240; } } else { ypt = vypt; } var coord = getRelativeCoordinate ( xpt, ypt ); var mon = coord[0]; xpt = coord[1]; ypt = coord[2]; // //modal ( "SPMMO02800", mon, xpt, ypt); //return; if ( ( prcpClsCd == "A2" || prcpClsCd == "A4" ) && prcpinptflag != "35") { //¾à 20100507 ÀÚ°¡º¸À¯Ã³¹æÀº ÆË¾÷ ¶ßÁö ¾Ê´Â´Ù. by LYJ var prnscrID = getScreenID(); // PRN ó¹æ ÇÁ·Î¼¼½ºÀÇ Àû¿ë¹üÀ§( 󹿱îÁö or ¸¶½ºÅ͸¸)¿¡ µû¶ó »ó¼¼ ÆË¾÷ÀÇ ±â´ÉÀ» °áÁ¤ÇϱâÀ§ÇÑ ÆÄ¶ó¸ÞÅÍ set // 2010-01-02 by LYJ setParameter ( "SPMMO01100_prcp", prnscrID); setParameter ( "SPMMO01100_prndetl", model.getValue (prcpNode + "[" + curRow + "]/drprcpetc6")); modal ( "SPMMO01100", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); //20090218 ¸¶Á¤¹Î Ãß°¡ »êÁ¦ºÒ°¡ ¹× ÁÖÀÇ ¾àÀº ´ëüó¹æ ÆË¾÷À» ¶ç¿î´Ù. clearParameter ( "SPMMB10100_chkyn" ); if ( getParameter ( "SPMMO01100_powdaltdrug" ) == "2" ){ fAltDrug ( curRow, "4" ); } else if ( getParameter ( "SPMMO01100_powdaltdrug" ) == "1" ){ fAltDrug ( curRow, "5" ); } //È®ÀÎÀ» ´­·¶À» °æ¿ì. ´Ü ¼±ÅÃµÈ ´ëü¾àÀÌ ÀÖÀ» ¶§¸¸ SPMMB10100_chkyn = Y ó¸®ÇØ ÁØ´Ù. if ( getParameter ( "SPMMB10100_chkyn" ) == "Y" ) { var addRow = grd_prcplist.rows-2; fPrcpBuffer( 1, addRow, "/root/prcpdrag", prcpNode ); // ´ëü¾à ¹öÆÛ¿¡ º¹»ç model.removenode ( prcpNode + "[" + addRow + "]" ); // ´ëü¾à »èÁ¦ model.removenode ( prcpNode + "[" + curRow + "]" ); // ±âÁ¸¾à »èÁ¦ model.duplicate( "/root/main/prcp", "/root/prcpdrag/prcplist", "*[" + curRow + "]"); // ±âÁ¸¾àÀ» ´ëü¾àÀ¸·Î º¯°æ model.setValue ( prcpNode + "[" + curRow + "]/powdflag", "Y" ) model.removeNodeset ( "/root/prcpdrag/prcplist" ); makePrcpNm ( prcpNode, curRow ); model.recalculate(); model.refresh(); grd_prcplist.row = curRow; } else { if ( getParameter ( "SPMMO01100_powdaltdrug" ) == "1" ) { model.setValue ( prcpNode + "[" + curRow + "]/powdflag", "Y" ) makePrcpNm ( prcpNode, curRow ); } } clearParameter ( "SPMMO01100_powdaltdrug" ); clearParameter ( "SPMMB10100_chkyn" ); } else if ( prcpClsCd == "A6" && prcpinptflag !="35" ) { //ÁÖ»ç 20100507 ÀÚ°¡º¸À¯Ã³¹æÀº ÆË¾÷ ¶ßÁö ¾Ê´Â´Ù. by LYJ var prnscrID = getScreenID(); // PRN ó¹æ ÇÁ·Î¼¼½ºÀÇ Àû¿ë¹üÀ§( 󹿱îÁö or ¸¶½ºÅ͸¸)¿¡ µû¶ó »ó¼¼ ÆË¾÷ÀÇ ±â´ÉÀ» °áÁ¤ÇϱâÀ§ÇÑ ÆÄ¶ó¸ÞÅÍ set // 2010-01-02 by LYJ setParameter ( "SPMMO01200_prcp", prnscrID); setParameter ( "SPMMO01200_prndetl", model.getValue (prcpNode + "[" + curRow + "]/drprcpetc6")); modal ( "SPMMO01200", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); clearParameter ( "SPMMO01200_prcp"); } else if ( prcpClsCd == "F2" ) { //ÀçȰ modal ( "SPMMO01800", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "C2" || prcpClsCd == "C6" || prcpClsCd == "E2" ) { //¹æ»ç¼± °Ë»ç(±â´É°Ë»ç, ³»½Ã°æ,õÀÚ,»ý°Ë, ¹æ»ç¼±, ÇÙÀÇÇпµ»ó) modal ( "SPMMO01300", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); //start: ¿µ»ó °Ë»çÀÇ ÀÚµ¿ ÆË¾÷ ½Ã Ãë¼Ò ÇÒ °æ¿ì ó¹æÃ¢¿¡ ó¹æÀÌ ¶³¾îÁöÁö ¾Êµµ·Ï (2010.02.02 JJE) var prcptempNode = instance1.selectSingleNode("/root/prcptemp/prcplist"); if( prcptempNode == null && flag == "auto") setParameter("cnclCopyPrcpYN_Param", "Y"); // ÀÚµ¿ÆË¾÷ ÀÚµ¿ÆË¾÷ÀÏ °æ¿ì¿¡¸¸ »èÁ¦Çϵµ·Ï "auto" Á¶°ÇÃß°¡ //end } else if ( prcpClsCd == "G2" ) { //RT modal ( "SPMMO13300", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "B2" || prcpClsCd == "B6" ) { //Áø´Ü°Ë»ç (°Ëü°Ë»ç), ÇÙÀÇÇРü³» modal ( "SPMMO01400", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "B4" ) { //¼öÇ÷ (Ç÷¾×¼öÇ÷) modal ( "SPMMO01500", mon, xpt, ypt - 80, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "H2" ) { //¼ö¼ú modal ( "SPMMO01600", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); //Ä¡°ú ¼ö¼ú ó¹æ(´ëºÐ·ù:Ä¡°ú, Áߺзù:Ä¡°ú¼ö¼ú)ÀÎ °æ¿ì Ä¡½Ä ÆË¾÷ È£Ãâ (¿äû¹øÈ£:8731 2009.10.26 by JJE) if( getParameter("SPMMO01600_returnParam") == "Y" ){ //¼ö¼úÆË¾÷¿¡¼­ 'È®ÀÎ'ÇÑ °æ¿ì¿¡¸¸ Ä¡½ÄÆË¾÷ È£Ãâ(from ¼­¼Ò¿µ¼±»ý´Ô¿äû) var tempcol2 = model.getValue(prcpNode + "[ " + curRow + "]/tempcol2" ); var tootfact = model.getValue(prcpNode + "[ " + curRow + "]/tootfact" ); //by sonjy 20100304 ¼ö¼ú/Ä¡½Ä ÇʼöÀÔ·ÂÀϰæ¿ì·Î Á¦ÇÑ Á¶°Ç Ãß°¡ ¹× Ä¡½ÇÇʼöÀÔ·Â Ãß°¡. (¿©Àǵµ »óȲ½Ç ¿À·ù ): //±âÁ¸Àº Ä¡°ú ¼ö¼ú ó¹æ(´ëºÐ·ù:Ä¡°ú, Áߺзù:Ä¡°ú¼ö¼ú)°æ¿ì ÆË¾÷À¸·Î µÇ¾î ÀÖ¾úÀ½. var prcpessninptflag = model.getValue(prcpNode + "[ " + curRow + "]/prcpessninptflag" ); //if(tempcol2.substr(0, 5) == "17|02" && tootfact == "-" ){ if(( prcpessninptflag == "2" || ( prcpessninptflag == "5" && tempcol2.substr(0, 5) == "17|02" ) ) && tootfact == "-" ){ grd_prcplist.select(curRow,1,curRow,1)=true; fDentifmla("OP"); } } clearParameter("SPMMO01600_returnParam"); } else if ( prcpClsCd == "H4" ) { //óġ modal ( "SPMMO13100", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "K2" ) { //Ä¡°ú //KNUH, ¾à¼Óó¹æ º¹»ç ½Ã Ä¡½Ä ÆË¾÷ÀÌ Çѹø¸¸ ¶ß°í ´Ù¸¥ Ä¡°úó¹æ¿¡ µ¿ÀÏÇÏ°Ô Àû¿ëµÇµµ·Ï ÇÔ.(2011.03.28 JJE) if( flag == "auto" && prcpinptflag == "02" && model.instances(0).selectSingleNode("/root/main/toot_prcp/prcplist") != null ){ model.removeNode("/root/prcptemp"); model.makeNode("/root/prcptemp"); model.duplicate( "/root/prcptemp", "/root/main/toot_prcp/prcplist"); model.setValue("/root/prcptemp/prcplist/prcpcd" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpcd" )); model.setValue("/root/prcptemp/prcplist/prcpnm" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpnm" )); model.setValue("/root/prcptemp/prcplist/orgprcpnm" , model.getValue ( prcpNode + "[ " + curRow + "]/orgprcpnm" )); model.setValue("/root/prcptemp/prcplist/tempcol2" , model.getValue ( prcpNode + "[ " + curRow + "]/tempcol2" )); model.setValue("/root/prcptemp/prcplist/erprcpflag" , model.getValue ( prcpNode + "[ " + curRow + "]/erprcpflag" )); model.setValue("/root/prcptemp/prcplist/nigtprcpflag" , model.getValue ( prcpNode + "[ " + curRow + "]/nigtprcpflag" )); model.setValue("/root/prcptemp/prcplist/payflagcd" , model.getValue ( prcpNode + "[ " + curRow + "]/payflagcd" )); model.setValue("/root/prcptemp/prcplist/prcpdelivefact" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpdelivefact" )); model.setValue("/root/prcptemp/prcplist/precureprcpflag", model.getValue ( prcpNode + "[ " + curRow + "]/precureprcpflag" )); model.setValue("/root/prcptemp/prcplist/prcpqty" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpqty" )); model.setValue("/root/prcptemp/prcplist/prcpvol" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpvol" )); model.setValue("/root/prcptemp/prcplist/prcptims" , model.getValue ( prcpNode + "[ " + curRow + "]/prcptims" )); model.setValue("/root/prcptemp/prcplist/drprcpetc7" , model.getValue ( prcpNode + "[ " + curRow + "]/drprcpetc7" )); model.setValue("/root/prcptemp/prcplist/drprcpetc8" , model.getValue ( prcpNode + "[ " + curRow + "]/drprcpetc8" )); model.setValue("/root/prcptemp/prcplist/choiordflag" , model.getValue ( prcpNode + "[ " + curRow + "]/choiordflag" )); model.setValue("/root/prcptemp/prcplist/specdrid" , model.getValue ( prcpNode + "[ " + curRow + "]/specdrid" )); model.setValue("/root/prcptemp/prcplist/prcpexecdeptcd" , model.getValue ( prcpNode + "[ " + curRow + "]/prcpexecdeptcd" )); model.setValue("/root/prcptemp/prcplist/powdflag" , model.getValue ( prcpNode + "[ " + curRow + "]/powdflag" )); }else{ modal ( "SPMMO13200", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); if( flag == "auto" && prcpinptflag == "02" ){ model.makeNode("/root/main/toot_prcp"); model.duplicate( "/root/main/toot_prcp", "/root/prcptemp/prcplist"); } } } else if ( prcpClsCd == "03" ) { //½ÄÀÌ modal ( "SPMMO01700", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "I2" || prcpClsCd == "I4" ) { //¸¶Ãë modal ( "SPMMO02000", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "C4" ) { //angio modal ( "SPMMO02100", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); //start: ¿µ»ó °Ë»çÀÇ ÀÚµ¿ ÆË¾÷ ½Ã Ãë¼Ò ÇÒ °æ¿ì ó¹æÃ¢¿¡ ó¹æÀÌ ¶³¾îÁöÁö ¾Êµµ·Ï (2010.02.02 JJE) var prcptempNode = instance1.selectSingleNode("/root/prcptemp/prcplist"); if( prcptempNode == null && flag == "auto") setParameter("cnclCopyPrcpYN_Param", "Y"); // ÀÚµ¿ÆË¾÷ ÀÚµ¿ÆË¾÷ÀÏ °æ¿ì¿¡¸¸ »èÁ¦Çϵµ·Ï "auto" Á¶°ÇÃß°¡ //end } else if ( prcpClsCd == "D2" ) { //º´¸® modal ( "SPMMO02200", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "M2" ) { //Àç·á modal ( "SPMMO13400", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } else if ( prcpClsCd == "Z0" ) { // ±âŸÀÏ °æ¿ì óġ¿Í °°Àº È­¸éÀ¸·Î ¿ÀÇÂÇÑ´Ù. 2010. 12. 29) modal ( "SPMMO13100", mon, xpt, ypt, "prcpdetl", prcpNode + "[" + curRow + "]", prcpNode, "", false ); } if ( model.instances(0).selectNodes ("/root/prcptemp/prcplist").length == 0 ) return false; fPrcpDetlApp ( prcpClsCd, "/root/prcptemp/prcplist", "/root/main/prcp", curRow ); //M-SET ¸ðó¹æÀÎ °æ¿ì, prcphopedd¸¦ ÀÚó¹æ¿¡ µ¿ÀÏÇÏ°Ô Àû¿ë //2008. 07. 22 ¿ÀÁöÈÆ var prcpSetCd = model.getValue ("/root/main/prcp/prcplist[" + curRow + "]/prcpsetcd" ); var inclPrcpNo = model.getValue ("/root/main/prcp/prcplist[" + curRow + "]/inclprcpno" ); var prcpHopeDD = model.getValue ("/root/main/prcp/prcplist[" + curRow + "]/prcphopedd" ); if(prcpSetCd == "-" && inclPrcpNo > 0){ //¸ðó¹æÀÎ °æ¿ì, prcphopedd //alert(prcpSetCd + "," + inclPrcpNo + "," + prcpHopeDD); for(var i = 1; i <= grd_prcplist.rows; i++){ if(inclPrcpNo == model.getValue ("/root/main/prcp/prcplist[" + i + "]/inclprcpno")){ model.setValue("/root/main/prcp/prcplist[" + i + "]/prcphopedd", prcpHopeDD); } } } /* ¼öÇ÷ÀûÀÀÁõ ¹Ì ÀԷ½à ¼öÇ÷ ó¹æ »èÁ¦ ó¸® */ if ( getParameter ( "SPMMO01500_bprcpadapt" ) == "D" ){ fDeleteRow(); //È­¸é ´ÝÀºÈÄ focus¸¦ ´Ù½Ã grid·Î À̵¿½ÃŲ´Ù. model.setfocus( "grd_prcplist" ); //´õºí Ŭ¸¯ ÈÄ edit ¸ðµå·Î °¡´Â °ÍÀ» ¸·´Â´Ù. event.defaultAction = "cancel"; model.recalculate(); return false; } //È­¸é ´ÝÀºÈÄ focus¸¦ ´Ù½Ã grid·Î À̵¿½ÃŲ´Ù. model.setfocus( "grd_prcplist" ); //´õºí Ŭ¸¯ ÈÄ edit ¸ðµå·Î °¡´Â °ÍÀ» ¸·´Â´Ù. event.defaultAction = "cancel"; grd_prcplist.row = curRow; grd_prcplist.col = prcpnmCol; model.recalculate(); return true; } else if ( sStatus == "S" ) { //°Ë»ö¾ÈµÈ °ÍÀº ´õºíŬ¸¯Çصµ ¶ã °ÍÀÌ ¾ø´Ù. grd_prcplist.editCell(); return false; } } /**@desc : ó¹æ»ó¼¼ ÀԷ³»¿ëÀ» ¸ÞÀο¡ Àû¿ë * @param : prcpClsCd - ó¹æºÐ·ù * : strSrc - ¼Ò½º³ëµå * : strDest - ¸ñÀûÁö³ëµå * : row - ¼öÁ¤ÇÒ row * @authur : ¸¶Á¤¹Î 2007. 3. 14 */ function fPrcpDetlApp ( prcpClsCd, strSrc, strDest, row ) { var srcNodeList = model.instances(0).selectNodes( strSrc ); var destNode = model.instances(0).selectSingleNode( strDest ); var srchRow = model.instances(0).selectNodes( prcpNode ).length; var curRow = row; gGridUpdateChk("det_per"); // ÀÓ½ÃÀúÀå ¼öÁ¤ ¸ðµå if ( srcNodeList != null && srcNodeList.length > 0) { /*if ( prcpClsCd == "B2" || prcpClsCd == "B6" ) { //Áø´Ü°Ë»ç (°Ëü°Ë»ç), ÇÙÀÇÇРü³» for(var i = 1; i <= srcNodeList.length; i++) { makePrcpNm ( strSrc, i ); if ( i == 1 ){ //¿¬¼Ó°Ë»çÀÌ°Ç ¾Æ´Ï°Ç ÆË¾÷ ¶ç¿î row´Â replace var srcSingleNode = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" ); destNode.replaceChild( srcNodeList.item(i-1).cloneNode(true), srcSingleNode); } else {//Ãß°¡µÈ ³»¿ëÀº °Ë»öµÚ¿¡ ºÙÀ½ model.duplicate ( strDest, strSrc + "[" + i + "]", "*[" + srchRow + "]" ); srchRow++; } } } else*/ if ( prcpClsCd == "03" ) { //½ÄÀÌ var chkcnt = getParameter( "SPMMO01700_chkcnt" ); var dietcnt = 0; //ÆË¾÷¿¡¼­ üũÇÑ °ªÀÌ 1À̰í ó¹æÈ­¸éÀÇ ½ÄÀÌ󹿵µ 1°³ÀÌ¸é °ªÀ» ¾ø´Â´Ù. var srcNodeListChk = model.instances(0).selectNodes ( prcpNode + "[prcpclscd='03']" ); if ( chkcnt == "1" && srcNodeListChk.length == 1 ) { makePrcpNm ( strSrc, 1 ); var srcSingleNode = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" ); destNode.replaceChild( srcNodeList.item(0).cloneNode(true), srcSingleNode); } else { for(var i = 1; i <= srcNodeList.length; i++) { makePrcpNm ( strSrc, i ); var dietprcpgenrflag = model.getValue ( strSrc + "[" + i + "]/dietprcpgenrflag" ); var srcSingleNode = instance1.selectSingleNode( prcpNode + "[prcpclscd='03' and dietprcpgenrflag='" + dietprcpgenrflag + "']" ); var checkFlag = model.getValue ( prcpNode + "[" + curRow + "]/dietprcpgenrflag" ); if ( checkFlag == "-" ) { var srcNodeCur = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" ); destNode.replaceChild( srcNodeList.item(i-1).cloneNode(true), srcNodeCur); } else if (srcSingleNode != null) { destNode.replaceChild( srcNodeList.item(i-1).cloneNode(true), srcSingleNode); } else { //Ãß°¡µÈ ³»¿ëÀº duplicate model.duplicate ( strDest, strSrc + "[" + i + "]", "*[" + srchRow + "]" ); dietcnt++; //½ÄÀÌ ÀÚµ¿ÆË¾÷ ¶§¹®¿¡ Ãß°¡Çß´Ù. srchRow++; } } } } else { makePrcpNm ( strSrc, 1 ); var srcSingleNode = instance1.selectSingleNode(prcpNode + "[" + curRow + "]" ); destNode.replaceChild( srcNodeList.item(0).cloneNode(true), srcSingleNode); } model.removeNodeset(strSrc); model.setValue ( prcpNode + "[" + curRow + "]/tempcol9", "" ); fPrcpColor(); fSetCpVal( row, "U"); model.refresh(); } } /**@desc : ó¹æ ¿À¸¥ÂÊ ¸¶¿ì½º ÆË¾÷ ó¸® * @id : grd_prcplist * @event : onmousedown * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 25 */ function fMouseRghtBtnPopup() { if (event.button == 3) { if (grd_prcplist.mouseRow == 0) { /* if (grd_prcplist.mouseCol == prcpVolCol || grd_prcplist.mouseCol == prcpQtyCol || grd_prcplist.mouseCol == prcpDayNoCol ) { app.showPopupMenu(false); var xpt = window.screenleft + 323 + event.x; var ypt = window.screenTop + 160 + event.y; modal ("SPMMO10400", 2, xpt, ypt); //ÀÏ´Ü ÀϰýÀÔ·ÂÀº ¸·¾Ò´Ù. } */ } if(grd_prcplist.isCell(event.target) && grd_prcplist.mouseRow >= grd_prcplist.fixedRows){ app.showPopupMenu(true); var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" ); if ( prcpgenrflag == "O" ) { setPopupMenu("grd_prcplist", false, "/root/init/omsrght/mouserght", "label", "func"); //¸Þ´ºÈ£Ãâ¹æ½Äº¯°æ JJE } else if ( prcpgenrflag == "E" ) { setPopupMenu("grd_prcplist", false, "/root/init/emsrght/mouserght", "label", "func"); //¸Þ´ºÈ£Ãâ¹æ½Äº¯°æ JJE } else { setPopupMenu("grd_prcplist", false, "/root/init/imsrght/mouserght", "label", "func"); //¸Þ´ºÈ£Ãâ¹æ½Äº¯°æ JJE } } else { window.setPopupMenu(false); } } } function fDrugInfo() { model.setValue ( "/root/hidden/receivedata/srchdrugcd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" )); //open("SMADB01900",0,0,0,"SMADB01900","¾àÄÚµå","/root/hidden/receivedata/srchdrugcd"); //2008. 07. 08 ¿ÀÁöÈÆ //¾àǰÆí¶÷ Á¶È¸ È­¸é open½Ã ¾àÄÚµå parameter±âº» ¼³Á¤ open("SMADB01900", 0, 0, 0, "SMADB01900", "/root/hidden/receivedata","/root/hidden/receivedata"); } function fPrnDrugInfo() { model.setValue ( "/root/hidden/receivedata/srchdrugcd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" )); //2011. 05. 23 ¾ö¿µ¸¸ //PRN Á¶È¸Ã¢ open½Ã ¾àÄÚµå parameter±âº» ¼³Á¤ setParameter("SPMMO33800_search_code", model.getValue("/root/hidden/receivedata/srchdrugcd")); open("SPMMO33800", 0, 0, 0, "SPMMO33800", "",""); } function fWarnDrugInfo() { // °íÁÖÀÇ ÀǾàǰ Á¶È¸ model.setValue ( "/root/hidden/receivedata/srchdrugcd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" )); setParameter("SMADB04200_search_code", model.getValue("/root/hidden/receivedata/srchdrugcd")); open("SMADB04200", 0, 0, 0, "SMADB04200", "",""); } function fCdssDrugInfo(kindflag) { model.makeValue ( "/root/hidden/receivedata/pYakpumCd", model.getValue ( prcpNode + "[" + grd_prcplist.row + "]/prcpcd" )); model.makeValue ( "/root/hidden/receivedata/pageNav", kindflag); modal("SMZCN00301", 0, 0, 0, "SMZCN00301", "/root/hidden/receivedata","/root/resultParam"); } // DUR ¾àǰÆí¶÷-ºÎÀÛ¿ë function fCdssDrugInfo3() { fCdssDrugInfo("3"); } // DUR ¾àǰÆí¶÷-»óÈ£ÀÛ¿ë function fCdssDrugInfo4() { fCdssDrugInfo("4"); } // DUR ¾àǰÆí¶÷-ÁÖÀÇ»çÇ× function fCdssDrugInfo5() { fCdssDrugInfo("5"); } /**@desc : ¼±ÅÃÁ¦¿Ü »èÁ¦ * @return : void * @authur : ¸¶Á¤¹Î 2007. 10. 16 */ function fDeleteElseRow() { var selectedRows = grd_prcplist.selectedRows; for (var i=0; i< selectedRows; i++) { model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/tempcol6", "select" ); } grd_prcplist.select(1, 1, grd_prcplist.rows-2, 1) = true; for ( var i=1; i < grd_prcplist.rows; i++ ) { if ( model.getValue ( prcpNode + "[" + i + "]/tempcol6" ) == "select" ) { grd_prcplist.select ( i, 1 ) = false; } model.setValue ( prcpNode + "[" + i + "]/tempcol6", "" ); } fDeleteRow(); } /**@desc : ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ »èÁ¦ * @ : ½Å±ÔÀÏ ¶§´Â removeNode * @ : ¼öÁ¤ÁßÀÏ ¶§ ¿øº¹½ÃŲ ÈÄ »èÁ¦, D/C Ç¥½Ã * @ : »èÁ¦, D/C ¿øº¹½Ãų·Á¸é ? ¿À¸¥ÂÊ ¸¶¿ì½º¿¡ »èÁ¦ ¹× D/C ¿øº¹ * @ : D/C ÈÄ »èÁ¦´Â ºÒ°¡ * @id : grd_prcplist * @event : ¿À¸¥ÂÊ ¸¶¿ì½º Ŭ¸¯ »èÁ¦ * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 26 */ function fDeleteRow(flag) { var node = instance1.selectSingleNode("/root/main/prcp"); var selectedRows = grd_prcplist.selectedRows; if( model.getValue ( "/root/cp" ) == "Y" && model.getValue(node + "/prcplist[1]/status") == "S" ){ selectedRows = grd_errprcplist.selectedRows; } var cnt=0; if ( flag != "noselect" ){ if (grd_prcplist.row < 0 ){ return; } } //SON0919 ¿ø³»/¿ø¿Ü»çÀ¯ ó¸® °ü·Ã Ãß°¡ by sonjy start var hosinprcpresncd = ""; var prcpkindcd = ""; //SON0919 end if ( flag != "noselect" ){ for (i= selectedRows-1; i >= 0; i--){ var status = model.getValue ( prcpNode + "[" + i + "]/status" ); if ( status != "D" ) { //ó¹æ¿¡¼­ ½Ç¼ö·Î º¹»çÇÒ °æ¿ì Áö¿ìÁö ¸øÇÏ¸é ¹®Á¦°¡ µÊÀ¸·Î ÀÏ´Ü ÁÖ¼®À¸·Î ¸·¾Ò´Ù. //ÀÀ±ÞÀÇ·á°ü¸®·á »èÁ¦½Ã /*if ( model.getValue ( "/root/patflag/list/prcpgenrflag" ) =="E" ) { var prcpcd = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcpcd" ); if ( "AC103" == prcpcd || "ACD0005" == prcpcd ){ messageBox ( "ÀÀ±ÞÀÇ·á°ü¸®·á´Â »èÁ¦°¡ ºÒ°¡ÇÕ´Ï´Ù. ¿À¸¥Âʸ¶¿ì½º > ÀÀ±ÞÀÇ·á°ü¸®·á¸¦ ÀÌ¿ëÇÏ¿© ¼öÁ¤ÇÏ¿© ÁֽʽÿÀ", "E" ); continue; } }*/ var deleteflag = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/tempcol6" ); if ( deleteflag != "D" ) { //ÀÌ¹Ì »èÁ¦ Ç¥½ÃµÈ°ÍÀº Á¦¿ÜÇϰí //Á¾¼Óó¹æ üũ var inclprcpno = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/inclprcpno" ); if ( !isNull(inclprcpno) && inclprcpno != "-" ) { if ( eval(inclprcpno) > 0 ) { //Á¾¼Óó¹æÀ̸é for ( var j = 1; j < grd_prcplist.rows; j++ ) { if ( inclprcpno == model.getValue ( prcpNode + "[" + j + "]/inclprcpno" )) { // °°Àº Á¾¼Óó¹æÀº ¸ðµÎ »èÁ¦ÀÌ´Ù. model.setValue ( prcpNode + "[" + j + "]/tempcol6", "D" ); } } } } model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/tempcol6", "D" ); } } else { // °°Àº Á¾¼Óó¹æÀº ¸ðµÎ »ì¾Æ³­´Ù. var inclprcpno = model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/inclprcpno" ); if ( !isNull(inclprcpno) && inclprcpno != "-" ) { if ( eval(inclprcpno) > 0 ) { //Á¾¼Óó¹æÀ̸é for ( var j = 1; j < grd_prcplist.rows; j++ ) { if ( inclprcpno == model.getValue ( prcpNode + "[" + j + "]/inclprcpno" )) { model.setValue ( prcpNode + "[" + j + "]/status", "-" ); } } } } } } } var grdrows = grd_prcplist.rows; for (var i = grdrows -1 ; i >= 1; i-- ) { if ( model.getValue ( prcpNode + "[" + i + "]/tempcol6" ) == "D" ) { model.setValue ( prcpNode + "[" + i + "]/tempcol6", "" ); //»èÁ¦ Ç¥½Ã clear model.setValue ( prcpNode + "[" + i + "]/prcpmixno", "-" ); //mix clear var status = model.getValue ( prcpNode + "[" + i + "]/status" ); if (status == "S" ) { model.setValue ( prcpNode + "[" + i + "]/prcpnm", "" ); } else if ( status =="I" || status == "" ) { //SON0919 ¿ø³»/¿ø¿Ü»çÀ¯ ó¸® °ü·Ã Ãß°¡ by sonjy start //SON1107 DSC Åð¿ø¾àµµ ¿Ü·¡¿¡ ÁØÇÏ¿© ó¸®. º¯°æ°³¹ß¿äû¼­ 20081013-93¿¡ ÀǰŠ=> °£È£ÁغñµÉ¶§±îÁö ¿øº¹ ... prcpkindcd = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/prcpkindcd" ); if( model.getValue ("/root/patflag/list/prcpgenrflag") == "O" || (model.getValue ("/root/patflag/list/prcpgenrflag") == "E" && model.getValue ( "/root/init/erresn" ) != "G3" && prcpkindcd == "60" ) || (model.getValue ("/root/patflag/list/prcpgenrflag") == "D" && prcpkindcd == "60" ) ){ if( hosinprcpresncd == "" && ( model.getValue ( "/root/main/prcp/prcplist[" + i + "]/hosinprcpresncd " ) == "45" || model.getValue ( "/root/main/prcp/prcplist[" + i + "]/hosinprcpresncd " ) == "47") ) { hosinprcpresncd = model.getValue ( "/root/main/prcp/prcplist[" + i + "]/hosinprcpresncd " ) ; } } //SON0919 end fPrcpBuffer( ++cnt, i, "/root/prcpdel", prcpNode ); model.removeNode ( prcpNode + "[" + i + "]" ); } else if ( status =="-" || status =="U" ) { model.setValue ( prcpNode + "[" + i + "]/status", "D" ); } else if ( status =="D" ) { model.setValue ( prcpNode + "[" + i + "]/status", "-" ); } } } for (var i=grd_prcplist.rows -1 ; i >= 1; i-- ) { var chkPrcpmixno = model.getValue ( prcpNode + "[" + i + "]/prcpmixno" ); if ( chkPrcpmixno != "-" && !isNull(chkPrcpmixno)) { //¹Í½º¹øÈ£°¡ ÀÖ°í »èÁ¦°¡ ¾Æ´Ñ °ÍÁß¿¡ È¥ÀÚ ³²¾Æ ÀÖ´Â ¹Í½º¹øÈ£¶ó¸é Ç®¾îÁØ´Ù. var srcNodeList = model.instances(0).selectNodes ( prcpNode + "[prcpmixno='" + chkPrcpmixno + "']" ); if ( srcNodeList.length <= 1) { model.setValue ( prcpNode + "[" + i + "]/prcpmixno", "-" ); } } } // ó¹æ ½Å±ÔÄڵ忡¼­ ¼öÁ¤ ¸ðµå°¡ ¾Æ´Ò¶§¸¸ rebuild - 20090630 by Moonsh var modiflag = model.getValue("/root/init/rowmodify/modiflag"); if ( modiflag != "Y" ){ grd_prcplist.rebuild(); fPrcpColor(); } //SON0919 ¿ø³»¿ø¿Ü°ü·Ã Ãß°¡ by sonjy if( hosinprcpresncd != "" ){ fChngHosinPrcpResn () ; } //SON0919 end model.recalculate(); // e if(typeof(ivw_prcpdetail) == "object" && ivw_prcpdetail.visible) { // 󹿻ó¼¼È­¸é Àç¼³Á¤ ivw_prcpdetail.window.javascript.fPrcpClick(); } } /**@desc : Áø´Ü¼öÁ¤. * @ : ½Å±ÔÀ϶§´Â ¼öÁ¤Ç¥½Ã ¾ÈÇÔ. * @ : »èÁ¦,D/C »óÅÂÀ϶§´Â Ãë¼ÒÈÄ ¼öÁ¤. * @id : grd_prcplist * @event : xforms-value-changed * @return : void * @authur : ¸¶Á¤¹Î 2007. 3. 27 */ function fCnclDel() { var selectedRows = grd_diaglist.selectedRows; for (var i=0; i< selectedRows; i++) { var status = model.getValue (diagNode + "[" + grd_diaglist.selectedrow(i) + "]/status"); if (status == "C" || status == "D"){ model.setValue (diagNode + "[" + grd_diaglist.selectedrow(i)+ "]/status", "-"); } } } /**@desc : ÇÔ¼ö È£Ãâ½Ã ¼±ÅÃµÈ µ¥ÀÌÅ͸¦ ƯÁ¤ ³ëµå¿¡ ´ã¾ÆµÐ´Ù. * @param1 : bufCnt: ù¹øÂ° cntÀ϶§ ±âÁ¸ ³ëµå¸¦ »èÁ¦Çϱâ À§ÇÑ count * @param2 : bufRow: ³ëµå¿¡ ´ã¾Æ³õÀ» ±×¸®µå row * @param4 : strDest: ¸ñÀûÁö ÁÖ¼Ò°ª * @param3 : strSrc: Ãâ¹ßÁö ÁÖ¼Ò°ª * @return : void * @authur : ¸¶Á¤¹Î 2007. 4. 3 */ function fPrcpBuffer( bufCnt, bufRow, strDest, strSrc ) { if (bufCnt == 1) { //ù¹øÂ° µ¥ÀÌÅÍÀÌ¸é ±âÁ¸ ³ëµå¸¦ »èÁ¦ÇÑ´Ù. model.removeNodeset(strDest); //³ëµå¸¦ ¸ðµÎ »èÁ¦ Ç߱⠶§¹®¿¡ ´ë»ó ³ëµå¸¦ Çϳª ¸¸µç´Ù. model.makeNode(strDest); } // º¹»çÇÒ ¼Ò½º³ëµå¸¦ ¼±ÅÃÇÑ´Ù. var srcNodeList = model.instances(0).selectNodes( strSrc ); //º¹»çÇϱâ À§ÇØ ´ë»ó³ëµå¸¦ ¼±ÅÃÇÑ´Ù. var destNode = model.instances(0).selectSingleNode(strDest); //´ë»ó³ëµå·Î º¹»çÇÑ´Ù. destNode.appendChild(srcNodeList.item(bufRow-1).cloneNode(true)); } /**@desc : ¸¶Áö¸· »èÁ¦½Ã ¹öÆÛ¿¡ ´ã°ÜµÐ °ÍÀ» µÇ»ì¸°´Ù. * @id : btn_undo * @event : DOMActivate * @return : void * @authur : ¸¶Á¤¹Î 2007. 4. 3 */ function fDelUndo () { //fGetRsrvPrcp(); // º¹»çÇÒ ¼Ò½º³ëµå¸¦ ¼±ÅÃÇÑ´Ù. var srcNodeList = model.instances(0).selectNodes("/root/prcpdel/prcplist"); //º¹»çÇϱâ À§ÇØ ´ë»ó³ëµå¸¦ ¼±ÅÃÇÑ´Ù. if ( srcNodeList.length == 0 ) { messageBox ( "µÇ»ì¸± »èÁ¦ µ¥ÀÌÅͰ¡", "I004" ); return; } var prcpdd = model.getValue ( "/root/init/prcpdd" ); //»èÁ¦½Ã ·çÇÁ°¡ µÚ¿¡¼­ ºÎÅ͵¹¸ç buffer instance¿¡ ÀúÀåÇϱ⠶§¹®¿¡ ºÒ·¯ ¿Ã¶§µµ µÚ¾î¼­ºÎÅÍ ºÒ·¯¿Í »èÁ¦½Ã ¼ø¼­¸¦ ¸ÂÃá´Ù. var insRow = grd_prcplist.rows - 1; for (i= srcNodeList.length; i >= 1; i--) { //´ë»ó³ëµå·Î º¹»çÇÑ´Ù. model.setValue ( "/root/prcpdel/prcplist[" + i + "]/prcppkspec", prcpdd + "|0|0|" + getUserInfo("dutplceinstcd")); prcphopedd = model.getValue ( "/root/prcpdel/prcplist[" + i + "]/prcphopedd" ); if ( isNull(prcphopedd) || prcphopedd == "-" ) { prcphopedd = prcpdd; } if ( prcphopedd < prcpdd ) { model.setValue ( "/root/prcpdel/prcplist[" + i + "]/prcphopedd", prcpdd ); } model.duplicate ( "/root/main/prcp", "/root/prcpdel/prcplist[" + i + "]", "*[" + insRow + "]" ); insRow++; } model.recalculate(); grd_prcplist.refresh(); fPrcpColor(); //µÇ»ì¸®±â Çѹø¸¸ ÇØ´Þ¶ó´Â ÀåÈ¿Àº ¼±»ý´Ô ¿äû model.removeNodeset ( "/root/prcpdel/prcplist" ); } /**@desc : drag ½Ã À̵¿ÇÒ grid ÀνºÅϽº ÀúÀå * @id : grd_prcplist * @event : ondragstart * @return : void * @authur : ¸¶Á¤¹Î 2007. 4. 04 */ function fGridDrag() { var selectedRows = grd_prcplist.selectedRows; var cnt=0; for (var i=0; i< selectedRows; i++) { if (model.getValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/status") != "S" ){ //°Ë»öÀº µå·¡±× ¾ÈÇÑ´Ù. //dropÈÄ drop³»¿ëÀ» »öÄ¥Çϱâ À§ÇØ ¹öÆÛ·Î º¸³¾ ³ëµå¿¡ S¸¦ Ç¥½ÃÇÑ´Ù. model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcprefseq", "S"); fPrcpBuffer( ++cnt, grd_prcplist.selectedrow(i), "/root/prcpdrag", prcpNode ) //¹öÆÛ¿¡ ÀúÀåÀº µÆ´Ù. dropÈÄ º»Ã¼¸¦ »èÁ¦Çϱâ À§ÇØ º»Ã¼¿¡ Ç¥½ÃÇØ µÐ´Ù. model.setValue ( prcpNode + "[" + grd_prcplist.selectedrow(i) + "]/prcprefseq", "D"); } } grd_prcplist.rebuild(); } /**@desc : dropÀ§Ä¡¿¡ ÀνºÅϽº mapping, º»Ã¼ remove, À̵¿ÇÑ row select * @id : grd_prcplist * @event : ondrop * @return : void * @authur : ¸¶Á¤¹Î 2007. 4. 04 */ function fGridDrop( dropRow ) { if( dropRow != -1 ) { //dropÇÒ ±×¸®µå row°¡ ÀÖÀ» ¶§¸¸ µ¿ÀÛÇÑ´Ù. //¸Ç³¡ÁÙ·Î À̵¿ÇßÀ» °æ¿ì´Â ±× À§ÁÙ·Î drop µÇ°Ô ÇØ³õ¾Ò´Ù. ¿Ö³ÄÇÏ¸é °Ë»öÀ» Á¦ÀÏ ¾Æ·¡ ÁÙ·Î ¸¸µé±â À§Çؼ­´Ù. //¾Æ·¡ ·ÎÁ÷À» Ç®¸é ¸Ç ¾Æ·¡·Îµµ À̵¿ °¡´ÉÇÏ´Ù. if ( dropRow == ( grd_prcplist.rows - 1)){ dropRow = dropRow -1; } var srcNodeList = model.instances(0).selectNodes("/root/prcpdrag/prcplist"); var destNode = model.instances(0).selectSingleNode("/root/main/prcp"); var row; var selStart; var selEnd; var cnt=0; //=========== drop ½ÃÀÛ //Áß°£¿¡ ³¢¿ö ³Ö´Â °ÍÀ̶ó¸é duplicate if (dropRow != (grd_prcplist.rows-1) ){ for (var i=1; i<=srcNodeList.length; i++) { row = dropRow + i; model.duplicate("/root/main/prcp", "/root/prcpdrag/prcplist[" + i + "]", "*[" + row + "]"); } } else { //¸¶Áö¸· ÁÙ¿¡ ºÙÇô ³Ö´Â°ÍÀº appendChild for (i= 0; i=1; i--) { if (model.getValue ( prcpNode + "[" + i + "]/prcprefseq") == "D" ){ model.removeNode ( prcpNode + "[" + i + "]" ); } } //=========== drop ³¡ grd_prcplist.rebuild(); //rebuild¸¦ ¸¶Áö¸·¿¡ Çϸé select°¡ Ç®¸°´Ù. model.recalculate(); //=========== select ½ÃÀÛ for (var i = 1; i < grd_prcplist.rows; i++ ) { if (model.getValue ( prcpNode + "[" + i + "]/prcprefseq") == "S" ){ if (cnt==0){ //½ÃÀÛÁ¡À» Àâ´Â´Ù. selStart = i; } cnt++; model.setValue ( prcpNode + "[" + i + "]/prcprefseq",""); //Ãß°¡ drag and dropÀ» À§ÇØ ÃʱâÈ­ ÇÑ´Ù. } } selEnd = selStart + srcNodeList.length-1; grd_prcplist.select(selStart, prcpnmCol, selEnd, prcpnmCol) = true; //=========== select ³¡ } else { //¾û¶×ÇÑ °÷¿¡ drop ÇÒ ¶§ °¡Áö°í ÀÖ´ø °ªÀ» ÃʱâÈ­ ÇÑ´Ù. for (var i = 1; i < grd_prcplist.rows; i++ ) { model.setValue ( prcpNode + "[" + i + "]/prcprefseq","" ); } } } /**@desc : ó¹æ µ¥ÀÌÅÍ ÀúÀå½Ã ÀúÀåÇÒ µ¥ÀÌÅͰ¡ ÀÖ´Â Áö check * @param : prcpflag: ÀúÀå À§Ä¡ ±¸ºÐ. 0Àº ¸ÞÀÎ * @return : 0:ÀÎÁõÀúÀå(Áø´Ü+»óº´), 1:ÀÎÁõÀúÀå(Áø´Ü), 2:ÀÎÁõÀúÀå(ó¹æ), 4:ÀÓ½ÃÀúÀå(ó¹æ), 5:ÀÓ½ÃÀúÀåDC(ó¹æ), 6:ÀÓ½ÃÀúÀå(Áø´Ü+ó¹æ), 7:ÀÓ½ÃÀúÀå(Áø´Ü) * @authur : ¸¶Á¤¹Î 2007. 4. 04 */ function fSaveExistCheck(savekindflag, patyn) { var srcNodeList = 0; var prcpCnt = 0; var tempPrcpCnt = 0; var tempDcPrcpCnt = 0; var tempDiagPrcpCnt = 0; var diagCnt = 0; var status = ""; if (isNull(savekindflag)) savekindflag = "0"; if ( savekindflag == "0" ) { srcNodeList = model.instances(0).selectNodes("/root/main/prcp/prcplist"); for ( i=1; i <= srcNodeList.length; i++ ) { if (patyn == "Y") { if ( model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "S" && model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "-" ){ prcpCnt++; } } else { if ( model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "S" ){ prcpCnt++; } } } dcNodeList = model.instances(0).selectNodes("/root/prcpdc/prcplist"); for ( i=1; i <= dcNodeList.length; i++ ) { prcpCnt++; } diagNodeList = model.instances(0).selectNodes( "/root/main/diaginfo/diagcdlist" ); for ( i=1; i <= diagNodeList.length; i++ ) { status = model.getValue( "/root/main/diaginfo/diagcdlist[" + i + "]/status" ); if (patyn == "Y") { if ( status != "S" && status != '-' && status != 'T' ){ diagCnt++; } } else { if ( status != "S" && status != '-' ){ diagCnt++; } } } } else if ( savekindflag == "1" ) { srcNodeList = model.instances(0).selectNodes("/root/main/prcp/prcplist"); for ( i=1; i <= srcNodeList.length; i++ ) { if ( model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "S" && model.getValue( "/root/main/prcp/prcplist[" + i + "]/status" ) != "-" ){ tempPrcpCnt++; } } dcNodeList = model.instances(0).selectNodes("/root/prcpdc/prcplist"); for ( i=1; i <= dcNodeList.length; i++ ) { tempDcPrcpCnt++; } if ( tempDcPrcpCnt > 0 ) { return 5; } diagNodeList = model.instances(0).selectNodes( "/root/main/diaginfo/diagcdlist" ); for ( i=1; i <= diagNodeList.length; i++ ) { status = model.getValue( "/root/main/diaginfo/diagcdlist[" + i + "]/status" ); if ( status != "S" && status != '-' ){ diagCnt++; } } if ( diagCnt > 0 && tempPrcpCnt > 0 && savekindflag == "1" ) { return 6; } if ( diagCnt > 0 && tempPrcpCnt == 0 && savekindflag == "1" ) { return 7; } } if ( prcpCnt > 0 && diagCnt > 0) { // 󹿵µ Á¸Àç, Áø´Üµµ Á¸Àç return 0; } else if ( diagCnt > 0 ) { // Áø´Ü¸¸ Á¸Àç return 1; } else if ( prcpCnt > 0 ) { // 󹿏¸ Á¸Ã¤ return 2; } else if ( tempPrcpCnt > 0 ) { // ÀÓ½Ã󹿏¸ Á¸Àç return 4; } return -1; } /**@desc : ó¹æ µ¥ÀÌÅÍ ÀúÀå * @param : prcpflag: 󹿱¸ºÐ 0: ( ÀÇ»çó¹æ, CP, Ç×¾ÏÇÁ·ÎÅäÄÝ, ÀÓ½Ã), 2:°£È£, 4:Áö¿øºÎ¼­ savekindflag: 0:ÀÎÁõÀúÀå, 1:ÀÓ½ÃÀúÀå prcpchkflag: ÀúÀåÇϽðڽÀ´Ï±î µî ¸Þ½ÃÁö¸¦ ¶ç¿ï°ÍÀÎÁö check * @return : true, false * @authur : ¸¶Á¤¹Î 2007. 4. 04 */ function fPrcpSave( prcpflag, savekindflag, saveNode, prcpchkflag ) { var startStepDate = new Date(); // °¢ ¾÷ºÎ ½ÃÀÛ ½Ã°£ var stepElapsed = null; var endStepDate = null; // °¢ ¾÷ºÎ Á¾·áÈÄ ½Ã°£ var sRTC = "/root/prcpsave/rtc"; // ó¹æÀúÀå ½Ç½Ã°£ üũ(RealTimeCheck)º¯¼ö ³ëµå °æ·Î model.setValue ( "/root/send/cond1", model.getValue ( "/root/paminfo/list/instcd" )); model.setValue ( "/root/send/cond2", model.getValue ( "/root/paminfo/list/ioflag" )); model.setValue ( "/root/send/cond3", model.getValue ( "/root/paminfo/list/pid" )); if(model.getValue ( "/root/paminfo/list/ioflag" ) == "O" || model.getValue ( "/root/paminfo/list/ioflag" ) == "S") { model.setValue ( "/root/send/cond4", model.getValue ( "/root/paminfo/list/orddd" )); } else { model.setValue ( "/root/send/cond4", model.getValue ( "/root/paminfo/list/indd" )); } model.setValue ( "/root/send/cond5", model.getValue ( "/root/paminfo/list/cretno" )); model.setValue ( "/root/send/cond6", getUserInfo("userid") ); model.setValue ( "/root/send/cond7", getUserInfo("dutplcecd") ); submit ( "TRMMO00148", false ); // ó¹æÀúÀå ½Ç½Ã°£ üũ(RealTimeCheck)º¯¼ö ¼³Á¤ try { fPrcpSave_new( prcpflag, savekindflag, saveNode, prcpchkflag ); } catch(err) { messageBox ( "fPrcpSave() ½ÇÇà Áß ¿À·ù°¡ ¹ß»ý ÇÏ¿´½À´Ï´Ù. Àü»ê½Ç(6598)·Î ¿¬¶ô ºÎʵ右´Ï´Ù.", "E" ); } finally { model.removeNodeset(sRTC); } //endStepDate = new Date(); // °¢ ¾÷ºÎ Á¾·áÈÄ ½Ã°£ //stepElapsed = endStepDate.getTime() - startStepDate.getTime(); // È­¸é ¿À·ù üũÀü ó¸® ¼Ò¿ä½Ã°£ // ¼ÓµµÃ¼Å©¸¦ À§ÇÑ ¸ð´ÏÅ͸µ ·Î±× µ¥ÀÌÅÍ »ý¼º. //reqSetMonitoringLog( "PrcpSave" + sNewLogic, stepElapsed); } function fPrcpSave_new( sPrcpFlag, sSaveKindFlag, saveNode, sPrcpChkFlag ) { //model.addlog("SPEED CHECK START OF fPrcpSave()"); //model.addlog(" SPEED CHECK START OF 󹿰¡´Éüũ(È­¸é)"); var sRTC = "/root/prcpsave/rtc"; // ó¹æÀúÀå ½Ç½Ã°£ üũ(RealTimeCheck)º¯¼ö ³ëµå °æ·Î //ó¹æ ½Ã°£À» °è»êÇϱâ À§ÇØ º¯¼ö Ãß°¡ 2012.11.19 ¾ö¿µ¸¸ var startStepDate = new Date(); // °¢ ¾÷ºÎ ½ÃÀÛ ½Ã°£ var endStepDate = null; // °¢ ¾÷ºÎ Á¾·áÈÄ ½Ã°£ var step1Elapsed = null; // È­¸é ¿À·ù üũÀü ó¸® ¼Ò¿ä½Ã°£ var step2Elapsed = null; // ¼­¹ö ¿À·ù üũ ¼Ò¿ä½Ã°£ var step3Elapsed = null; // È­¸é ¼­¹ö ¿À·ù ó¸® ¼Ò¿ä½Ã°£ var step4Elapsed = null; // ¼­¹ö ½ÇÁ¦ ÀúÀå ¼Ò¿ä½Ã°£ var step5Elapsed = null; // È­¸é ÀúÀåÈÄ Ã³¸® ¼Ò¿ä ½Ã°£ var nPrcpCnt = 0; // ó¹æ °¹¼ö var nDiagCnt = 0; // Áø´Ü °¹¼ö var xpt = window.screenleft + 200; var ypt = window.screenTop + 100; var coord = getRelativeCoordinate ( xpt, ypt ); var mon = coord[0]; xpt = coord[1]; ypt = coord[2]; var sCpFlag = model.getValue("/root/cp"); // CP ¿©ºÎ var sAddPrcp = model.getValue("/root/addprcp"); // ½ÃÇàºÎ¼­ ó¹æ¿©ºÎ var sPrcpAuthFlag = model.getValue("/root/init/prcpauthflag"); // 󹿱ÇÇѱ¸ºÐ var sPrcpGenrFlag = model.getValue("/root/patflag/list/prcpgenrflag" ); // ioflag O:¿Ü·¡, S:°ËÁø, I:ÀÔ¿ø, E:ÀÀ±Þ, D:DSC var sAftDcYn = "N"; //û±¸ÈÄ d/có¹æ ¿©ºÎ by sonjy 20081027 var sUserId = getUserInfo ("userid"); var sInstCd = model.getValue("/root/paminfo/list/instcd" ); var sPid = model.getValue("/root/paminfo/list/pid" ); var sCretNo = model.getValue("/root/paminfo/list/cretno" ); var sOrdDeptCd = model.getValue("/root/paminfo/list/orddeptcd"); var sPrcpDd = model.getValue("/root/init/prcpdd" ); var sOrdDd = ""; var sOrdDrId = ""; if ( sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S" ) { sOrdDd = model.getValue("/root/paminfo/list/orddd"); sOrdDrId = model.getValue("/root/paminfo/list/orddrid"); } else { sOrdDd = model.getValue("/root/paminfo/list/indd"); sOrdDrId = model.getValue("/root/paminfo/list/medispclid"); } var sMsgDd = ""; // ¸Þ¼¼ÁöŰ ¸Þ¼¼ÁöÀÏÀÚ var sMsgNo = ""; // ¸Þ¼¼ÁöŰ ¸Þ¼¼Áö¹øÈ£ var sHistNo = ""; // ¸Þ¼¼ÁöŰ ¸Þ¼¼ÁöÀ̷¹øÈ£ var sCheckErrCnt = ""; // ¿¡·¯ Ç׸ñ var sCheckResnCnt = ""; // »çÀ¯ ÀÔ·Â Ç׸ñ var sCheckInfoCnt = ""; // Á¤º¸ È®ÀÎ Ç׸ñ var sCheckEtcCnt = ""; // ±âŸ ó¸® Ç׸ñ var sCheckBfOpCnt = ""; // ¿À·ùüũ ó¹æÀúÀåÀü ¿ÀÇ ī¿îÆ® var sCheckAfOpCnt = ""; // ¿À·ùüũ ó¹æÀúÀåÈÄ ¿ÀÇ ī¿îÆ® var pop_DrgAbleYn = "N"; // DRGÀû¿ë Âý ÆË¾÷ ¿©ºÎ var pop_MedicineConsult = "N"; // º¹¾à»ó´ãÀÇ·Ú Ã¢ ÆË¾÷ ¿©ºÎ 2011.10.24 ¾ö¿µ¸¸ (Ä¥°î ¾àÁ¦ºÎ À̼®¹Ì ¿äû) var pop_EnConsult = "N"; // TPN ¿µ¾ç »ó´ã ¿©ºÎ var pop_ExamRsrvYn = "N"; // ÅëÇհ˻翹¾à ó¹æ Ç׸ñ ¿©ºÎ 2015.10.01 ¾ö¿µ¸¸ var pop_PregnantYn = "N"; // ÀӽźΠµî·Ï ÆË¾÷ ¿©ºÎ 2017.01.09 ¾ö¿µ¸¸ //by sonjy 20091120 Àüó¹æ °³Àκ° Á¶È¸ option Ãß°¡ var bfprcpviewnode = instance1.selectSingleNode("/root/initsrch/envinfo[qestcd='018']/answcnt"); var sBfPrcpViewFlag = ""; if( bfprcpviewnode != null ) { sBfPrcpViewFlag = bfprcpviewnode.text ; } /*********************************************************************************************************** * 1. È­¸é ¿À·ù üũ ¹× ÀúÀå µ¥ÀÌÅÍ ±¸¼º ***********************************************************************************************************/ var curErrObj = getOpenWindow("SPMMO00600"); //Ȱ¼ºÈ­µÈ ¿À·ù È­¸é object loading if(curErrObj != null) curErrObj.javascript.fClose(); var curOpenObj = getOpenWindow("SPMMO90600"); //Ȱ¼ºÈ­µÈ ¿ÀÇ ȭ¸é object loading if(curOpenObj != null) curOpenObj.javascript.fClose(); if ( isNull(sPrcpFlag)) sPrcpFlag = "0"; if ( isNull(sSaveKindFlag)) sSaveKindFlag = "0"; if ( isNull(saveNode)) saveNode = "/root/main/prcp/prcplist"; //20091208 HJS DURÀû¿ë¿©ºÎ¸¦ ÀÓ½ÃÀûÀ¸·Î ½Ç½Ã°£À¸·Î °¡Á®¿Í¼­ üũÇÑ´Ù. reqHardCodeInfo("/root/hidden/durappinfo", "/root/hidden/durappinfo", "119"); model.makeValue( "/root/initsrch/durappyn/trgtcd", model.getValue("/root/hidden/durappinfo/hardcd/hardcd") ) //PRN Àû¿ë¿©ºÎ¸¦ ½Ç½Ã°£À¸·Î °¡Á®¿Í¼­ üũÇÑ´Ù. 2010-01-02 by LYJ reqHardCodeInfo("/root/hidden/prnprcpyninfo", "/root/hidden/prnprcpyninfo", "173"); model.makeValue( "/root/save/saveflaginfo/prnprcpyninfo", model.getValue("/root/hidden/prnprcpyninfo/hardcd/hardcd") ); //Àüó¹æ ÅÇÀÌ ¾Æ´Ñ ÅÇ¿¡ Æ÷Ä¿½Ì µÉ ¶§ ÀÎÁõÀúÀå ½Ã DCó¹æ ÀúÀåµÇÁö ¾ÊÀ½. "btn_ivbfprcp.selected &&" Á¶°Ç »èÁ¦ (JJE) if ( sCpFlag != "Y" ) { if ( model.getValue ( "/root/init/setprcpyn") == "Y" ) { ivw_prcp3.window.javascript.fAppendDC(); } } else { if ( prtlprcpstatus_SMMMO00110 != "U" ) { //OCSȰ¼ºÈ­µÈ °æ¿ì¸¸ üũ && btn_ivbfprcp.selected && btn_init.visible == false && btn_reinit.visible == false //CP¿¡¼­ DC+Ãß°¡Ã³¹æ¹ßÇà ¾ÈµÅ¼­ ÇØ´ç Á¶°Ç »èÁ¦(2010.07.06 JJE) var dcNode = ivw_prcp3.instance1.selectSingleNode("/root/prcpsrch/prcplist[chkcol=D]"); // DCó¹æ if( dcNode != null && model.getValue ( "/root/init/setprcpyn") == "Y" ){ ivw_prcp3.window.javascript.fAppendDC(); } model.makeValue ( "/root/save/saveflaginfo/prtlflag", prtlFlag_SMMMO00110 ); //MMPHPTCPÀÇ prtlflag(ÇÁ·ÎÅäÄݱ¸ºÐ)ÀÌ '-'À̰ųª '01'À̸é CP (DCÀúÀåÀ» À§ÇÔ) } } var sSaveDataFlag = fSaveExistCheck( sSaveKindFlag ); if ( sSaveDataFlag == -1 ) { if ( sPrcpGenrFlag == "O" ) { sSaveDataFlag = 3; } else { messageBox ( "ÀúÀåÇÒ", "E013" ); return false; } } else if ( sSaveDataFlag == 5 ) { messageBox ( "ó¹æDC´Â ÀÓ½ÃÀúÀå", "E001" ); return false; } // ó¹æ ÀúÀå½Ã È­¸é¿¡¼­ óÀå °¡´É ÇÑÁö üũ ÇÑ´Ù. var sIprcAddYn = model.getValue("root/paminfo/list/iprcaddyn"); // Ãß°¡Ã³¹æ ¹ßÇà¿©ºÎ(½É»ç½Ç °¡Åð¿ø È¯ÀÚ)´Â ó¹æÀúÀå °¡´É üũ Á¦¿Ü 2012.04.16 if(sIprcAddYn != "Y" && !fCheckBeforePrcpSave( sPrcpFlag, sSaveKindFlag, saveNode, sPrcpChkFlag )) return false; var sSaveOk = "N"; if ( sPrcpChkFlag != "N" ) { // sPrcpChkFlag°¡ N ÀÌ¸é ¸Þ½ÃÁö¸¦ ¾È¹°¾îº¸°í ³Ñ¾î°£´Ù. if ( sPrcpChkFlag == "clickpatlist" ){ sSaveOk = "Y"; } // Áø·á´ë»óÀÚ¸®½ºÆ®¿¡¼­ ¼±ÅõǾúÀ»¶§´Â ¸Þ¼¼Áö ¶ç¿ìÁö ¾Ê´Â´Ù. 20100317 LYJ if ( sPrcpChkFlag != "drugdc" ) sPrcpChkFlag = "Y"; //¹Ýȯ¿äûÀÌ ¾Æ´Ï¶ó¸é Y·Î ÇØÁØ´Ù. if (model.getValue ( "/root/initsrchprcp/prcpetccnts/admiprcpyn" ) == "Y" ) { //admission ó¹æÀÌ ¾ø´Âµ¥ if ( !isNull(model.getValue ( "/root/main/prcp/prcplist[prcpkindcd='10']/prcpcd"))) { //Á¤±Ôó¹æÀÌ Á¸ÀçÇϸé if ( "7" == messageBox ( "ÀÔ¿ø´çÀÏ Admission ó¹æÀÌ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù. ±×·¡µµ Á¤±Ôó¹æÀ»", "Q002" )) return false; else sSaveOk = "Y"; //Áú¹®À» Çѹø¸¸ ÇÏ·Á°í ¼öÁ¤ } } if ( sSaveOk == "N" ) { if ( sSaveDataFlag == 6 ) { if( messageBox ( "", "Q002" ) == "6" ) { sSaveOk = "Y"; } else { sSaveOk = "N"; } } else { if( messageBox ( "", "Q002" ) == "6" ) sSaveOk = "Y"; } } } else { sSaveOk = "Y" } if( sSaveOk != "Y" ) { return false; } if (sSaveKindFlag != 1) { // ó¹æ ÀúÀåÀü üũ ÇØ¾ß ÇÒ °Íµé if (!fPrcpSaveChkBf(sPrcpChkFlag)) return false; } model.removeNodeSet ( "/root/send/cond2" ); model.makeNode ( "/root/send/cond2" ); //ÀúÀåµî·ÏÁ¤º¸(saveRgstInfo) if ("I" == sPrcpGenrFlag || "E" == sPrcpGenrFlag || "D" == sPrcpGenrFlag) { model.setValue ( "/root/paminfo/list/dethdt", model.getValue(sRTC + "/patinfo/dethdt")); // ÀÎÁõÀúÀåµ¥ÀÌÅÍ »ý¼ºÀ§Ä¡ º¯°æ¿¡ µû¶ó »ç¸ÁÀÏÀÚ¸¦ ½Ç½Ã°£ Á¶È¸ ÇÏ¿© ¼³Á¤ 2013.06.05 ¾ö¿µ¸¸ } var saveRgstInfo = model.instances(0).selectNodes( "/root/paminfo/list" ); model.setValue ( "/root/send/cond2", getNodeListCSV(saveRgstInfo)); //ÀúÀåó¹æÁ¤º¸(savePrcpInfo) var savePrcpInfo = model.instances(0).selectNodes( saveNode ); // ¹Ì¿Ï¼º ó¹æ ÀúÀå ½Ã, '-' ±îÁö ÇÔ²² ÀúÀåÇÏ·Á Çϱ⶧¹®¿¡ I ¸¸ ÀúÀåÇϵµ·Ï ºÐ±â (2008.10.15 JJE) (s) if( sCpFlag != "Y" ){ model.copyNode ( "/root/send/cond3", "/root/main/prcp" ); }else{ fClearSaveInstance(); fAppendSaveNode( "/root/send/cond3", saveNode ); } fAppendSaveNode( "/root/send/cond3", "/root/prcper/prcplist" ); fAppendSaveNode( "/root/send/cond3", "/root/prcpdc/prcplist" ); nPrcpCnt = model.instances(0).selectNodes("/root/send/cond3/prcplist" ).length - 1; //û±¸ÈÄ d/có¹æ ¿©ºÎ setting by sonjy 20081027 => û±¸ÈÄ d/cÀÏ °æ¿ì »êÁ¤Æ¯·Ê ¹× ¹ýÁ¤Àü¿°º´µîÀÇ Ã³¹æÀúÀå ÈÄ ·ÎÁ÷À» Å»Çʿ䰡 ¾øÀ½. var aftdclist = model.instances(0).selectNodes( "/root/prcpdc/prcplist[tempcol21='C']" ); if( aftdclist != null ){ if( aftdclist.length > 0 ) sAftDcYn = "Y"; } if ( sPrcpChkFlag == "drugdc" ) { //¾à/ÁÖ»ç D/C ¿äû Áß¿¡ ¹Ý³³¿äûµÈ °ÍÀº D/C ó¸®ÇÑ´Ù.( ÀúÀå·ÎÁ÷¿¡¼­ »ç¿ë ) model.setValue ( "/root/send/cond14", getNodeListCSV (model.instances(0).selectNodes( "/root/prcpdc/prcplist" ))); } //setValue ÈÄ¿¡ prcpdc ¿¡ ¿Å°Ü ³õÀº prcplist¸¦ Ŭ¸®¾î ÇÑ´Ù. model.removeNodeset ( "/root/prcpdc/prcplist" ); //ÀúÀåÁø´ÜÁ¤º¸(saveDiagInfo) var saveDiagInfo = model.instances(0).selectNodes( "/root/main/diaginfo/diagcdlist" ); nDiagCnt = saveDiagInfo.length - 1; model.setValue ( "/root/send/cond4", getNodeListCSV(saveDiagInfo)); // ó¹æ Áø´Ü ¾Ïȣȭ Á¤º¸ »ý¼º(ÀÎÁõ¼­Ã¢ ÆË¾÷) if ( sSaveKindFlag != 1 && signyn == "Y" ) { var sSignBfPrcpConts = getSignBfConts("1", "/root/paminfo/list", "/root/send/cond3/prcplist"); // ¾ÏȣȭÀü ÀÎÁõÀúÀå ó¹æ µ¥ÀÌÅÍ var sSignBfDiagConts = getSignBfConts("2", "/root/paminfo/list", "/root/main/diaginfo/diagcdlist"); // ¾ÏȣȭÀü ÀÎÁõÀúÀå Áø´Ü µ¥ÀÌÅÍ var sSignAfPrcpConts = ""; // ¾ÏȣȭÈÄ ÀÎÁõÀúÀå ó¹æ µ¥ÀÌÅÍ var sSignAfDiagConts = ""; // ¾ÏȣȭÈÄ ÀÎÁõÀúÀå Áø´Ü µ¥ÀÌÅÍ var bSignOpt = false; // ÀÀ±Þ½ÇȯÀÚÁß ÇϵåÄڵ忡 µî·ÏµÇ¾î ÀÖ´Â °ú Àǻ簡 ·Î±×ÀÎ ÈÄ Ã³¹æÀ» ³¾ °æ¿ì¿¡´Â ÀÎÁõÀúÀåÀ» Çѹø¸¸ ÇÏ°Ô ÇÔ.(¿Ü·¡¿Í µ¿ÀÏÇÏ°Ô Ã³¸®) var sPD = model.getValue("/root/hidden/securelimitdeptlist/hardcd[hardcd = '" + getUserInfo("dutplcecd") + "']/hardcd"); if ( sPrcpGenrFlag != "O" && !(sPrcpGenrFlag == "E" && sPD != "") ) { bSignOpt = true; } // ÀÔ¿ø ¶Ç´Â ÀÀ±ÞÀÏ °æ¿ì // 20111201 knuh ÃÖ¿øµ· // ±â·Ï/ó¹æ Á÷Àü ÀÎÁõÀúÀåÀÌ Á¤ÇØÁø ½Ã°£(ºÐ ´ÜÀ§, ÇϵåÄÚµå 401) À̳»À̸é ÀÎÁõ¼­¸¦ ¶ç¿ìÁö ¾ÊÀ½(1/2) // SMMMO00100.js, MMR01300.js, MMR00100.js, SPMRF05200.js // ¶ç¿ìÁö ¾Ê´Â ·ÎÁ÷ var ls_emrinptsavetime = fGetHardCDList("Y", 401, 3); var ll_emrinptsavetime = ls_emrinptsavetime == "" ? 0 : parseInt(ls_emrinptsavetime) * -1; if ( ( sPrcpGenrFlag == "I" || sPrcpGenrFlag == "E") && ll_emrinptsavetime < 0 && getGlobalVariable("emrinptsavetime") >= getCurrentDateTime().toDate("YYYYMMDD hhmmss").getAddDate(ll_emrinptsavetime, "m").getDateFormat("YYYYMMDD hhmmss")) { bSignOpt = false; } if(!isNull(sSignBfPrcpConts)) { sSignAfPrcpConts = fSaveSign ( sSignBfPrcpConts, sUserId, bSignOpt); //ó¹æÀÎÁõ if ( sSignAfPrcpConts != "N" ) { if (isNull( sSignAfPrcpConts )) { return false; } bSignOpt = false; //Áø´Ü¿¡¼­ ¶Ç ¾È¶ç¿ì±â À§Çؼ­ false·Î ¼öÁ¤ } } if(!isNull(sSignBfDiagConts)) { sSignAfDiagConts = fSaveSign ( sSignBfDiagConts, sUserId, bSignOpt); //Áø´ÜÀÎÁõ if ( sSignAfDiagConts != "N") { if (isNull(sSignAfDiagConts)) { return false; } } } } // ÀúÀ屸ºÐÁ¤º¸(saveFlagInfo) model.setValue ( "/root/save/saveflaginfo/savedataflag", sSaveDataFlag ); // ÀúÀåÀڷᱸºÐ 0:Áø´Ü ¹× ó¹æ, 1:Áø´Ü, 2:ó¹æ, 4:ó¹æÀÓ½ÃÀúÀå, 6:Áø´Ü ¹× ó¹æ ÀÓ½ÃÀúÀå, 7:Áø´ÜÀÓ½ÃÀúÀå model.setValue ( "/root/save/saveflaginfo/saveflag", sPrcpGenrFlag); // ÀúÀ屸ºÐ O:¿Ü·¡, I:ÀÔ¿ø, E:ÀÀ±Þ, S:°ÇÁø model.setValue ( "/root/save/saveflaginfo/prcpflag", sPrcpFlag ); // 󹿱¸ºÐ 0:ÀÇ»çó¹æ, 2:°£È£, 3:Áö¿øºÎ¼­, 5:Admission, 6:CP, 7:Ç×¾ÏÇÁ·ÎÅäÄÝ, 8:ÀÓ½Ãó¹æ model.setValue ( "/root/save/saveflaginfo/inptflag", "0" ); // ÀԷ±¸ºÐ 0:ÀÇ»ç, 1:°£È£»ç(°£È£¿¡¼­ »ç¿ë), 3:Áö¿øºÎ¼­ model.setValue ( "/root/save/saveflaginfo/deptcd", getUserInfo("dutplcecd")); // ºÎ¼­ÄÚµå model.setValue ( "/root/save/saveflaginfo/deptnm", getUserInfo("dutplcenm")); // ºÎ¼­¸í model.setValue ( "/root/save/saveflaginfo/userid", getUserInfo("userid")); // »ç¿ëÀÚID model.setValue ( "/root/save/saveflaginfo/usernm", getUserInfo("usernm")); // »ç¿ëÀÚ¸í model.setValue ( "/root/save/saveflaginfo/prcpdd", sPrcpDd); model.setValue ( "/root/save/saveflaginfo/divyn", sPrcpChkFlag ); // ¿ë·®ºÐÇÒ ÇÒ°ÇÁö model.makeValue ( "/root/save/saveflaginfo/durappyn", model.getValue( "/root/initsrch/durappyn/trgtcd" ) ); // 2010.11.24 À̼±°æ ¼öÁ¤ : °æºÏ´ë¿ë DUR flag°ªÀ» ´øÁ®Áà¾ß ÇÔ model.makeValue ( "/root/save/saveflaginfo/nonprgflag", fCompareNonPrgDiag()); model.makeValue ( "/root/save/saveflaginfo/ipaddress", getUserInfo("ipaddr")); // »ç¿ëÀÚ ipaddressÁ¤º¸ model.makeValue ( "/root/save/saveflaginfo/screenid", getScreenID()); // »ç¿ëÀÚ È­¸é Á¤º¸ model.makeValue ( "/root/save/saveflaginfo/savekindflag", sSaveKindFlag ); // ó¹æÀúÀ屸ºÐ 0: ÀÎÁõÀúÀå, 1:ÀÓ½ÃÀúÀå model.makeValue ( "/root/save/saveflaginfo/cpflag", sCpFlag ); // CPó¹æ Flag //2014/02/10 ÁÖ¼®Ã³¸® //model.makeValue ( "/root/save/saveflaginfo/preworkup", "N"); // preworkup ¿©ºÎ µðÆúÆ®°ª //2014/02/10 model.makeValue ( "/root/save/saveflaginfo/signbfprcpconts", sSignBfPrcpConts); // ÀÎÁõÀúÀå ¾Ïȣȭ Àü ó¹æ µ¥ÀÌÅÍ model.makeValue ( "/root/save/saveflaginfo/signbfdiagconts", sSignBfDiagConts); // ÀÎÁõÀúÀå ¾Ïȣȭ Àü Áø´Ü µ¥ÀÌÅÍ model.makeValue ( "/root/save/saveflaginfo/signafprcpconts", sSignAfPrcpConts); // ÀÎÁõÀúÀå ¾Ïȣȭ Àü ó¹æ µ¥ÀÌÅÍ model.makeValue ( "/root/save/saveflaginfo/signafdiagconts", sSignAfDiagConts); // ÀÎÁõÀúÀå ¾Ïȣȭ Àü Áø´Ü µ¥ÀÌÅÍ model.makeValue ( "/root/save/saveflaginfo/aftdcyn", sAftDcYn); // û±¸ÈÄ DC ¿©ºÎ model.makeValue ( "/root/save/saveflaginfo/addprcp", sAddPrcp); // ½ÃÇàºÎ¼­ ó¹æ¿©ºÎ model.makeValue ( "/root/save/saveflaginfo/bfprcpviewflag", sBfPrcpViewFlag); // Àüó¹æ °³Àκ° Á¶È¸ option model.makeValue ( "/root/save/saveflaginfo/prcpauthflag", sPrcpAuthFlag); // 󹿱ÇÇѱ¸ºÐ model.makeValue ( "/root/save/saveflaginfo/dschprcpyn", model.getValue ("/root/hidden/dschprcpyn")); // Åð¿øÃ³¹æ ¹ßÇà ¿©ºÎ // ÇöÀç »ç¿ëÇÏÁö ¾ÊÀ½ ÃßÈÄ »èÁ¦ °ËÅä ¾ö¿µ¸¸ 2013.11.07 model.makeValue( "/root/save/saveflaginfo/judgtrgtchkyn", "N" ); //Á¤¹Ð ½É»ç´ë»ó ¾àÁ¦(³ú´ë»ç°³¼±Á¦, ³úÇ÷·ù°³¼±Á¦, ³úÁõ»ó°³¼±Á¦) üũ (2010.01.28 JJE) model.makeValue( "/root/save/saveflaginfo/idementiachk", "" ); //by sonjy 20100420 / Ä¡¸Å¾àÁ¦(dementia drug) º¹¿ë ½Ã FF621601 °Ë»ç ó¹æ ALERT ÆË¾÷ ¸Þ½ÃÁö ¿äû(¿Ü·¡, ½Å°æ°úÀÎ °æ¿ì¸¸ üũ) model.makeValue( "/root/save/saveflaginfo/idementiachkcode", "" ); //by sonjy 20100420 / Ä¡¸Å¾àÁ¦(dementia drug) º¹¿ë ½Ã FF621601 °Ë»ç ó¹æ ALERT ÆË¾÷ ¸Þ½ÃÁö ¿äû(¿Ü·¡, ½Å°æ°úÀÎ °æ¿ì¸¸ üũ) // ÇöÀç »ç¿ëÇÏÁö ¾ÊÀ½ ÃßÈÄ »èÁ¦ °ËÅä ¾ö¿µ¸¸ 2013.11.07 if ( sSaveKindFlag == 1 ) { model.setValue( "/root/save/saveflaginfo/signyn", "N" ); // ÀÓ½ÃÀúÀå } else { model.setValue( "/root/save/saveflaginfo/signyn", signyn); // ÀÎÁõÀúÀå } if ( sAddPrcp == "Y" ) { model.setValue ( "/root/save/saveflaginfo/pseuacptflag", model.getValue ( "/root/formerkey/pseuacptflag" )); model.setValue ( "/root/save/saveflaginfo/admininfo", model.getValue ( "/root/admininfo" )); } else { model.setValue ( "/root/save/saveflaginfo/pseuacptflag", "N"); model.setValue ( "/root/save/saveflaginfo/admininfo", "NNNNNNNNNNNNNNNNNNNN"); } var saveFlagInfoNodeList = model.instances(0).selectNodes( "/root/save/saveflaginfo" ); model.setValue ( "/root/send/cond1", getNodeListCSV(saveFlagInfoNodeList)); // DUR Á¡°Ë°á°ú Àü¹®(DUR ó¹æÀü°£ üũ½Ã ÇÊ¿äÇÔ.) model.setValue ( "/root/send/cond5", ""); // óÀ½ üũ½Ã¿¡´Â °ªÀÌ ¾øÀ½. //20080909 ½ÃÇàºÎ¼­Ã³¹æ (Áø´Ü º¹»çÇÒ ¿ø¹«Á¤º¸) if ( model.getValue ( "/root/formerkey/pseuacptflag" ) == "Y" ) { var saveFormerkey = model.instances(0).selectNodes( "/root/formerkey" ); model.setValue ( "/root/send/cond15", getNodeListCSV(saveFormerkey)); } else { model.setValue ( "/root/send/cond15", ""); } endStepDate = new Date(); // °¢ ¾÷ºÎ Á¾·áÈÄ ½Ã°£ step1Elapsed = endStepDate.getTime() - startStepDate.getTime(); // È­¸é ¿À·ù üũÀü ó¸® ¼Ò¿ä½Ã°£ startStepDate = new Date(); // °¢ ¾÷ºÎ ½ÃÀÛ ½Ã°£ //model.addlog(" SPEED CHECK END OF 󹿰¡´Éüũ(È­¸é)"); //model.addlog(" SPEED CHECK START OF ÀúÀå µ¥ÀÌÅÍ »ý¼º(¿À·ù/»çÀ¯)"); /*********************************************************************************************************** * 2. APP ¿À·ù üũ ¹× ÀúÀå ó¸® ***********************************************************************************************************/ var sReSaveYn = "Y"; // óÀ½ ÇѹøÀº Call Çϵµ·Ï ¼³Á¤(¿À·ù°¡ ÀÖÀ»°æ¿ì È­¸é¿¡¼­ ó¸® Çϰí, ´Ù½Ã Call Çϵµ·Ï while (sReSaveYn == "Y") { //createLoadingWindow("ó¹æ µ¥ÀÌÅÍ ÀúÀå ÁßÀÔ´Ï´Ù.", 400, 250); if ( sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S" ) { //°ÇÁøÀÏ °æ¿ì ¿Ü·¡¿Í µ¿ÀÏ Ã³¸® BY SONJY 2008-09-03 if ( !submit ( "TXMMO00121", false )) { if (sCpFlag != "Y" || sSaveKindFlag == 1 ) { //Á¶°ÇÃß°¡(2008.09.01 JJE) model.resetInstanceNode ( "/root/send" ); model.removeNodeSet ( "/root/result"); } fClearSaveInstance(); model.refresh(); //removeLoadingWindow(); return false; } } else { if ( !submit ( "TXMMO00122", false )){ if (sCpFlag != "Y" || sSaveKindFlag == 1 ) { //Á¶°ÇÃß°¡(2008.09.01 JJE) model.resetInstanceNode ( "/root/send" ); model.removeNodeSet ( "/root/result"); } fClearSaveInstance(); model.refresh(); //removeLoadingWindow(); return false; } } //removeLoadingWindow(); sMsgDd = model.getValue("/root/result/saveflaginfo/msgdd"); // ¸Þ¼¼ÁöŰ ¸Þ¼¼ÁöÀÏÀÚ sMsgNo = model.getValue("/root/result/saveflaginfo/msgno"); // ¸Þ¼¼ÁöŰ ¸Þ¼¼Áö¹øÈ£ sHistNo = model.getValue("/root/result/saveflaginfo/histno"); // ¸Þ¼¼ÁöŰ ¸Þ¼¼ÁöÀ̷¹øÈ£ sCheckBfOpCnt = model.getValue("/root/result/saveflaginfo/checkbfopcnt"); // ¿À·ùüũ ó¹æÀúÀåÀü ¿ÀÇ ī¿îÆ® sCheckAfOpCnt = model.getValue("/root/result/saveflaginfo/checkafopcnt"); // ¿À·ùüũ ó¹æÀúÀåÈÄ ¿ÀÇ ī¿îÆ® sReSaveYn = model.getValue("/root/result/saveflaginfo/resaveyn"); // ´Ù½Ã ¿À·ù üũ ÇÒÁö ¿©ºÎ if(sCheckBfOpCnt > 0) { // ¿À·ùüũ ó¹æÀúÀåÈÄ ¿ÀÇ ī¿îÆ® setParameter("SPMMO90600_msgdd", sMsgDd); setParameter("SPMMO90600_msgno", sMsgNo); setParameter("SPMMO90600_histno", sHistNo); setParameter("SPMMO90600_msgcls", "B"); // ó¹æÀúÀå Àü ¿ÀÇ ¸Þ¼¼Áö ŸÀÔ open("SPMMO90600"); return false; // ÀÎÁõÀúÀå ÁßÁö } if (sReSaveYn == "Y") { // ¿À·ù, »çÀ¯, Á¤º¸, ±âŸó¸®, DUR ó¹æÀü°£ üũ Áß Çϳª¶óµµ ÀÖÀ¸¸é 'Y' sCheckErrCnt = model.getValue("/root/result/saveflaginfo/checkerrcnt"); // ¿¡·¯ Ç׸ñ sCheckResnCnt = model.getValue("/root/result/saveflaginfo/checkresncnt"); // »çÀ¯ ÀÔ·Â Ç׸ñ sCheckInfoCnt = model.getValue("/root/result/saveflaginfo/checkinfocnt"); // Á¤º¸ È®ÀÎ Ç׸ñ sCheckEtcCnt = model.getValue("/root/result/saveflaginfo/checketccnt"); // ±âŸ ó¸® Ç׸ñ if(sCheckErrCnt > 0) { // ¿¡·¯ Ç׸ñÀÌ Á¸Àç Çϸé var prcpErrList = model.instances(0).selectNodes( "/root/result/prcperrlist" ); if ( prcpErrList != null && prcpErrList.length > 0) { var sFlag = ""; var nErrorCnt = 0; // ¿¡·¯ ¿À·ù ó¸® var nBfJudgCnt = 0; // »çÀü½É»ç °ü·Ã ³»¿ëÀº µû·Î ó¸®Çϱâ À§Çؼ­ ·ÎÁ÷ Ãß°¡ for ( var i=1; i <= prcpErrList.length; i++ ) { sFlag = model.getValue ( "/root/result/prcperrlist[" + i + "]/flag" ); if ( sFlag == "1" ) { nErrorCnt++; nBfJudgCnt = 0; break; } else if (sFlag == "9") { // »çÀü½É»ç¿¡ °ü·ÃÇÑ ¿¡·¯³»¿ëÀº µû·Î ó¸®ÇÑ´Ù. 2010. 10. 08 ±è¿µÇÐ nBfJudgCnt++; } } if ( nErrorCnt > 0 ) { // ó¹æ ¿À·ù ó¸® open ( "SPMMO00600", mon, xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false ); //¿À·ùÆË¾÷ var nErrRow = 1; var nDcRow = 0; var sDcPrcpPkSpec = ""; var DcErrArray = new Array(); for ( var i=1; i<=prcpErrList.length; i++ ) { if (model.getValue ("/root/result/prcperrlist[" + i + "]/flag") == "1") { nErrRow = model.getValue ("/root/result/prcperrlist[" + i + "]/errrow"); sDcPrcpPkSpec = model.getValue ("/root/result/prcperrlist[" + i + "]/dcprcppkspec"); if ( !isNull(nErrRow) && nErrRow > 0 && nErrRow < grd_prcplist.rows -1 ) { model.setValue ("/root/main/prcp/prcplist[" + nErrRow + "]/tempcol9", "#ff6600"); //ÀÀ±Þó¹æ ÇÒ ¼ö ¾ø´Â ó¹æÄÚµå ¼öÁ¤ //if(model.getValue("/root/main/prcp/prcplist[" + nErrRow + "]/erprcpflag") == "Y"){ // model.setValue("/root/main/prcp/prcplist[" + nErrRow + "]/erprcpflag", 'N'); // model.setValue("/root/main/prcp/prcplist[" + nErrRow + "]/prcpnm", model.getValue("/root/main/prcp/prcplist[" + nErrRow + "]/orgprcpnm") ); // model.setValue("/root/main/prcp/prcplist[" + nErrRow + "]/prcprefseq","0" ); //} } else if ( !isNull(sDcPrcpPkSpec) ){ //dcó¹æ »öº¯°æÀ» À§ÇÑ ¼öÁ¤ ½ÃÀÛ by ¼ÕÁÖ¿¬ 2008-06-30 DcErrArray[nDcRow] = sDcPrcpPkSpec ; nDcRow ++; } //dcó¹æ »öº¯°æÀ» À§ÇÑ ¼öÁ¤ Á¾·á by ¼ÕÁÖ¿¬ 2008-06-30 } } fPrcpColor(); if( nDcRow > 0 ){ //dcó¹æ »öº¯°æÀ» À§ÇÑ ¼öÁ¤ ½ÃÀÛ by ¼ÕÁÖ¿¬ 2008-06-30 if( btn_ivbfprcp.selected == true && model.getValue("/root/bfinityn") == "Y" ){ if ( sCpFlag != "Y" ) { ivw_prcp3.window.javascript.fSetErrDCRow(DcErrArray); }else{ ivw_prcp3.window.javascript.fSetErrDCRow(DcErrArray); } } } //dcó¹æ »öº¯°æÀ» À§ÇÑ ¼öÁ¤ Á¾·á by ¼ÕÁÖ¿¬ 2008-06-30 fClearSaveInstance(); model.removeNodeset("/root/result/prcperrlist"); return false; } else if ( nBfJudgCnt > 0) { // »çÀü½É»ç ¿ä±¸ ó¸® clearParameter("SPMMO21500_rntValue"); //parameter ÃʱâÈ­(2011.01.31 JJE) modal ( "SPMMO21500", mon, xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false ); //¿À·ùÆË¾÷ var bfRtnValue = getParameter("SPMMO21500_rntValue"); if (bfRtnValue == "REQ") { model.removeNodeset("/root/result/prcperrlist"); if ( isNull ( model.getValue ( "/root/main/prcp/prcplist[status='I' or status='D' or status='U']/prcpcd" ))) { if (isNull(model.getValue ( "/root/main/diaginfo/diagcdlist[status='I' or status='D' or status='U']/diagcd" ))) { messageBox ( "»çÀü½É»çÇÒ Ã³¹æ ¹× Áø´ÜÀÌ ¾ø½À´Ï´Ù.", "E" ); fClearSaveInstance(); model.removeNodeset("/root/result/prcperrlist"); return false; } } if ( !fPrcpSave_new("0", "1", "", "N")) { // 2018.06.04 ¾ö¿µ¸¸ ÀúÀåÇϽðڽÀ´Ï±î? ¹¯Áö ¾Êµµ·Ï ¼öÁ¤ model.removeNodeset ( "/root/prcpdc/prcplist" ); } fClearSaveInstance(); return false; } else if (bfRtnValue == "chgPayFlag") { model.removeNodeset("/root/result/prcperrlist"); var savePrcpListLen = model.instances(0).selectNodes ( prcpNode + "[status!='S']" ).length; var saveDiagListLen = model.instances(0).selectNodes ( diagNode + "[status!='S' and status!='-']" ).length; if ( savePrcpListLen > 0 || saveDiagListLen >0 ) { fPrcpSave_new( sPrcpFlag, sSaveKindFlag, "", "N" ); } return false; } else { fClearSaveInstance(); model.removeNodeset("/root/result/prcperrlist"); return false; } } // End of »çÀü½É»çó¸® } else { messageBox ("ó¹æ ÀúÀå½Ã ¿À·ù°¡ ¹ß»ýÇÏ¿´½À´Ï´Ù. Àü»ê½Ç(6598)·Î ¹®ÀÇ ¹Ù¶ø´Ï´Ù." , "E" ); return false; } } // End of ¿¡·¯ Ç׸ñÀÌ Á¸Àç Çϸé if(sCheckResnCnt > 0) { // »çÀ¯ ÀÔ·Â Ç׸ñÀÌ Á¸Àç Çϸé clearParameter("SPMMO90200_rtn"); modal("SPMMO90200", mon, xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false); if(getParameter("SPMMO90200_rtn") != "Y") { fClearSaveInstance(); return false; } } // End of »çÀ¯ ÀÔ·Â Ç׸ñÀÌ Á¸Àç Çϸé if(sCheckInfoCnt > 0) { // Á¤º¸ È®ÀÎ Ç׸ñÀÌ Á¸Àç Çϸé clearParameter("SPMMO90100_rtn"); modal("SPMMO90100", mon, xpt, ypt, "prcpdetl", "/root/result", "/root/result", "", false); if(getParameter("SPMMO90100_rtn") != "Y") { fClearSaveInstance(); return false; } } // End of Á¤º¸ È®ÀÎ Ç׸ñÀÌ Á¸Àç Çϸé if(sCheckEtcCnt > 0) { // ±âŸ ó¸® Ç׸ñÀÌ Á¸Àç Çϸé // 01. T10001, T10002 ¿ë·® ºÐÇÒ Ã³¸® T10001:ÀÏ¹Ý ¾àǰ ¿ë·® ºÐÇÒ, T10002:Ç×¾Ï ¾àǰ ¿ë·® ºÐÇÒ var sDivChkFlag = model.getValue("/root/result/saveflaginfo/divchkflag"); // ¿ë·® ºÐÇÒ Ã³¸® if (model.getValue("/root/initsrch/durappyn/trgtcd") != "A" ) { // °æºÏ´ë¿ë DUR Àû¿ë½Ã¿¡´Â ÀúÇÔ·® ¿ë·®ºÐÇÒ Ã¼Å© ÈÄ DUR ·ÎÁ÷üũ ÇÔ durappyn : "A-Àüü DUR", "Y-ÀúÇÔ·®Á¦¿Ü DUR", "³ª¸ÓÁö-DUR »ç¿ë¾ÈÇÔ" , "K:°æºÏ´ë¿ë DUR" if ( sDivChkFlag == "N" ) { var divPrcpInfo = model.instances(0).selectNodes( "/root/result/prcplist" ); if ( divPrcpInfo.length > 0 ) { // ¿ë·®ºÐÇÒ, ÀúÇÔ·® if ( !isNull(model.getValue ( "/root/result/prcplist/prcpcd"))){ //by sonjy 20090714 º¯°æ¿äû¼­ ó¸® : ÀúÇÔ·® ¿ë·®ºÐÇÒ⠴ݱâ¹öư »èÁ¦Ã³¸® modal ( "SPADB62400", mon, xpt, ypt, "SPADB62400", "/root/result", "/root/main/prcp", "sysmenu:hidden;", false ); model.refresh(); model.recalculate(); fClearSaveInstance(); } model.refresh(); fPrcpSave_new( sPrcpFlag, sSaveKindFlag, "", "N" ); // by sonjy 20100303 ¼öÁ¤ ÀÓ½Ãó¹æÀúÀå½Ã ÀÎÁõÀúÀåÀ¸·Î °¡´Â ¿À·ù ¼öÁ¤. return false; } } else if (sDivChkFlag == "A") { //20090420 ¸¶Á¤¹Î ¼öÁ¤ Ç׾Ͽ뷮ºÐÇÒÀº ±âÁ¸¿¡´Â ¼­¹ö¿¡¼­ ºÒÇÒµÇ¾î ¹Ù·Î ÀúÀåüũ·ÎÁ÷À¸·Î °¬Áö¸¸ º¸ÇèÁ¦ÇѱÔÁ¤¿¡ °É·Á¼­ //´Ù½ÃÀúÀåÇÒ¶§ ºÐÇÒµÈ ³»¿ëÀÌ È­¸éÀÌ Ç¥½Ã°¡ µÇÁö ¾Ê¾Æ ¿ë·®ºÐÇÒÀÌ µÇÁö ¾ÊÀ½. //Ç׾Ͽ뷮ºÐÇÒµµ È­¸é¿¡ Ç¥½ÃÇÏ°Ô ¼öÁ¤ model.removeNodeSet ( "/root/main/prcp/prcplist" ); var srcNodeList = model.instances(0).selectNodes("/root/result/prcplist"); var destNode = model.instances(0).selectSingleNode("/root/main/prcp"); //¿ë·®ºÐÇҽà ¼­¹öüũ·ÎÁ÷¿¡¼­ default="0" À¸·Î ¼¼ÆÃÇÏ¿© ³Ñ°Ü¼­ È­¸é¿¡ 0 À¸·Î Á¶È¸µÇ¿© ´Ù½Ã ''·Î ÃʱâÈ­, ¼­¹ö·ÎÁ÷ ¼öÁ¤Àº ÃßÈİËÅä, 2009-07-05. CHC for (i = 1; i <= getNodesetCount("/root/result/prcplist"); i++) { if(model.getValue("/root/result/prcplist["+i+"]/status") == "S") { model.setValue("/root/result/prcplist["+i+"]/prcpvol", ""); model.setValue("/root/result/prcplist["+i+"]/prcpqty", ""); model.setValue("/root/result/prcplist["+i+"]/prcptims", ""); model.setValue("/root/result/prcplist["+i+ "]/prcpdayno", ""); break; } } for ( i=0; i < srcNodeList.length; i++ ){ destNode.appendChild(srcNodeList.item(i).cloneNode(true)); } model.refresh(); fPrcpSave_new( sPrcpFlag, sSaveKindFlag, "", "N" ); // by sonjy 20100303 ¼öÁ¤ ÀÓ½Ãó¹æÀúÀå½Ã ÀÎÁõÀúÀåÀ¸·Î °¡´Â ¿À·ù ¼öÁ¤. return false; } } // End of ¿ë·® ºÐÇÒ Ã³¸® // 02. T10003 Åð¿ø¿¹°í¿¡·¯¹ß»ý¿©ºÎ var sDschYn = model.getValue("/root/result/saveflaginfo/dschyn"); if(sDschYn == "Y"){ //Åð¿ø¿¹°í µÇÁö ¾ÊÀº »çÇ׿¡¼­ Åð¿øÃ³¹æÀ» ÇßÀ»°æ¿ì Åð¿ø¿¹°í âÀ» ¶ç¿ò messageBox ("Åð¿ø¿¹°í¸¦ ÇØ¾ß¸¸ Åð¿ø ¹× Åð¿øÈĿܷ¡,ÀÔ¿øÀü°Ë»ç(ÀüÀÏ/´çÀÏ) ó¹æÀ» ÀúÀåÇÒ ¼ö ÀÖ½À´Ï´Ù." , "E" ); preDsch(); return false; } // 03. T10004 DRGÀû¿ë ó¹æÃ¼Å© pop_DrgAbleYn = model.getValue("/root/result/saveflaginfo/drgcheck"); // DRGÀû¿ë ó¹æÃ¼Å© // 04. T10005 Ç×¾ÏÁ¦ »ó¼¼Á¤º¸ ÀÔ·Â 2013.08.13 ¾ö¿µ¸¸ var chemoprcplist = model.instances(0).selectNodes( "/root/result/chemoprcplist" ); // Ç×¾ÏÁ¦ »ó¼¼Á¤º¸ ÀÔ·Â 2013.08.13 ¾ö¿µ¸¸ if ( chemoprcplist !=null && chemoprcplist.length > 0 ) { for ( var i=1; i <= chemoprcplist.length; i++ ) { clearParameter ( "SPMMO23000_rtn1" ) modal ( "SPMMO23000", mon, xpt, ypt, "chemodetl", "/root/result/chemoprcplist["+ i +"]", "/root/main/chemoinfo", "", false ); if ( getParameter ( "SPMMO23000_rtn1" ) != "Y" ){ return false; } } } // 05. T10006 º´±âºÐ·ù/Ç×¾ÏÂ÷¼ö Á¤º¸ ÀÔ·Â if (!isNull(model.getValue ( "/root/result/savetnmlist/pid" )) || !isNull(model.getValue ( "/root/result/savecncrlist/pid" ))) { clearParameter("SPMMO08400_rtn1"); modal("SPMMO08400", mon, xpt, ypt, "prcpdetl", "/root/result", "/root/tempresult", "", false ); if(getParameter ( "SPMMO08400_rtn1" ) != "Y") { return false; } } // 06. T10007 À¯ÀüÀÚ°Ë»ç µ¿ÀǼ­ ó¸® if (!isNull(model.getValue ( "/root/result/geneconsent/row/prcpcd"))) { //if (!isNull(model.getValue ( "/root/result/geneconsent/row/prcpcd")) && sCpFlag != "Y") { model.removeNodeset("/root/hidden/gene2/savedata"); // À¯ÀüÀÚ °Ë»ç µ¿ÀǼ­ ÀúÀå ³ëµå ÃʱâÈ­ model.removeNodeSet("/root/hidden/geneunitlist2"); // À¯ÀüÀÚ °Ë»ç µ¿ÀǼ­ Ãâ·Â¹° ³ëµå ÃʱâÈ­ modal("SPMMO21001", "", "", "", "", "/root/result/geneconsent", "/root/main/prcplist"); // À¯ÀüÀÚ µ¿ÀǼ­ var geneInfoNodes = instance1.selectNodes("/root/hidden/geneunitlist2"); // À¯ÀüÀÚ µ¿ÀǼ­ ¼­½Ä µ¥ÀÌÅÍ if( geneInfoNodes.length <= 0) { return false; } else { if(getNodesetCount("/root/hidden/gene2/savedata") > 0){ // À¯ÀüÀÚ µ¿ÀǼ­ ÀúÀå µ¥ÀÌÅÍ ³ëµå ÁÖ¼Ò if(getNodesetCount("/root/hidden/gene") <= 0){ // TXMMO21001 input ³ëµå ÁÖ¼Ò model.makeNode("/root/hidden/gene"); } else { model.removeNodeset("/root/hidden/gene/savedata"); } copyNodeType("/root/hidden/gene", "/root/hidden/gene2", "after"); } if(submit("TXMMO21001")){ // À¯ÀüÀÚ µ¿ÀǼ­ ÀúÀå exeReportPreview("RPMMO21002", "XMLSTR", "/root/hidden/geneunitlist2", "", "true", "", "", "", "", "", "", "grp_report"); fOcrAutoPrint(model.getValue("/root/result/geneconsent/row/prcpcd")+ "¢Ë"); if(!fSaveOCRIF(model.getValue("/root/result/geneconsent/row[1]/ocrtag") , model.getValue("/root/result/geneconsent/row[1]/pid") , model.getValue("/root/result/geneconsent/row[1]/orddd") , model.getValue("/root/result/geneconsent/row[1]/cretno") , model.getValue("/root/result/geneconsent/row[1]/prcpgenrflag") , model.getValue("/root/result/geneconsent/row[1]/orddeptcd") , model.getValue("/root/result/geneconsent/row[1]/orddrid") , model.getValue("/root/result/geneconsent/row[1]/formcd") , model.getValue("/root/result/geneconsent/row[1]/formfromdt") , "", "", 1) ) { messageBox("À¯ÀüÀڰ˻絿ÀǼ­ IF ÀúÀå½Ã ¿À·ù¹ß»ý", "I"); } } } } // 07. T10008 ÀÎü À¯·¡¹° µ¿ÀǼ­ ó¸® if (!isNull(model.getValue ( "/root/result/atadconsent/row/prcpcd"))) { //if (!isNull(model.getValue ( "/root/result/comnconsent/row/prcpcd")) && sCpFlag != "Y") { model.removeNodeset("/root/hidden/gene/savedata"); // À¯ÀüÀÚ °Ë»ç µ¿ÀǼ­ ÀúÀå ³ëµå ÃʱâÈ­ model.removeNodeSet("/root/hidden/geneunitlist"); // ÀÎü À¯·¡¹° µ¿ÀǼ­ ¼­½Ä µ¥ÀÌÅÍ Ãâ·Â¹° ³ëµå ÃʱâÈ­ modal("SPMMO21000", "", "", "", "", "/root/result/atadconsent", "/root/main/prcplist"); // ÀÎü À¯·¡¹° µ¿ÀǼ­ var atadInfoNodes = instance1.selectNodes("/root/hidden/geneunitlist"); // ÀÎü À¯·¡¹° µ¿ÀǼ­ ¼­½Ä µ¥ÀÌÅÍ if( atadInfoNodes.length <= 0) { return false; } else { if(submit("TXMMO21001")){ // ÀÎü À¯·¡¹° µ¿ÀǼ­ ÀúÀå exeReportPreview("RPMMO21001", "XMLSTR", "/root/hidden/geneunitlist", "", "true", "", "", "", "", "", "", "grp_report"); fOcrAutoPrint(model.getValue("/root/result/atadconsent/row/prcpcd")+ "¢Ë"); if(!fSaveOCRIF(model.getValue("/root/result/atadconsent/row[1]/ocrtag") , model.getValue("/root/result/atadconsent/row[1]/pid") , model.getValue("/root/result/atadconsent/row[1]/orddd") , model.getValue("/root/result/atadconsent/row[1]/cretno") , model.getValue("/root/result/atadconsent/row[1]/prcpgenrflag") , model.getValue("/root/result/atadconsent/row[1]/orddeptcd") , model.getValue("/root/result/atadconsent/row[1]/orddrid") , model.getValue("/root/result/atadconsent/row[1]/formcd") , model.getValue("/root/result/atadconsent/row[1]/formfromdt") , "", "", 1) ) { messageBox("ÀÎü À¯·¡¹° ±âÁõ µ¿ÀǼ­ IF ÀúÀå½Ã ¿À·ù¹ß»ý", "I"); } } } } // 08. T10009 ó¹æ ÀÏ¹Ý µ¿ÀǼ­ ó¸® if (!isNull(model.getValue ( "/root/result/comnconsent/row/prcpcd"))) { ocrcalcscorcd = ""; for (i = 1; i <= getNodesetCount("/root/result/comnconsent/row"); i++) { ocrcalcscorcd = ocrcalcscorcd + model.getValue("/root/result/comnconsent/row["+i+"]/prcpcd") + "¢Ë"; } fOcrAutoPrint(ocrcalcscorcd); //OCR ÀÚµ¿Ãâ·Â ocrcalcscorcd °ªÀº MMO001¿¡ global·Î ¼±¾ð. var sOcrTagVal = model.getValue("/root/properties/parameters/SPMRF04500_OCRTAG/SPMRF04500_OCRTAGvalue"); if(!isNull(sOcrTagVal)){ sOcrTagVal = sOcrTagVal.replaceAll("¢Ë", "|"); model.setValue("/root/properties/parameters/SPMRF04500_OCRTAG/SPMRF04500_OCRTAGvalue", ""); model.setValue("/root/result/saveflaginfo/ocrtagval", sOcrTagVal); // µ¿ÀǼ­ Ãâ·ÂÈÄ ´Ù½Ã üũ½Ã ó¹æ Á¤º¸¿¡ OCR Tag¹øÈ£(drprcpetc3) ¼³Á¤ ÇϱâÀ§ÇØ } ocrcalcscorcd = ""; } } // End of ±âŸ ó¸® Ç׸ñÀÌ Á¸Àç Çϸé // ÀúÀå 3´Ü°è·Î ±¸¼º - ÀúÀå ±¸ºÐ Á¤º¸¸¦ Àç¼³Á¤ ÇÑ´Ù. 2013.10.14 ¾ö¿µ¸¸ saveFlagInfoNodeList = model.instances(0).selectNodes( "/root/result/saveflaginfo" ); model.setValue ("/root/send/cond1", getNodeListCSV(saveFlagInfoNodeList)); // DUR Á¡°Ë°á°ú Àü¹® - ½ÉÆò¿ø üũ(ó¹æÀü°£) ·ÎÁ÷À¸·Î ÀÎÇØ È­¸é¿¡¼­ ´Ù½Ã °ªÀ» ¼­¹ö·Î º¸³½´Ù. 2013.10.31 ¾ö¿µ¸¸ var kDurChkRsltNodeList = model.instances(0).selectNodes( "/root/result/kdurchkrslt" ); model.setValue ("/root/send/cond5", getNodeListCSV(kDurChkRsltNodeList)); } else { prcpsaveyn = "Y"; if(sCpFlag == "Y") { prcpsaveyn_SMMMO00110 = "Y"; if(sSaveKindFlag != 1){ SubmitTF_SMMMO00110 = true; model.makeNode("/root/main/invalprcplist/prcplist"); copyNodeListType("/root/main/invalprcplist/prcplist", "/root/result/invalprcplist", "replace", model, model); } } // ÀúÀå ¼º°ø½Ã saveflag Á¤º¸ °ü·Ã º¯¼ö°ª ¼³Á¤. pop_MedicineConsult = model.getValue("/root/result/saveflaginfo/medicosultnyn"); // º¹¾à»ó´ãÀÇ·Ú Ã¢ ÆË¾÷ ¿©ºÎ 2011.10.24 ¾ö¿µ¸¸ (Ä¥°î ¾àÁ¦ºÎ À̼®¹Ì ¿äû) pop_DrgAbleYn = model.getValue("/root/result/saveflaginfo/drgcheck"); // DRGÀû¿ë ó¹æÃ¼Å© pop_EnConsult = model.getValue("/root/result/saveflaginfo/enconsultyn"); // TPN ¿µ¾ç »ó´ã ¿©ºÎ pop_ExamRsrvYn = model.getValue("/root/result/saveflaginfo/examrsrvyn"); // ÅëÇհ˻翹¾à ó¹æ Ç׸ñ ¿©ºÎ 2015.10.01 ¾ö¿µ¸¸ pop_PregnantYn = model.getValue("/root/result/saveflaginfo/pregnantyn"); // ÀӽźΠµî·Ï ÆË¾÷ ¿©ºÎ 2017.01.09 ¾ö¿µ¸¸ // ó¹æÀúÀåÈÄ È­¸é ó¸® °ü·Ã ³ëµå ¼³Á¤ model.removeNodeSet("/root/savertninfo"); model.makeNode("/root/savertninfo/prcpetccnts"); // ó¹æ ±âº» ¼³Á¤ Á¤º¸ model.makeNode("/root/savertninfo/rsrvcvrtprcp"); // ¿Ü·¡ ¿¹¾àó¹æÀ» ÀÔ¿øÀ¸·Î Àüȯ´ë»ó model.makeNode("/root/savertninfo/prcplist"); // ÀúÀåÈÄ Àüó¹æ ¸®½ºÆ® model.makeNode("/root/savertninfo/saveestmspclcs"); // ÁßÁõ/Ư·Ê Àû¿ëÁ¤º¸ model.makeNode("/root/savertninfo/saveserdiagappfrm"); // ÁßÁõ/Ư·Ê ½Åû¼­ Á¤º¸ model.makeNode("/root/savertninfo/savelglydis"); // by sonjy 2008-07-28 Èñ±Í³­Ä¡´ë»óÀÚ ±¸ºÐ model.makeNode("/root/savertninfo/saverareobst"); // ¹ýÁ¤Àü¿°º´ ó¹æ½Ã ù¹øÂ° »óº´ÀÇ ½Å°í¼­¸¸ È£Ãâ 2010-01-21 pyj model.makeNode("/root/savertninfo/saveresindenture"); // ·¹Áø»ó ¿ÏÀü Ʋ´Ï model.makeNode("/root/savertninfo/dschestmspclcs"); // Åð¿øÈÄ ¿Ü·¡ ÁßÁõ/Ư·Ê Àû¿ëÁ¤º¸ model.makeNode("/root/savertninfo/dschserdiagappfrm"); // Åð¿øÈÄ ¿Ü·¡ ÁßÁõ/Ư·Ê ½Åû¼­ Á¤º¸ model.makeNode("/root/savertninfo/dschlglydis"); // Åð¿øÈÄ ¿Ü·¡ by sonjy 2008-07-28 Èñ±Í³­Ä¡´ë»óÀÚ ±¸ºÐ model.makeNode("/root/savertninfo/dschrareobst"); // Åð¿øÈÄ ¿Ü·¡ ¹ýÁ¤Àü¿°º´ ó¹æ½Ã ù¹øÂ° »óº´ÀÇ ½Å°í¼­¸¸ È£Ãâ 2010-01-21 pyj model.makeNode("/root/savertninfo/dschresindenture"); // Åð¿øÈÄ ¿Ü·¡·¹Áø»ó ¿ÏÀü Ʋ´Ï copyNodesetType("/root/savertninfo/prcpetccnts", "/root/result/prcpetccnts", "replace", model, model); copyNodesetType("/root/savertninfo/rsrvcvrtprcp", "/root/result/rsrvcvrtprcp", "replace", model, model); copyNodesetType("/root/savertninfo/prcplist", "/root/result/bfprcplist", "replace", model, model); // »êÁ¤Æ¯·ÊÁ¤º¸ copyNodesetType("/root/savertninfo/saveestmspclcs", "/root/result/saveestmspclcs", "replace", model, model); copyNodesetType("/root/savertninfo/saveserdiagappfrm", "/root/result/saveserdiagappfrm", "replace", model, model); copyNodesetType("/root/savertninfo/savelglydis", "/root/result/savelglydis", "replace", model, model); copyNodesetType("/root/savertninfo/saverareobst", "/root/result/saverareobst", "replace", model, model); copyNodesetType("/root/savertninfo/saveresindenture", "/root/result/saveresindenture", "replace", model, model); // Åð¿øÈÄ ¿Ü·¡ »êÁ¤Æ¯·ÊÁ¤º¸ copyNodesetType("/root/savertninfo/dschestmspclcs", "/root/result/dschestmspclcs", "replace", model, model); copyNodesetType("/root/savertninfo/dschserdiagappfrm", "/root/result/dschserdiagappfrm", "replace", model, model); copyNodesetType("/root/savertninfo/dschlglydis", "/root/result/dschlglydis", "replace", model, model); copyNodesetType("/root/savertninfo/dschrareobst", "/root/result/dschrareobst", "replace", model, model); copyNodesetType("/root/savertninfo/dschresindenture", "/root/result/dschresindenture", "replace", model, model); } } if(pop_PregnantYn == "Y") { // ÀӽźΠµî·Ï ÆË¾÷ ¿©ºÎ 2017.01.09 ¾ö¿µ¸¸ »ó´Ü ¿¬°è Á¤º¸ Ç¥½Ã¸¦ À§ÇØ È­¸éó¸®Çϱâ Àü À§Ä¡·Î À̵¿ if ( messageBox ( "ÀӽźΠÀû¿ë °¡´ÉÇÑ Áø´ÜÀÌ ÀúÀå µÇ¾ú½À´Ï´Ù.\nÀӽźηΠµî·Ï ÇϽðڽÀ´Ï±î?","Q") == "6" ) { modal("SPMMO09700"); } } endStepDate = new Date(); // °¢ ¾÷ºÎ Á¾·áÈÄ ½Ã°£ step2Elapsed = endStepDate.getTime() - startStepDate.getTime(); // ¼­¹ö ¿À·ù üũ ¼Ò¿ä½Ã°£ startStepDate = new Date(); // °¢ ¾÷ºÎ ½ÃÀÛ ½Ã°£ /*********************************************************************************************************** * 3. ó¹æ ÀúÀåÈÄ È­¸é ó¸® ***********************************************************************************************************/ fClearSaveInstance(); setPatientInfoDetailByKey("prcpsaveyn", sPid+ "|" + model.getValue("/root/init/prcpobjsaveyn")); // ó¹æÀÌ ÀúÀåµÈ°ÍÀ» »ó´Ü¿¡ ¿Ã·ÁÁØ´Ù. //¼±ÅÃÁø·á µ¿ÀǼ­¸¦ Ãâ·ÂÇÑ´Ù. fPrltPartSpclDrList(); // 2010.12.30 ±è¿µÇÐ °æºÏ´ë ¹öÁ¯ ¼öÁ¤ //2011.01.09 ¿Ü·¡ ¿¹¾à âÀ» ÆË¾÷ ÇÑ´Ù. if (sSaveKindFlag == "0" && sPrcpGenrFlag == "O" && sAddPrcp != "Y" && model.getValue("/root/init/prcpsavebtnflag") == "2"){ setParameter("SMPMO00300_PARM1", sOrdDeptCd); //Áø·á°úÄÚµå setParameter("SMPMO00300_PARM2", sOrdDrId); //Áø·áÀÇ»çÄÚµå setParameter("SMPMO00300_PARM3", sPid); //ȯÀÚ¹øÈ£ fPrcpModal ("SMPMO00300", 0, 80); clearParameter("SMPMO00300_PARM1"); clearParameter("SMPMO00300_PARM2"); clearParameter("SMPMO00300_PARM3"); } // ó¹æÀúÀåÈÄ È­¸é ó¸® °ü·Ã if( sCpFlag == "Y" && sAddPrcp != "Y" ){ //20080910 ¸¶Á¤¹Î ¼öÁ¤. ½ÃÇàºÎ¼­Ã³¹æÀº »êÁ¤Æ¯·Ê üũ ¾ÈÇÑ´Ù. //JJE Á¶°ÇÃß°¡ 2008.09.08 ÀÎÁõÀúÀåÀÎ °æ¿ì, M-GPSÀÇ Àû¿ë ¹öư À̺¥Æ®¿¡¼­ (´çÀÏ+¹Ì·¡Ã³¹æ ÀúÀå 󸮰¡ ¸ðµÎ ³¡³­ ÈÄ) fGetPrcpSaveAftInfo()¸¦ Á÷Á¢ È£ÃâÇϹǷÎ, ÀÓ½ÃÀúÀå ¶§¿¡¸¸ ¿©±â¿¡¼­ ¼öÇàÇÔ. if( sSaveKindFlag == 1 ){ fExeAfterPrcpSave(prcpsaveyn ,"Y"); } }else{ if( sSaveKindFlag == 1 ) { sAftDcYn = "Y"; //ÀÓ½ÃÀúÀåÀÏ °æ¿ì »êÁ¤Æ¯·Ê ¹× ¹ýÁ¤Àü¿°º´ ŸÁö ¾Êµµ·Ï....by sonjy 20081123 } fExeAfterPrcpSave(prcpsaveyn ,sAftDcYn); //û±¸ÈÄ d/c°¡ ¾Æ´Ò °æ¿ì¸¸ Ÿµµ·Ï parameter Ãß°¡ . by sonjy 20081027 } copyNodesetType("/root/main/diaginfo/diagcdlist", "/root/result/diagcdlist", "replace", model, model); // Áø´Ü Á¤º¸ º¹»ç // ó¹æ ÀúÀåÈÄ È¯ÀÚ °¡¼Å¾ß ÇÒ °÷À» Ãâ·ÂÇÑ´Ù. 2011. 01. 05. ±è¿µÇÐ ¿Ü·¡ ȯÀÚ¸¸ Ãâ·ÂÇÑ´Ù. if (sSaveKindFlag == "0" && sCpFlag != "Y" && (sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S")){ var returnVal = fGetHardCDList("Y", 268, 3); var patgolistprtyn = model.getValue("/root/init/patgolistprtyn"); if ((returnVal == "N" || patgolistprtyn == "Y") && model.getValue("/root/paminfo/list/ordtype") == "O" ) { fPrltPatTogoPlceList(); } } if (sSaveKindFlag != 1) { var prcpsaveyn = "N"; if ( sSaveDataFlag == "0" || sSaveDataFlag == "2" ) { prcpsaveyn = "Y"; } } model.removeNodeSet ( "/root/main/prcp/prcplist"); appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ); model.removeNodeSet ( "/root/result"); model.removeNodeSet ( "/root/send/cond2" ); model.makeNode ( "/root/send/cond2" ); model.resetInstanceNode ( "/root/send" ); //Ãß°¡Ã³¹æÈ­¸éÀ̸é if ( sAddPrcp == "Y" ) { fAddPrcpInitConDone( "", "", "", "", "", "Y" , "" ); } var operation = getGlobalVariable("operation"); //¼ö¼ú¿¹¾àÁ¤º¸ set var sIoFlag = model.getValue ( "/root/paminfo/list/ioflag" ); if ( sIoFlag == "O" || sIoFlag == "S" ) { //ioflag¢Ëpid¢Ëorddd¢Ëcretno¢Ëinstcd¢Ëacptseqno¢Ëorgorddd¢Ë //¿Ü·¡/ÀÔ¿ø±¸ºÐ¢Ëµî·Ï¹øÈ£¢ËÁø·áÀÏÀڢ˻ý¼º¹øÈ£¢Ë±â°üÄÚµå¢Ëµî·ÏÀϷùøÈ£¢Ë¿øÁø·áÀÏÀÚ¢Ë var sAcptSeqNo = model.getValue ( "/root/paminfo/list/acptseqno" ); var sOrgOrdDd = model.getValue ( "/root/paminfo/list/orgorddd" ); setParameter("condparam", sIoFlag + "¢Ë" + sPid + "¢Ë" + sOrdDd + "¢Ë" + sCretNo + "¢Ë" + sInstCd + "¢Ë" + sAcptSeqNo + "¢Ë" + sOrgOrdDd ); } else { //ioflag¢Ëpid¢Ëindd¢Ëcretno¢Ëseqno¢Ëinstcd¢Ëprcpdd¢Ë //ÀÔ¿ø/ÀÔ¿ø±¸ºÐ¢Ëµî·Ï¹øÈ£¢ËÀÔ¿øÀÏÀڢ˻ý¼º¹øÈ£¢ËÀϷùøÈ£¢Ë±â°üÄÚµå¢Ëó¹æÀû¿ëÀÏ var sInPrcpDd = sPrcpDd; if( sIoFlag == "D" ) { // DSC´Â ÀÔ¿øÀ¸·Î ó¸® sIoFlag = "I"; } //û±¸ ÈÄ D/C°ü·Ã Ãß°¡ ó¸®...prcpdd¸¦ Åð¿øÈ¯ÀÚÀÏ °æ¿ì Åð¿øÀÏÀ» ³Ñ°Ü ÁØ´Ù. ±×·¸Áö ¾ÊÀ» °æ¿ì »ó´Ü Á¤º¸ ¿À·ù³². by sonjy 20081027 if( model.getValue ("/root/paminfo/list/indschacptstat") == "D" && model.getValue ( "/root/paminfo/list/dschdd" ) != "99991231" && !isNull(model.getValue ( "/root/paminfo/list/dschdd" ) ) ){ sInPrcpDd = model.getValue ( "/root/paminfo/list/dschdd" ); } setParameter("condparam", sIoFlag + "¢Ë" + sPid + "¢Ë" + sOrdDd + "¢Ë" + sCretNo + "¢Ë" + sInstCd + "¢Ë" + sInPrcpDd); } var xpt = window.screenleft + 0; var ypt = window.screenTop + 0; var coord = getRelativeCoordinate ( xpt, ypt ); var mon = coord[0]; xpt = coord[1]; ypt = coord[2]; if ( sAddPrcp != "Y" ){//&& sPrcpChkFlag != "clickpatlist" Áø·á´ë»óÀÚ¸®½ºÆ®¿¡¼­ ¼±ÅõǾúÀ»¶§´Â ¸Þ¼¼Áö ¶ç¿ìÁö ¾Ê´Â´Ù. 20100317 LYJ modal("SPMMO08900", mon, xpt, ypt, "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;"); } //±âÁ¸ÀÇ ¼ö¼ú¿¹¾à¹øÈ£°¡ ÀÖ´Â °æ¿ì¿¡´Â resetó¸® if( operation != "" ){ setGlobalVariable("operation", operation); } var useyn = getParameter("SPMMO08900_rtn_useyn"); if(useyn == "Y"){ setParameter("SPMMO08900_rtn_useyn", ""); fPatDiagSrch("save"); if ( sCpFlag == "Y" && sSaveKindFlag != 1 ){ //JJE CPÀÏ °æ¿ì, ´çÀÏ+¹Ì·¡Ã³¹æ ¸ðµÎ ÀúÀå ÈÄ ¸Ç ¸¶Áö¸·¿¡ Áø·á´ë»óÀÚ¸¦ Á¶È¸ÇÑ´Ù (2008.09.11) setGlobalVariable("emrinptsavetime", getCurrentDateTime()); // 2017.11.06 CP È­¸é¿¡¼­ ¸Å¹ø ÀÎÁõ¼­ â ¶ßÁö ¾Êµµ·Ï ¼öÁ¤ ¾ö¿µ¸¸ return true; } fInitializeConDone("save"); fTempPrcp("save"); //20080818 ¸¶Á¤¹Î ¼öÁ¤: Àüó¹æ Á¶È¸ ÀúÀåÈÄ ¹Ù·Î °¡Á®¿À´Â °É·Î ¼öÁ¤ //ivw_prcp3.window.javascript.fInitialize("init"); if ( sCpFlag != "Y" && !btn_ivbfprcp.selected) { btn_ivbfprcp.selected = true; ivw_prcp3.visible = true; ivw_prcp.visible = false; //ivw_prcp.src = "SMMMO02100_Àüȸó¹æ.xrw"; }else if ( !btn_ivbfprcp.selected ) { btn_ivbfprcp.selected = true; ivw_prcp3.visible = true; ivw_prcp2.visible = false; //ivw_prcp2.src = "SMMMO02100_Àüȸó¹æ.xrw"; } //20090327 ¸¶Á¤¹Î¼öÁ¤: Â÷»óÀ§ ·ÎÁ÷Ãß°¡ if ( model.getValue ( "/root/paminfo/list/scndyn" ) == "Y" && sPrcpGenrFlag == "O" && sSaveKindFlag != 1 ) { fScndChk(); } fInitializeScreen(); //Á¾¼Ó󹿹øÈ£, ¹Í½º¹øÈ£, hsctlnkno ÃʱâÈ­ model.setValue ( "/root/init/inclprcpno", 0 ); model.setValue ( "/root/init/hsctlnkno", 0 ); model.setValue ( "/root/init/prcpmixno", 0 ); var ordPatObj = getOpenWindow("SMMMO04100"); if(ordPatObj != null){ //µÎ °´Ã¼°ªÀÌ ´Ù¸¥ °æ¿ì »õ·Î¿î Áø·á´ë»óÀÚ È­¸éÀ» openÇÔ ordPatObj.javascript.fPrcpCallPatList(); } var ordMiniPatObj = getOpenWindow("SPMMO04200"); if(ordMiniPatObj != null){ //µÎ °´Ã¼°ªÀÌ ´Ù¸¥ °æ¿ì »õ·Î¿î Áø·á´ë»óÀÚ È­¸éÀ» openÇÔ ordMiniPatObj.javascript.fChkGetData(); } } //model.addlog(" SPEED CHECK END OF È­¸é ÀçÁ¶È¸(»ó´Ü/ó¹æ/´ë»óÀÚ)"); //model.addlog(" SPEED CHECK END OF ÀúÀå ÈÄ Ã³¸®"); //model.addlog("SPEED CHECK END OF fPrcpSave()"); // ÀÔ¿ø ¶Ç´Â ÀÀ±ÞÀÏ °æ¿ì ±â·Ï/ó¹æ Á÷Àü ÀÎÁõÀúÀåÀÌ Á¤ÇØÁø ½Ã°£(ºÐ ´ÜÀ§, ÇϵåÄÚµå 401) À̳»À̸é ÀÎÁõ¼­¸¦ ¶ç¿ìÁö ¾ÊÀ½. ÀÎÁõÀúÀåµÈ ½Ã°£À» ÀúÀå. 20111201 knuh ÃÖ¿øµ· // SMMMO00100.js, MMR01300.js, MMR00100.js, SPMRF05200.js if ((sPrcpGenrFlag == "I" || sPrcpGenrFlag == "E") && sSaveKindFlag != 1 ) { setGlobalVariable("emrinptsavetime", getCurrentDateTime()); } if(pop_MedicineConsult == "Y") { // º¹¾à»ó´ãÀÇ·Ú Ã¢ ÆË¾÷ ¿©ºÎ 2011.10.24 ¾ö¿µ¸¸ (Ä¥°î ¾àÁ¦ºÎ À̼®¹Ì ¿äû) modal("SPADC62100", "", 200, 200); } if(pop_EnConsult == "Y") { // TPN ¿µ¾ç »ó´ã ¿©ºÎ â ÆË¾÷ ¿©ºÎ 2014.03.24 ¾ö¿µ¸¸ (º»¿ø¿µ¾çÆÀ À̹ÎÁö ¿äû), 1ÁÖ ÀÌ»óÀ¸·Î º¯°æ 2014.10.27 if( messageBox("Á¤¸Æ¿µ¾ç(PN) 1ÁÖÀÌ»ó Áö¼Ó ó¹æµÇ¾î ȯÀÚ ¸ð´ÏÅ͸µµÇ¾ú½À´Ï´Ù.\n\nNST Consult ÇϽðڽÀ´Ï±î? ¹®ÀÇ(º»¿ø:5206, Ä¥°î:2594)\n\n\n¡Ø NSTÀÇ·Ú´ë»ó - ¾Æ·¡ Ç׸ñÀÇ 1°³ ÀÌ»ó¿¡ ÇØ´çÇÏ´Â °æ¿ì\n\n1.Ç÷Áß ¾ËºÎ¹Î ¡Â 3.0 g/dl ÀÎ °æ¿ì\n\n2.°æÀ念¾çÀ» ¹Þ°í ÀÖ´Â °æ¿ì\n\n3.Á¤¸Æ¿µ¾çÀ» ¹Þ°í ÀÖ´Â °æ¿ì\n\n4.ÁßȯÀڽǿ¡¼­ ÁýÁßÄ¡·á ÁßÀÎ °æ¿ì\n\n5.Áø·á´ã´çÀÇ»çÀÇ ÀÇÇÐÀû ¼Ò°ß¿¡ µû¶ó ÁýÁß¿µ¾çÄ¡·á°¡ ÇÊ¿äÇÏ¿© ÀÇ·ÚµÈ °æ¿ì\n\n6.¼ºÀå°î¼± üÁß ±âÁØ 5percentile¹Ì¸¸ÀÇ °æ¿ì(¼Ò¾Æ¸¸ ÇØ´ç)","Q999") == 6 ){ model.removeNodeset("/root/temp/cnstinfo"); model.makeValue("/root/temp/cnstinfo", "0000000770"); // Á¤¸Æ¿µ¾ç»ó´ãÀÇ·Ú modal("SPADB62300", 1, 0, 0 ,"SPADB62300", "/root/temp/cnstinfo", "/root/temp/cnstinfo"); } } if (pop_DrgAbleYn == "Y") { // DRG Á¤º¸È­¸é ÆË¾÷. 2013.06.25 if ( messageBox ( "DRG Àû¿ë °¡´ÉÇÑ ¼ö¼úó¹æÀÌ ÀúÀå µÇ¾ú½À´Ï´Ù.\nDRG Àӽôë»óÀÚ·Î µî·Ï ÇϽðڽÀ´Ï±î?","Q") == "6" ) { setParameter("pid", sPid); setParameter("indd", sOrdDd); setParameter("cretno", sCretNo); setParameter("prcpyn", "Y"); // ó¹æ È­¸é¿¡¼­ ¿ÀÇ modal("SPPIJ03201", "", 200, 200); } } if(pop_ExamRsrvYn == "Y") { // ÅëÇհ˻翹¾à ó¹æ Ç׸ñ ¿©ºÎ 2015.10.01 ¾ö¿µ¸¸ var ansExamRsrv = mmbfGetUserEnvQuestValue("067"); // 067: ó¹æ ÀúÀå ½Ã ÅëÇհ˻翹¾à ÆË¾÷ ¿©ºÎ if( (ansExamRsrv == "002" && (sPrcpGenrFlag == "O" || sPrcpGenrFlag == "S")) || (ansExamRsrv == "003" && (sPrcpGenrFlag == "I" || sPrcpGenrFlag == "E" || sPrcpGenrFlag == "D")) || ansExamRsrv == "004" ) { // 001:ÆË¾÷ÇÏÁö ¾ÊÀ½, 002:¿Ü·¡È¯ÀÚÆË¾÷, 003:ÀÔ¿øÈ¯ÀÚÆË¾÷, 004:¸ðµçȯÀÚÆË¾÷ clearParameter("opener_parameter_id"); setParameter("opener_parameter_id", sPid); modal("SMPEA00100"); } } if(sCheckAfOpCnt > 0) { // ¿À·ùüũ ó¹æÀúÀåÈÄ ¿ÀÇ ī¿îÆ® setParameter("SPMMO90600_msgdd", sMsgDd); setParameter("SPMMO90600_msgno", sMsgNo); setParameter("SPMMO90600_histno", sHistNo); setParameter("SPMMO90600_msgcls", "F"); // ó¹æÀúÀåÈÄ ¿ÀÇ ¸Þ¼¼Áö ŸÀÔ open("SPMMO90600"); } endStepDate = new Date(); // °¢ ¾÷ºÎ Á¾·áÈÄ ½Ã°£ step5Elapsed = endStepDate.getTime() - startStepDate.getTime(); // È­¸é ÀúÀåÈÄ Ã³¸® ¼Ò¿ä ½Ã°£ if(sPrcpFlag == "0" && sSaveKindFlag == "0" && sAddPrcp != "Y") { // ¼ÓµµÃ¼Å©¸¦ À§ÇÑ ¸ð´ÏÅ͸µ ·Î±× µ¥ÀÌÅÍ »ý¼º. reqSetMonitoringLog( "PrcpSave" // type , sSaveDataFlag // item01 : ÀúÀå µ¥ÀÌÅÍ À¯Çü 0:ÀÎÁõÀúÀå(Áø´Ü+»óº´), 1:ÀÎÁõÀúÀå(Áø´Ü), 2:ÀÎÁõÀúÀå(ó¹æ), 4:ÀÓ½ÃÀúÀå(ó¹æ), 5:ÀÓ½ÃÀúÀåDC(ó¹æ), 6:ÀÓ½ÃÀúÀå(Áø´Ü+ó¹æ), 7:ÀÓ½ÃÀúÀå(Áø´Ü) , sPrcpGenrFlag // item02 : Áø·áÀ¯Çü (O:¿Ü·¡, S:°Ç°­°ËÁø, I:ÀÔ¿ø, E:ÀÀ±Þ, D:ÀÏÀϼö¼ú,³·º´µ¿) , "0" // item03 : ÀԷ±¸ºÐ (ÄÚµåÁ¤ÀǼ­ M0034 ÂüÁ¶) inptflag , sPid // item04 : µî·Ï¹øÈ£ , sOrdDd // item05 : Áø·á(ÀÔ¿ø)ÀÏÀÚ , sCretNo // item06 : »ý¼º¹øÈ£ , sOrdDeptCd // item07 : Áø·áºÎ¼­ , nPrcpCnt // item08 : 󹿰¹¼ö , nDiagCnt // item09 : Áø´Ü°¹¼ö , (step1Elapsed + step2Elapsed + step5Elapsed) // item10 : Àüü¼Ò¿ä½Ã°£ , step1Elapsed // item11 : È­¸é ¿À·ùüũ ¼Ò¿ä½Ã°£ , step2Elapsed // item12 : ¼­¹ö ¿À·ùüũ ¼Ò¿ä½Ã°£ , step3Elapsed // item13 : È­¸é ¿À·ùó¸® ¼Ò¿ä½Ã°£ , step4Elapsed // item14 : ¼­¹ö ÀúÀåó¸® ¼Ò¿ä½Ã°£ , step5Elapsed // item15 : È­¸é ÀúÀåÈÄó¸® ¼Ò¿ä½Ã°£ , (step2Elapsed + step5Elapsed) // item16 : ¼­¹ö ÀúÀåó¸® ¼Ò¿ä½Ã°£ + È­¸é ÀúÀåÈÄó¸® ¼Ò¿ä½Ã°£ , "Y" // Æ©´×·ÎÁ÷ Àû¿ë¿©ºÎ ); } return true; } /**@desc : ó¹æ ÀúÀåÈÄ È­¸é ó¸® ÇÔ¼ö * @return : true, false * @authur : ¾ö¿µ¸¸ 2014. 02. 07 */ function fExeAfterPrcpSave( sPrcpSaveYn ,sAftDcYn ) { var rtnVal = true; var sPrcpGenrFlag = model.getValue ("/root/patflag/list/prcpgenrflag"); fChkNPDschChk(); //Á¤½Å°ú ÀÇ·á±Þ¿© ȯÀÚ ÀÔÅð¿ø À¯Çü üũ if( fGetPrcpEtcInfo("save") == false ){ //ó¹æ¿¡ ´ëÇÑ ÁßÁõÁø·á, »êÁ¤Æ¯·Ê, ¹ýÁ¤Àü¿°º´ ó¸® ( Ãß°¡Ã³¹æ¿¡¼­´Â ó¸® ¾ÈÇÔ ) rtnVal = false; } if(sPrcpGenrFlag != "O" && sPrcpGenrFlag != "S"){ copyNodesetType("/root/savertninfo/saveestmspclcs", "/root/savertninfo/dschestmspclcs", "replace", model, model); copyNodesetType("/root/savertninfo/saveserdiagappfrm", "/root/savertninfo/dschserdiagappfrm", "replace", model, model); copyNodesetType("/root/savertninfo/savelglydis", "/root/savertninfo/dschlglydis", "replace", model, model); copyNodesetType("/root/savertninfo/saverareobst", "/root/savertninfo/dschrareobst", "replace", model, model); copyNodesetType("/root/savertninfo/saveresindenture", "/root/savertninfo/dschresindenture", "replace", model, model); if( fGetPrcpEtcInfo("save") == false ){ //ó¹æ¿¡ ´ëÇÑ ÁßÁõÁø·á, »êÁ¤Æ¯·Ê, ¹ýÁ¤Àü¿°º´ ó¸® ( Ãß°¡Ã³¹æ¿¡¼­´Â ó¸® ¾ÈÇÔ ) rtnVal = false; } } //by sonjy °£È£¹Ý³³ÀÇ·Ú Ã³¹æ ÀúÀå ÈÄ È£Ã⠽ÿ¡´Â...¾ÆÁ÷ È­¸éÀÌ ±×·ÁÁöÁö ¾ÊÀº »óÅÂÀÓ. if( model.getValue("/root/bfinityn") == "Y" ){ if( model.getValue("/root/cp") == "Y" ){ //JJE ó¹æÀÏÀÌ ¹Ì·¡ÀÏÀÚ·Î º¯°æµÇ¾î ÀÖÀ»°æ¿ì, ¿À´Ã³¯Â¥·Î ´Ù½Ã ¼³Á¤ (2008.09.11) model.setValue("/root/init/prcpdd", getCurrentDate()); cmb_prcpdd.refresh(); } ivw_prcp3.window.javascript.fInitialize("save"); } //true ¸®ÅÏ Ãß°¡(2008.09.29 JJE) return rtnVal; //return true; } function fGetPrcpSaveAftInfo( prcpsaveyn ,aftdcyn ) { var rtnVal = true; //return value(true/false) ¼±¾ð Ãß°¡ (2010.02.20 JJE) if( aftdcyn == null || isNull(aftdcyn) ) aftdcyn = ""; //û±¸ ÈÄ d/c°ü·Ã Ãß°¡ by sonjy 20081027 û±¸ ÈÄ d/c½Ã ¹ýÁ¤Àü¿°º´ ¹× »êÁ¤Æ¯·Ê¸¦ üũÇÏÁö ¾Êµµ·Ï ÇÑ´Ù. fChkNPDschChk(); //Á¤½Å°ú ÀÇ·á±Þ¿© ȯÀÚ ÀÔÅð¿ø À¯Çü üũ var orddd = ""; var prcpgenrflag = model.getValue ( "/root/patflag/list/prcpgenrflag" ); if ( prcpgenrflag == "O" || prcpgenrflag == "S" ){ //¿Ü·¡À϶§ orddd = model.getValue ( "/root/paminfo/list/orddd" ); orddrid = model.getValue ( "/root/paminfo/list/orddrid" ); } else { orddd = model.getValue ( "/root/paminfo/list/indd" ); orddrid = model.getValue ( "/root/paminfo/list/medispclid" ); } //ó¹æ¿¡ ´ëÇÑ ÁßÁõÁø·á, »êÁ¤Æ¯·Ê, ¹ýÁ¤Àü¿°º´ ó¸® model.setValue ( "/root/send/cond1", prcpgenrflag ); //¿Ü·¡,ÀÔ¿ø±¸ºÐ model.setValue ( "/root/send/cond17", model.getValue("/root/paminfo/list/pid")); //ȯÀÚ¹øÈ£ model.setValue ( "/root/send/cond3", orddd ); //Áø·áÀÏ model.setValue ( "/root/send/cond4", model.getValue("/root/paminfo/list/cretno")); //cretno model.setValue ( "/root/send/cond5", model.getValue("/root/paminfo/list/instcd")); //±â°üÄÚµå model.setValue ( "/root/send/cond6", model.getValue("/root/paminfo/list/orddeptcd")); //Áø·á°ú model.setValue ( "/root/send/cond7", orddrid ); //Áø·áÀÇid model.setValue ( "/root/send/cond8", model.getValue("/root/init/prcpdd")); //ó¹æÀÏ model.setValue ( "/root/send/cond9", model.getValue("/root/paminfo/list/age")); //³ªÀÌ model.setValue ( "/root/send/cond10", model.getValue( "/root/hidden/dschprcpyn")); //Åð¿ø¿À´õ ¿©ºÎ model.setValue ( "/root/send/cond11", model.getValue( "/root/paminfo/list/suppkind")); //º¸Á¶À¯Çü model.setValue ( "/root/send/cond12", model.getValue( "/root/init/prcpauthflag")); //±ÇÇѱ¸ºÐ model.setValue ( "/root/send/cond13", model.getValue("/root/paminfo/list/insukind")); //º¸ÇèÀ¯Çü model.setValue ( "/root/send/cond14", getUserInfo("dutplcecd")); //ºÎ¼­ÄÚµå model.setValue ( "/root/send/cond15", getUserInfo ("userid")); //»ç¿ëÀÚID model.setValue ( "/root/send/cond16", prcpsaveyn ); //ó¹æÀúÀå¿©ºÎ model.setValue ( "/root/send/cond18", model.getValue ("/root/formerkey/pseuacptflag")); //½ÃÇàºÎ¼­Ã³¹æ°¡Á¢¼ö¿©ºÎ model.makeValue ( "/root/send/cond19", aftdcyn); //û±¸ ÈÄ d/có¹æ ¿©ºÎ by sonjy 20081027 Ãß°¡ //by sonjy 20091120 Àüó¹æ °³Àκ° Á¶È¸ option Ãß°¡ var bfprcpviewnode = instance1.selectSingleNode("/root/initsrch/envinfo[qestcd='018']/answcnt"); var bfprcpviewflag = ""; if( bfprcpviewnode != null ) bfprcpviewflag = bfprcpviewnode.text ; model.makeValue ( "/root/send/bfprcpviewflag", bfprcpviewflag); //submit("TRMMO00122") => if( submit("TRMMO00122") == true ) ·Î º¯°æ (2008.09.28 JJE) if( submit ( "TRMMO00122", false ) ){ if( fGetPrcpEtcInfo("save") == false ){ //ó¹æ¿¡ ´ëÇÑ ÁßÁõÁø·á, »êÁ¤Æ¯·Ê, ¹ýÁ¤Àü¿°º´ ó¸® ( Ãß°¡Ã³¹æ¿¡¼­´Â ó¸® ¾ÈÇÔ ) rtnVal = false; //return false; } if(prcpgenrflag != "O" && prcpgenrflag != "S"){ var nDschOutCnt = model.instances(0).selectNodes ( prcpNode + "[status ='I' and prcpkindcd = '70']" ).length; if(nDschOutCnt > 0) { model.removeNodeSet ( "/root/send/cond2" ); model.makeNode ( "/root/send/cond2" ); model.setValue ( "/root/send/cond1", model.getValue("/root/paminfo/list/pid") ); //ȯÀÚ¹øÈ£ model.setValue ( "/root/send/cond2", model.getValue("/root/paminfo/list/indd") ); //Áø·áÀÏ model.setValue ( "/root/send/cond3", model.getValue("/root/paminfo/list/instcd")); //cretno model.setValue ( "/root/send/cond4", model.getValue("/root/paminfo/list/cretno")); //cretno if ( submit ( "TRMMO00119", false )) { //ó¹æ¿¡ ´ëÇÑ ÁßÁõÁø·á, »êÁ¤Æ¯·Ê, ¹ýÁ¤Àü¿°º´ ó¸® model.setValue ( "/root/send/cond1", "O" ); //¿Ü·¡,ÀÔ¿ø±¸ºÐ model.setValue ( "/root/send/cond17", model.getValue("/root/paminfo/list/pid")); //ȯÀÚ¹øÈ£ model.setValue ( "/root/send/cond3", model.getValue("/root/followup/followup/otpt_orddd") ); //Áø·áÀÏ model.setValue ( "/root/send/cond4", model.getValue("/root/followup/followup/otpt_cretno")); //cretno model.setValue ( "/root/send/cond5", model.getValue("/root/paminfo/list/instcd")); //±â°üÄÚµå model.setValue ( "/root/send/cond6", model.getValue("/root/paminfo/list/orddeptcd")); //Áø·á°ú model.setValue ( "/root/send/cond7", orddrid ); //Áø·áÀÇid model.setValue ( "/root/send/cond8", model.getValue("/root/init/prcpdd")); //ó¹æÀÏ model.setValue ( "/root/send/cond9", model.getValue("/root/paminfo/list/age")); //³ªÀÌ model.setValue ( "/root/send/cond10", model.getValue( "/root/hidden/dschprcpyn")); //Åð¿ø¿À´õ ¿©ºÎ model.setValue ( "/root/send/cond11", model.getValue( "/root/paminfo/list/suppkind")); //º¸Á¶À¯Çü model.setValue ( "/root/send/cond12", model.getValue( "/root/init/prcpauthflag")); //±ÇÇѱ¸ºÐ model.setValue ( "/root/send/cond13", model.getValue("/root/paminfo/list/insukind")); //º¸ÇèÀ¯Çü model.setValue ( "/root/send/cond14", getUserInfo("dutplcecd")); //ºÎ¼­ÄÚµå model.setValue ( "/root/send/cond15", getUserInfo ("userid")); //»ç¿ëÀÚID model.setValue ( "/root/send/cond16", prcpsaveyn ); //ó¹æÀúÀå¿©ºÎ model.setValue ( "/root/send/cond18", model.getValue ("/root/formerkey/pseuacptflag")); //½ÃÇàºÎ¼­Ã³¹æ°¡Á¢¼ö¿©ºÎ model.makeValue ( "/root/send/cond19", aftdcyn); //û±¸ ÈÄ d/có¹æ ¿©ºÎ by sonjy 20081027 Ãß°¡ if( submit ( "TRMMO00122", false ) ){ if( fGetPrcpEtcInfo("save") == false ){ //ó¹æ¿¡ ´ëÇÑ ÁßÁõÁø·á, »êÁ¤Æ¯·Ê, ¹ýÁ¤Àü¿°º´ ó¸® ( Ãß°¡Ã³¹æ¿¡¼­´Â ó¸® ¾ÈÇÔ ) rtnVal = false; //return false; } } } } } //by sonjy °£È£¹Ý³³ÀÇ·Ú Ã³¹æ ÀúÀå ÈÄ È£Ã⠽ÿ¡´Â...¾ÆÁ÷ È­¸éÀÌ ±×·ÁÁöÁö ¾ÊÀº »óÅÂÀÓ. if( model.getValue("/root/bfinityn") == "Y" ){ if( model.getValue("/root/cp") == "Y" ){ //JJE ó¹æÀÏÀÌ ¹Ì·¡ÀÏÀÚ·Î º¯°æµÇ¾î ÀÖÀ»°æ¿ì, ¿À´Ã³¯Â¥·Î ´Ù½Ã ¼³Á¤ (2008.09.11) model.setValue("/root/init/prcpdd", getCurrentDate()); cmb_prcpdd.refresh(); } ivw_prcp3.window.javascript.fInitialize("save"); } } //start: ¿ÜºÎ CD ÀçÆÇµ¶ ÀÇ·Ú Á¤º¸ update (2010.02.19 JJE) if( getParameter("spmmo21200_rtnyn") == "Y" ){ var saveYN = "N"; var prcpPkSpec = ""; var savePrcpDD = ""; var savePrcpCd = ""; var saveEqmtCd = ""; var saveTrsmDD = ""; var saveTrsmTM = ""; //var saveOcdSeq = ""; var prcpcdList = getParameter("spmmo21200_rtnprcpcd").split("^"); //prcpCd var eqmtcdList = getParameter("spmmo21200_rtneqmtcd").split("^"); //cdType var trsmddList = getParameter("spmmo21200_rtntrsmdd").split("^"); //trsmDD var trsmtmList = getParameter("spmmo21200_rtntrsmtm").split("^"); //trsmTM //var ocdseqList = getParameter("spmmo21200_rtnocdseq").split("^"); //oCdSeq var iRow = 0; model.makeNode ("/root/spmmo21200/send"); for( var i=0; i