/** * @(#) PAM.js * ¿ø¹«¿¡¼ °øÅëÀ¸·Î »ç¿ëÇÒ º¯¼ö¿Í ÇÔ¼ö¸¦ Á¤ÀÇÇÑ´Ù. * ¼öÁ¤ÀÌ·Â * - 2007. 08. 08 / ÃÖÃÊÀÛ¼ºÀÚ / ÃÖÈñ°æ */ /** * @desc : Global º¯¼ö¼±¾ð *
* 1. º¸ÇèÀ¯Çü * 2. À¯Çüº¸Á¶ ** @--------------------------------------------------- */ //1.º¸ÇèÀ¯Çü var gsInsu_BoHeom = "11"; //°Ç°º¸Çè var gsInsu_BoHo1 = "21"; //ÀÇ·á±Þ¿©1 var gsInsu_BoHo2 = "22"; //ÀÇ·á±Þ¿©2 var gsInsu_HangYeo = "24"; //Çà¿© var gsInsu_JaboKind = "31"; //ÀÚº¸ var gsInsu_SanJae = "41"; //»êÀç var gsInsu_GongSang = "42"; //°ø»ó var gsInsu_IlBan = "51"; //ÀÏ¹Ý var gsInsu_ForIn = "61"; //¿Ü±¹ÀÎ var gsInsu_ImSang = "71"; //ÀÓ»ó½ÃÇè var gsInsu_Noin = "81"; //³ëÀÎÀå±â¿ä¾çº¸Çè //2.À¯Çüº¸Á¶ var gsSupp_BASE = "00"; //Á¤»ó var gsSupp_100 = "01"; //Àü¾×º»ÀÎ100% var gsSupp_INGONG = "02"; //Àΰø½ÅÀåÅõ¼® var gsSupp_BOKMAK = "03"; //º¹¸·°ü·ù½¶ var gsSupp_TRANS = "04"; //Àå±âÀÌ½Ä var gsSupp_GAEDUGAESIM = "05"; //°³µÎ°³½É 10% var gsSupp_AM = "06"; //¾Ï 10% var gsSupp_SJTR = "07"; //º¸Á¶ »êÁ¤Æ¯·Ê 20 var gsSupp_LESSTHANSIXAGE = "08"; //ÀÔ¿ø6¼¼¹Ì¸¸ var gsSupp_NATRBABY = "09"; //ÀÚ¿¬ºÐ¸¸ var gsSupp_HOMECARE = "10"; //°¡Á¤°£È£ var gsSupp_HOMECAREAM = "11"; //°¡Á¤°£È£(µî·Ï¾Ï) 10% var gsSupp_SUTAK = "12"; //¼öŹ var gsSupp_JSJA = "14"; //Á¤½Å°úÁ¤¾× //var gsSupp_HANDI = "71"; //Àå¾ÖÀÎ //var gsSupp_JABH = "B"; //Àü¾×º¸ÇèÀںδã¾×(Çѵµ¾×) //var gsSupp_IMSANG = "T"; //Àӻ󿬱¸ //º¸ÇèÀÚ±âÈ£ °Ç°º¸Çè µðÆúÆ® °ª var gsInsuCd_Default = "0015"; //°Ç°º¸Çè && !Àü¾×º»Àκδã ÀÏ °æ¿ì, µðÆúÆ® ¼¼ÆÃ //ÀÀ±Þ,ºÐ¸¸½Ç var gsOrddeptCd_ER = "2280000000" //ÀÀ±ÞÀÇÇаú var gsWardCd_ER = "3050135000" //ÀÀ±Þº´µ¿ var gsWardCd_ER1 = "2280200000" //ÀÀ±ÞÀÇ·á¼¾ÅÍ var gsWardCd_BABY = "2100300000" //ºÐ¸¸½Ç1 var gsWardcd_DSC = "2360800000" //DSCº´µ¿ var gsWardcd_CHEMO = "3120400000" //CHEMOº´µ¿ var gsOrddeptcd_BABY = "2110000000" //¼Ò¾ÆÃ»¼Ò³â°ú -- ¼Ò¾ÆÃ»¼Ò³â°ú ºÐ°ú¿¡ µû¸¥ »ç¿ë±ÝÁö:±âÁ¸·ÎÁ÷ ¿¡·¯¹æÁö¸¦ À§ÇØ »èÁ¦´Â ÇÏÁö ¾ÊÀ¸³ª ¿¡·¯ ¹æÁö À§ÇØ À¯Áö by Á¶Áß·¡ 20140401 //±Ý¾×Ç¥½Ã±â ocx var AmtDisplay = null; //¼ö³³VIP¹Ì¼ö¿©ºÎ var VIPUNCOYN = 'N'; //±Ý¾×Ç¥½Ã±â Á¾·ù üũ var AmtDispKind = 'POPUP'; // Ãß°¡ÀÌ·Â 20100224 JHP SPPMC02500_ȯÀÚÁ¶È¸ ¿ø¹«Âʰú ¿ø¹«ÀÌ¿ÜÀÇÂÊ ±¸ºÐÇÏ´Â ±¸ºÐ º¯¼ö var PatRefPamFlag = ""; /** * @desc : ÁֹιøÈ£ ¾ÕÀÚ¸® üũ *
* 1. ÁֹιøÈ£ ¾ÕÀÚ¸® ±æÀÌ Ã¼Å© * 2. ¼ýÀÚÇüÅ üũ ** @param : vRrgstno1 - ÁֹιøÈ£ ¾ÕÀÚ¸®, ctrlNm - ÁֹιøÈ£ ¾ÕÀÚ¸® ÄÁÆ®·ÑÀ̸§ * @return : true/false * @--------------------------------------------------- */ function fRrgstNo1Veri(vRrgstno1, ctrlNm){ if (vRrgstno1 != null && vRrgstno1 != "" && vRrgstno1 != " " && vRrgstno1 != "-"){ if (vRrgstno1.length != 6){ messageBox("ÁֹιøÈ£1Àº 6ÀÚ¸®¿©¾ß ÇÕ´Ï´Ù!","E999",""); model.setFocus(ctrlNm); model.refresh(); return false; } if (vRrgstno1.isNumber() != true){ messageBox("ÁֹιøÈ£1Àº ¼ýÀÚÇüÅ·ΠÀԷµǾî¾ß ÇÕ´Ï´Ù!","E999",""); model.setFocus(ctrlNm); model.refresh(); return false; } }else{ messageBox("ÁֹιøÈ£1Àº 6ÀÚ¸®¿©¾ß ÇÕ´Ï´Ù!","E999",""); model.setFocus(ctrlNm); model.refresh(); return false; } } /** * @desc : ÁֹιøÈ£ µÞÀÚ¸® üũ *
* 1. ÁֹιøÈ£ ¾ÕÀÚ¸® ±æÀÌ * 2. ÁֹιøÈ£ µÞÀÚ¸® ±æÀÌ * 3. ÁֹιøÈ£ ¾ÕÀÚ¸® ³¯Â¥Çü½Ä üũ * 4. »ý³â¿ùÀÏ ±¸Çϱâ * 5. ¼ºº° ±¸Çϱâ * 6. ³ªÀÌ ±¸Çϱâ ** @param : vRrgstno1 - ÁֹιøÈ£ ¾ÕÀÚ¸®, vRrgstno2 - ÁֹιøÈ£ µÞÀÚ¸®, ctrlNm1- ÁֹιøÈ£ ¾ÕÀÚ¸® ÄÁÆ®·ÑÀ̸§, ctrlNm2- ÁֹιøÈ£ µÞÀÚ¸® ÄÁÆ®·ÑÀ̸§ * @return : true/false , »ý³â¿ùÀÏ(8ÀÚ¸®), ¼ºº°, ³ªÀÌ * @--------------------------------------------------- */ function fRrgstNo2Veri(vRrgstno1, vRrgstno2, ctrlNm1, ctrlNm2, rBrthdd, rSex, rAge){ if(vRrgstno1.length != 6){ messageBox("ȯÀÚÁֹιøÈ£1Àº 6ÀÚ¸®ÀÔ´Ï´Ù!","E999",""); model.setFocus(ctrlNm1); return false; } if(vRrgstno2.length != 7){ messageBox("ȯÀÚÁֹιøÈ£2Àº 7ÀÚ¸®ÀÔ´Ï´Ù!","E999",""); model.setFocus(ctrlNm2); return false; } /* 9: 1800 ~ 1899³â¿¡ ÅÂ¾î³ ³²¼º 0: 1800 ~ 1899³â¿¡ ÅÂ¾î³ ¿©¼º 1: 1900 ~ 1999³â¿¡ ÅÂ¾î³ ³²¼º 2: 1900 ~ 1999³â¿¡ ÅÂ¾î³ ¿©¼º 3: 2000 ~ 2099³â¿¡ ÅÂ¾î³ ³²¼º 4: 2000 ~ 2099³â¿¡ ÅÂ¾î³ ¿©¼º 5: 1900 ~ 1999³â¿¡ ÅÂ¾î³ ¿Ü±¹ÀÎ ³²¼º 6: 1900 ~ 1999³â¿¡ ÅÂ¾î³ ¿Ü±¹ÀÎ ¿©¼º 7: 2000 ~ 2099³â¿¡ ÅÂ¾î³ ¿Ü±¹ÀÎ ³²¼º 8: 2000 ~ 2099³â¿¡ ÅÂ¾î³ ¿Ü±¹ÀÎ ¿©¼º */ var gubn = vRrgstno2.substr(0, 1); switch(gubn){ case '0' : vBrthdd = '18'.concat(vRrgstno1); break; case '9' : vBrthdd = '18'.concat(vRrgstno1); break; case '1' : vBrthdd = '19'.concat(vRrgstno1); break; case '2' : vBrthdd = '19'.concat(vRrgstno1); break; case '3' : vBrthdd = '20'.concat(vRrgstno1); break; case '4' : vBrthdd = '20'.concat(vRrgstno1); break; case '5' : vBrthdd = '19'.concat(vRrgstno1); break; case '6' : vBrthdd = '19'.concat(vRrgstno1); break; case '7' : vBrthdd = '20'.concat(vRrgstno1); break; case '8' : vBrthdd = '20'.concat(vRrgstno1); break; default : vBrthdd = '19'.concat(vRrgstno1); break; } if (isValidDateTime(vBrthdd, "YYYYMMDD") == false){ messageBox("ÁֹιøÈ£ ¾Õ6ÀÚ¸® Çü½Ä¿À·ùÀÔ´Ï´Ù. ¿Ã¹Ù¸¥ ÀÏÀÚÇüÅ·ΠÀÔ·ÂÇϽʽÿä!","E999",""); model.refresh(); model.setFocus(ctrlNm1); return false; } //¼ºº° rSex = getGender(vRrgstno2); //³ªÀÌ rAge = getFullAge(vBrthdd); rBrthdd = vBrthdd; var ptbs_rrgstno = vRrgstno1.concat(vRrgstno2); if(isResidentNo(ptbs_rrgstno) == false){ messageBox("À¯È¿ÇÏÁö ¾ÊÀº ÁֹιøÈ£ÀÔ´Ï´Ù!", "E999", ""); return false; } } /** * @desc : ÁֹιøÈ£ µÞÀÚ¸® üũ *
* 1. ÁֹιøÈ£ ¾ÕÀÚ¸® ±æÀÌ * 2. ÁֹιøÈ£ µÞÀÚ¸® ±æÀÌ * 3. ÁֹιøÈ£ ¾ÕÀÚ¸® ³¯Â¥Çü½Ä üũ * 4. »ý³â¿ùÀÏ ±¸Çϱâ * 5. ¼ºº° ±¸Çϱâ * 6. ³ªÀÌ ±¸Çϱâ ** @param : vRrgstno1 - ÁֹιøÈ£ ¾ÕÀÚ¸®, vRrgstno2 - ÁֹιøÈ£ µÞÀÚ¸®, ctrlNm1- ÁֹιøÈ£ ¾ÕÀÚ¸® ÄÁÆ®·ÑÀ̸§, ctrlNm2- ÁֹιøÈ£ µÞÀÚ¸® ÄÁÆ®·ÑÀ̸§ * @return : true/false , »ý³â¿ùÀÏ(8ÀÚ¸®), ¼ºº°, ³ªÀÌ * @--------------------------------------------------- */ function fRrgstNo3Veri(vRrgstno1, vRrgstno2, ctrlNm1, ctrlNm2, rBrthdd, rSex, rAge){ if (vRrgstno1.length != 6) { messageBox("ȯÀÚÁֹιøÈ£1Àº 6ÀÚ¸®ÀÔ´Ï´Ù!","E999",""); model.setFocus(ctrlNm1); return false; } if (vRrgstno2.length != 7) { messageBox("ȯÀÚÁֹιøÈ£2Àº 7ÀÚ¸®ÀÔ´Ï´Ù!","E999",""); model.setFocus(ctrlNm2); return false; } var gubn = vRrgstno2.substr(0,1); switch(gubn){ case '1' : case '2' : case '5' : case '6' : vBrthdd = '19'.concat(vRrgstno1); break; case '3' : case '4' : case '7' : case '8' : vBrthdd = '20'.concat(vRrgstno1); break; case '9' : case '0' : vBrthdd = '18'.concat(vRrgstno1); break; default : vBrthdd = '19'.concat(vRrgstno1); break; } if (isValidDateTime(vBrthdd, "YYYYMMDD") == false) { var result1 = messageBox("ÁֹιøÈ£ ¾Õ6ÀÚ¸® Çü½Ä¿À·ùÀÔ´Ï´Ù. °è¼Ó ÁøÇàÇϽðڽÀ´Ï±î? (Y/N)","Q999",""); if (result1 == "6") { return true; } else { model.refresh(); model.setFocus(ctrlNm1); return false; } } //¼ºº° rSex = getGender(vRrgstno2); //³ªÀÌ rAge = getFullAge(vBrthdd); rBrthdd = vBrthdd; var ptbs_rrgstno = vRrgstno1.concat(vRrgstno2); if (isResidentNo(ptbs_rrgstno) == false) { //messageBox("À¯È¿ÇÏÁö ¾ÊÀº ÁֹιøÈ£ÀÔ´Ï´Ù!","E999",""); //À̵¿Àç20071127 var result = messageBox("À¯È¿ÇÏÁö ¾ÊÀº ÁֹιøÈ£ÀÔ´Ï´Ù! °è¼Ó ÁøÇàÇϽðڽÀ´Ï±î?.(Y/N)","Q999",""); if (result == "6") {// return true; } else { // return false; } } } /**2010-01-18 ±èÁÖÈñ * @desc : »ý³â¿ùÀÏ ³¯Â¥Çü½Ä üũ * @param : vBrthdd - »ý³â¿ùÀÏ, ctrlNm- »ý³â¿ùÀÏ ÄÁÆ®·ÑÀ̸§ * @return : true/false */ function fBrthddVeri(vBrthdd, ctrlNm){ // »ý³â¿ùÀÏ Çü½Ä °ËÁõ if (isValidDateTime(vBrthdd, "YYYYMMDD") == false){ messageBox("»ý³â¿ùÀÏ Çü½Ä¿À·ùÀÔ´Ï´Ù. ¿Ã¹Ù¸¥ ÀÏÀÚÇüÅ·ΠÀÔ·ÂÇϽʽÿä!","E999",""); model.refresh(); return false; } // »ý³â¿ùÀÏ ¹Ì·¡ÀÏÀÚ °ËÁõ if (vBrthdd > getCurrentDate()) { messageBox("»ý³â¿ùÀÏÀº ¹Ì·¡ÀÏÀÚ·Î ÀÔ·ÂÇÒ ¼ö ¾ø½À´Ï´Ù!","E999",""); model.refresh(); return false; } } /** * @desc : º¸ÇèÁ¤º¸ üũ *
* 1. ÇʼöÇ׸ñ ÀԷ üũ * * === üũ»çÇ× === * ÃßÈÄ, Áø·áÀÇ·Ú¼ Á¦ÃⱸºÐ üũ½Ã, ÆÄ¶ó¹ÌÅÍ Ãß°¡ÇÊ¿ä 2007.08.11 * º¸ÇèÀ¯Çü ¼±ÅýÃ, ÇǺ¸ÇèÀÚ¿ÍÀÇ °ü°è [º»ÀÎ]À¸·Î ÀÚµ¿¼¼ÆÃ (°Ç°º¸ÇèÀº Á¦¿Ü½Ãų¼ö ÀÖÀ½) * º¸ÇèÀ¯Çü°ú º¸Á¶À¯ÇüÀ» ¼±Åà ½Ã, ȯÀÚÀÇ º¸ÇèÁ¤º¸ Á¶È¸ - º¸Á¶À¯ÇüÀÌ Àü¾×º»ÀκδãÀ̸é, º¸ÇèÁ¤º¸ Á¶È¸ÇÒ ÇÊ¿ä¾øÀ½.(º¸ÇèÁ¤º¸ ÀúÀåÇÏ¸é ¾ÈµÊ) ** @param : vArrayInsu (vInsuKind, vSuppKind, vSuppkindResn, vInsuCd, vInsuNo, vInsdNm, vInsdRela, vInsdRrgstno1, vInsdRrgstno2, vFromdd, vTodd) * vArrayCtrl (vArrayCtrl[0],.....) * @return : true/false * Ç׸ñ üũ¸¦ ÅëÇØ Àç¼¼ÆÃµÈ °ª return * @--------------------------------------------------- */ function fInsuInfoVeri(vArrayInsu, vArrayCtrl){ /* vArrayInsu[0] : InsuKind º¸ÇèÀ¯Çü vArrayInsu[1] : SuppKind º¸Á¶À¯Çü vArrayInsu[2] : SuppkindResn º¸Á¶À¯Çü»çÀ¯ vArrayInsu[3] : InsuCd º¸ÇèÀÚ±âÈ£ vArrayInsu[4] : InsuNo º¸ÇèÁõ¹øÈ£ vArrayInsu[5] : InsdNm ÇǺ¸ÇèÀÚÀ̸§ vArrayInsu[6] : InsdRela ÇǺ¸ÇèÀÚ¿ÍÀÇ °ü°è vArrayInsu[7] : InsdRrgstno1 ÇǺ¸ÇèÀÚÁֹιøÈ£1 vArrayInsu[8] : InsdRrgstno2 ÇǺ¸ÇèÀÚÁֹιøÈ£2 vArrayInsu[9] : Fromdd ÀÚ°ÝÃëµæÀÏÀÚ vArrayInsu[10]: Todd Á¾·áÀÏÀÚ vArrayCtrl <= vArrayInsu ¼ø¼´ë·Î ÄÁÆ®·Ñ¸í */ //1. º¸ÇèÁ¤º¸ Çʼö°ª üũ (º¸ÇèÀ¯Çü, º¸Á¶À¯Çü, º¸Á¶À¯Çü»çÀ¯) if ( vArrayInsu[0] == null || vArrayInsu[0] == "" || vArrayInsu[0] == " " || vArrayInsu[0] == "-" ) { messageBox("È®ÀÎ! º¸ÇèÀ¯ÇüÀ» ÀÔ·ÂÇØ Áֽʽÿä!","E999",""); model.setFocus(vArrayCtrl[0]); return false; } if ( vArrayInsu[1] == null || vArrayInsu[1] == "" || vArrayInsu[1] == " " || vArrayInsu[1] == "-" ) { messageBox("È®ÀÎ! º¸Á¶À¯ÇüÀ» ÀÔ·ÂÇØ Áֽʽÿä!","E999",""); model.setFocus(vArrayCtrl[1]); return false; } //2.º¸Á¶À¯Çü »çÀ¯´Â nullÀ̸é '-' ·Î ¼¼ÆÃ if ( vArrayInsu[2] == null || vArrayInsu[2] == "" || vArrayInsu[2] == " " ) { vArrayInsu[2] = "-"; } //3.½ÃÀÛÀÏÀÚ Ã¼Å© if ( vArrayInsu[9] == null || vArrayInsu[9] == "" || vArrayInsu[9] == " " || vArrayInsu[9] == "-" ) { messageBox("È®ÀÎ! ½ÃÀÛÀÏÀÚ¸¦ ÀÔ·ÂÇØ Áֽʽÿä!","E999",""); model.setFocus(vArrayCtrl[9]); return false; } //4.Á¾·áÀÏÀÚ ¼¼ÆÃ if ( vArrayInsu[10] == null || vArrayInsu[10] == "" || vArrayInsu[10] == " " || vArrayInsu[10] == "-" ) { vArrayInsu[10] = "99991231"; } //5.°Ç°º¸Çè üũ //gsInsu_BoHeom = 11 °Ç°º¸Çè //gsSupp_100 = 01 Àü¾×º»ÀÎ100% if ( vArrayInsu[0] == gsInsu_BoHeom && vArrayInsu[1] != gsSupp_100 ) { //º¸ÇèÀÚ±âÈ£ üũ if ( vArrayInsu[3] == null || vArrayInsu[3] == "" || vArrayInsu[3] == " " || vArrayInsu[3] == "-" ) { //messageBox("È®ÀÎ! º¸ÇèÀÚ±âÈ£¸¦ ÀÔ·ÂÇØ Áֽʽÿä!","E999",""); //model.setFocus(vArrayCtrl[3]); //return false; vArrayInsu[3] = "0015"; } //º¸ÇèÁõ¹øÈ£ üũ if ( vArrayInsu[4] == null || vArrayInsu[4] == "" || vArrayInsu[4] == " " || vArrayInsu[4] == "-" ) { messageBox("È®ÀÎ! º¸ÇèÁõ¹øÈ£¸¦ ÀÔ·ÂÇØ Áֽʽÿä!","E999",""); model.setFocus(vArrayCtrl[4]); return false; } //ÇǺ¸ÇèÀÚ¿ÍÀÇ °ü°è if ( vArrayInsu[6] == null || vArrayInsu[6] == "" || vArrayInsu[6] == " " || vArrayInsu[6] == "-" ) { messageBox("È®ÀÎ! ÇǺ¸ÇèÀÚ¿ÍÀÇ °ü°è¸¦ ÀÔ·ÂÇØ Áֽʽÿä!","E999",""); model.setFocus(vArrayCtrl[6]); return false; } } //6.ÀÇ·á±Þ¿© üũ //gsInsu_BoHo1 = 21 //gsInsu_BoHo2 = 22 if ( vArrayInsu[0] == gsInsu_BoHo1 || vArrayInsu[0] == gsInsu_BoHo2 ) { //º¸ÇèÀÚ±âÈ£ üũ if ( vArrayInsu[3] == null || vArrayInsu[3] == "" || vArrayInsu[3] == " " || vArrayInsu[3] == "-" ) { messageBox("È®ÀÎ! º¸ÇèÀÚ±âÈ£¸¦ ÀÔ·ÂÇØ Áֽʽÿä!","E999",""); model.setFocus(vArrayCtrl[3]); return false; } } } /** * @(#) PAM.js * À̵¿½Ä * - 2007. 4. 19 * Áø·á°úÄÚµå¿Í Áø·áÀÇID¸¦ °¡Á®¿Â´Ù. */ function makePamResultRef(){ model.makeNode(pamResultRef); } function removePamResultRef(){ model.removeNode(pamResultRef); } /* * ÇöÀçÀÏÀÚ ½Ã½ºÅÛÀÏÀÚ ±âÁØÀ¸·Î Á¶È¸ */ function pamGetDeptCDDrIDList(result_ref){ submit("TRPAM00101"); if(result_ref == "" || result_ref == null){ model.makeNode("root/hidden/tmp/orddeptcd"); model.makeNode("root/hidden/tmp/orddrid"); model.makeNode("root/hidden/tmp/centcd"); model.makeNode("root/hidden/tmp/subdeptcd"); model.removeNodeset("root/init/orddeptcd"); model.removeNodeset("root/init/orddrid"); model.removeNodeset("root/init/centcd"); model.removeNodeset("root/init/subdeptcd"); model.makeNode("root/init/orddeptcd"); model.makeNode("root/init/orddrid"); model.makeNode("root/init/centcd"); model.makeNode("root/init/subdeptcd"); model.copyNode("root/init/orddeptcd" , "root/hidden/tmp/orddeptcd"); model.copyNode("root/init/orddrid" , "root/hidden/tmp/orddrid"); model.copyNode("root/init/centcd" , "root/hidden/tmp/centcd"); model.copyNode("root/init/subdeptcd" , "root/hidden/tmp/subdeptcd"); model.removeNodeset("root/hidden/tmp/orddeptcd"); model.removeNodeset("root/hidden/tmp/orddrid"); model.removeNodeset("root/hidden/tmp/centcd"); model.removeNodeset("root/hidden/tmp/subdeptcd"); }else{ model.makeNode("root/hidden/tmp/orddeptcd"); model.makeNode("root/hidden/tmp/orddrid"); model.makeNode("root/hidden/tmp/centcd"); model.makeNode("root/hidden/tmp/subdeptcd"); model.copyNode(result_ref, "root/hidden/tmp"); model.removeNodeset("root/hidden/tmp/orddeptcd"); model.removeNodeset("root/hidden/tmp/orddrid"); model.removeNodeset("root/hidden/tmp/centcd"); model.removeNodeset("root/hidden/tmp/subdeptcd"); } } /* * fromdd, todd ±âÁؾøÀÌ Àüü Á¶È¸ * - 20140401 pamGetDeptCDDrIDList »ç¿ëÇϴ ȸéÀÌ ¸¹¾Æ¼ ÆÄ¶ó¹ÌÅÍ ¼öÁ¤ ºÒ°¡ pamGetDeptCDDrIDList Copy */ function pamGetDeptCDDrIDListAll(result_ref, ioflag){ submit("TRPAM00107"); if(result_ref == "" || result_ref == null){ model.makeNode("root/hidden/tmp/orddeptcd"); model.makeNode("root/hidden/tmp/orddrid"); model.makeNode("root/hidden/tmp/centcd"); model.makeNode("root/hidden/tmp/subdeptcd"); model.removeNodeset("root/init/orddeptcd"); model.removeNodeset("root/init/orddrid"); model.removeNodeset("root/init/centcd"); model.removeNodeset("root/init/subdeptcd"); model.makeNode("root/init/orddeptcd"); model.makeNode("root/init/orddrid"); model.makeNode("root/init/centcd"); model.makeNode("root/init/subdeptcd"); model.copyNode("root/init/orddeptcd" , "root/hidden/tmp/orddeptcd"); model.copyNode("root/init/orddrid" , "root/hidden/tmp/orddrid"); model.copyNode("root/init/centcd" , "root/hidden/tmp/centcd"); model.copyNode("root/init/subdeptcd" , "root/hidden/tmp/subdeptcd"); model.removeNodeset("root/hidden/tmp/orddeptcd"); model.removeNodeset("root/hidden/tmp/orddrid"); model.removeNodeset("root/hidden/tmp/centcd"); model.removeNodeset("root/hidden/tmp/subdeptcd"); }else{ model.makeNode("root/hidden/tmp/orddeptcd"); model.makeNode("root/hidden/tmp/orddrid"); model.makeNode("root/hidden/tmp/centcd"); model.makeNode("root/hidden/tmp/subdeptcd"); model.copyNode(result_ref, "root/hidden/tmp"); model.removeNodeset("root/hidden/tmp/orddeptcd"); model.removeNodeset("root/hidden/tmp/orddrid"); model.removeNodeset("root/hidden/tmp/centcd"); model.removeNodeset("root/hidden/tmp/subdeptcd"); } } /** * @(#) PAM.js *À̵¿½Ä * - 2007. 4. 19 * µÎ°³ÀÇ ³ëµå¸¦ ºñ±³ - °°À¸¸é true. ´Ù¸£¸é false */ function pamCompareNodes(originalNode, copyNode){ var ins = document.models( 0 ).instances( 0 ); // 1. ?????? ???? ?? var original = ins.selectSingleNode(originalNode).xml; var copy = ins.selectSingleNode(copyNode).xml; //??? ???? ??? ????? ??? ?? ?? FALSE? ????. if(original == null || copy == null){ return false; }else if (original == copy){ return true; }else{ return false; } } /** * @(#) PAM.js * À̵¿½Ä * - 2007. 4. 19 / Áø·á°ú / Áø·áÀÇID Á¶È¸ //var pamResultRef = "/root/hidden/tmp"; function makePamResultRef(){ model.makeNode(pamResultRef); } function removePamResultRef(){ model.removeNode(pamResultRef); } function pamGetDeptCDDrIDList(result_ref){ //makePamResultRef(); submit("TRPAM00101"); //getParameterPath(), zbcResultRef);); if( result_ref == "" || result_ref == null ){ model.makeNode("root/init/orddeptcd"); model.makeNode("root/init/orddrid"); model.makeNode("root/hidden/tmp/orddeptcd"); model.makeNode("root/hidden/tmp/orddrid"); model.copyNode("root/init/orddeptcd", "root/hidden/tmp/orddeptcd"); model.copyNode("root/init/orddrid", "root/hidden/tmp/orddrid"); model.removeNodeset("root/init/orddeptcd"); model.removeNodeset("root/init/orddrid"); model.removeNodeset("root/hidden/tmp/orddeptcd"); model.removeNodeset("root/hidden/tmp/orddrid"); }else{ model.makeNode("root/hidden/tmp/orddeptcd"); model.makeNode("root/hidden/tmp/orddrid"); model.copyNode(result_ref, "root/hidden/tmp"); model.removeNodeset("root/hidden/tmp/orddeptcd"); model.removeNodeset("root/hidden/tmp/orddrid"); } //model.refresh(); } //??? ??? ???? ??? ????. //??? TRUE && ??? FALSE function pamCompareNodes(originalNode, copyNode){ var ins = document.models( 0 ).instances( 0 ); // 1. ?????? ???? ?? var original = ins.selectSingleNode(originalNode).xml; var copy = ins.selectSingleNode(copyNode).xml; //??? ???? ??? ????? ??? ?? ?? FALSE? ????. if(original == null || copy == null){ return false; }else if (original == copy){ return true; }else{ return false; } } */ /** * @desc : Ä«µå½ÂÀÎ,Ãë¼Ò/Çö±Ý¿µ¼öÁõ ½ÂÀÎ,Ãë¼Ò/¼öÇ¥Á¶È¸( ÆÄ¶ó¹ÌÅÍ º¯°æÀ¸·Î ½Å±Ô»ý¼º ) *
* 1. °Å·¡±¸ºÐ (11:½Å¿ëÄ«µå½ÂÀοäû, 12:½Å¿ëÄ«µå½ÂÀÎÀÀ´ä, 21:½Å¿ëÄ«µåÃë¼Ò¿äû, 22:½Å¿ëÄ«µåÃë¼ÒÀÀ´ä, 31:¼öÇ¥Á¶È¸¿äû, 32:¼öÇ¥Á¶È¸ÀÀ´ä, 41:Çö±Ý¿µ¼öÁõ½ÂÀοäû,42:Çö±Ý¿µ¼öÁõ½ÂÀÎÀÀ´ä, 51:Çö±Ý¿µ¼öÁõÃë¼Ò¿äû,52:Çö±Ý¿µ¼öÁõÃë¼ÒÀÀ´ä) ** @param : orderGubn - °Å·¡±¸ºÐ * @return : true/false , ÀÀ´äÀü¹® * @--------------------------------------------------- */ function fAppCardVanData(data1, data2, data3, data4, data5, data6, data7, data8, data9, data10, data11, data12, data13, data14, data15, data16, data17) { fAppCardVanData(data1, data2, data3, data4, data5, data6, data7, data8, data9, data10, data11, data12, data13, data14, data15, data16, data17, '-') } /** * @desc : Ä«µå½ÂÀÎ,Ãë¼Ò/Çö±Ý¿µ¼öÁõ ½ÂÀÎ,Ãë¼Ò/¼öÇ¥Á¶È¸( ÆÄ¶ó¹ÌÅÍ º¯°æÀ¸·Î ½Å±Ô»ý¼º ) *
* 1. °Å·¡±¸ºÐ (11:½Å¿ëÄ«µå½ÂÀοäû, 12:½Å¿ëÄ«µå½ÂÀÎÀÀ´ä, 21:½Å¿ëÄ«µåÃë¼Ò¿äû, 22:½Å¿ëÄ«µåÃë¼ÒÀÀ´ä, 31:¼öÇ¥Á¶È¸¿äû, 32:¼öÇ¥Á¶È¸ÀÀ´ä, 41:Çö±Ý¿µ¼öÁõ½ÂÀοäû,42:Çö±Ý¿µ¼öÁõ½ÂÀÎÀÀ´ä, 51:Çö±Ý¿µ¼öÁõÃë¼Ò¿äû,52:Çö±Ý¿µ¼öÁõÃë¼ÒÀÀ´ä) ** @param : orderGubn - °Å·¡±¸ºÐ * @return : true/false , ÀÀ´äÀü¹® * @--------------------------------------------------- */ function fAppCardVanData(data1, data2, data3, data4, data5, data6, data7, data8, data9, data10, data11, data12, data13, data14, data15, data16, data17, data18) { fAppCardVanData(data1, data2, data3, data4, data5, data6, data7, data8, data9, data10, data11, data12, data13, data14, data15, data16, data17, data18, '-', '-') } /** * @desc : Ä«µå½ÂÀÎ,Ãë¼Ò/Çö±Ý¿µ¼öÁõ ½ÂÀÎ,Ãë¼Ò/¼öÇ¥Á¶È¸( ÆÄ¶ó¹ÌÅÍ º¯°æÀ¸·Î ½Å±Ô»ý¼º ) *
* 1. °Å·¡±¸ºÐ (11:½Å¿ëÄ«µå½ÂÀοäû, 12:½Å¿ëÄ«µå½ÂÀÎÀÀ´ä, 21:½Å¿ëÄ«µåÃë¼Ò¿äû, 22:½Å¿ëÄ«µåÃë¼ÒÀÀ´ä, 31:¼öÇ¥Á¶È¸¿äû, 32:¼öÇ¥Á¶È¸ÀÀ´ä, 41:Çö±Ý¿µ¼öÁõ½ÂÀοäû,42:Çö±Ý¿µ¼öÁõ½ÂÀÎÀÀ´ä, 51:Çö±Ý¿µ¼öÁõÃë¼Ò¿äû,52:Çö±Ý¿µ¼öÁõÃë¼ÒÀÀ´ä) ** @param : orderGubn - °Å·¡±¸ºÐ * @return : true/false , ÀÀ´äÀü¹® * @--------------------------------------------------- */ function fAppCardVanData(data1, data2, data3, data4, data5, data6, data7, data8, data9, data10, data11, data12, data13, data14, data15, data16, data17, data18, data19, data20) { fAppCardVanData(data1, data2, data3, data4, data5, data6, data7, data8, data9, data10, data11, data12, data13, data14, data15, data16, data17, data18, data19, data20, '-') } /** * @desc : Ä«µå½ÂÀÎ,Ãë¼Ò/Çö±Ý¿µ¼öÁõ ½ÂÀÎ,Ãë¼Ò/¼öÇ¥Á¶È¸ *
* 1. °Å·¡±¸ºÐ (11:½Å¿ëÄ«µå½ÂÀοäû, 12:½Å¿ëÄ«µå½ÂÀÎÀÀ´ä, 21:½Å¿ëÄ«µåÃë¼Ò¿äû, 22:½Å¿ëÄ«µåÃë¼ÒÀÀ´ä, 31:¼öÇ¥Á¶È¸¿äû, 32:¼öÇ¥Á¶È¸ÀÀ´ä, 41:Çö±Ý¿µ¼öÁõ½ÂÀοäû,42:Çö±Ý¿µ¼öÁõ½ÂÀÎÀÀ´ä, 51:Çö±Ý¿µ¼öÁõÃë¼Ò¿äû,52:Çö±Ý¿µ¼öÁõÃë¼ÒÀÀ´ä) ** @param : orderGubn - °Å·¡±¸ºÐ * @return : true/false , ÀÀ´äÀü¹® * @--------------------------------------------------- */ function fAppCardVanData(data1, data2, data3, data4, data5, data6, data7, data8, data9, data10, data11, data12, data13, data14, data15, data16, data17, data18, data19, data20, data21) { if(data2 == "" || data2 == null) { messageBox("°Å·¡±¸ºÐ Data°¡ ¾ø½À´Ï´Ù..!","E999",""); return false; } if (data21 == "" || data21 == null || data21 == "-") { messageBox("VAN±¸ºÐ Data°¡ ¾ø½À´Ï´Ù..!","E999",""); return false; } // KOCES_IC°Å·¡ÀÇ °æ¿ì if (data21 == "KOCES_IC") { // ICPos°Å·¡ (ordergb, pano, iogb, carddivide, netamt, appno, appdate, entrymode, indInstFlag, qualCnfmNo) if (fReqICVanAprv(data2, data4, data5, data13, data14, data17, data15, data9, data13, data11)) { // Ä«µåÁ¤º¸ 󸮴 ½Å¿ëÄ«µå °Å·¡ÀÇ °æ¿ì¿¡¸¸ ó¸® if (data2 == "11" || data2 == "21") { // Á¤»óÀûÀ¸·Î ó¸®µÈ °æ¿ì Ä«µå¹øÈ£ + ¼¸íÀ̹ÌÁö ¼³Á¤ data19 = model.getValue("/root/send/card/aprv_elctsignkey"); data20 = model.getValue("/root/send/card/aprv_elctsigncnts"); // ½Å¿ëÄ«µåÁ¤º¸ ¿ªÀü´Þ(¼ö³³È¸é)À» À§ÇÑ Ä«µåÁ¤º¸ ¼³Á¤ if (data9 == "S") { data11 = model.getValue("/root/send/card/aprv_cardnumber"); model.makeValue("/root/main/card2/card_cardno", data11); } // ½Å¿ëÄ«µå À¯È¿±â°£ ¸¶½ºÅ·Ã³¸® if (data2 == "11") { data12 = "****"; } } // Çö±Ý¿µ¼öÁõ Ä«µåÁ¤º¸ 󸮴 Çö±Ý¿µ¼öÁõ °æ¿ì¿¡¸¸ ó¸® if ((data2 == "41" || data2 == "51")) { // Çö±Ý¿µ¼öÁõ Ä«µåÁ¤º¸ ¿ªÀü´Þ(¼ö³³È¸é)À» À§ÇÑ Ä«µåÁ¤º¸ ¼³Á¤ if (data9 == "S") { data11 = model.getValue("/root/send/card/aprv_cardnumber"); model.makeValue("/root/main/cash2/cash_qualcnfmno", data11); } } // ICPos °Å·¡ ½ÇÆÐÇÑ °æ¿ì °á°ú°ª 9999 ¼³Á¤ } else { model.makeValue("/root/tmp/appvanif/replystat", "9999") return false; } } model.makeNode("/root/send/card/vangb"); model.makeNode("/root/send/card/ordergb"); model.makeNode("/root/send/card/mdate"); model.makeNode("/root/send/card/pano"); model.makeNode("/root/send/card/iogb"); model.makeNode("/root/send/card/deptcode"); model.makeNode("/root/send/card/diagdate"); model.makeNode("/root/send/card/clientid"); model.makeNode("/root/send/card/entrymode"); model.makeNode("/root/send/card/track2data"); model.makeNode("/root/send/card/cardnumber"); model.makeNode("/root/send/card/cardperiod"); model.makeNode("/root/send/card/carddivide"); model.makeNode("/root/send/card/netamt" ); model.makeNode("/root/send/card/oldappdate"); model.makeNode("/root/send/card/oldapptime"); model.makeNode("/root/send/card/oldappno"); model.makeNode("/root/send/card/pregdmndyn"); model.makeNode("/root/send/card/elctsignkey"); model.makeNode("/root/send/card/elctsigncnts"); model.makeNode("/root/send/card/vanflag"); model.setValue("/root/send/card/vangb", data1 ); model.setValue("/root/send/card/ordergb", data2 ); model.setValue("/root/send/card/mdate", data3 ); model.setValue("/root/send/card/pano", data4 ); model.setValue("/root/send/card/iogb", data5 ); model.setValue("/root/send/card/deptcode", data6 ); model.setValue("/root/send/card/diagdate", data7 ); model.setValue("/root/send/card/clientid", data8 ); model.setValue("/root/send/card/entrymode", data9 ); model.setValue("/root/send/card/track2data", data10); model.setValue("/root/send/card/cardnumber", data11); model.setValue("/root/send/card/cardperiod", data12); model.setValue("/root/send/card/carddivide", data13); model.setValue("/root/send/card/netamt", data14); model.setValue("/root/send/card/oldappdate", data15); model.setValue("/root/send/card/oldapptime", data16); model.setValue("/root/send/card/oldappno", data17); model.setValue("/root/send/card/pregdmndyn", data18); model.setValue("/root/send/card/elctsignkey", data19); model.setValue("/root/send/card/elctsigncnts", data20); model.setValue("/root/send/card/vanflag", data21); model.removeNodeset("/root/tmp"); model.makeNode("/root/tmp"); if(submit("TXPAC00101")){ if (model.getValue("/root/tmp/appvanif/replystat") == "0000") { var sordergb = model.getValue("/root/send/card/ordergb"); if (sordergb == "11") { messageBox("[Ä«µå] ½ÂÀÎÀÌ", "I001"); } else if (sordergb == "21") { messageBox("[Ä«µåÃë¼Ò] ½ÂÀÎÀÌ", "I001"); } else if (sordergb == "41") { messageBox("[Çö±Ý¿µ¼öÁõ] ½ÂÀÎÀÌ", "I001"); } else if (sordergb == "51") { messageBox("[Çö±Ý¿µ¼öÁõÃë¼Ò] ½ÂÀÎÀÌ", "I001"); } else if (sordergb == "31") { messageBox("[¼öÇ¥Á¶È¸] Á¤»óÀûÀ¸·Î", "I001"); } //messageBox("½ÂÀμº°ø", "E999", ""); } else { messageBox("["+model.getValue("root/tmp/appvanif/cardname")+"] È®ÀÎÇÑ ÈÄ Àç½ÂÀÎ ¹Ù¶÷", "E999", ""); } }else{ messageBox("Àü»ê¿À·ù·Î ½ÂÀÎÀÌ Á¤»óÀûÀ¸·Î 󸮵ÇÁö ¾Ê¾Ò½À´Ï´Ù. Á¤º¸Áö¿øÆÀ¿¡ ¹®ÀÇÇϼ¼¿ä!!", "E999", ""); return false; } //model.refresh(); } // °ÇÁø¿ë(°ÇÁø ¿À·ù ¹ß»ýÀ¸·Î ÀÎÇØ function ºÐ¸®) function fGetPsnWorkInfoRrgstno(rrgstno){ var retValue = ''; //ÀԷ°ª üũ if (rrgstno.length != 13) { messageBox("ÁֹιøÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E999", ""); return; } var rrgstno1 = rrgstno.substr(0,6); var rrgstno2 = rrgstno.substr(6,7); // Return model.makeNode("/root/temp/result/famylist"); //send model.makeNode("/root/send/discpat/checkcount"); model.makeNode("/root/send/discpat/rrgstno1"); model.makeNode("/root/send/discpat/rrgstno2"); model.makeNode("/root/send/discpat/rrgstno"); model.setValue("/root/send/discpat/checkcount", 1); model.setValue("/root/send/discpat/rrgstno1", rrgstno1); model.setValue("/root/send/discpat/rrgstno2", rrgstno2); model.setValue("/root/send/discpat/rrgstno", rrgstno); submit("TRPMC03802"); if( getNodesetCount("/root/temp/result/famylist/cretinstcd") > 0 ){ //alert(instance1.selectNodesXml("/root/temp/psnworkinfo")); modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result", "/root/main/result"); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result"); model.removeNodeset("/root/send/discpat"); return retValue; } /** * @desc : ÀλçÁ¤º¸ÀÇ Á÷¿ø,Á÷¿ø°¡Á·Á¤º¸ Á¶È¸ *
* input : rrgstno (ÁֹιøÈ£) ** @param : orderGubn - °Å·¡±¸ºÐ * @return : true/false , ÀÀ´äÀü¹® * @--------------------------------------------------- */ function fGetPsnWorkInfo(rrgstno){ var retValue = ''; //ÀԷ°ª üũ if (rrgstno.length != 13) { messageBox("ÁֹιøÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E999", ""); return; } var rrgstno1 = rrgstno.substr(0,6); var rrgstno2 = rrgstno.substr(6,7); // Return model.makeNode("/root/temp/result/famylist"); //send model.makeNode("/root/send/discpat/checkcount"); model.makeNode("/root/send/discpat/rrgstno1"); model.makeNode("/root/send/discpat/rrgstno2"); model.makeNode("/root/send/discpat/rrgstno"); model.setValue("/root/send/discpat/checkcount", 1); model.setValue("/root/send/discpat/rrgstno1", rrgstno1); model.setValue("/root/send/discpat/rrgstno2", rrgstno2); model.setValue("/root/send/discpat/rrgstno", rrgstno); submit("TRPMC03802"); if( getNodesetCount("/root/temp/result/famylist/cretinstcd") > 0 ){ //alert(instance1.selectNodesXml("/root/temp/psnworkinfo")); modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result", "/root/main/result"); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result"); model.removeNodeset("/root/send/discpat"); return retValue; } function fGetPsnWorkInfo_pid(pid){ var retValue = ''; // Return model.makeNode("/root/temp/result/famylist"); //send model.makeNode("/root/send/discpat/checkcount"); model.makeNode("/root/send/discpat/pid"); model.setValue("/root/send/discpat/checkcount", 1); model.setValue("/root/send/discpat/pid", pid); submit("TRPMC03802"); if( getNodesetCount("/root/temp/result/famylist/cretinstcd") > 0 ){ //alert(instance1.selectNodesXml("/root/temp/psnworkinfo")); modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result", "/root/main/result"); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result"); model.removeNodeset("/root/send/discpat"); return retValue; } //2011-10-28 ¿ø¹«ÆÀ ¿äûÀ¸·Î °¨¸éÁ¤º¸ Á¶È¸½Ã ÁֹιøÈ£ + À̸§ À¸·Î üũ function fGetPsnWorkInfo(rrgstno, hngnm){ var retValue = ''; //ÀԷ°ª üũ if (rrgstno.length != 13) { messageBox("ÁֹιøÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E999", ""); return; } var rrgstno1 = rrgstno.substr(0,6); var rrgstno2 = rrgstno.substr(6,7); //Return model.makeNode("/root/temp/result/famylist"); //send model.makeNode("/root/send/discpat/checkcount"); model.makeNode("/root/send/discpat/rrgstno1"); model.makeNode("/root/send/discpat/rrgstno2"); model.makeNode("/root/send/discpat/rrgstno"); model.makeNode("/root/send/discpat/emplnm"); model.setValue("/root/send/discpat/checkcount", 1); model.setValue("/root/send/discpat/rrgstno1", rrgstno1); model.setValue("/root/send/discpat/rrgstno2", rrgstno2); model.setValue("/root/send/discpat/rrgstno", rrgstno); model.setValue("/root/send/discpat/emplnm", hngnm); submit("TRPMC03802"); if( getNodesetCount("/root/temp/result/famylist/cretinstcd") > 0 ){ //alert(instance1.selectNodesXml("/root/temp/psnworkinfo")); modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result", "/root/main/result"); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result"); model.removeNodeset("/root/send/discpat"); return retValue; } function fGetPsnWorkInfo(rrgstno, hngnm, pid){ var retValue = ''; //ÀԷ°ª üũ if (rrgstno.length != 13) { messageBox("ÁֹιøÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E999", ""); return; } var rrgstno1 = rrgstno.substr(0,6); var rrgstno2 = rrgstno.substr(6,7); //Return model.makeNode("/root/temp/result/famylist"); //send model.makeNode("/root/send/discpat/checkcount"); model.makeNode("/root/send/discpat/rrgstno1"); model.makeNode("/root/send/discpat/rrgstno2"); model.makeNode("/root/send/discpat/rrgstno"); model.makeNode("/root/send/discpat/emplnm"); model.makeNode("/root/send/discpat/pid"); model.setValue("/root/send/discpat/checkcount", 1); model.setValue("/root/send/discpat/rrgstno1", rrgstno1); model.setValue("/root/send/discpat/rrgstno2", rrgstno2); model.setValue("/root/send/discpat/rrgstno", rrgstno); model.setValue("/root/send/discpat/emplnm", hngnm); model.setValue("/root/send/discpat/pid", pid); submit("TRPMC03802"); if( getNodesetCount("/root/temp/result/famylist/cretinstcd") > 0 ){ //alert(instance1.selectNodesXml("/root/temp/psnworkinfo")); modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result", "/root/main/result"); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result"); model.removeNodeset("/root/send/discpat"); return retValue; } function fGetPsnWorkInfoDir(pid){ var retValue = ''; //Return model.makeNode("/root/temp/result/famylist"); //send model.makeNode("/root/send/discpat/checkcount"); model.makeNode("/root/send/discpat/pid"); model.setValue("/root/send/discpat/checkcount", 1); model.setValue("/root/send/discpat/pid", pid); submit("TRPMC03802"); if( getNodesetCount("/root/temp/result/famylist/cretinstcd") > 0 ){ //alert(instance1.selectNodesXml("/root/temp/psnworkinfo")); //modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result", "/root/main/result"); model.copynode("/root/main/result", "/root/temp/result"); setParameter("SPPMC03800_emplid", model.getValue("/root/main/result/famylist[" + row + "]/emplno")); setParameter("SPPMC03800_emplnm", model.getValue("/root/main/result/famylist[" + row + "]/emplname")); setParameter("SPPMC03800_discuncoflag", model.getValue("/root/main/result/famylist[" + row + "]/discuncoflag")); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result"); model.removeNodeset("/root/send/discpat"); return retValue; } //Á÷¿ø°¡Á·Á¤º¸ Á¶È¸ ÀÔ¿ø¼ö³³¿ë function fGetPsnWorkInfo_i(rrgstno,pre_loading_yn) { var retValue = ''; if(pre_loading_yn == "Y"){ //¸¸¾à ÀÔ¿ø¼ö³³µî ±âȸ鿡¼ °¡Á·Á¤º¸ ¹Ì¸® Á¶È¸ÇØ¿À¹Ç·Î submit Åë°ú } if( getNodesetCount("/root/temp/result/h_famylist/famylist/cretinstcd") > 0 ){ modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result/h_famylist", "/root/main/result"); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result/h_famylist"); model.removeNodeset("/root/send/discpat"); return retValue; } function fGetPsnWorkInfo_pid_i(rrgstno,pre_loading_yn) { var retValue = ''; if(pre_loading_yn == "Y"){ //¸¸¾à ÀÔ¿ø¼ö³³µî ±âȸ鿡¼ °¡Á·Á¤º¸ ¹Ì¸® Á¶È¸ÇØ¿À¹Ç·Î submit Åë°ú } if( getNodesetCount("/root/temp/result/h_famylist/famylist/cretinstcd") > 0 ){ modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/temp/result/h_famylist", "/root/main/result"); retValue = fPsnParam(); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ } model.removeNodeset("/root/temp/result/h_famylist"); model.removeNodeset("/root/send/discpat"); return retValue; } //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ function fPsnParam(){ var retValue = ''; var emplno = getParameter("SPPMC03800_emplid"); var emplnm = getParameter("SPPMC03800_emplnm"); var discuncocd = getParameter("SPPMC03800_discuncocd"); var famyrelcd = getParameter("SPPMC03800_famyrelcd"); var famyrelnm = getParameter("SPPMC03800_famyrelnm"); var preststatnm = getParameter("SPPMC03800_preststatnm"); var profacptyn = getParameter("SPPMC03800_profacptyn"); var profacptdd = getParameter("SPPMC03800_profacptdd"); var remark = getParameter("SPPMC03800_remark"); clearParameter("SPPMC03800_emplid"); clearParameter("SPPMC03800_emplnm"); clearParameter("SPPMC03800_discuncoflag"); clearParameter("SPPMC03800_discuncocd"); clearParameter("SPPMC03800_famyrelcd"); clearParameter("SPPMC03800_famyrelnm"); clearParameter("SPPMC03800_preststatnm"); clearParameter("SPPMC03800_profacptyn"); clearParameter("SPPMC03800_profacptdd"); clearParameter("SPPMC03800_remark"); if( emplno != '' && emplno != ' ' ){ retValue = emplno + '¢Ë' + emplnm + '¢Ë' + discuncocd + '¢Ë' + famyrelnm + '¢Ë' + preststatnm + '¢Ë' + profacptyn + '¢Ë' + profacptdd + '¢Ë' + remark + '¢Ë' + famyrelcd ; } return retValue; } /** * 2007-12-07 À̵¿½Ä ¼öÁ¤. * @desc : ÀλçÁ¤º¸ÀÇ Á÷¿øÅðÁ÷Á¤º¸ Á¶È¸ *
* input : rrgstno (ÁֹιøÈ£) ** @param : orderGubn - °Å·¡±¸ºÐ * @return : true/false , ÀÀ´äÀü¹® * @--------------------------------------------------- */ function fGetPsnRetireInfo(rrgstno, orddd) { //ÀԷ°ª üũ if (rrgstno.length == 0) { messageBox("ÁֹιøÈ£°¡ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.", "E999", ""); return; } // Return model.makeNode("/root/temp/psnworkinfo"); //send model.makeNode("/root/send/rrgstno"); model.setValue("/root/send/rrgstno", rrgstno); submit("TRPAC00101"); if (getNodesetCount("/root/temp/psnworkinfo/emplno") > 0 ){ var appfromdd = model.getValue("/root/temp/psnworkinfo/fromdd"); var apptodd = model.getValue("/root/temp/psnworkinfo/todd"); if( orddd == '' || orddd == ' ' || orddd == '-' ){ orddd = getCurrentDate(); } if( !isValidDateTime(appfromdd, "YYYYMMDD") || orddd < appfromdd || !isValidDateTime(apptodd, "YYYYMMDD") || orddd > apptodd ){ var vmsg = "ÀλçÁ¤º¸¸¦ È®ÀÎÇϼ¼¿ä. ÇØ´ç Á÷¿øÀÌ ÅðÁ÷ÇÏ¿´°Å³ª °¨¸é Àû¿ë±â°£ÀÌ ¸¸·á µÇ¾ú½À´Ï´Ù." messageBox( vmsg , "E999", ""); return false; } } else { messageBox("ÀλçÁ¤º¸¿¡¼ È®ÀÎµÈ Á¤º¸°¡ ¾ø½À´Ï´Ù. °¨¸é¿©ºÎ¸¦ ´Ù½Ã È®ÀÎÇØ ÁÖ¼¼¿ä.", "E999", ""); return false; } model.removeNodeset("/root/temp/psnworkinfo"); //model.refresh(); return true; } // 2008.07.31 ÃÖº´Áø - º¯°æµÈ CommAX¿¡ ¸Â°Ô ·ÎÁ÷ ¼öÁ¤ // - pPort ÆÄ¶ó¹ÌÅÍ Ãß°¡ (default : 1) function fInPatBarCodePrn(pPid, pIndd, pCretno, pMskind, pHiststat, pPort) { model.removeNodeset("/root/hidden/h_receipt/receipt"); model.removeNodeset("/root/send/data17"); model.makeNode("/root/hidden/h_receipt/receipt/pid"); model.makeNode("/root/hidden/h_receipt/receipt/hngnm"); model.makeNode("/root/hidden/h_receipt/receipt/sex"); model.makeNode("/root/hidden/h_receipt/receipt/age"); model.makeNode("/root/hidden/h_receipt/receipt/religncd"); model.makeNode("/root/hidden/h_receipt/receipt/rrgstno"); model.makeNode("/root/hidden/h_receipt/receipt/orddeptcd"); model.makeNode("/root/hidden/h_receipt/receipt/orddeptnm"); model.makeNode("/root/hidden/h_receipt/receipt/specordyn"); model.makeNode("/root/hidden/h_receipt/receipt/medispclid"); model.makeNode("/root/hidden/h_receipt/receipt/wardcd"); model.makeNode("/root/hidden/h_receipt/receipt/roomcd"); model.makeNode("/root/hidden/h_receipt/receipt/indd"); model.makeNode("/root/hidden/h_receipt/receipt/barcode"); model.makeValue("/root/send/data17/pid", pPid); model.makeValue("/root/send/data17/indd", pIndd); model.makeValue("/root/send/data17/cretno", pCretno); model.makeValue("/root/send/data17/mskind", pMskind); model.makeValue("/root/send/data17/histstat", pHiststat); submit("TRPMI00115"); var inpt_pid = model.getValue("/root/hidden/h_receipt/receipt/pid"); if (inpt_pid == null || inpt_pid == " " || inpt_pid == "") { messageBox("ÀÔ¿ø ȯÀÚ°¡ ¾Æ´Õ´Ï´Ù.! ȯÀÚ ÆÈÂ ¹ßÇàÇÒ ¼ö ¾ø½À´Ï´Ù.","E999",""); return false; } else { var sRrgstno = model.getValue("/root/hidden/h_receipt/receipt/rrgstno").substr(0,6) + "-" + model.getValue("/root/hidden/h_receipt/receipt/rrgstno").substr(6,1) + "******"; model.setValue("/root/hidden/h_receipt/receipt/rrgstno",sRrgstno); var sIndd = model.getValue("/root/hidden/h_receipt/receipt/indd"); model.setValue("/root/hidden/h_receipt/receipt/indd",sIndd.substr(0, 4) + "-" + sIndd.substr(4,2) + "-" + sIndd.substr(6,2)); // Ãâ·ÂÀ» À§ÇÑ º¯¼ö ¼±¾ð var sPid = model.getValue("/root/hidden/h_receipt/receipt/pid"); var sHngnm = model.getValue("/root/hidden/h_receipt/receipt/hngnm"); var sSex = model.getValue("/root/hidden/h_receipt/receipt/sex"); var sAge = model.getValue("/root/hidden/h_receipt/receipt/age"); if(document.all("CommAX") != null) { //¹ÙÄÚµå Ãâ·Â ½ÃÀÛ var sSndMsg = ""; var portOpenTF = ""; // CommPort ¼³Á¤ if (pPort == "" || pPort == null || pPort == " ") { CommAX.CommPort = "1"; // default port setting } else { CommAX.CommPort = pPort; //Port ¼³Á¤ } CommAX.Settings = "9600,n,8,1"; portOpenTF = CommAX.PortOpen("true"); //Port Open if(portOpenTF == "TRUE") { // 2008.07.31 - ÁֹιøÈ£ ¶óÀÎ º¯°æ sSndMsg = sSndMsg + "^XA^LH20,20"; // Ãâ·Â½ÃÀÛ sSndMsg = sSndMsg + "^FO10,05^BC400,40,N,N,N^FD" + sPid + "^FS"; // ¹ÙÄÚµå(µî·Ï¹øÈ£) sSndMsg = sSndMsg + "^CFE40,40^FO340,10^FD" + sSex + "/" + sAge + "^FS"; // ¼ºº°,³ªÀÌ sSndMsg = sSndMsg + CommAX.PrtImgOut(10, 50, sHngnm, 1, 2); // ȯÀÚ¸í - °¡·Î½ÃÀÛÀ§Ä¡, ¼¼·Î½ÃÀÛÀ§Ä¡, Ãâ·ÂÇÒ¹®ÀÚ¿, 1,1 (ºñÀ²:X, Y) sSndMsg = sSndMsg + CommAX.HanImageData(); sSndMsg = sSndMsg + "^CFE18,18^FO10,100^FD" + sPid + "^FS"; // µî·Ï¹øÈ£ sSndMsg = sSndMsg + "CFE30,30^FO10,130^FD" + sRrgstno + "^FS"; // ÁֹιøÈ£ sSndMsg = sSndMsg + "^CFA30,30^FO235,100^FD" + sIndd + "^FS"; // ÀÔ¿øÀÏÀÚ sSndMsg = sSndMsg + "^PQ1"; // Ãâ·Â¸Å¼ö sSndMsg = sSndMsg + "^XZ"; CommAX.SendMessage(sSndMsg); // Ãâ·Â CommAX.PortOpen("false"); // Ãâ·ÂÁ¾·á } else { messageBox("¾Æ·¡ »çÇ×À» È®ÀÎÈÄ ÀçÃâ·ÂÇØÁֽʽÿÀ." + " \n 1.ÇÁ¸°Æ®¼³Á¤ ȸ鿡¼ Åë½ÅÀ¯ÇüÀ» com À¸·Î ¼±ÅÃÇÑ °æ¿ì port ¹øÈ£ È®ÀÎ" + " \n 2.ÄÉÀ̺í È®ÀÎ" + " \n 3.¸ÕÀú Ãâ·ÂÁßÀÎ ¹ÙÄÚµå È®ÀÎ(¸ðµÎ Ãâ·ÂµÈ ÈÄ ÀçÃâ·ÂÇϽʽÿÀ.)", "I", ""); return; } } } } /** * @desc : ÁßÁõÁ¤º¸ üũ *
* 1. ÇʼöÇ׸ñ ÀԷ üũ - µî·Ï¹øÈ£, Àû¿ëÀÏÀÚ(¿Ü·¡:Áø·áÀÏÀÚ,ÀÔ¿ø:ÇöÀçÀÏÀÚ?), º¸ÇèÀ¯Çü, º¸Á¶À¯Çü * * === üũ»çÇ× === * ȯÀÚ ÁßÁõÁ¤º¸ Á¶È¸ * ÁßÁõÁ¤º¸¿Í º¸ÇèÀ¯Çü,º¸Á¶À¯Çü Cross Check ** @param : vPid, vOrddd, vInsukindcd, vSuppkindcd * * @return : true/false * Ç׸ñ üũ¸¦ ÅëÇØ Àç¼¼ÆÃµÈ °ª return * @--------------------------------------------------- * º¯°æÀÌ·Â * 2007.12.03 Áõ¹øÈ£ Ãß°¡(±¹Á¤¿ø±Ù¹«ÀÚÀΰæ¿ì ÁßÁõÈ®Àΰú Áõ¹øÈ£°¡ ÀÖ¾î¾ß ºÎ´ãÀ² Àû¿ë°¡´ÉÇÔ) - À̵¿Àç */ function fSrdgInfoVeri(vPid, vOrddd, vCretno, vInsukindcd, vSuppkindcd, vinsuno, vinsucd){ /* vPid µî·Ï¹øÈ£ vOrddd Áø·áÀÏÀÚ vInsukindcd º¸ÇèÀ¯Çü vSuppkindcd º¸Á¶À¯Çü vinsuno º¸ÇèÁõ¹øÈ£ vinsucd º¸ÇèÀÚ±âÈ£ */ //1. ÁßÁ¤Á¤º¸ Á¶È¸ // Return model.makeNode("/root/temp/srdg"); //send model.makeValue("/root/send/pid", vPid); model.makeValue("/root/send/orddd", vOrddd); model.makeValue("/root/send/cretno", vCretno); model.makeValue("/root/send/insukind", vInsukindcd); submit("TRPAC00201"); //³»¿ªÀÌ ÀÖ´Â °æ¿ì, ÁßÁõ½Åû³»¿ª or ÁßÁõÈ®Á¤³»¿ª if (model.getValue("/root/temp/srdg/srdg_pid") != "") { var vcode ; var vcode_arry = getNodesetCount("/root/temp4/essc/vcode"); for(var i=1;i<= vcode_arry;i++) { vcode = model.getValue("/root/temp4/essc["+ i +"]/vcode"); // V193ÀÌ¸é ¾Ï»óº´ °æ¿ìÀÓ if(fSrdgInfoVeri_check(vPid, vOrddd, vCretno, vInsukindcd, vSuppkindcd, vinsuno, vinsucd ,vcode) == false) return false; } }else { // ÁßÁõÁ¤º¸ ¾ø´Ù. //ÁßÁõÁ¤º¸°¡ ¾ø´Âµ¥, À¯Çüº¸Á¶°¡ [ÁßÁõ:06]ÀÏ °æ¿ì, if ( vSuppkindcd == "06" || vSuppkindcd == "11" ) { messageBox("ÇØ´çȯÀÚ´Â ÁßÁõ¹øÈ£°¡ ¾øÀ¸¹Ç·Î, [ÁßÁõ]À¸·Î Àû¿ëÇÒ ¼ö ¾ø½À´Ï´Ù.[1]","E999",""); return false; } } return true; } //ÁßÁõÁ¤º¸ üũ(fSrdgInfoVeri¿¡¼ for¹®À¸·Î üũµÇ´Â ºÎºÐ) function fSrdgInfoVeri_check(vPid, vOrddd, vCretno, vInsukindcd, vSuppkindcd, vinsuno, vinsucd ,vcode){ //ÁßÁõ ½ÅûÀÏ , ÁßÁõ ¹øÈ£, ÁßÁõ »çÀÎ ¿©ºÎ var vgenrdd = model.getValue("/root/temp/srdg/srdg_genrdd") ; var vgenrddtext = vgenrdd.substr(4,2) + "¿ù" + vgenrdd.substr(6,2) + "ÀÏ"; var vdiagno = model.getValue("/root/temp/srdg/srdg_seridiagno"); var vsignyn = model.getValue("/root/temp/srdg/srdg_signyn"); var vcancer = "V193"; var vsrdgfromdd = model.getValue("/root/temp/srdg/srdg_fromdd"); var vsrdgtodd = model.getValue("/root/temp/srdg/srdg_todd"); var vanohosprgstflag = model.getValue("/root/temp/srdg/srdg_anohosprgstflag"); // °Ç°º¸ÇèÀÌ¸é¼ Àü¾×º»ÀÎÀº Á¦¿Ü´ë»óÀÓ if ( vInsukindcd == '11' && vSuppkindcd != '01') { // ÀÌ¹Ì ÁßÁõÀÌ Àû¿ëµÇ¾îÁ® ÀÖÀ¸¸é Àû¿ëÀÌ °¡´ÉÇÑÁö checkÇØ¾ß ÇÔ if ( vSuppkindcd == "06" || vSuppkindcd == "11" ){ // ÁßÁõ»óº´ÀÌ ¾Æ´Ï¸é ¾ÈµÊ if ( vcode != vcancer ){ messageBox( " ÁßÁõ Àû¿ëÇÒ¼ö ¾ø´Â »óº´ÀÔ´Ï´Ù![2-1-1-°¡]","E999",""); return false; } // ÁßÁõ¹øÈ£ ¾øÀ¸½Ã ½Åû´çÀÏÀ̰í if ( vdiagno == "0"){ // ±¹Á¤¿ø ¿¹¿ÜÀû¿ë if( vinsuno.substring(0,1) == "6" && vinsucd == "32000110") { messageBox("±¹Á¤¿ø±Ù¹«ÀÚÀ̹ǷΠ¹Ýµå½Ã ÁßÁõ¹øÈ£°¡ ÀÖ¾î¾ß ÇÕ´Ï´Ù.[2-1-1-³ª-¤¡]","E999",""); return false; } // »çÀÎÀº ÇßÀ½. if ( vsignyn == "Y"){ // ½Åû´çÀÏ check if ( vgenrdd == vOrddd ){ messageBox( "´çÀÏ SIGNȯÀÚÀÔ´Ï´Ù. ÁßÁõ10%·Î Á¤»êÇϽʽÿä.[2-1-1-³ª-¤¤-A]","E999",""); return false; } if ( vgenrdd != vOrddd ){ messageBox( vgenrddtext + " SIGNȯÀÚÀÔ´Ï´Ù.[2-1-1-³ª-¤¤-B]","E999",""); return false; } } // »çÀξÈÇßÀ½ if ( vsignyn != "Y"){ if ( vanohosprgstflag == "Y" ){ messageBox( "Ÿº´¿ø ÁßÁõµî·Ï ȯÀÚ ÀÔ´Ï´Ù.ÀÚ°ÝÀ» È®ÀÎÇϼ¼¿ä![2-1-1-³ª-¤§-A]","E999",""); return false; } if ( vanohosprgstflag == "N" ){ var rtn = messageBox( "ÀÇ·áÁ¤º¸ÆÀ¿¡¼ SignÈÄ ÁßÁõÀû¿ë °¡´ÉÇÕ´Ï´Ù. ÀÇ·áÁ¤º¸ÆÀ¿¡¼ SignÇϼ¼¿ä![2-1-1-³ª-¤§-B]\n°è¼ÓÁøÇàÇϽðڽÀ´Ï±î?","Q999",""); // Yes : 6 / No : 7 / Cancel : 2 if (rtn == 7) return false; } } } // ÁßÁõ¹øÈ£ ÀÖÀ¸¸é ±â°£¸¸ checkÇÔ if ( vdiagno != "0"){ if (vOrddd < vsrdgfromdd || vOrddd > vsrdgtodd ) { messageBox("Àû¿ëÀÏÀÚ°¡ ÁßÁõ±â°£ ¹üÀ§¿¡ Æ÷ÇÔµÇÁö ¾Ê½À´Ï´Ù.[2-1-1-´Ù]","E999",""); return false; } } } // ÁßÁõÀÌ ¹ÌÀû¿ëµÇ¾îÁ® ÀÖÀ¸¸é Àû¿ëÀÌ °¡´ÉÇÑÁö checkÇØ¾ß ÇÔ if ( vSuppkindcd != "06" && vSuppkindcd != "11" ){ // ÁßÁõ¿¡ ÇØ´çÇÏ´Â »óº´À̸é if ( vcode == vcancer ){ // ÁßÁõ¹øÈ£ ¾øÀ¸½Ã ½Åû´çÀÏÀ̰í signÀÌ µÇ¾úÀ¸¸é °¡´ÉÇÔ. ´Ü ±¹Á¤¿øÀÌ ¾Æ´Ò°æ¿ì if ( vdiagno == "0"){ //Ÿº´¿øÀ¯¹« üũ if ( vanohosprgstflag == "Y" ){ messageBox( "Ÿº´¿ø ÁßÁõµî·Ï ȯÀÚ ÀÔ´Ï´Ù.ÀÚ°ÝÀ» È®ÀÎÇϼ¼¿ä![2-1-2-°¡-¤¡]","E999",""); return false; } if ( vanohosprgstflag == "N" ){ if ( vsignyn == "Y"){ // »çÀεǾú°í ±¹Á¤¿øÀÌ ¾Æ´Ï¸é »êÁ¤°¡´É if( vinsuno.substring(0,1) == "6" && vinsucd == "32000110") { // }else{ if ( vgenrdd == vOrddd ){ messageBox("´çÀÏ SIGN ȯÀÚÀÔ´Ï´Ù. ÁßÁõ10%·Î Á¤»êÇϽʽÿä.[2-1-2-°¡-¤¤-B-A]","E999",""); return false; } if ( vgenrdd != vOrddd ){ messageBox("ÁßÁõ10%·Î Á¤»êÇϽʽÿä.[2-1-2-°¡-¤¤-B-B]","E999",""); return false; } } } // »çÀξȵǾúÀ¸¸é guideÇÑ´Ù. if ( vsignyn != "Y"){ var rtn = messageBox(vgenrddtext + " ÁßÁõÀÇ·Ú¼°¡ ÀÛ¼ºµÇ¾ú½À´Ï´Ù, ÀÇ·áÁ¤º¸ÆÀ¿¡¼ SignÇϼ¼¿ä![2-1-2-°¡-¤¤-C]\n°è¼ÓÁøÇàÇϽðڽÀ´Ï±î?","Q999",""); // Yes : 6 / No : 7 / Cancel : 2 if (rtn == 7) return false; } } } // ÁßÁõ¹øÈ£ ÀÖÀ¸¸é¼ ±â°£ÀÌ ¸ÂÀ¸¸é ÁßÁõ°¡´ÉÇÔ if ( vdiagno != "0"){ if ( vOrddd >= vsrdgfromdd || vOrddd <= vsrdgtodd ) { messageBox("ÁßÁõ10%·Î Á¤»êÇϽʽÿä.[2-1-2-³ª]","E999",""); return false; } } } } } // ±Þ¿©ÀÌ¸é¼ Àü¾×º»ÀÎÀº Á¦¿Ü´ë»óÀÓ if ( ( vInsukindcd == '21' || vInsukindcd == '22' ) && vSuppkindcd != '01') { // ÀÇ·á±Þ¿©´Â »êÁ¤Æ¯·Ê¸¦ checkÇÏÁö ¾Ê¾ÒÀ¸¹Ç·Î Áø·á´çÀϰÇÀÇ »óº´À» checkÇØ¼ ÁßÁõ¿©ºÎ¸¦ °áÁ¤ÇÑ´Ù. submit("TRPAO00214"); vcode = model.getValue("/root/temp6/diagsrdg/vcode"); // V193ÀÌ¸é ¾Ï»óº´ °æ¿ìÀÓ.. // ÀÌ¹Ì ÁßÁõÀÌ Àû¿ëµÇ¾îÁ® ÀÖÀ¸¸é Àû¿ëÀÌ °¡´ÉÇÑÁö checkÇØ¾ß ÇÔ if ( vSuppkindcd == "06" || vSuppkindcd == "11" ){ // ÁßÁõ»óº´ÀÌ ¾Æ´Ï¸é ¾ÈµÊ if ( vcode != vcancer ){ messageBox( "[ÁßÁõ] Àû¿ëÇÒ¼ö ¾ø´Â »óº´ÀÔ´Ï´Ù![2-2-1-°¡]","E999",""); return false; } // ÁßÁõ¹øÈ£ ¾øÀ¸¸é ½Åû´çÀÏÀ̰í if ( vdiagno == "0"){ // »çÀÎÀº ÇßÀ½. if ( vsignyn == "Y"){ // ½Åû´çÀÏ check if ( vgenrdd == vOrddd ){ messageBox( "´çÀÏ SIGNȯÀÚÀÔ´Ï´Ù.[2-2-1-³ª-¤¡-A]","E999",""); } if ( vgenrdd != vOrddd ){ // } } if ( vsignyn != "Y"){ if ( vanohosprgstflag == "Y" ){ messageBox( "Ÿº´¿ø ÁßÁõµî·Ï ȯÀÚ ÀÔ´Ï´Ù.ÀÚ°ÝÀ» È®ÀÎÇϼ¼¿ä![2-2-1-³ª-¤¤-A]","E999",""); return false; } if ( vanohosprgstflag == "N" ){ var rtn = messageBox("ÁßÁõ½Åû¼°¡ ÀÛ¼ºµÇ¾ú½À´Ï´Ù. ÀÇ·áÁ¤º¸¿¡¼ SIGNÇϼ¼¿ä![2-2-1-³ª-¤¤-B]\n°è¼ÓÁøÇàÇϽðڽÀ´Ï±î?","Q999",""); // Yes : 6 / No : 7 / Cancel : 2 if (rtn == 7) return false; } } } if ( vdiagno != "0"){ // ÁßÁõ¹øÈ£ ÀÖÀ¸¸é ±â°£¸¸ checkÇÔ //Àû¿ëÀÏÀÚ´Â ÀÖÀ¸³ª, Àû¿ëÀÏÀÚ ¹üÀ§°¡ ¾Æ´Ô if ( vOrddd < vsrdgfromdd || vOrddd > vsrdgtodd ) { messageBox("Àû¿ëÀÏÀÚ°¡ [ÁßÁõ]±â°£ ¹üÀ§¿¡ Æ÷ÇÔµÇÁö ¾Ê½À´Ï´Ù.[2-2-1-´Ù]","E999",""); return false; } } } // ÁßÁõÀÌ ¹ÌÀû¿ëµÇ¾îÁ® ÀÖÀ¸¸é Àû¿ëÀÌ °¡´ÉÇÑÁö checkÇØ¾ß ÇÔ if ( vSuppkindcd != "06" && vSuppkindcd != "11" ){ // ÁßÁõ¿¡ ÇØ´çÇÏ´Â »óº´À̸é if ( vcode == vcancer ){ // ÁßÁõ¹øÈ£ ¾øÀ¸½Ã ½Åû´çÀÏÀ̰í signÀÌ µÇ¾úÀ¸¸é °¡´ÉÇÔ. ´Ü ±¹Á¤¿øÀÌ ¾Æ´Ò°æ¿ì if ( vdiagno != "0"){ // ÁßÁõ¹øÈ£ ÀÖÀ¸¸é¼ ±â°£ÀÌ ¸ÂÀ¸¸é ÁßÁõ°¡´ÉÇÔ if (vOrddd >= vsrdgfromdd || vOrddd <= vsrdgtodd ) { messageBox("[ÁßÁõ] À¸·Î Á¤»êÇϽʽÿä.[2-2-2-³ª]","E999",""); return false; } } } } } return; } /** * @desc : ÀÚº¸»êÀç°ø»óÁ¤º¸ üũ *
* 1. ÇʼöÇ׸ñ ÀԷ üũ - µî·Ï¹øÈ£, Àû¿ëÀÏÀÚ(¿Ü·¡:Áø·áÀÏÀÚ,ÀÔ¿ø:ÇöÀçÀÏÀÚ?), º¸ÇèÀ¯Çü, º¸Á¶À¯Çü * * === üũ»çÇ× === * ȯÀÚ º¸ÇèÁ¤º¸ Á¶È¸ * º¸ÇèÁ¤º¸¿Í º¸ÇèÀ¯Çü,º¸Á¶À¯Çü Cross Check ** @param : vPid, vOrddd, vInsukindcd, vSuppkindcd * * @return : true/false * Ç׸ñ üũ¸¦ ÅëÇØ Àç¼¼ÆÃµÈ °ª return * @--------------------------------------------------- */ function fEtcInsuInfoVeri(vPid, vOrddd, vInsukindcd, vSuppkindcd){ /* ÀÛ¼º Áß.... vPid µî·Ï¹øÈ£ vOrddd Áø·áÀÏÀÚ vInsukindcd º¸ÇèÀ¯Çü vSuppkindcd º¸Á¶À¯Çü */ //1. º¸ÇèÁ¤º¸ Á¶È¸ // Return model.makeNode("/root/temp/ptin"); //send model.makeValue("/root/send/pid", vPid); model.makeValue("/root/send/insukind", vInsukindcd); model.makeValue("/root/send/appdd", vInsukindcd); submit("TRPAC00201"); //³»¿ªÀÌ ÀÖ´Â °æ¿ì, ÁßÁõ½Åû³»¿ª or ÁßÁõÈ®Á¤³»¿ª if (model.getValue("/root/temp/srdg/srdg_pid") != "") { //½Åû³»¿ª if ( model.getValue("/root/temp/srdg/srdg_fromdd") == "00000000") { messageBox("ÁßÁõ Àû¿ë ½ÃÀÛÀÏÀÌ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.","E999",""); return false; } //½Åû³»¿ª if ( model.getValue("/root/temp/srdg/srdg_seridiagno") == "-" && model.getValue("/root/temp/srdg/srdg_seridiagno") == "0") { messageBox("ÁßÁõ¹øÈ£°¡ ¾ø½À´Ï´Ù.","E999",""); return false; } //Àû¿ëÀÏÀÚ´Â ÀÖÀ¸³ª, Àû¿ëÀÏÀÚ ¹üÀ§°¡ ¾Æ´Ô if ( vOrddd < model.getValue("/root/temp/srdg/srdg_fromdd") || vOrddd > model.getValue("/root/temp/srdg/srdg_todd") ) { messageBox("Àû¿ëÀÏÀÚ°¡ ÁßÁõ±â°£ ¹üÀ§¿¡ Æ÷ÇÔµÇÁö ¾Ê½À´Ï´Ù.","E999",""); return false; } //ÁßÁõÁ¤º¸°¡ Àִµ¥, º¸Á¶À¯ÇüÀÌ [ÁßÁõ:06] ÀÌ ¾Æ´Ñ °æ¿ì, if ( vOrddd >= model.getValue("/root/temp/srdg/srdg_fromdd") && vOrddd <= model.getValue("/root/temp/srdg/srdg_todd") && model.getValue("/root/temp/srdg/srdg_seridiagno") != "-" && model.getValue("/root/temp/srdg/srdg_seridiagno") != "0" && vSuppkindcd != "06" ) { messageBox("ÇØ´çȯÀÚÀÇ ÁßÁõÁ¤º¸°¡ ÀÖÀ¸³ª, º¸Á¶À¯ÇüÀÌ [ÁßÁõ]ÀÌ ¾Æ´Õ´Ï´Ù.","E999",""); return false; } } else { //ÁßÁõÁ¤º¸°¡ ¾ø´Âµ¥, À¯Çüº¸Á¶°¡ [ÁßÁõ:06]ÀÏ °æ¿ì, if ( vSuppkindcd == "06" ) { messageBox("ÇØ´çȯÀÚÀÇ ÁßÁõÁ¤º¸°¡ ¾øÀ¸¹Ç·Î, º¸Á¶À¯ÇüÀ» [ÁßÁõ]À¸·Î Àû¿ëÇÒ ¼ö ¾ø½À´Ï´Ù.","E999",""); return false; } return true; } model.refresh(); } //2007-10-08 À̵¿½Ä Ãß°¡ /** * @desc : ȯÀÚÄ«µå¹ß±ÞÀ» À§ÇÑ PC °íÀ¯¹øÈ£¸¦ ¼ÂÆÃ *
* ** @param : * @return : pcinfo //°íÀ¯¹øÈ£ * @--------------------------------------------------- */ function fGetPCID(){ try { var fso = new ActiveXObject("Scripting.FileSystemObject"); var f = fso.GetFile("C:\\WINDOWS\\Device.ini"); var ts = f.OpenAsTextStream(1); var pcInfoStr = ts.ReadLine(); ts.Close(); } catch(e) { //messageBox("[ÀüÀÚÄ«µå¹ßÇà] PC°íÀ¯¹øÈ£Á¤º¸¸¦ ãÀ»¼ö ¾ø½À´Ï´Ù.", "E999", ""); } model.makeNode("/root/hidden/patcardissue/pcinfo"); model.setValue("/root/hidden/patcardissue/pcinfo", pcInfoStr); //alert( pcInfoStr ); } //2009-03-03 À̵¿½Ä Ãß°¡ /** * @desc : ÀÇ»çÈÞÁøÀÏÁ¤ ¹× Áø·áȯÀÚÁ¤¿ø Á¶È¸ *
* input : insucd º¸ÇèÀÚ±âÈ£(º¸ÇèÀÚÄÚµå) * insuflag º¸ÇèÀÚÇüÅ * 1:°ø´Ü/2:ÀÇ·á±Þ¿©/3:ÀÚº¸/4:»êÀç°ø»ó/5:ÀϹÝ/6:¿Ü±¹ÀÎ ** @param : orddrid, orddeptcd, orddd, ordtm, fsexamflag * @return : * @--------------------------------------------------- */ function fGetVerifyHoli(orddrid, orddeptcd, subdeptcd, orddd, ordtm, fsexamflag, rsrvflag){ return fGetVerifyHoli2('-', orddrid, orddeptcd, subdeptcd, orddd, ordtm, fsexamflag, rsrvflag, 'Y'); } //2007-10-08 À̵¿½Ä Ãß°¡ /** * @desc : ÀÇ»çÈÞÁøÀÏÁ¤ ¹× Áø·áȯÀÚÁ¤¿ø Á¶È¸ *
* input : insucd º¸ÇèÀÚ±âÈ£(º¸ÇèÀÚÄÚµå) * insuflag º¸ÇèÀÚÇüÅ * 1:°ø´Ü/2:ÀÇ·á±Þ¿©/3:ÀÚº¸/4:»êÀç°ø»ó/5:ÀϹÝ/6:¿Ü±¹ÀÎ ** @param : orddrid, orddeptcd, orddd, ordtm, fsexamflag * @return : * @--------------------------------------------------- */ function fGetVerifyHoli2(centcd, orddrid, orddeptcd, subdeptcd, orddd, ordtm, fsexamflag, rsrvflag, reglscheyn){ model.resetInstanceNode("/root/hidden/temp"); model.makeNode("/root/hidden/temp/send/otpt_orddrid"); model.makeNode("/root/hidden/temp/send/otpt_orddeptcd"); model.makeNode("/root/hidden/temp/send/otpt_subdeptcd"); model.makeNode("/root/hidden/temp/send/otpt_centcd"); model.makeNode("/root/hidden/temp/send/otpt_orddd"); model.makeNode("/root/hidden/temp/send/otpt_ordtm"); model.makeNode("/root/hidden/temp/send/otpt_fsexamflag"); model.makeNode("/root/hidden/temp/send/otpt_rsrvflag"); model.setValue("/root/hidden/temp/send/otpt_orddrid", orddrid); model.setValue("/root/hidden/temp/send/otpt_orddeptcd", orddeptcd); model.setValue("/root/hidden/temp/send/otpt_subdeptcd", subdeptcd); model.setValue("/root/hidden/temp/send/otpt_centcd", centcd); model.setValue("/root/hidden/temp/send/otpt_orddd", orddd); model.setValue("/root/hidden/temp/send/otpt_ordtm", ordtm); model.setValue("/root/hidden/temp/send/otpt_fsexamflag", fsexamflag); model.setValue("/root/hidden/temp/send/otpt_rsrvflag", rsrvflag); if(submit("TRPMO00112")){ var msg = model.getValue("/root/hidden/temp/result/veriholi/msg"); var msgtype = model.getValue("/root/hidden/temp/result/veriholi/msgtype"); if( msgtype != 'E999' && msgtype != 'Q999' ){ msgtype = 'Q999'; } if( model.getValue("/root/hidden/temp/result/veriholi/exception") != "OK" && model.getValue("/root/hidden/temp/result/veriholi/exception") != "Center" ){ //msg = model.getValue("/root/hidden/temp/result/veriholi/msg"); if( msg == "" ){ if( msgtype == 'Q999' ){ if( messageBox("ÀÇ»çÈÞÁøÀÏÁ¤ ¹× Á¤¿ø È®ÀÎ ¿À·ù!. °è¼Ó ÁøÇà ÇϽðڽÀ´Ï±î?", msgtype, "") == '6'){ return true; }else{ return false; } }else{ messageBox("ÀÇ»çÈÞÁøÀÏÁ¤ ¹× Á¤¿ø È®ÀÎ ¿À·ù!", msgtype, ""); return false; } }else{ if( reglscheyn == 'Y' ){ if( msgtype == 'Q999' ){ if( messageBox(msg + " °è¼Ó ÁøÇà ÇϽðڽÀ´Ï±î?", msgtype, "") == '6'){ var centcd = model.getValue("/root/hidden/temp/result/veriholi/centcd"); if( centcd == '' || centcd == null || centcd == ' ' || centcd == '-' ){ centcd = true; } return centcd }else{ return false; } }else{ messageBox(msg, msgtype, ""); return false; } }else{ messageBox(msg, "E999", ""); return false; } } }else if( model.getValue("/root/hidden/temp/result/veriholi/exception") == "Center" ){ if( messageBox(msg + "ÇØ´ç ¼¾ÅÍ·Î Á¢¼ö[¿¹¾à]ÇϽðڽÀ´Ï±î?", "Q999", "") == '6'){ //setParameter("CENTERYN", "Y"); //setParameter("CENTERCD", model.getValue("/root/hidden/temp/result/veriholi/centcd")); return model.getValue("/root/hidden/temp/result/veriholi/centcd"); }else{ //clearParameter("CENTERYN"); //clearParameter("CENTERCD"); return false; } } }else{ if( messageBox("ÀÇ»çÈÞÁøÀÏÁ¤ ¹× Á¤¿ø È®ÀÎ ½ÇÆÐ!. °è¼Ó ÁøÇà ÇϽðڽÀ´Ï±î?", "Q999", "") == '6'){ return true; }else{ return false; } return false; } return true; } /** * @desc : º¸ÇèÀÚ±âÈ£ ¸í Á¶È¸ *
* input : insucd º¸ÇèÀÚ±âÈ£(º¸ÇèÀÚÄÚµå) * insuflag º¸ÇèÀÚÇüÅ * 1:°ø´Ü/2:ÀÇ·á±Þ¿©/3:ÀÚº¸/4:»êÀç°ø»ó/5:ÀϹÝ/6:¿Ü±¹ÀÎ ** @param : * @return : insucdnm º¸ÇèÀÚ±âÈ£¸í * ex) model.setValue("/root/main/ptin/ptin_insunm", fGetInsucdNm( insucd, insukind)); model.refresh(); * * @--------------------------------------------------- */ function fGetInsucdNm(vInsucd,vInsukind) { // Return model.makeNode("/root/temp/insucdlist"); //send model.makeNode("/root/send/srchcond"); model.makeNode("/root/send/srchcnts"); model.makeNode("/root/send/insufla"); model.makeValue("/root/send/srchcond", "1"); model.makeValue("/root/send/srchcnts", vInsucd); model.makeValue("/root/send/insuflag", vInsukind.substr(0,1)); if (submit("TRPMB01501")) { } if (model.getValue("/root/temp/insucdlist/incd/insucdnm") != "") { var vinsucdnm = model.getValue("/root/temp/insucdlist/incd/insucdnm"); return vinsucdnm; } else { //messageBox("Á¶È¸µÈ Á¤º¸°¡ ¾ø½À´Ï´Ù.", "E999", ""); return "-"; } } /** * @desc : ±Ý¾×Ç¥½Ã±â¿¡ ±Ý¾× Ãâ·Â *
* input : vPatnm ȯÀÚ¼º¸í * vAmt ±Ý¾× * ** @param : * @return : * @--------------------------------------------------- */ function fDisplayAmt(vPatnm, vAmt, vRcptrnm) { //±Ý¾×Ç¥½Ã±â±¸ºÐ(POPUP:µà¾ó¸ð´ÏÅÍ ÇÁ·ÎÅæ¼ÒÇÁÆ®IR-600, SERIAL: LEDÇ¥½Ã±â Ƽ¿øºê·ÎµåÅ×Å© NWD-3000) if( AmtDispKind == 'POPUP' ){ if(vPatnm != '' || vPatnm != ' '){ vPatnm = vPatnm.substr(0, (vPatnm.length - 1)) + '¡Ú'; vPatnm = vPatnm + '´Ô'; } var popupObjt = findChildWindowByScreenID("SPPMC06400"); if( popupObjt == null ){ open("SPPMC06400",2,"","","SPPMC06400","","","caption:hidden;","false"); popupObjt = findChildWindowByScreenID("SPPMC06400"); popupObjt.window.javascript.fInit(); popupObjt.window.javascript.fSetMsg(vPatnm, vAmt, vRcptrnm); }else{ popupObjt.window.javascript.fInit(); popupObjt.window.javascript.fSetMsg(vPatnm, vAmt, vRcptrnm); } }else if( AmtDispKind == 'SERIAL' ){ //±Ý¾×Ç¥½Ã±â ocx //var AmtDisplay = NWSerial_OCX; var vreturn1 = -1; vreturn1 =AmtDisplay.OpenCom(1,9600); //alert("opencom =>"+vreturn1); if (vreturn1 == 0) { AmtDisplay.CloseCom(); AmtDisplay.OpenCom(1,9600); } var vreturn2 = -1; vreturn2 = AmtDisplay.ModeSend(2, "00", vPatnm, vAmt ); } } //Á¶¿µ»ó 2009/09/29 ºó¼¾Æ®º´¿ø Å×½ºÆ®¸¦ À§Çؼ Àӽ÷ΠÃß°¡ function fDisplayAmt(vPatnm, vAmt, vRcptrnm, vinstcd) { if( AmtDispKind == 'POPUP' ){ if(vPatnm != '' || vPatnm != ' '){ vPatnm = vPatnm.substr(0, (vPatnm.length - 1)) + '¡Ú'; vPatnm = vPatnm + '´Ô'; } var popupObjt = findChildWindowByScreenID("SPPMC06400"); if( popupObjt == null ){ open("SPPMC06400",2,"","","SPPMC06400","","","caption:hidden;","false"); popupObjt = findChildWindowByScreenID("SPPMC06400"); popupObjt.window.javascript.fInit(); popupObjt.window.javascript.fSetMsg(vPatnm, vAmt, vRcptrnm); }else{ popupObjt.window.javascript.fInit(); popupObjt.window.javascript.fSetMsg(vPatnm, vAmt, vRcptrnm); } }else if( AmtDispKind == 'SERIAL' ){ //±Ý¾×Ç¥½Ã±â ocx //var AmtDisplay = NWSerial_OCX; var vreturn1 = -1; vreturn1 =AmtDisplay.OpenCom(1,9600); //alert("opencom =>"+vreturn1); if (vreturn1 == 0) { AmtDisplay.CloseCom(); AmtDisplay.OpenCom(1,9600); } var vreturn2 = -1; if(vinstcd == "017") { //alert("ModeSend 5"); vreturn2 = AmtDisplay.ModeSend(5, "00", vPatnm, vAmt ); }else{ //alert("ModeSend 2"); vreturn2 = AmtDisplay.ModeSend(2, "00", vPatnm, vAmt ); } } } function fOpenCom() { if( AmtDispKind == 'SERIAL' ){ try { if (document.all("NWSerial_OCX") == null) { // ÃÖÃÊ Çѹø¸¸ createChild() ÇÑ´Ù. body.createChild("xforms:object", "id:NWSerial_OCX; clsid:{E0B03C1E-8BC8-48AC-AD00-A7123C75341C}; visibility:hidden; left:0px; top:0px; width:0px; height:0px; "); } AmtDisplay = NWSerial_OCX; var vreturn1 = -1; vreturn1 =AmtDisplay.OpenCom(1,9600); if (vreturn1 == 0) { AmtDisplay.CloseCom(); AmtDisplay.OpenCom(1,9600); } } catch(e) { AmtDisplay = null; } } } function fCloseCom() { if( AmtDispKind == 'POPUP' ){ var popupObjt = findChildWindowByScreenID("SPPMC06400"); if( popupObjt == null ){ return; }else{ //popupObjt.window.javascript.fClose(); } }else if( AmtDispKind == 'SERIAL' ){ try{ if (document.all("NWSerial_OCX") != null){ //Port Close var vreturn3 = -1; vreturn3 = AmtDisplay.CloseCom(); if (vreturn3 == 0) { AmtDisplay.CloseCom(); } } }catch(E){ AmtDisplay = null; } } } function fInit_Display() { if( AmtDispKind == 'SERIAL' ){ try { if (document.all("NWSerial_OCX") == null) { // ÃÖÃÊ Çѹø¸¸ createChild() ÇÑ´Ù. body.createChild("xforms:object", "id:NWSerial_OCX; clsid:{E0B03C1E-8BC8-48AC-AD00-A7123C75341C}; visibility:hidden; left:0px; top:0px; width:0px; height:0px; "); } AmtDisplay = NWSerial_OCX; } catch(e) { AmtDisplay = null; } return (AmtDisplay != null); } } //2007-12-07 À̵¿½Ä Ãß°¡ /** * @desc : ±Ý¾×Ç¥½Ã±â ŸÀÔ Á¶È¸ * * @return : AmtDispKind ±Ý¾×Ç¥½Ã±âŸÀÔ. * @--------------------------------------------------- */ function fGetAmtDispKind(){ if( getGlobalVariable("g_AmtDispKind","p") == '' || getGlobalVariable("g_AmtDispKind","p") == null ){ model.removeNodeset("/root/hidden/pamcomcd"); model.makeNode("/root/hidden/pamcomcd/send/cdgrupid"); model.makeNode("/root/hidden/pamcomcd/send/cdid"); model.makeNode("/root/hidden/pamcomcd/rcv"); model.setValue("/root/hidden/pamcomcd/send/cdgrupid", 'P0022'); model.setValue("/root/hidden/pamcomcd/send/cdid", '90'); submit("TRPMO00123"); var cdnm = ""; if(getNodesetCount("/root/hidden/pamcomcd/rcv/pamcd/cdnm") > 0) { cdnm = model.getValue("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); }else{ cdnm = 'POPUP'; } //±Û·Î¹úº¯¼ö ¼±¾ð ȯÀÚ¹øÈ£ setGlobalVariable("g_AmtDispKind",cdnm,"p"); model.removeNodeset("/root/hidden/pamcomcd"); return getGlobalVariable("g_AmtDispKind","p"); }else{ return getGlobalVariable("g_AmtDispKind","p"); } /* if( getGlobalVariable("g_AmtDispKind","p") == '' || getGlobalVariable("g_AmtDispKind","p") == null ){ model.removeNodeset("/root/hidden/pamcomcd"); model.makeNode("/root/hidden/pamcomcd/send/cdgrupid"); model.makeNode("/root/hidden/pamcomcd/send/cdid"); model.makeNode("/root/hidden/pamcomcd/rcv"); model.setValue("/root/hidden/pamcomcd/send/cdgrupid", 'P0022'); model.setValue("/root/hidden/pamcomcd/send/cdid", '90'); submit("TRPMO00123"); alert("TRPMO00123"); var iCount = getNodesetCount("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); if (iCount > 0) { var cdnm = model.getValue("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); if (cdnm == '-') { return getGlobalVariable("g_AmtDispKind","p"); }else{ model.removeNodeset("/root/hidden/pamcomcd"); return cdnm; } }else{ var cdnm = model.getValue("/root/hidden/pamcomcd/rcv/pamcd/cdnm") if (cdnm == '-') { return getGlobalVariable("g_AmtDispKind","p"); }else{ model.removeNodeset("/root/hidden/pamcomcd"); return 'POPUP'; } } }else{ return getGlobalVariable("g_AmtDispKind","p"); } */ } //2007-12-07 À̵¿½Ä Ãß°¡ /** * @desc : ÀÓ»óȯÀÚ Á¤º¸ Á¶È¸ *
* input : PID µî·Ï¹øÈ£ * ORDDD Áø·áÀÏÀÚ ** @param : PID, ORDDD * @return : medfeeyn ÁøÂû·áÁö¿ø¿©ºÎ * @--------------------------------------------------- */ function fGetStdyPatInfo(pid, orddd){ model.removeNodeset("/root/hidden/temp"); model.makeNode("/root/hidden/temp/send/pid"); model.makeNode("/root/hidden/temp/send/orddd"); model.makeNode("/root/hidden/temp/stdy"); model.setValue("/root/hidden/temp/send/pid", pid); model.setValue("/root/hidden/temp/send/orddd", orddd); if(submit("TRPAC00401")){ return model.getValue("/root/hidden/temp/stdy/medfeeyn"); }else{ return ''; } } //2008-01-08 À̵¿½Ä Ãß°¡ - Áø·áÀÇ·Ú¼ È®ÀÎ function fCheckOrdCnst(pid, fsexamflag, orddeptcd, deptengabbr, reqdeptno, outhistpath, insukind){ //Ä¡°ú(55), °¡Á¤ÀÇÇаú(23), ÀçȰÀÇÇаú(21) Á¦¿Ü // Ä¡°ú ÁøÂû·á º°µµ»êÁ¤ °ü·Ã ¼öÁ¤(2017/05/10 ÀÌÁ¤ÅÃ) //if( reqdeptno == "55" || reqdeptno == "23" || reqdeptno == "21" ){ if( reqdeptno.substr(0,1)=="5" || reqdeptno == "23" || reqdeptno == "21" ){ //alert("°Ç°º¸Çè" + insukind + " " + reqdeptno); return true; } //ÀÀ±Þ³»¿ª üũ - 1ÁÖÀÏ À̳» ÀÀ±Þ³»¿ªÀÌ ÀÖÀ¸¸é Áø·áÀÇ·Ú¼ ÇÊ¿ä ¾øÀ½. // if(fCheckERPat(pid, 'N')) return true; //2010-02-02 ÀÔ¿øÇùÁøÀÖÀ»°æ¿ì Áø·áÀÇ·Ú¼ ÇÊ¿ä¾øÀ½. // model.removeNodeset("/root/temp/cnstinfo"); // model.makeNode("/root/temp/cnstinfo/temp"); // model.makeNode("/root/temp/cnstinfo/send/pid"); // model.makeNode("/root/temp/cnstinfo/send/orddeptcd"); // model.setValue("/root/temp/cnstinfo/send/pid", pid); // model.setValue("/root/temp/cnstinfo/send/orddeptcd", orddeptcd); // if( submit("TRPAC00501") ){ // var cnt = getNodesetCount("/root/temp/cnstinfo/temp/cnstinfo"); // if( cnt > 0 ){ // return true; // } // } // if( outhistpath != null && outhistpath != '' && outhistpath != ' ' && outhistpath != '-' ){ // var histCnt = getNodesetCount(outhistpath); // if( histCnt > 0 ){ // for( var i = 1; i <= histCnt ; i++){ // if( model.getValue(outhistpath + "[" + i + "]/rsrvflag") == "X"){ //ÀÀ±Þ³»¿ªÀÌ 1ÁÖÀÏ ¾È¿¡ Á¸ÀçÇϸé Áø·áÀÇ·Ú¼ ÇÊ¿ä ¾øÀ½!! // //alert(getDateInterval( model.getValue(outhistpath + "[" + i + "]/orddd"), getCurrentDate())); // var interval = getDateInterval( model.getValue(outhistpath + "[" + i + "]/orddd"), getCurrentDate()); // if( parseInt(interval) <= 7 && parseInt(interval) >= 0){ // return true; // } // } // } //for( var i = 1; i <= histCnt ; i++){ // } //if( histCnt > 0 ){ //ÄÁ¼³Æ®ÀÇ·ÚÁ¤º¸ üũ - ÄÁ¼³Æ®ÀÏ °æ¿ì Áø·áÀǷμ ÇÊ¿ä ¾øÀ½!. //var pid = model.getValue("/root/main/patinfo/patinfolist/pid"); if( pid != '' || pid != ' ' || pid != '-' ){ model.removeNodeset("/root/temp/emrcnst"); model.makeNode("/root/temp/emrcnst/temp"); model.makeNode("/root/temp/emrcnst/send/pid"); model.makeNode("/root/temp/emrcnst/send/flag"); model.setValue("/root/temp/emrcnst/send/pid", pid); model.setValue("/root/temp/emrcnst/send/flag", 'T'); if( submit("TRPAC00301") ){ //alert( instance1.selectSingleNode("/root/temp/emrcnst/temp/emrcnst").xml ); var cnt = getNodesetCount("/root/temp/emrcnst/temp/emrcnst"); //var orddeptcd = model.getValue("/root/main/reservation/orddeptcd"); //alert(orddeptcd); if( cnt > 0 ){ for( var i = 1; i <= cnt ; i++){ //alert( model.getValue("/root/temp/emrcnst/temp/emrcnst[" + i + "]/recvdeptcd") ); if( model.getValue("/root/temp/emrcnst/temp/emrcnst[" + i + "]/recvdeptcd") == orddeptcd){ //ÄÁ¼³Æ® ÇØ´ç°ú´Â Áø·áÀÇ·Ú¼ ÇÊ¿ä¾øÀ½!! // var reqdeptcd = model.getValue("/root/temp/emrcnst/temp/emrcnst[" + i + "]/reqdeptcd"); // var reqdeptengabbr = model.getValue("/root/init/orddeptcd/orddeptcdlist[ cd = '" + reqdeptcd + "']/deptengabbr"); // var reqdeptreqdeptno = model.getValue("/root/init/orddeptcd/orddeptcdlist[ cd = '" + reqdeptcd + "']/reqdeptno"); // return fCheckOrdCnst(pid, fsexamflag, reqdeptcd, reqdeptengabbr, reqdeptreqdeptno, outhistpath, insukind); return true; } } } //if( cnt > 0 ){ } //if( submit("TRPAC00301") ){ } //if( pid != '' || pid != ' ' || pid != '-' ){ // } //if( outhistpath != null && outhistpath != '' && outhistpath != ' ' && outhistpath != '-' ){ //var fsexamflag = model.getValue("/root/main/reservation/fsexamflag"); //º´¿øÃÊÁøÀÎ °æ¿ì if( fsexamflag == 'F' ){ //messageBox("Áø·áÀÇ·Ú¼°¡ ÇÊ¿äÇÕ´Ï´Ù.", "I999", ""); return false; //°úÃÊÁø /»óº´ÃÊÁø /ÀçÁøÀÎ °æ¿ì }else if( fsexamflag == 'D' || fsexamflag == 'S' || fsexamflag == 'R' ){ //°Ç°º¸Çè if( insukind == gsInsu_BoHeom ){ //Ä¡°ú(55), °¡Á¤ÀÇÇаú(23), ÀçȰÀÇÇаú(21) Á¦¿Ü //if( reqdeptno == "55" || reqdeptno == "23" || reqdeptno == "21" ){ //alert("°Ç°º¸Çè" + insukind + " " + reqdeptno); // return true; //} //ÀÇ·á±Þ¿©1,2 //}else if( ){} //¸ðµç°ú üũ //°Ç°º¸Çè, ÀÇ·á±Þ¿©1,2 Á¦¿Ü ÀÏ °æ¿ì üũÁ¦¿Ü }else if(insukind == gsInsu_JaboKind || insukind == gsInsu_SanJae || insukind == gsInsu_GongSang || insukind == gsInsu_IlBan || insukind == gsInsu_ForIn || insukind == gsInsu_ImSang){ //alert("±âŸº¸Çè" + insukind); return true; } //Áø·áÀÇ·Ú¼ Á¶È¸ model.removeNodeset("/root/temp/ordreqform"); model.makeNode("/root/temp/ordreqform/cnst"); model.makeNode("/root/temp/ordreqform/send/pid"); model.makeNode("/root/temp/ordreqform/send/reqdeptno"); model.setValue("/root/temp/ordreqform/send/pid", pid); model.setValue("/root/temp/ordreqform/send/reqdeptno", reqdeptno); if( submit("TRPMO01201") ){ //Áø·áÀÇ·Ú¼°¡ ¾øÀ»°æ¿ì.. var cnt = getNodesetCount("/root/temp/ordreqform/cnst/pid"); if( cnt <= 0 ){ //messageBox("Áø·áÀÇ·Ú¼°¡ ÇÊ¿äÇÕ´Ï´Ù.", "I999", ""); return false; //Áø·áÀÇ·Ú¼°¡ Á¸ÀçÇÒ °æ¿ì }else{ //·ù¸¶Æ¼½º³»°úÀÇ °æ¿ì µû·Î ÀÇ·Ú¼ ÇÊ¿ä!! ±×¿Ü Áø·á°úµéÀº û±¸ºÎ¼¹øÈ£ ´ç ÀÇ·Ú¼ 1°Ç ÇÊ¿ä if( deptengabbr == "MR" ){ //Áø·áÀÇ·Ú¼ ³»¿ª Áß ·ù¸¶Æ¼½º³»°ú Á¶È¸ for( var i = 1; i <= cnt; i++ ){ if( orddeptcd == model.getValue("/root/temp/ordreqform/cnst[" + i + "]/orddeptcd") ){ return true; } } //¾øÀ» °æ¿ì.. return false; }else{ //°°Àº û±¸ºÎ¼¹øÈ£¸¦ °¡Áø Áø·á°úµé Áß Áø·áÀÇ·Ú¼¸¦ Á¦ÃâÇÑ Áø·á°ú Á¸Àç!! return true; } } }else{ messageBox("Áø·áÀÇ·Ú¼ È®ÀÎ ¿À·ù!!", "I999", ""); return false; } model.removeNodeset("/root/temp/ordreqform"); return false; } } //END.. //2008-01-10 À̵¿½Ä Ãß°¡ //°¡Á¤°£È£È¯ÀÚ Ã¼Å© function fCheckHomeCarePat(){ model.makeNode("/root/send/homecare/pid"); model.setValue("/root/send/homecare/pid", model.getValue("/root/main/ptbs/ptbs_pid")); model.makeNode("/root/hidden/rcv/homecare"); if( submit("TRPMO00114") ){ if( getNodesetCount("/root/hidden/rcv/homecare/pid") > 0){ var cnt = getNodesetCount("/root/hidden/rcv/homecare/pid"); var msg = ''; for( var i = 1; i <= cnt; i++ ){ if( model.getValue("/root/hidden/rcv/homecare[" + i + "]/careflag") == 'H' ){ msg = msg + "[°¡Á¤°£È£]"; }else if( model.getValue("/root/hidden/rcv/homecare[" + i + "]/careflag") == 'V' ){ msg = msg + "[¹æ¹®°£È£]"; }else if( model.getValue("/root/hidden/rcv/homecare[" + i + "]/careflag") == 'C' ){ msg = msg + "[°¡Á¤Çü È£½ºÇǽº]"; } } //var hngnm = model.getValue("/root/main/ptbs/ptbs_hngnm"); messageBox(msg + "´ë»ó ȯÀÚÀÔ´Ï´Ù.", "I999", ""); } } model.removeNodeset("/root/send/homecare"); model.removeNodeset("/root/hidden/rcv/homecare"); } //2008-01-10 À̵¿½Ä Ãß°¡ //Àå±âÀ̽ÄȯÀÚ Ã¼Å© function fCheckTransPat(){ model.makeNode("/root/send/transpat/pid"); model.setValue("/root/send/transpat/pid", model.getValue("/root/main/ptbs/ptbs_pid")); model.makeNode("/root/hidden/rcv/temp/trans"); if( submit("TRPAO00212") ){ if (model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="1" || model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="2") { if (model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="1") { var transmessage = '°ø¿©ÀÚ ÀÔ´Ï´Ù. ' + ' * ¼öÇýÀÚ : ' + model.getValue("/root/hidden/rcv/temp/trans/phngnm") + '[' +model.getValue("/root/hidden/rcv/temp/trans/ppid") + ']' + ' ¿¡°Ô ' + model.getValue("/root/hidden/rcv/temp/trans/trnptkindnm") + ' °ø¿© ÇÏ¿´½À´Ï´Ù.'; } if (model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="2") { var transmessage = '¼öÇýÀÚ ÀÔ´Ï´Ù. ' + ' * °ø¿©ÀÚ : ' + model.getValue("/root/hidden/rcv/temp/trans/phngnm") + '[' +model.getValue("/root/hidden/rcv/temp/trans/ppid") + ']' + '¿¡°Ô¼ ' + model.getValue("/root/hidden/rcv/temp/trans/trnptkindnm") + ' ¼öÇý ¹Þ¾Ò½À´Ï´Ù.'; } messageBox(transmessage, "I999",""); return; } } model.removeNodeset("/root/send/transpat"); model.removeNodeset("/root/hidden/rcv/temp"); } //2008-02-14 À̵¿½Ä Ãß°¡ //ÀÇ»çÈÞÁøÀÏÁ¤ üũ //ÀÇ»ç ¼±ÅÃµÉ ¶§ function fCheckDrHoliSche(orddeptcd, orddrid, orddd, ordtm){ model.makeNode("/root/send/drholische/orddeptcd"); model.makeNode("/root/send/drholische/orddrid"); model.makeNode("/root/send/drholische/orddd"); model.makeNode("/root/send/drholische/ordtm"); model.makeNode("/root/send/drholische/rcv"); model.setValue("/root/send/drholische/orddeptcd", orddeptcd); model.setValue("/root/send/drholische/orddrid", orddrid); model.setValue("/root/send/drholische/orddd", orddd); model.setValue("/root/send/drholische/ordtm", ordtm); if( submit("TRPMO00115") ){ if( getNodesetCount("/root/send/drholische/rcv/drholische") > 0){ var holiflag = model.getValue("/root/send/drholische/rcv/drholische/holiflag"); var endcnfmyn = model.getValue("/root/send/drholische/rcv/drholische/endcnfmyn"); var msg = ''; if( holiflag == 'T' ){ msg = '´çÀÏ Áø·á°¡ ¸¶°¨µÇ¾ú½À´Ï´Ù. Áø·á°ú·Î ¹®ÀÇÇϽñ⠹ٶø´Ï´Ù.' }else if( holiflag == 'H' ){ msg = '´çÀÏ Áø·á°¡ ¾ø½À´Ï´Ù. Áø·á°ú·Î ¹®ÀÇÇϽñ⠹ٶø´Ï´Ù.' }else{ model.removeNodeset("/root/send/drholische"); return false; } if( endcnfmyn == 'Y' ){ messageBox("¼±ÅÃÇϽŠÁø·áÀÇ´Â ÇöÀç " + msg, "I999", ""); } }else{ } } model.removeNodeset("/root/send/drholische"); } //2008-05-26 À̵¿½Ä Ãß°¡ //ÀÀ±Þ 1ÁÖÀÏ À̳» ³»¿ø ȯÀÚ Ã¼Å© function fCheckERPat(pid, flag){ model.makeNode("/root/send/erpat/pid"); model.makeNode("/root/send/erpat/flag"); model.setValue("/root/send/erpat/pid", pid); model.setValue("/root/send/erpat/flag", flag); model.makeNode("/root/hidden/rcv/temp/erpat"); if( submit("TRPMO00116") ){ if (getNodesetCount("/root/hidden/rcv/temp/erpat/pid") > 0 ) { var orddd = model.getValue("/root/hidden/rcv/temp/erpat/orddd"); //flag °ªÀ» 'N' ¶Ç´Â 'n'ÀÏ °æ¿ì ¸Þ¼¼Áö¸¦ Ãâ·ÂÇÏÁö ¾Ê´Â´Ù. if( flag != 'N' && flag != 'n' ){ messageBox(orddd + " ÀÀ±Þ½Ç ³»¿øÈ¯ÀÚÀÔ´Ï´Ù.", "I999",""); } model.removeNodeset("/root/send/erpat"); model.removeNodeset("/root/hidden/rcv/temp"); return true; } } model.removeNodeset("/root/send/erpat"); model.removeNodeset("/root/hidden/rcv/temp"); return false; } //2008-06-02 À̵¿½Ä Ãß°¡ //¿Ü·¡µî·Ï ȯÀÚÁ¶È¸½Ã üũ»çÇ× ¸ðµÎ Á¶È¸ function fGetTotalCheckInfo(){ /* model.makeNode("/root/send/totalcheckinfo/pid"); model.makeNode("/root/send/totalcheckinfo/rrgstno1"); model.makeNode("/root/send/totalcheckinfo/rrgstno2"); model.makeNode("/root/send/totalcheckinfo/hngnm"); model.makeNode("/root/send/totalcheckinfo/orddeptcd"); model.makeNode("/root/send/totalcheckinfo/orddrid"); model.setValue("/root/send/totalcheckinfo/pid", model.getValue("/root/main/ptbs/ptbs_pid")); model.setValue("/root/send/totalcheckinfo/rrgstno1", model.getValue("/root/main/ptbs/ptbs_rrgstno1")); model.setValue("/root/send/totalcheckinfo/rrgstno2", model.getValue("/root/main/ptbs/ptbs_rrgstno2")); model.setValue("/root/send/totalcheckinfo/hngnm", model.getValue("/root/main/ptbs/ptbs_hngnm")); model.setValue("/root/send/totalcheckinfo/orddeptcd", model.getValue("/root/main/otpt/otpt_orddeptcd")); model.setValue("/root/send/totalcheckinfo/orddrid", model.getValue("/root/main/otpt/otpt_orddrid")); model.makeNode("/root/hidden/rcv"); */ var retValue = false; // if( submit("TRPMO00117") ){ //1ÁÖÀÏ À̳» ÀÀ±Þ½Ç ³»¿øÈ¯ÀÚ Ã¼Å© if (getNodesetCount("/root/hidden/rcv/erpat/pid") > 0 ) { var orddd = model.getValue("/root/hidden/rcv/erpat/orddd"); var erorddeptcd = model.getValue("/root/hidden/rcv/erpat/erorddeptcd"); messageBox(orddd + "" + erorddeptcd + " ÀÀ±Þ½Ç ³»¿øÈ¯ÀÚÀÔ´Ï´Ù.", "I999",""); } //Àå¾ÖȯÀÚ Ã¼Å© if( getNodesetCount("/root/hidden/rcv/handcappatlist/pid") > 0 ){ model.makeNode("/root/main/otpt/otpt_handicaprbookpossnyn"); model.setValue("/root/main/otpt/otpt_handicaprbookpossnyn", "Y"); }else{ model.makeNode("/root/main/otpt/otpt_handicaprbookpossnyn"); model.setValue("/root/main/otpt/otpt_handicaprbookpossnyn", "N"); } //Àå±âÀ̽ÄȯÀÚ Ã¼Å© if (model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="1" || model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="2") { if (model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="1") { var transmessage = '°ø¿©ÀÚ ÀÔ´Ï´Ù. ' + ' * ¼öÇýÀÚ : ' + model.getValue("/root/hidden/rcv/temp/trans/phngnm") + '[' +model.getValue("/root/hidden/rcv/temp/trans/ppid") + ']' + ' ¿¡°Ô ' + model.getValue("/root/hidden/rcv/temp/trans/trnptkindnm") + ' °ø¿© ÇÏ¿´½À´Ï´Ù.'; } if (model.getValue("/root/hidden/rcv/temp/trans/transgubn")=="2") { var transmessage = '¼öÇýÀÚ ÀÔ´Ï´Ù. ' + ' * °ø¿©ÀÚ : ' + model.getValue("/root/hidden/rcv/temp/trans/phngnm") + '[' +model.getValue("/root/hidden/rcv/temp/trans/ppid") + ']' + '¿¡°Ô¼ ' + model.getValue("/root/hidden/rcv/temp/trans/trnptkindnm") + ' ¼öÇý ¹Þ¾Ò½À´Ï´Ù.'; } messageBox(transmessage, "I999",""); } //°¡Á¤°£È£ ȯÀÚ Ã¼Å© if( getNodesetCount("/root/hidden/rcv/homecare/pid") > 0){ var cnt = getNodesetCount("/root/hidden/rcv/homecare/pid"); var msg = ''; for( var i = 1; i <= cnt; i++ ){ if( model.getValue("/root/hidden/rcv/homecare[" + i + "]/careflag") == 'H' ){ msg = msg + "[°¡Á¤°£È£]"; }else if( model.getValue("/root/hidden/rcv/homecare[" + i + "]/careflag") == 'V' ){ msg = msg + "[¹æ¹®°£È£]"; }else if( model.getValue("/root/hidden/rcv/homecare[" + i + "]/careflag") == 'C' ){ msg = msg + "[°¡Á¤Çü È£½ºÇǽº]"; } } //var hngnm = model.getValue("/root/main/ptbs/ptbs_hngnm"); messageBox(msg + "´ë»ó ȯÀÚÀÔ´Ï´Ù.", "I999", ""); } //ÀÚ¼±È¯ÀÚ Ã¼Å© if( model.getValue("/root/hidden/rcv/charity/charityyn") == 'Y'){ //var hngnm = model.getValue("/root/main/ptbs/ptbs_hngnm"); var retValue = messageBox("ÀÚ¼±Áø·áºñ Áö¿ø ´ë»ó ȯÀÚÀÔ´Ï´Ù. ³»¿ªÀ» È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", ""); if( retValue == 6 ){ var pid = model.getValue("/root/main/ptbs/ptbs_pid"); fOpenCharityPopup(pid); } } //°ËÁøÈ¯ÀÚ Ã¼Å© //20100629 smpark °ËÁø ¸Þ¼¼Áö º´¿øº° Àû¿ë if (model.getValue("/root/init/P0022/P0022list[cd = '190' ]/nm") == "Y") { if( getNodesetCount("/root/hidden/rcv/mediexam/orddd") > 0 ){ var orddd = model.getValue("/root/hidden/rcv/mediexam/orddd"); if( isValidDateTime(orddd, "YYYYMMDD")){ var interval = getDateInterval(getCurrentDate(), orddd); var intervalMsg = ''; if( interval <= 0 ){ interval = parseInt(interval) * -1 intervalMsg = interval + "ÀÏ Àü"; if( interval <= 365 ){ messageBox(orddd.substr(0,4) + "³â " + orddd.substr(4,2) + "¿ù " + orddd.substr(6,2) + "ÀÏ(" + intervalMsg + ") °Ç°°ËÁøÀ» ¹ÞÀº ÀÌ·ÂÀÌ ÀÖ½À´Ï´Ù. \nÃÊÀçÁø¿©ºÎ¸¦ È®ÀÎÇØ ÁÖ¼¼¿ä.", "I999", ""); } } } } } //µî·Ï¹øÈ£°¡ 2°³ÀΠȯÀÚ ÇÕ¹ø¿©ºÎ üũ ¹× ÇÕ¹ø ½Åû if( getNodesetCount("/root/hidden/rcv/bindpid/oldpid") > 0 ){ var pid = model.getValue("/root/main/ptbs/ptbs_pid"); var hngnm = model.getValue("/root/main/ptbs/ptbs_hngnm"); var cnt = getNodesetCount("/root/hidden/rcv/bindpid/oldpid"); var pids = ' '; for( var i = 1; i <= cnt; i++ ){ if( model.getValue("/root/hidden/rcv/bindpid[" + i + "]/pid") == 'OLDPID' ){ var sBindPid = model.getValue("/root/hidden/rcv/bindpid[" + i + "]/newpid"); var retValue = messageBox(pid + "(" + hngnm + ") ȯÀÚÀÇ µî·Ï¹øÈ£°¡ [ " + sBindPid + " ] ·Î ÇÕ¹ø ½ÅûµÇ¾ú½À´Ï´Ù. ÇÕ¹ø ½ÅûÇÑ ¹øÈ£·Î ÀçÁ¶È¸ ÇϽðڽÀ´Ï±î?", "Q999", ""); if( retValue == '6' ){ model.setValue("/root/main/ptbs/ptbs_pid", sBindPid); ipt_pid.refresh(); fSearchOutRgstInfo(); return false; }else{ //ȸé ÃʱâÈ!! btn_init.dispatch("DOMActivate"); return false; } } pids = pids + model.getValue("/root/hidden/rcv/bindpid[" + i + "]/oldpid") + ' '; } //var retValue = messageBox(hngnm + "´ÔÀÇ µî·Ï¹øÈ£°¡ " + cnt + "°³ ´õ Á¸ÀçÇÕ´Ï´Ù.[" + pids + "]\nÇÕ¹ø ½ÅûÇϽðڽÀ´Ï±î?", "Q999", ""); //2015/01/20 ÀÌÁ¤Åà ¼öÁ¤ var bind_instcd = model.getValue("/root/hidden/rcv/pidchk[instcd!='"+getUserInfo("dutplceinstcd")+"']/instcd"); var bind_instnm = model.getValue("/root/hidden/rcv/pidchk[instcd!='"+getUserInfo("dutplceinstcd")+"']/instnm"); var bind_oldpid = model.getValue("/root/hidden/rcv/pidchk[instcd!='"+getUserInfo("dutplceinstcd")+"']/oldpid"); var bind_newpid = model.getValue("/root/hidden/rcv/pidchk[instcd!='"+getUserInfo("dutplceinstcd")+"']/newpid"); var bind_stateflag = model.getValue("/root/hidden/rcv/pidchk[instcd!='"+getUserInfo("dutplceinstcd")+"']/stateflag"); if(bind_instcd!=""){ var retValue = window.alert(hngnm + "´ÔÀÇ µî·Ï¹øÈ£°¡ " + cnt + "°³ ´õ Á¸ÀçÇÕ´Ï´Ù.[" + pids + "]\nÇÕ¹ø ½ÅûÇϽðڽÀ´Ï±î?\n[" +bind_instnm+":"+bind_oldpid+"(±¸)->"+bind_newpid+"(½Å)]["+bind_stateflag+"]", "È®ÀÎ", 4|36|256 ); }else{ var retValue = window.alert(hngnm + "´ÔÀÇ µî·Ï¹øÈ£°¡ " + cnt + "°³ ´õ Á¸ÀçÇÕ´Ï´Ù.[" + pids + "]\nÇÕ¹ø ½ÅûÇϽðڽÀ´Ï±î?", "È®ÀÎ", 4|36|256 ); } //var retValue = window.alert(hngnm + "´ÔÀÇ µî·Ï¹øÈ£°¡ " + cnt + "°³ ´õ Á¸ÀçÇÕ´Ï´Ù.[" + pids + "]\nÇÕ¹ø ½ÅûÇϽðڽÀ´Ï±î?", "È®ÀÎ", 4|36|256 ); //2015/01/20 ÀÌÁ¤Åà ¼öÁ¤ if( retValue == '6' ){ // for( var i = 1; i <= cnt; i++ ){ // model.makeNode("/root/send/bindpid[" + i + "]/oldpid"); // model.makeNode("/root/send/bindpid[" + i + "]/newpid"); // model.setValue("/root/send/bindpid[" + i + "]/oldpid", model.getValue("/root/hidden/rcv/bindpid[" + i + "]/pid")); // model.setValue("/root/send/bindpid[" + i + "]/newpid", model.getValue("/root/main/ptbs/ptbs_pid")); // } if( submit("TXPMO00107") ){ //model.removeNodeset("/root/send/bindpid"); messageBox("ÇÕ¹ø ½Åû ¿Ï·á!", "I999", ""); }else{ if( messageBox("ÇÕ¹ø ½Åû ¿À·ù!! Àç½Åû ÇϽðڽÀ´Ï±î?", "Q999", "") == '6'){ if( submit("TXPMO00107") ){ //model.removeNodeset("/root/send/bindpid"); messageBox("ÇÕ¹ø Àç½Åû ¿Ï·á!", "I999", ""); }else{ messageBox("ÇÕ¹ø Àç½Åû ¿À·ù!! ÀÇ·áÁ¤º¸°ú¿¡ ¹®ÀÇÇϼ¼¿ä.", "E999", ""); } }else{ //model.removeNodeset("/root/send/bindpid"); } } } } //Á÷¿øÁ¤º¸Á¶È¸ if( getNodesetCount("/root/hidden/rcv/famylist/cretinstcd") > 0 ){ //alert(instance1.selectNodesXml("/root/temp/psnworkinfo")); // Return model.makeNode("/root/temp/result/famylist"); //send model.makeNode("/root/send/discpat/checkcount"); //model.makeNode("/root/send/discpat/rrgstno1"); //model.makeNode("/root/send/discpat/rrgstno2"); //model.makeNode("/root/send/discpat/rrgstno"); model.makeNode("/root/send/discpat/pid"); model.setValue("/root/send/discpat/checkcount", 1); //model.setValue("/root/send/discpat/rrgstno1", rrgstno1); //model.setValue("/root/send/discpat/rrgstno2", rrgstno2); //model.setValue("/root/send/discpat/rrgstno", rrgstno); model.setValue("/root/send/discpat/pid", model.getValue("/root/main/ptbs/ptbs_pid")); submit("TRPMC03802"); //modal("SPPMC03800", "1","150", "150", "SPPMC03800", "/root/hidden/rcv", "/root/main/result"); //¼±ÅÃÇÑ Á÷¿øÁ¤º¸ ¼¼ÆÃ //var emplno = getParameter("SPPMC03800_emplid"); //var emplnm = getParameter("SPPMC03800_emplnm"); // //var discuncocd = getParameter("SPPMC03800_discuncocd"); // //var famyrelnm = getParameter("SPPMC03800_famyrelnm"); //var preststatnm = getParameter("SPPMC03800_preststatnm"); //var profacptyn = getParameter("SPPMC03800_profacptyn"); //var profacptdd = getParameter("SPPMC03800_profacptdd"); //var remark = getParameter("SPPMC03800_remark"); //var aftrcptyn = getParameter("SPPMC03800_aftrcptyn"); var emplno = model.getValue("/root/temp/result/famylist/emplno"); var emplnm = model.getValue("/root/temp/result/famylist/emplname"); var discuncocd = model.getValue("/root/temp/result/famylist/discuncocd"); var famyrelnm = model.getValue("/root/temp/result/famylist/famyrelnm"); var preststatnm = model.getValue("/root/temp/result/famylist/preststatnm"); var profacptyn = model.getValue("/root/temp/result/famylist/profacptyn"); var profacptdd = model.getValue("/root/temp/result/famylist/profacptdd"); var remark = model.getValue("/root/temp/result/famylist/remark"); var aftrcptyn = model.getValue("/root/temp/result/famylist/aftrcptyn"); clearParameter("SPPMC03800_emplid"); clearParameter("SPPMC03800_emplnm"); //clearParameter("SPPMC03800_discuncoflag"); clearParameter("SPPMC03800_discuncocd"); clearParameter("SPPMC03800_famyrelnm"); clearParameter("SPPMC03800_preststatnm"); clearParameter("SPPMC03800_profacptyn"); clearParameter("SPPMC03800_profacptdd"); clearParameter("SPPMC03800_remark"); clearParameter("SPPMC03800_aftrcptyn"); //Èļö³³( ¼ö³³VIP )¿©ºÎ ¼¼ÆÃ //2009-02-06 À̵¿½Ä Ãß°¡ if( aftrcptyn == 'Y' ){ model.setValue("/root/main/otpt/otpt_medamtpostyn", 'V'); //¼ö³³ VIP model.setValue("/root/main/otpt/otpt_rcptvipresncd", '01'); rdo_medamtpostyn.dispatch("xforms-select"); }else{ model.setValue("/root/main/otpt/otpt_medamtpostyn", 'N'); //¼±ºÒ model.setValue("/root/main/otpt/otpt_rcptvipresncd", '-'); } if( emplno != '' && emplno != ' ' ){ model.setValue("/root/main/otpt/otpt_emplno", emplno); model.setValue("/root/main/otpt/otpt_emplnm", emplnm); } if( discuncocd != '' ){ model.setValue("/root/main/otpt/otpt_disccd", discuncocd); }else{ model.setValue("/root/main/otpt/otpt_disccd", '-'); } }else{ model.setValue("/root/main/otpt/otpt_disccd", '-'); cmb_disccd.refresh(); ipt_disccd.refresh(); } //ÃÊÀçÁøÃ¼Å© if( getNodesetCount("/root/hidden/rcv/fsexamflag/fsexamflag") > 0 ){ var fsexamflag = model.getValue("/root/hidden/rcv/fsexamflag/fsexamflag"); model.setValue("/root/main/otpt/otpt_fsexamflag", fsexamflag); }else{ messageBox("ÃÊÀçÁø¿©ºÎ¸¦ °¡Á®¿ÀÁö ¸ø Çß½À´Ï´Ù. Á¢¼öÇϽñâ Àü¿¡ ÃÊÀçÁø¿©ºÎ¸¦ Á¤È®È÷ È®ÀÎ ÈÄ Á¢¼öÇϽñ⠹ٶø´Ï´Ù!!", "E999" , ""); } //Á¢¼öºñÁߺ¹Ã¼Å© //2008-12-03 À̵¿½Ä ¼öÁ¤ - Á¢¼öºñÁߺ¹Ã¼Å© var duplCnt = getNodesetCount("/root/hidden/rcv/otpthist/otpt_pid"); if( duplCnt > 1 ){ if( messageBox("µ¿ÀÏÀÏÀÚ µ¿Àϰú Á¢¼öºñ ÀÌÁß ¼ö³³³»¿ªÀÌ ÀÖ½À´Ï´Ù. ³»¿ªÀ» È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", "") == 6 ){ setParameter("SMPMO01600_PARM", model.getValue("/root/main/ptbs/ptbs_pid")); modal("SPPMO01600", "1","200", "200", "SPPMO01600", "", ""); } }else{ } //Ÿ°úÀÇ·Ú³»¿ª üũ //2008-01-07 À̵¿½Ä ¼öÁ¤ - ÄÁ¼³Æ® ÀÇ·ÚÁ¤º¸°¡ 1°ÇÀ϶§ ¿Í 2°Ç ÀÌ»óÀ϶§ ±¸ºÐÇÏ¿© ¸Þ¼¼Áö ó¸® var cnstCnt = getNodesetCount("/root/hidden/rcv/cnstinfo/temp/emrcnst/pid"); if( cnstCnt > 1 ){ if( messageBox("ÄÁ¼³Æ® ÀÇ·ÚÁ¤º¸°¡ ÀÖ½À´Ï´Ù. ³»¿ªÀ» È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", "") == 6 ){ if( fGetEMRCnstInfo() ){ retValue = true; } } }else if( cnstCnt == 1 ){ var reqorddeptnm = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/reqdeptnm"); var reqorddrnm = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/requsernm"); var recvorddeptnm = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/recvdeptnm"); var recvorddrnm = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/recvusernm"); var formrecseq = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/formrecseq"); if( messageBox(reqorddeptnm + " " + reqorddrnm + " ±³¼ö´Ô²²¼ " + recvorddeptnm + " " + recvorddrnm + " ±³¼ö´Ô²² ÀÇ·ÚÇÑ ³»¿ªÀÌ ÀÖ½À´Ï´Ù. \nÁö±Ý Á¢¼öÇϽðڽÀ´Ï±î?", "Q999", "") == 6 ){ var orddd = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/hopedd"); var orddeptcd = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/recvdeptcd"); var orddrid = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/recvuserid"); var ordreqformflag = model.getValue("/root/hidden/rcv/cnstinfo/temp/emrcnst/ordreqformflag"); model.setValue("/root/main/otpt/otpt_orddeptcd", orddeptcd); cmb_orddeptcd.dispatch("xforms-value-changed"); model.setValue("/root/main/otpt/otpt_orddrid", orddrid); cmb_orddrid.dispatch("xforms-value-changed"); model.setValue("/root/main/otpt/otpt_orddd", orddd); ipt_orddd.dispatch("xforms-value-changed"); //±âÃÊÁ¤º¸ ¼¼ÆÃ model.setValue("/root/main/otpt/otpt_ordreqformflag", ordreqformflag); //Áø·áÀÇ·Ú¼ ¼ö±ÞÀýÂ÷ - ¿øÁø·áÀÇ ¼ö±ÞÀýÂ÷¸¦ µû¸¥´Ù model.setValue("/root/main/otpt/otpt_etcordflag", "H"); //±âŸ±¸ºÐ - ÀÇ·Ú model.setValue("/root/main/otpt/otpt_rsrvflag", "C"); //¿¹¾à±¸ºÐ - ÇùÁø model.makeNode("/root/main/otpt/otpt_formrecseq"); model.setValue("/root/main/otpt/otpt_formrecseq", formrecseq); model.refresh(); } } //¼ö³³VIP¹Ì¼ö±Ý Á¶È¸ //2008-12-03 À̵¿½Ä ¼öÁ¤ - Á¢¼öºñÁߺ¹Ã¼Å© var vipUncoCnt = getNodesetCount("/root/hidden/rcv/rcptvipunco/rcptvipuncoyn"); if( vipUncoCnt > 0 ){ VIPUNCOYN = model.getValue("/root/hidden/rcv/rcptvipunco/rcptvipuncoyn"); if( VIPUNCOYN == 'Y' ){ var vipuncoamt = model.getValue("/root/hidden/rcv/rcptvipunco/rcptvipuncoamt"); messageBox("¹Ì¼ö±ÝÀÌ Á¸ÀçÇÕ´Ï´Ù. [¼ö³³VIP/󹿴çÀϼ±°Ë»ç ¹Ì¼ö±Ý : " + vipuncoamt + " ¿ø]", "I999", ""); } }else{ VIPUNCOYN = 'N'; } if( retValue ){ checkAutoMultiRgst = false; } /* }else{ messageBox("Àü»êÀå¾Ö·Î ȯÀÚ ±âº» Á¤º¸¸¦ È®ÀÎÇÒ ¼ö ¾ø½À´Ï´Ù. Àü»ê½Ç¿¡ ¹®ÀÇÇϰųª Àá½Ã ÈÄ ´Ù½Ã ½ÃµµÇϼ¼¿ä.", "E999", ""); //return false; } */ //model.removeNodeset("/root/send/totalcheckinfo"); model.removeNodeset("/root/hidden/rcv"); return true; } //ÀÚ¼±Áø·áºñ ´ë»ó ȯÀÚ Á¶È¸ function fCheckCharityYN(pid){ model.makeNode("/root/send/charity/pid"); model.makeNode("/root/send/charity/rcv"); model.setValue("/root/send/charity/pid", pid); if(submit("TRPMO00121")){ //ÀÚ¼±È¯ÀÚüũ if( model.getValue("/root/send/charity/rcv/charity/charityyn") == 'Y'){ var retValue = messageBox("ÀÚ¼±Áø·áºñ Áö¿ø ´ë»ó ȯÀÚÀÔ´Ï´Ù. ³»¿ªÀ» È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", ""); if( retValue == 6 ){ fOpenCharityPopup(pid); } } } model.removeNodeset("/root/send/charity"); return; } //ÀÚ¼±Áø·áºñ ´ë»ó ȯÀÚ Á¶È¸ ÀÔ¿ø¼ö³³¿ë function fCheckCharityYN_i(pid,pre_loading_yn){ if(pre_loading_yn == "Y" ){ //¸¸¾à ÀÔ¿ø¼ö³³µî ±âȸ鿡¼ ÀÚ¼±Á¤º¸ ¹Ì¸® Á¶È¸ÇØ¿À¹Ç·Î submit Åë°ú } if(getNodesetCount("/root/send/charity/rcv/charity/charityyn")>0){ //ÀÚ¼±È¯ÀÚ Ã¼Å© if( model.getValue("/root/send/charity/rcv/charity/charityyn") == 'Y'){ var retValue = messageBox("ÀÚ¼±Áø·áºñ Áö¿ø ´ë»ó ȯÀÚÀÔ´Ï´Ù. ³»¿ªÀ» È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", ""); if( retValue == 6 ){ fOpenCharityPopup(pid); } } } model.removeNodeset("/root/send/charity"); return; } //ÀÚ¼±Áø·áºñ Á¶È¸ ÆË¾÷ È£Ãâ function fOpenCharityPopup(pid){ //µî·Ï¹øÈ£ ÆÄ¶ó¹ÌÅÍ ¼¼ÆÃ setParameter("pid", pid); //ÆË¾÷È£Ãâ ///root/main/inpt_info/inptpatinfo/inpt_pid modal("SPAWM03100", "1","200", "200", "SPAWM03100","",""); //ÆÄ¶ó¹ÌÅÍ »èÁ¦ clearParameter("pid"); } //ÈÄ¿ø±Ý ȯÀÚ ¿©ºÎüũ function fSuppManageYN(pid) { model.makeNode("/root/send/suppmanage/pid"); model.makeNode("/root/send/suppmanage/rcv"); model.setValue("/root/send/suppmanage/pid",pid) if(submit("TRPAI00132")){ //ÀÚ¼±È¯ÀÚ Ã¼Å© if( model.getValue("/root/send/suppmanage/rcv/supp/suppyn") == 'Y'){ var retValue = messageBox("°ü°ø¼(±¸/±º/½Ãû),±ä±ÞÁö¿ø ¹× º¸°Ç¼Ò Áö¿ø ´ë»ó ȯÀÚÀÔ´Ï´Ù. ³»¿ªÀ» È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", ""); if( retValue == 6 ){ fOpenSuppManagePopup(pid); } } } model.removeNodeset("/root/send/suppmanage"); return; } //ÈÄ¿ø±Ý ȯÀÚ ¿©ºÎüũ ÀÔ¿ø¼ö³³¿ë function fSuppManageYN_i(pid,pre_loading_yn) { if(pre_loading_yn == "Y" ){ //ÀÔ¿ø¼ö³³Àº ÀÚ¼±Á¤º¸ ¹Ì¸® Á¶È¸ÇØ¿À¹Ç·Î submit Åë°ú } if(getNodesetCount("/root/send/suppmanage/rcv/supp/suppyn")>0){ //ÀÚ¼±È¯ÀÚ Ã¼Å© if( model.getValue("/root/send/suppmanage/rcv/supp/suppyn") == 'Y'){ var retValue = messageBox("°ü°ø¼(±¸/±º/½Ãû),±ä±ÞÁö¿ø ¹× º¸°Ç¼Ò Áö¿ø ´ë»ó ȯÀÚÀÔ´Ï´Ù. ³»¿ªÀ» È®ÀÎÇϽðڽÀ´Ï±î?", "Q999", ""); if( retValue == 6 ){ fOpenSuppManagePopup(pid); } } } model.removeNodeset("/root/send/suppmanage"); return; } function fOpenSuppManagePopup(pid){ //µî·Ï¹øÈ£ ÆÄ¶ó¹ÌÅÍ ¼¼ÆÃ setParameter("pid", pid); //ÆË¾÷È£Ãâ modal("SMPMC07100", "1","200", "200", "SMPMC07100", "/root/main/inpt_info/inptpatinfo/inpt_pid", "/root/main/patinfo/patinfolist/pid"); //ÆÄ¶ó¹ÌÅÍ »èÁ¦ clearParameter("pid"); } //µî·Ï¹øÈ£°¡ 2°³ÀΠȯÀÚ ÇÕ¹ø¿©ºÎ üũ ¹× ÇÕ¹ø ½Åû function fCheckBindPID(){ model.makeNode("/root/send/bindpid/pid"); model.makeNode("/root/send/bindpid/rrgstno1"); model.makeNode("/root/send/bindpid/rrgstno2"); model.makeNode("/root/send/bindpid/hngnm"); model.setValue("/root/send/bindpid/pid", model.getValue("/root/main/ptbs/ptbs_pid")); model.setValue("/root/send/bindpid/rrgstno1", model.getValue("/root/main/ptbs/ptbs_rrgstno1")); model.setValue("/root/send/bindpid/rrgstno2", model.getValue("/root/main/ptbs/ptbs_rrgstno2")); model.setValue("/root/send/bindpid/hngnm", model.getValue("/root/main/ptbs/ptbs_hngnm")); model.makeNode("/root/hidden/rcv"); if( submit("TRPMO00119") ){ //µî·Ï¹øÈ£°¡ 2°³ÀΠȯÀÚ ÇÕ¹ø¿©ºÎ üũ ¹× ÇÕ¹ø ½Åû if( getNodesetCount("/root/hidden/rcv/bindpid/oldpid") > 0 ){ var hngnm = model.getValue("/root/main/ptbs/ptbs_hngnm"); var cnt = getNodesetCount("/root/hidden/rcv/bindpid/oldpid"); var pids = ' '; for( var i = 1; i <= cnt; i++ ){ pids = pids + model.getValue("/root/hidden/rcv/bindpid[" + i + "]/oldpid") + ' '; } //var retValue = messageBox(hngnm + "´ÔÀÇ µî·Ï¹øÈ£°¡ " + cnt + "°³ ´õ Á¸ÀçÇÕ´Ï´Ù.[" + pids + "]\nÇÕ¹ø ½ÅûÇϽðڽÀ´Ï±î?", "Q999", ""); var retValue = window.alert(hngnm + "´ÔÀÇ µî·Ï¹øÈ£°¡ " + cnt + "°³ ´õ Á¸ÀçÇÕ´Ï´Ù.[" + pids + "]\nÇÕ¹ø ½ÅûÇϽðڽÀ´Ï±î?", "È®ÀÎ", 4|36|256 ); if( retValue == '6' ){ // for( var i = 1; i <= cnt; i++ ){ // model.makeNode("/root/send/bindpid[" + i + "]/oldpid"); // model.makeNode("/root/send/bindpid[" + i + "]/newpid"); // model.setValue("/root/send/bindpid[" + i + "]/oldpid", model.getValue("/root/hidden/rcv/bindpid[" + i + "]/pid")); // model.setValue("/root/send/bindpid[" + i + "]/newpid", model.getValue("/root/main/ptbs/ptbs_pid")); // } if( submit("TXPMO00107") ){ //model.removeNodeset("/root/send/bindpid"); messageBox("ÇÕ¹ø ½Åû ¿Ï·á!", "I999", ""); }else{ if( messageBox("ÇÕ¹ø ½Åû ¿À·ù!! Àç½Åû ÇϽðڽÀ´Ï±î?", "Q999", "") == '6'){ if( submit("TXPMO00107") ){ //model.removeNodeset("/root/send/bindpid"); messageBox("ÇÕ¹ø Àç½Åû ¿Ï·á!", "I999", ""); }else{ messageBox("ÇÕ¹ø Àç½Åû ¿À·ù!! Á¤º¸Áö¿øÆÀ¿¡ ¹®ÀÇÇϼ¼¿ä.", "E999", ""); } }else{ //model.removeNodeset("/root/send/bindpid"); } } } } } model.removeNodeset("/root/send/bindpid"); model.removeNodeset("/root/hidden/rcv"); } // ¼öÁ¤ÀÌ·Â 20100216 JHP fromdd, mskind Ãß°¡ ÇÏ¿© mskind°¡ "S"À̸é orddd¸¦ fromdd·Î ¹Ù²Þ.(20100216 ÇöÀç fromdd, mskind´Â ÀÔ¿øµî·Ï ȸ鿡¼¸¸ º¸³»°Ô ¼öÁ¤µÊ) function checkJaboSanjae(pid, orddd, orddeptcd, insukind, suppkind, insucd, ioflag, fromdd, mskind){ model.makeNode("/root/send/checkjabosasae/pid"); model.makeNode("/root/send/checkjabosasae/orddd"); model.makeNode("/root/send/checkjabosasae/orddeptcd"); model.makeNode("/root/send/checkjabosasae/insukind"); model.makeNode("/root/send/checkjabosasae/suppkind"); model.makeNode("/root/send/checkjabosasae/insucd"); model.makeNode("/root/send/checkjabosasae/ioflag"); model.setValue("/root/send/checkjabosasae/pid", pid); if(mskind != null){ if(mskind == "S"){ if(fromdd != null){ model.setValue("/root/send/checkjabosasae/orddd", fromdd); }else{ model.setValue("/root/send/checkjabosasae/orddd", orddd); } }else{ model.setValue("/root/send/checkjabosasae/orddd", orddd); } }else{ model.setValue("/root/send/checkjabosasae/orddd", orddd); } model.setValue("/root/send/checkjabosasae/orddeptcd", orddeptcd); model.setValue("/root/send/checkjabosasae/insukind", insukind); model.setValue("/root/send/checkjabosasae/suppkind", suppkind); model.setValue("/root/send/checkjabosasae/insucd", insucd); model.setValue("/root/send/checkjabosasae/ioflag", ioflag); if( suppkind != '01' ){ //Àü¾×º»ÀκδãÀϰæ¿ì ÀÚº¸Ã¼Å©ÇÏÁö ¾Ê´Â´Ù. if( submit("TRPMO00120") ){ model.removeNodeset("/root/send/checkjabosasae"); return true; }else{ model.removeNodeset("/root/send/checkjabosasae"); return false; } }else{ return true; } } function callLoadingWindow(msg){ //20080703 À̵¿½Ä Ãß°¡ //ȯÀÚÁ¤º¸ Á¶È¸ Áß »óÅ ǥ½Ã body.createChild("xforms:iviewer", "id:ivr_progress; src:../../../com/commonweb/xrw/SPZZZ00400_·ÎµùÁßȸé.xrw; left:435px; top:339px; width:330px; height:120px;"); var ivrObjt = document.all("ivr_progress"); if( msg == '' || msg == '-' ){ msg = "¿Ü·¡È¯ÀÚ µ¥ÀÌÅÍ Á¶È¸ ÁßÀÔ´Ï´Ù..."; } ivrObjt.model.setValue("/root/main/msg", msg); ivrObjt.model.refresh(); } function removeLoadingWindow(){ //20080703 À̵¿½Ä Ãß°¡ //ȯÀÚÁ¤º¸ Á¶È¸ Áß »óÅ ǥ½Ã Áö¿ì±â body.removeChild("ivr_progress"); } /** * @desc : 6¼¼¹Ì¸¸ üũ *
* input : pRrgstno ÁֹιøÈ£(7711061540816) * ** @param : pRrgstno * @return : true/false , 6¼¼¹Ì¸¸(true) * @--------------------------------------------------- */ function fRoomSexGubunCheck(pRrgstno) { // ÁֹιøÈ£°¡ ¾øÀ» ¶§´Â 6¼¼ ÀÌ»óÀ¸·Î ÆÇ´Ü(?) if (typeof(pRrgstno) == "undefined" || pRrgstno == "" || pRrgstno == null) { return false; } var fullDay = ""; // YYYYMMDD var gender = pRrgstno.substr(6,1); var rrgstno1 = pRrgstno.substr(0,6); switch(gender) { case '1' : case '2' : case '5' : case '6' : fullDay = '19'.concat(rrgstno1); break; case '3' : case '4' : case '7' : case '8' : fullDay = '20'.concat(rrgstno1); break; case '9' : case '0' : fullDay = '18'.concat(rrgstno1); break; default : fullDay = '19'.concat(rrgstno1); break; } // fullDay - YYYYMMDD // 13ÀÚ¸®( ÁֹιøÈ£1 + ÁֹιøÈ£2)¸¦ ÆÄ¶ó¹ÌÅÍ·Î ÁÖ¸é ÁֹιøÈ£ À¯È¿¼º °Ë»ç·Î À¯È¿ÇÏÁö ¾ÊÀ¸¸é -1À» ¸®ÅÏ var chkAge = getFullAge(fullDay, "", "M"); if (chkAge >= 0 && chkAge < 6) { // 6¼¼ ¹Ì¸¸ return true; } else { // 6¼¼ ÀÌ»ó return false; } } /** * @desc : ÀÚº¸/»êÀç µî·Ï³»¿ª üũ * @param : pPid - ȯÀÚ¹øÈ£ * pCheckDD - Á¶È¸ÀÏÀÚ (¿Ü·¡ - orddd, ÀÔ¿ø - indd) * @return : null * @--------------------------------------------------- */ function fCheckAutoInduInsu(pPid, pCheckDD) { var sNewLine = "\n"; if (isNull(pPid)) { messageBox("ȯÀÚµî·Ï¹øÈ£°¡", "I004"); return; } model.removeNodeset("/root/send/checkautoinduinsu"); model.makeValue("/root/send/checkautoinduinsu/pid", pPid); model.makeValue("/root/send/checkautoinduinsu/checkdd", pCheckDD); //model.makeNode("/root/hidden/rcv/autoinduinsulist/autoinduinsu"); submit("TRPMC02600"); var iCount = getNodesetCount("/root/hidden/autoinduinsulist/autoinduinsu"); if (iCount > 0) { var sMessage = "ÀÚº¸/»êÀç/°ø»ó µî·ÏÁ¤º¸" + sNewLine + sNewLine; var sInsuNm = ""; for (var idx = 1 ; idx <= iCount ; idx++) { var sInsuKind = model.getValue("/root/hidden/autoinduinsulist/autoinduinsu[" + idx + "]/insukind"); var sOrdType = model.getValue("/root/hidden/autoinduinsulist/autoinduinsu[" + idx + "]/ordtype"); var sFromdd = model.getValue("/root/hidden/autoinduinsulist/autoinduinsu[" + idx + "]/fromdd"); var sTodd = model.getValue("/root/hidden/autoinduinsulist/autoinduinsu[" + idx + "]/todd"); var sSuppKind = model.getValue("/root/hidden/autoinduinsulist/autoinduinsu[" + idx + "]/suppkind"); var sOrdDeptCD = model.getValue("/root/hidden/autoinduinsulist/autoinduinsu[" + idx + "]/orddeptcd"); var sInsucdnm = model.getValue("/root/hidden/autoinduinsulist/autoinduinsu[" + idx + "]/insucdnm"); if (sInsuKind == "31") { // 20110711 ÀÚº¸ÀÇ °æ¿ì, Á¾·áµÇ¾úÀ¸¸é ÆË¾÷Ç¥½ÃÇÏÁö ¾ÊÀ½ if (sTodd >= getCurrentDate()) { sInsuNm = "ÀÚº¸"; sMessage += "[" + sInsuNm + "] ½ÂÀαⰣ[" + sFromdd + "~" + sTodd +"] - " + sInsucdnm; sMessage += sNewLine; } } if (sInsuKind == "41") { sInsuNm = "»êÀç"; sMessage += "[" + sInsuNm + "/" + sSuppKind + "]" + " [" + sOrdDeptCD + "] ½ÂÀαⰣ[" + sFromdd + "~" + sTodd +"]" + " [" + sOrdType + "]"; sMessage += sNewLine; } if (sInsuKind == "42") { sInsuNm = "°ø»ó"; sMessage += "[" + sInsuNm + "/" + sSuppKind + "]" + " [" + sOrdDeptCD + "] ½ÂÀαⰣ[" + sFromdd + "~" + sTodd +"]" + " [" + sOrdType + "]"; sMessage += sNewLine; } } messageBox(sMessage, "I"); // ÀÚº¸ÀÇ °æ¿ì »ç°íÁ¢¼öÁ¤º¸°¡ º¹¼ö°Ç Á¸ÀçÇÒ ¼ö ÀÖÀ¸¹Ç·Î ¼ö³³ÀÚ¿¡°Ô ¾Ë¸²Ã³¸® by Á¶Áß·¡ 20130704 if (sInsuKind == "31" && iCount > 1) { messageBox("ÀÚº¸ »ç°íÁ¢¼öÁ¤º¸°¡ º¹¼ö°Ç Á¸ÀçÇÕ´Ï´Ù. \r\n\r\nÀÚº¸´ã´çÀÚ È®ÀÎ ÈÄ À¯È¿ÇÑ Á¢¼öÁ¤º¸·Î ÁøÇàÇϽʽÿÀ", "I000"); } model.removeNodeset("/root/hidden/autoinduinsulist"); } } /** * @desc : ¼¾ÅÍ ¼±Àû¿ë ¿©ºÎ üũ ÇÔ¼ö * @param : * @return : centeryn * @--------------------------------------------------- */ function fCheckCenterYN() { model.removeNodeset("/root/hidden/pamcomcd"); model.makeNode("/root/hidden/pamcomcd/send/cdgrupid"); model.makeNode("/root/hidden/pamcomcd/send/cdid"); model.makeNode("/root/hidden/pamcomcd/rcv"); model.setValue("/root/hidden/pamcomcd/send/cdgrupid", 'P0022'); model.setValue("/root/hidden/pamcomcd/send/cdid", '30'); submit("TRPMO00123"); var iCount = getNodesetCount("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); if (iCount > 0) { var centeryn = model.getValue("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); model.removeNodeset("/root/hidden/pamcomcd"); return centeryn; }else{ model.removeNodeset("/root/hidden/pamcomcd"); return 'N'; } } /** * @desc : ¼ö³³VIP Àû¿ë ¿©ºÎ üũ ÇÔ¼ö * @param : * @return : rcptvipyn * @--------------------------------------------------- */ function fCheckRcptVIPYN() { model.removeNodeset("/root/hidden/pamcomcd"); model.makeNode("/root/hidden/pamcomcd/send/cdgrupid"); model.makeNode("/root/hidden/pamcomcd/send/cdid"); model.makeNode("/root/hidden/pamcomcd/rcv"); model.setValue("/root/hidden/pamcomcd/send/cdgrupid", 'P0022'); model.setValue("/root/hidden/pamcomcd/send/cdid", '40'); submit("TRPMO00123"); var iCount = getNodesetCount("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); if (iCount > 0) { var rcptvipyn = model.getValue("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); model.removeNodeset("/root/hidden/pamcomcd"); return rcptvipyn; }else{ model.removeNodeset("/root/hidden/pamcomcd"); return 'N'; } } /** * @desc : ¼º¸ðº´¿ø¿¡¼ ÀüȯµÈ ȯÀÚ ¸Þ¼¼Áö ó¸® * @param : * @return : centeryn * @--------------------------------------------------- */ function fCheckMigPatMsg(pidflag) { if( pidflag == '90' || pidflag == '91'){ messageBox("¼º¸ðº´¿ø¿¡¼ ÀüȯµÈ ȯÀÚÀÔ´Ï´Ù.", "I999", ""); return true; }else{ return false; } } /** * @desc : BMTȯÀÚ ÃÊÁø·á ÀçÁø·á·Î º¯°æ ¸Þ¼¼Áö * @param : * @return : centeryn * @--------------------------------------------------- */ function fCheckBMTPatMsg(pidflag, centcd, orddeptcd, fsexamflag) { //BMT¼¾ÅÍ, ÃÊÁø(º´ÃÊ, °úÃÊ), ¼º¸ðBMTÀüȯȯÀÚ ¹øÈ£À϶§ ÃÊÁø·á->ÀçÁø·á º¯°æ ¸Þ¼¼Áö if( pidflag == '90' && centcd == '2361303000' && (fsexamflag == 'F' || fsexamflag == 'D')){ messageBox("¼º¸ðº´¿ø BMTȯÀÚ ÀÔ´Ï´Ù. ÀçÁøÁøÂû·á¸¦ Á¦¿ÜÇÑ ±Ý¾×À» ÀÓÀǰ¨¾× ÇϽʽÿÀ.", "I999", ""); return true; }else{ return false; } } /** * @desc : ¼±ÈÄºÒ º¯°æ * @param : * @return : true/false * @--------------------------------------------------- */ function fSetMedAmtPostYN(pid, orddd, cretno) { setParameter("SPPMO01700_pid", pid); setParameter("SPPMO01700_orddd", orddd); setParameter("SPPMO01700_cretno", cretno); modal("SPPMO01700", "1", "", "", "SPPMO01700", "", ""); clearParameter("SPPMO01700_pid"); clearParameter("SPPMO01700_orddd"); clearParameter("SPPMO01700_cretno"); var retValue = getParameter("SPPMO01700_RTN"); if( retValue == 'Y' ){ return true; }else{ return false; } } /** * @desc : capa¼ö Á¦ÇÑ ÇÔ¼ö * @param : * @return : centeryn * @--------------------------------------------------- */ function fCapaCheck() { submit("TRPMB00716"); } /** * @desc : ÀüÈ¿¹¾à ÃÊÀçÁø ¿¹¾àÀÏÀÚ Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function FsexamFalg() { submit("TRPMO00209"); } /** * @desc : ±â°üº° ÀºÇà ¹× ÀºÇà°èÁ Á¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fBankSearch() { submit("TRPIF30309"); } /** * @desc : ÀÇ·á±Þ¿©ÀÚµ¿Â÷°¨½ÂÀÎ * @param : * @return : * @--------------------------------------------------- */ function fApproveHeallifeAmt(){ //º¸ÇèÁõ¹øÈ£ Á¶È¸(º¸ÇèÀÚ°ÝÁ¶È¸) var starttime = getCurrentTime(); var ivrObjt = document.all("ivr_insupopup"); if( ivrObjt == null ){ body.createChild("xforms:iviewer", "id:ivr_insupopup; src:../../../pam/pamcomnweb/xrw/SPPMC03900_ÀÇ·á±Þ¿©ÀÚ°ÝÁ¶È¸½ÂÀÎ.xrw"); ivrObjt = document.all("ivr_insupopup"); //°øÅëÄÚµå ÃʱâÈ ivrObjt.window.javascript.fGetInitCode(); } //ÆË¾÷ŸÀÔ - ¾ÆÀ̺ä¾î·Î ¼¼ÆÃ ¸Þ¼¼Áö 󸮽à ÇÊ¿ä setParameter("SPPMC03900_POPUPTYPE", "I"); //iviewer //µ¥ÀÌÅÍ ÃʱâÈ ¹× ÀÚ°ÝÁ¶È¸ if( ivrObjt.window.javascript.fInit() != true ){ messageBox("[º¸Çè ÀÚ°ÝÁ¶È¸ ¿À·ù]°ÇÀ¯ºñû±¸°¡ Á¤»óÀûÀ¸·Î µÇÁö ¾Ê¾Ò½À´Ï´Ù. °ÇÀ¯ºñû±¸ ÆË¾÷¿¡¼ Á÷Á¢ Â÷°¨ÇØÁÖ¼¼¿ä.","I999"); ivrObjt.window.javascript.fClose(); return false; } if( ivrObjt.window.javascript.fSetHeallifeamtclamamt() != true ){ messageBox("[°ÇÀ¯ºñ ±Ý¾× ÀÔ·Â ¿À·ù]°ÇÀ¯ºñû±¸°¡ Á¤»óÀûÀ¸·Î µÇÁö ¾Ê¾Ò½À´Ï´Ù. °ÇÀ¯ºñû±¸ ÆË¾÷¿¡¼ Á÷Á¢ Â÷°¨ÇØÁÖ¼¼¿ä.","I999"); ivrObjt.window.javascript.fClose(); return false; } if( ivrObjt.window.javascript.fReqApproval() != true ){ messageBox("[°ÇÀ¯ºñ û±¸ ½ÂÀÎ ¿À·ù]°ÇÀ¯ºñû±¸°¡ Á¤»óÀûÀ¸·Î µÇÁö ¾Ê¾Ò½À´Ï´Ù. °ÇÀ¯ºñû±¸ ÆË¾÷¿¡¼ Á÷Á¢ Â÷°¨ÇØÁÖ¼¼¿ä.","I999"); ivrObjt.window.javascript.fClose(); return false; } ivrObjt.window.javascript.fClose(); var finishtime = getCurrentTime(); // alert(starttime + " ~ " + finishtime); // body.removeChild("ivr_insupopup"); } /** * @desc : »êÀüÁö¿øºñÀÚµ¿½ÂÀÎ * @param : * @return : * @--------------------------------------------------- */ function fApprovePreDmndAmt(){ //º¸ÇèÁõ¹øÈ£ Á¶È¸(º¸ÇèÀÚ°ÝÁ¶È¸) var starttime = getCurrentTime(); var ivrObjt = document.all("ivr_insupopup"); if( ivrObjt == null ){ body.createChild("xforms:iviewer", "id:ivr_insupopup; src:../../../pam/pamcomnweb/xrw/SPPMC03900_ÀÇ·á±Þ¿©ÀÚ°ÝÁ¶È¸½ÂÀÎ.xrw"); ivrObjt = document.all("ivr_insupopup"); //°øÅëÄÚµå ÃʱâÈ ivrObjt.window.javascript.fGetInitCode(); } //ÆË¾÷ŸÀÔ - ¾ÆÀ̺ä¾î·Î ¼¼ÆÃ ¸Þ¼¼Áö 󸮽à ÇÊ¿ä setParameter("SPPMC03900_POPUPTYPE", "I"); //iviewer //µ¥ÀÌÅÍ ÃʱâÈ ¹× ÀÚ°ÝÁ¶È¸ if( ivrObjt.window.javascript.fInit() != true ){ messageBox("[º¸Çè ÀÚ°ÝÁ¶È¸ ¿À·ù]»êÀüÁö¿øºñ½ÂÀÎÀÌ Á¤»óÀûÀ¸·Î µÇÁö ¾Ê¾Ò½À´Ï´Ù. »êÀüÁö¿ø½ÂÀÎ ÆË¾÷¿¡¼ Á÷Á¢ Â÷°¨ÇØÁÖ¼¼¿ä.","I999"); ivrObjt.window.javascript.fClose(); return false; } if( ivrObjt.window.javascript.fSetPregDmndAmt() != true ){ messageBox("[°ÇÀ¯ºñ ±Ý¾× ÀÔ·Â ¿À·ù]»êÀüÁö¿øºñ½ÂÀÎÀÌ Á¤»óÀûÀ¸·Î µÇÁö ¾Ê¾Ò½À´Ï´Ù. »êÀüÁö¿ø½ÂÀÎ ÆË¾÷¿¡¼ Á÷Á¢ Â÷°¨ÇØÁÖ¼¼¿ä.","I999"); ivrObjt.window.javascript.fClose(); return false; } if( ivrObjt.window.javascript.fReqApproval() != true ){ messageBox("[°ÇÀ¯ºñ û±¸ ½ÂÀÎ ¿À·ù]»êÀüÁö¿øºñ½ÂÀÎÀÌ Á¤»óÀûÀ¸·Î µÇÁö ¾Ê¾Ò½À´Ï´Ù. »êÀüÁö¿ø½ÂÀÎ ÆË¾÷¿¡¼ Á÷Á¢ Â÷°¨ÇØÁÖ¼¼¿ä.","I999"); ivrObjt.window.javascript.fClose(); return false; } ivrObjt.window.javascript.fClose(); var finishtime = getCurrentTime(); // alert(starttime + " ~ " + finishtime); // body.removeChild("ivr_insupopup"); } /** * @desc : »ç¸ÁȯÀÚ ¾Ë¸²¸Þ¼¼Áö * @param : * @return : * @--------------------------------------------------- */ function fCheckDethYN(dethyn, dethdt){ if(dethyn == "Y"){ if(dethdt.length >= 8){ messageBox(dethdt.substr(0, 4) + "³â " + dethdt.substr(4, 2) + "¿ù " + dethdt.substr(6, 2) + "ÀÏ " + dethdt.substr(8, 2) + "½Ã " + " »ç¸ÁÇϽŠºÐÀÔ´Ï´Ù.", "I999"); } if(dethdt.length < 8){ messageBox("»ç¸ÁÇϽŠºÐÀÔ´Ï´Ù.", "I999"); } } } /** * @desc : ÀÚ°ÝÁ¶È¸ * @param : * @return : * @--------------------------------------------------- */ function fApproveHeallifeAmt2(){ //º¸ÇèÁõ¹øÈ£ Á¶È¸(º¸ÇèÀÚ°ÝÁ¶È¸) var starttime = getCurrentTime(); var ivrObjt = document.all("ivr_insupopup"); if( ivrObjt == null ){ body.createChild("xforms:iviewer", "id:ivr_insupopup; src:../../../pam/pamcomnweb/xrw/SPPMC03900_ÀÇ·á±Þ¿©ÀÚ°ÝÁ¶È¸½ÂÀÎ.xrw"); ivrObjt = document.all("ivr_insupopup"); //°øÅëÄÚµå ÃʱâÈ ivrObjt.window.javascript.fGetInitCode(); } //ÆË¾÷ŸÀÔ - ¾ÆÀ̺ä¾î·Î ¼¼ÆÃ ¸Þ¼¼Áö 󸮽à ÇÊ¿ä setParameter("SPPMC03900_POPUPTYPE", "I"); //iviewer //µ¥ÀÌÅÍ ÃʱâÈ ¹× ÀÚ°ÝÁ¶È¸ if( ivrObjt.window.javascript.fInit() != true ){ //messageBox("[º¸Çè ÀÚ°ÝÁ¶È¸ ¿À·ù]°ÇÀ¯ºñû±¸°¡ Á¤»óÀûÀ¸·Î µÇÁö ¾Ê¾Ò½À´Ï´Ù. °ÇÀ¯ºñû±¸ ÆË¾÷¿¡¼ Á÷Á¢ Â÷°¨ÇØÁÖ¼¼¿ä.", "E999", ""); //ivrObjt.window.javascript.fClose(); //return false; } ivrObjt.window.javascript.fClose(); var finishtime = getCurrentTime(); //alert(starttime + " ~ " + finishtime); } /** * @desc : ÀÚµ¿¹Ì¼ö - °è¾àó µ¶¸³À¯°øÀÚ ¹Ì¼ö * @param : path = '/root/main/opmi/opmi_', inputBoxName = ¹Ì¼ö±ÝÀÔ·Â inputbox ÄÁÆ®·Ñ ¸í, inputBoxEvent = ¹Ì¼ö±ÝÀÌ ÀԷµÆÀ» ¶§ ¹ß»ýÇÏ´Â À̺¥Æ® ŸÀÔ * @return : * @--------------------------------------------------- */ function fCheckAutoUnco(path, uncocd, inputBoxName, inputBoxEvent){ if( uncocd == '' || uncocd == '-' ){ return false; } if( path == '' || path == '-' ){ return false; } if( inputBoxName == '' || inputBoxName == '-' ){ return false; } if( inputBoxEvent == '' || inputBoxEvent == '-' ){ return false; } //¹Ì¼öÄÚµå üũ model.removeNodeset("/root/hidden/pamcomcd"); model.makeNode("/root/hidden/pamcomcd/send/cdgrupid"); model.makeNode("/root/hidden/pamcomcd/send/cdid"); model.makeNode("/root/hidden/pamcomcd/rcv"); model.setValue("/root/hidden/pamcomcd/send/cdgrupid", 'P0071'); model.setValue("/root/hidden/pamcomcd/send/cdid", uncocd); submit("TRPMO00123"); var iCount = getNodesetCount("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); if(iCount > 0){ var payownbamt = model.getValue( path + 'payownbamt100' ); payownbamt = parseInt(payownbamt) / 10; payownbamt = parseInt(payownbamt) * 10; model.setValue( path + 'uncoamt', payownbamt); var iptObjt = document.all(inputBoxName); if(iptObjt == null){ messageBox("¹Ì¼ö±ÝÀÔ·Â ÄÁÆ®·Ñ ¸íÀÌ À߸ø Àü´Þ µÇ¾ú½À´Ï´Ù. Á¤º¸Áö¿øÆÀ¿¡ ¹®ÀÇÇϼ¼¿ä!", "E999", ""); return false; } iptObjt.refresh(); iptObjt.dispatch(inputBoxEvent); return true; }else{ model.setValue( path + 'uncoamt', '0'); var iptObjt = document.all(inputBoxName); if(iptObjt == null){ messageBox("¹Ì¼ö±ÝÀÔ·Â ÄÁÆ®·Ñ ¸íÀÌ À߸ø Àü´Þ µÇ¾ú½À´Ï´Ù. Á¤º¸Áö¿øÆÀ¿¡ ¹®ÀÇÇϼ¼¿ä!", "E999", ""); return false; } iptObjt.refresh(); //iptObjt.dispatch(inputBoxEvent); return false; } } /** * @desc : ±Û·Îº° º¯¼ö·Î ¼±¾ðµÈ ȯÀÚ¹øÈ£ °¡Á®¿À±â * @param : inputbox ÄÁÆ®·Ñ ¸í, inputBoxEvent = ȯÀÚ¹øÈ£(inputbox)¿¡¼ ¹ß»ýÇÏ´Â À̺¥Æ® ŸÀÔ * @return : * @--------------------------------------------------- */ function fkeyCode_pid(inputBoxName,inputBoxEvent) { if( inputBoxName == '' || inputBoxName == '-' ){ return; } if( inputBoxEvent == '' || inputBoxEvent == '-' ){ return; } var iptObjt = document.all(inputBoxName); iptObjt.value = getGlobalVariable("g_pid","p"); event.keyCode = '13' iptObjt.refresh(); iptObjt.dispatch(inputBoxEvent); return; } //°øÅëÄڵ忡 ¼¼ÆÃµÈ ÇÁ¸°ÅÍ ¸íΰú Æ®·¹À̹øÈ£ °¡Á®¿À±â function fGetPrintName(pCaller) { //var SPPAO00100_P0045_1_nm = getGlobalVariable("SPPAO00100_P0045_1_nm","p"); //if(SPPAO00100_P0045_1_nm == null || SPPAO00100_P0045_1_nm == "") { modal("SPPAO00100"); //ÇÁ¸°ÅÍ °øÅëÄÚµå ¼¼ÆÃ È£Ãâ //} //ȸé´Ü¿¡¼ ¼öµ¿À¸·Î Ãâ·ÂÇÒ°æ¿ì ¾Æ·¡¿©ºÎ°¡ YÀÌ¸é µðÆúÆ®ÇÁ¸°ÅÍ·Î °Á¦·Î Ãâ·ÂÇÑ´Ù. var force_print = getGlobalVariable("SPPAO00100_°Á¦Ãâ·Â¿©ºÎ","p"); if(getGlobalVariable("SPPAO00100_P0045_1_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_1_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_2_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_2_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_3_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_3_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_4_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_4_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_5_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_5_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_6_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_6_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_7_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_7_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_8_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_8_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } if(getGlobalVariable("SPPAO00100_P0045_9_nm_org","p") == "false" && force_print == "Y") { setGlobalVariable("SPPAO00100_P0045_9_nm",getGlobalVariable("SPPAO00100_P0045_100_nm","p"),"p"); } //°Á¦Ãâ·Â¿©ºÎ ÃʱâÈ setGlobalVariable("SPPAO00100_°Á¦Ãâ·Â¿©ºÎ", "" ,"p"); } //¼±ÅÃÁø·á ÆË¾÷ È£Ãâ function fCallSpecPopUp(pid,ordtype,orddd,orddeptcd,orddrid,fromdd,hngnm,rrgstno1,rrgstno2,cretno,autoprntyn) { modal("SPPAO00100"); var P0032_250 = getGlobalVariable("SPPAO00100_P0032_250_nm","p"); //var P0032_250 = "Y"; //±¸È¸é if(P0032_250 == "N") { model.makeValue("/root/tempchk/specchk/stat" , ""); model.makeValue("/root/tempchk/specchk/pid" , pid); model.makeValue("/root/tempchk/specchk/hngnm" , hngnm); model.makeValue("/root/tempchk/specchk/rrgstno1" , rrgstno1); model.makeValue("/root/tempchk/specchk/rrgstno2" , rrgstno2); model.makeValue("/root/tempchk/specchk/choiflag" , ""); model.makeValue("/root/tempchk/specchk/ordtype" , ordtype); model.makeValue("/root/tempchk/specchk/orddd" , orddd); model.makeValue("/root/tempchk/specchk/orddeptcd", orddeptcd); model.makeValue("/root/tempchk/specchk/orddrid" , orddrid); model.makeValue("/root/tempchk/specchk/specordyn", "Y"); model.makeValue("/root/tempchk/specchk/fromdd" , fromdd); model.makeValue("/root/tempchk/specchk/rsrvdd" , ""); modal("SMPMC06500", "1", "0", "0" ,"SMPMC06500", "/root/tempchk/specchk", "/root/main/patappinfo/patappinfo1"); } //½Åȸé if(P0032_250 == "Y") { model.makeValue("/root/tempchk/specchk/pid" , pid); model.makeValue("/root/tempchk/specchk/ordtype" , ordtype); model.makeValue("/root/tempchk/specchk/orddd" , orddd); model.makeValue("/root/tempchk/specchk/orddeptcd" , orddeptcd); model.makeValue("/root/tempchk/specchk/orddrid" , orddrid); model.makeValue("/root/tempchk/specchk/fromdd" , fromdd); modal("SMPMC06501", "1", "0", "0" ,"SMPMC06501", "/root/tempchk/specchk", "/root/main/patappinfo/patappinfo1"); } //2011.10 °í½Ã¹Ý¿µ - OCR ¼½Ä »ç¿ë if(P0032_250 == "A") { model.makeValue("/root/tempchk/specchk/pid" , pid); model.makeValue("/root/tempchk/specchk/ordtype" , ordtype); model.makeValue("/root/tempchk/specchk/orddd" , orddd); model.makeValue("/root/tempchk/specchk/cretno" , cretno); model.makeValue("/root/tempchk/specchk/orddeptcd" , orddeptcd); model.makeValue("/root/tempchk/specchk/orddrid" , orddrid); model.makeValue("/root/tempchk/specchk/fromdd" , fromdd); model.makeValue("/root/tempchk/specchk/autoprntyn", autoprntyn); modal("SMPMC06502", "1", "0", "0" ,"SMPMC06502", "/root/tempchk/specchk", "/root/main/patappinfo/patappinfo1"); } } /** * @desc : ÀÀ±Þµî·Ï½Ã ÀÔ¿ø°áÁ¤À̳ª ÀÔ¿ø¿¹¾àÀÌ ÀÖÀ¸¸é ¸Þ¼¼Áö·Î ¾Ë·ÁÁØ´Ù * @param : pid - ȯÀÚ¹øÈ£ * inrsrvstat - ¿¹¾à±¸ºÐ T:¿¹¾à S:°áÁ¤ * indirecdd - ÀÔ¿øÁö½ÃÀÏÀÚ * @return : null * @--------------------------------------------------- */ function fGetErAdrv(){ model.setValue("/root/send/data40/pid" , model.getValue("/root/main/ptbs/ptbs_pid")); submit("TRPMI06020"); var pid = model.getValue("/root/source/adrvmessage/pid"); var inrsrvstat = model.getValue("/root/source/adrvmessage/inrsrvstat"); var indirecdd = model.getValue("/root/source/adrvmessage/indirecdd"); var flag = ""; if(inrsrvstat == "S"){ flag = "ÀÔ¿ø°áÁ¤"; }else if(inrsrvstat == "T"){ flag = "ÀÔ¿ø¿¹¾à"; } if(pid == "" || pid == null){ return; }else{ return messageBox(flag + "µÈ ȯÀÚÀÔ´Ï´Ù. È®ÀÎÇϽʽÿä.", "I000"); } } /** * @desc : ¹Ì¼ö´ã´çÀÚ°¡ ¹Ì¼ö¾È³»¿©ºÎ¸¦ Y·Î ÇßÀ» °æ¿ì¿¡ ¾È³»¸Þ¼¼Áö¸¦ º¸¿©ÁØ´Ù */ function fGetPtunyn(){ var ptunyn = model.getValue("/root/main/ptbs/ptbs_ptunyn"); if(ptunyn == "Y"){ messageBox("ÇØ´çȯÀÚ¸¦ ¿ø¹«ÆÀ ¹Ì¼ö´ã´çÀÚ¿¡°Ô ¾È³»","I008"); } } //Âü°í»çÇ× ÆË¾÷ È£Ãâ function fCallSpecPopUp_remfact(pid,remfact){ var remfact_rtn = ""; setGlobalVariable("ptbs_pid",pid,"p"); setGlobalVariable("ptbs_remfact",remfact,"p"); modal("SMPAI02200"); remfact_rtn = getGlobalVariable("ptbs_remfact","p"); setGlobalVariable("ptbs_pid","","p"); setGlobalVariable("ptbs_remfact","","p"); return remfact_rtn; } // µ¿¸íÀÌÀΠüũ½Ç½Ã function fCheckNameConflict(pid, ordtype) { // Çʼöüũ if ((pid == '' || pid == null) || (ordtype == '' || ordtype == null)) { messageBox("Â÷Æ®¹øÈ£ ¶Ç´Â Áø·á±¸ºÐÀÌ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù.\r\n Â÷Æ®¹øÈ£ ¶Ç´Â Áø·á±¸ºÐÀ»", "I007"); return; } else { model.makeValue("/root/send/nameconflict/pid", pid); model.makeValue("/root/send/nameconflict/ordtype", ordtype); model.makeValue("/root/temp/nameconflict/conflictyn", ""); submit("TRPMC07401"); if (model.getValue("/root/temp/nameconflict/conflictyn") == "Y") { if (ordtype == 'E') { messageBox(" ¡Ú¡Ú¡Ú µ¿¸íÀÌÀÎ ÁÖÀÇ ¡Ú¡Ú¡Ú \r\n\r\n" + "ÀÀ±Þ½Ç¿¡ ÇöÀç µ¿¸íÀÌÀÎÀÌ ÀÖ½À´Ï´Ù.\r\n" + "ȯÀÚÀ̸§ µÚ ¹®ÀÚ Ãß°¡ ÈÄ È¯ÀÚÆÈÂî¿Í À̸§Ç¥¸¦ Ãâ·ÂÇϽʽÿÀ.\r\n\r\n" + " [¿¹] È«±æµ¿A, È«±æ³àB", "I000"); } else if (ordtype == 'I') { messageBox(" ¡Ú¡Ú¡Ú µ¿¸íÀÌÀÎ ÁÖÀÇ ¡Ú¡Ú¡Ú \r\n\r\n" + "Àç¿øÈ¯ÀÚ Áß¿¡ ÇöÀç µ¿¸íÀÌÀÎÀÌ ÀÖ½À´Ï´Ù.\r\n" + "ȯÀÚÀ̸§ µÚ ¹®ÀÚ Ãß°¡ ÈÄ ¾àÁ¤¼, °áÁ¤¼, ȯÀÚÆÈÂî¿Í À̸§Ç¥¸¦ Ãâ·ÂÇϽʽÿÀ.\r\n\r\n" + " [¿¹] È«±æµ¿A, È«±æ³àB", "I000"); } else { messageBox("ÇöÀç µî·ÏÇÏ·Á´Â ȯÀÚ¿Í ¼º¸íÀÌ µ¿ÀÏÇÑ È¯ÀÚ°¡ ÀÌ¹Ì Á¸ÀçÇÕ´Ï´Ù.\r\n" + "ó¹æ¿À·ù µîÀÇ ¹æÁö¸¦ À§ÇØ È¯ÀÚÀÇ ¼º¸íÀ» ¼öÁ¤ÇÏ¿© µî·Ï", "I000"); } return false; } else { return true; } } } //»ç»ýȰº¸È£ ¿äûȯÀÚ Á¤º¸ Ãëµæ function fGetPatPrivacyInfo(pid) { if (isNull(pid)) { messageBox("ȯÀÚ¹øÈ£°¡", "I004"); return false; } model.makeValue("/root/send/patprivacy/pid", pid); model.makeValue("/root/send/patprivacy/endyncheck", "Y"); model.makeNode("/root/temp/patprivacy"); submit("TRPMC06904"); if (isNull(model.getValue("/root/temp/patprivacy/no"))) { cap_privacy.visible = false; } else { cap_privacy.visible = true; var strMsg = "»ç»ýȰº¸È£È¯ÀÚÀÔ´Ï´Ù.\r\n"; strMsg = strMsg + "\r\n¿äûÀÚ\t : " + model.getValue("/root/temp/patprivacy/request") + " " + model.getValue("/root/temp/patprivacy/requestetc"); strMsg = strMsg + "\r\n¿äû´ë»ó\t : " + model.getValue("/root/temp/patprivacy/target") + " " + model.getValue("/root/temp/patprivacy/targetetc"); strMsg = strMsg + "\r\n¿äû³»¿ë\t : " + model.getValue("/root/temp/patprivacy/type") + " " + model.getValue("/root/temp/patprivacy/typeetc"); strMsg = strMsg + "\r\n¿äûºñ°í\t : " + model.getValue("/root/temp/patprivacy/rmk"); strMsg = strMsg + "\r\n\r\nÀ§ ³»¿ëÀÇ Ãë±Þ¿¡ ÁÖÀÇ"; messageBox(strMsg, "I008"); } } //»ç»ýȰº¸È£ ¿äûȯÀÚ Á¤º¸ Ãëµæ ÀÔ¿ø¼ö³³¿ë function fGetPatPrivacyInfo_i(pid,pre_loading_yn) { if(pre_loading_yn == "Y" ){ //ÀÔ¿ø¼ö³³Àº ÀÚ¼±Á¤º¸ ¹Ì¸® Á¶È¸ÇØ¿À¹Ç·Î submit Åë°ú } if(getNodesetCount("/root/temp/h_patprivacy/patprivacy/no") == 0){ cap_privacy.visible = false; } else { cap_privacy.visible = true; var strMsg = "»ç»ýȰº¸È£È¯ÀÚÀÔ´Ï´Ù.\r\n"; strMsg = strMsg + "\r\n¿äûÀÚ\t : " + model.getValue("/root/temp/h_patprivacy/patprivacy/request") + " " + model.getValue("/root/temp/h_patprivacy/patprivacy/requestetc"); strMsg = strMsg + "\r\n¿äû´ë»ó\t : " + model.getValue("/root/temp/h_patprivacy/patprivacy/target") + " " + model.getValue("/root/temp/h_patprivacy/patprivacy/targetetc"); strMsg = strMsg + "\r\n¿äû³»¿ë\t : " + model.getValue("/root/temp/h_patprivacy/patprivacy/type") + " " + model.getValue("/root/temp/h_patprivacy/patprivacy/typeetc"); strMsg = strMsg + "\r\n¿äûºñ°í\t : " + model.getValue("/root/temp/h_patprivacy/patprivacy/rmk"); strMsg = strMsg + "\r\n\r\nÀ§ ³»¿ëÀÇ Ãë±Þ¿¡ ÁÖÀÇ"; messageBox(strMsg, "I008"); } } // °Ý¸® ½ÅûȯÀÚ Á¤º¸ Ãëµæ function fGetPatIsolateInfo(isolateinfo) { // °Ý¸®½ÂÀÎÁ¤º¸ üũ if (isNull(isolateinfo)) { cap_isolate.visible = false; cap_isolate.hint = ""; return; } else { cap_isolate.visible = true; cap_isolate.hint = isolateinfo; return; } } // »ç»ýȰº¸È£ Á¤º¸°ü¸®Ã¢ È£Ãâ function fCallPatPrivacy(pid) { // »ç»ýȰº¸È£°ü¸®È¸é È£Ãâ setParameter("SPPMC06900_PARM", pid) modal("SPPMC06900", "", "", "", "", "", ""); // »ç»ýȰº¸È£°ü¸®È¸éÀÇ °á°ú¿¡ µû¶ó »ç»ýȰº¸È£ Ç¥½Ã if (model.getValue("/root/hidden/patprivacyendyn") == "Y" || model.getValue("/root/hidden/patprivacyendyn") == "") { cap_privacy.visible = false; } else { cap_privacy.visible = true; } } // ¼±ÅÃÁø·á½Åû¾È³»Ã¢ ¿±â function fOpenSPIFInfo() { open("SMPMC06504","2", "200","", "", "", "", "width:840px; height:950px; caption:visible; resize:false;"); } // ¼±ÅÃÁø·á½Åû¾È³»Ã¢ ´Ý±â function fCloseSPIFInfo() { for(var i=0; i