/** - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì ÀÇ·áÁ¤º¸ - Èñ±Í³­Ä¡/³ëÀÎÆ²´Ï ȯÀÚµî·Ï ( SMMRD02000_Èñ±Í³­Ä¡/³ëÀÎÆ²´Ï ȯÀÚµî·Ï.xrw - JScript ) - Version : 1) : Ver.1.00.00 - Author : ÀÌÀº¿µ - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì **/ /** * @ver : 2010-07-07 * @desc : È­¸éÃʱâÈ­ * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ var ISPRNT = "Y"; function fInitialize(){ grd_rareobstinfo.fixedcellcheckbox(0,1) = true; // »çÀÎÆÐµå Ãß°¡ var gPid, gAprvamt, gAprvflag, gAprvdd, gAprvtm, gAprvno, gInstcd; var dd = getCurrentDate(); model.setValue("/root/init/srchinfo/rgstfromdd", dd); model.setValue("/root/init/srchinfo/rgsttodd", dd); model.setValue("/root/init/srchinfo/genrflagcd", "-"); model.setValue("/root/init/srchinfo/rgstkindcd", "-"); model.setValue("/root/init/srchinfo/prntyn", "-"); model.setValue("/root/init/srchinfo/signyn", "-"); model.setValue("/root/init/srchinfo/insukind", "0"); zbcfGetCodeList(new Array("P0008", "M0263"), new Array("/root/init/P0008", "/root/init/M0263")); copyNodesetType("/root/init/insukind", "/root/init/P0008/P0008[cdid >= 11 and cdid <= 22]", "replace"); // 2010.11.30. ÀÌÀº¿µ ¼öÁ¤ [°í½Ã] Èñ±Í³­Ä¡ ÀÇ·á±Þ¿© Àû¿ë var instcd = getUserInfo("dutplceinstcd"); var standard_yn = "orduseyn"; var ord_deptflag = 'D'; var rslt_ref = "/root/init/orddept"; var sort_method = "depthngnm"; button4.visible = false; //µ¿ÀÇÀμ­¸í¹öư bt_Sign_Req.visible = false; //µ¿ÀÇÀÎÀç¼­¸í¹öư bt_Sign_Cancle.visible = false; // µ¿ÀÇÀÎÃë¼Ò¹öư bt_Sign_Save.visible = false; //µ¿ÀÇÀÎÈ®Àιöư kocces_grup.attribute("visibility") = "hidden"; kicc_grup.attribute("visibility") = "hidden"; SignPad_img.attribute("visibility") = "hidden"; grd_rareobstinfo.frozenCols = grd_rareobstinfo.colRef("hngnm"); submit("TRMRD00214"); // KNUH_2010106_¹Ú¼ºÈ£_start »çÀÎÆÐµå Ãß°¡ model.makeValue("/root/main/signpad/trgtcd", "kovan-K700PSR"); kocces_grup.attribute("visibility") = "hidden"; kicc_grup.attribute("visibility") = "hidden"; SignPad_img.attribute("visibility") = "hidden"; if(model.getValue("/root/main/signpad/trgtcd") == "kovan-K700PSR" ) { kocces_grup.attribute("visibility") = "hidden"; kicc_grup.attribute("visibility") = "hidden"; SignPad_img.attribute("visibility") = "hidden"; // KNUH_20101206_¹Ú¼ºÈ£_start »çÀÎÆÐµå Ãß°¡ fsignpad_init(); } mmbfGetDeptCodeComboList("/root/send/reqdata2", "/root/init/orddept", "A"); addComboInstance("/root/init/orddept", "deptcd^depthngnm", "-^Àüü", "dept"); //ºÎ¼­ÄÞº¸ ÀüüÃß°¡ model.setValue("/root/init/srchinfo/orddeptcd", "-"); //Áø·áºÎ¼­ btn_reprint.visible = false; model.toggle("case1"); submit("TRMRD02012"); button1.visible = true; btn_sign.visible = true; btn_prnt.visible = true; btn_save.visible = true; btn_savexls.visible = true; button8.visible = true; button6.visible = true; button2.visible = true; checkbox5.visible = true; btn_reprint.visible = true; model.refresh(); // knuh_20110116 »ó´ÜÁ¤º¸ °¡Á®¿À±â //»ó´Ü ȯÀÚ Á¤º¸ °¡Á®¿À±â model.removeNodeset("/root/main/paminfo"); model.makeNode("/root/main/paminfo"); var node = getGlobalVariable("paminfo"); setCSVToNode("/root/main/paminfo", node); //»ó´Ü Á¤º¸ ÀÖ´ÂÁö À¯¹« üũ if(node != "") { model.setValue("/root/init/srchinfo/pid", model.getValue("/root/main/paminfo/list/pid")); button5.dispatch("DOMActivate"); } } /** * @ver : 2010-07-07 * @desc : sign * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGridUpdtSignY() { if(model.getValue("/root/main/rareobstinfo/rareobstinfo/pid") == ""){ model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+grd_rareobstinfo.row+"]"); }else{ model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/rareobstinfo/rareobstinfo"); } model.setValue("/root/send/rareobstupdt/rareobstinfo/status", "S"); model.setValue("/root/send/rareobstupdt/rareobstinfo/signyn", "Y"); if ( submit("TXMRD02001", false) == true ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "S"); model.setValue("/root/main/rareobstinfo/rareobstinfo/signyn", "Y"); messageBox("󸮰¡ ", "I002"); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/signyn",model.getValue("/root/main/rareobstinfo/rareobstinfo/signyn")); model.refresh(); } else { messageBox("Sign¿©ºÎ ¾÷µ¥ÀÌÆ®°¡ ", "E009"); } } /** * @ver : 2010-07-07 * @desc : sign Ãë¼Ò * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGridUpdtSignN() { model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/pid")); model.makeValue("/root/send/reqdata/ioflag", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/ioflag")); model.makeValue("/root/send/reqdata/prntdt", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/prntdt")); submit("TRMRD02007"); var cnt = getNodeSetCnt("/root/temp/rareobstcalc"); if (cnt > 0) { if (messageBox("ÀÌ¹Ì ¼ö³³ÇÑ È¯ÀÚÀÔ´Ï´Ù. SignÃë¼Ò¸¦", "Q002") == 6 ) { model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]"); model.setValue("/root/send/rareobstupdt/rareobstinfo/status", "S"); model.setValue("/root/send/rareobstupdt/rareobstinfo/signyn", "N"); if ( submit("TXMRD02001", false) == true ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "S"); model.setValue("/root/main/rareobstinfo/rareobstinfo/signyn", "N"); messageBox("SignÃë¼Ò¸¦ ", "I001"); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/signyn",model.getValue("/root/main/rareobstinfo/rareobstinfo/signyn")); model.refresh(); } else { messageBox("Sign ¾÷µ¥ÀÌÆ®°¡ ", "E009"); } } else { return; } } else { if (messageBox("SignÃë¼Ò¸¦", "Q002") == 6 ) { model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]"); model.setValue("/root/send/rareobstupdt/rareobstinfo/status", "S"); model.setValue("/root/send/rareobstupdt/rareobstinfo/signyn", "N"); if ( submit("TXMRD02001", false) == true ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "S"); model.setValue("/root/main/rareobstinfo/rareobstinfo/signyn", "N"); messageBox("SignÃë¼Ò¸¦ ", "I001"); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/signyn",model.getValue("/root/main/rareobstinfo/rareobstinfo/signyn")); model.refresh(); } else { messageBox("Sign ¾÷µ¥ÀÌÆ®°¡ ", "E009"); } } else { return; } } } /** * @ver : 2010-07-07 * @desc : Ãâ·ÂÃë¼Ò * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGridUpdtPrntN() { //submit("TRMRD02012"); //if (model.getValue("/root/main/hardno/trgtcd") != "" ) { model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+grd_rareobstinfo.row+"]"); model.setValue("/root/send/rareobstupdt/rareobstinfo/status", "P"); model.setValue("/root/send/rareobstupdt/rareobstinfo/prntyn", "N"); if ( submit("TXMRD02001", false) == true ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "P"); model.setValue("/root/main/rareobstinfo/rareobstinfo/prntyn", "N"); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/prntyn",model.getValue("/root/main/rareobstinfo/rareobstinfo/prntyn")); model.refresh(); } else { messageBox("Ãâ·Â¿©ºÎ ¾÷µ¥ÀÌÆ®°¡ ", "E009"); } //} } /** * @ver : 2010-07-07 * @desc : Ÿº´¿øÀüȯ * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGridUpdtChangeY() { //submit("TRMRD02012"); //if (model.getValue("/root/main/hardno/trgtcd") != "" ) { //model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+grd_rareobstinfo.row+"]"); if(model.getValue("/root/main/rareobstinfo/rareobstinfo/pid") == ""){ model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+grd_rareobstinfo.row+"]"); }else{ model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/rareobstinfo/rareobstinfo"); } model.setValue("/root/send/rareobstupdt/rareobstinfo/status", "T"); model.setValue("/root/send/rareobstupdt/rareobstinfo/histcd", "T"); if ( submit("TXMRD02001", false) == true ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "T"); model.setValue("/root/main/rareobstinfo/rareobstinfo/histcd", "T"); messageBox("󸮰¡ ", "I002"); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/histcd",model.getValue("/root/main/rareobstinfo/rareobstinfo/histcd")); model.refresh(); } else { messageBox("Ÿº´¿øÀüȯ ¾÷µ¥ÀÌÆ®°¡ ", "E009"); } //} } /** * @ver : 2010-07-07 * @desc : Ÿº´¿øÀüȯ Ãë¼Ò * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGridUpdtChangeN() { //submit("TRMRD02012"); //if (model.getValue("/root/main/hardno/trgtcd") != "" ) { if(model.getValue("/root/main/rareobstinfo/rareobstinfo/pid") == ""){ model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+grd_rareobstinfo.row+"]"); }else{ model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/rareobstinfo/rareobstinfo"); } model.setValue("/root/send/rareobstupdt/rareobstinfo/status", "T"); model.setValue("/root/send/rareobstupdt/rareobstinfo/histcd", "O"); if ( submit("TXMRD02001", false) == true ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "T"); model.setValue("/root/main/rareobstinfo/rareobstinfo/histcd", "Y"); messageBox("󸮰¡ ", "I002"); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/histcd",model.getValue("/root/main/rareobstinfo/rareobstinfo/histcd")); model.refresh(); } else { messageBox("Ÿº´¿øÀüȯ Ãë¼Ò ¾÷µ¥ÀÌÆ®°¡ ", "E009"); } //} } /** * @ver : 2010-07-07 * @desc : fPrnInitialize * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fPrnInitialize() { model.setValue("/root/main/prninfo/sdoa", "0"); //±¸ºÐ - ¾Ï model.setValue("/root/main/prninfo/rooa", "1"); //±¸ºÐ - Èñ±Í³­Ä¡ model.setValue("/root/main/prninfo/pid", model.getValue("/root/main/rareobstinfo/rareobstinfo/pid") ); model.setValue("/root/main/prninfo/hngnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/hngnm") ); if(model.getValue("/root/main/rareobstinfo/rareobstinfo/report") == "1"){ model.setValue("/root/main/prninfo/msg", "1"); //¹®ÀÚ¼­ºñ½º model.setValue("/root/main/prninfo/mail", "0"); //E-mail }else{ model.setValue("/root/main/prninfo/msg", "0"); //¹®ÀÚ¼­ºñ½º model.setValue("/root/main/prninfo/mail", "1"); //E-mail } model.setValue("/root/main/prninfo/email", model.getValue("/root/main/rareobstinfo/rareobstinfo/email")); //E-mailÁÖ¼Ò if (model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstno") == "-" ) { model.setValue("/root/main/prninfo/rareobstno", ""); } else { model.setValue("/root/main/prninfo/rareobstno", model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstno") ); } model.setValue("/root/main/prninfo/genryy", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd").substr(0,4)); model.setValue("/root/main/prninfo/genrmm", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd").substr(4,2)); model.setValue("/root/main/prninfo/genrday", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd").substr(6,2)); model.setValue("/root/main/prninfo/insuno", model.getValue("/root/main/rareobstinfo/rareobstinfo/insuno") ); model.setValue("/root/main/prninfo/insdnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/insdnm") ); //model.setValue("/root/main/prninfo/acptplceaddr", //"("+model.getValue("/root/main/rareobstinfo/rareobstinfo/zipcdhead")+'-'+model.getValue("/root/main/rareobstinfo/rareobstinfo/zipcdfoot")+") " + //model.getValue("/root/main/rareobstinfo/rareobstinfo/zipcdaddr") + model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplceaddr")); model.setValue("/root/main/prninfo/acptplceaddr","("+model.getValue("/root/main/rareobstinfo/rareobstinfo/zipcdhead")+'-'+model.getValue("/root/main/rareobstinfo/rareobstinfo/zipcdfoot")+") " + model.getValue("/root/main/rareobstinfo/rareobstinfo/addr")); model.setValue("/root/main/prninfo/acptplcetel", model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplcetel") ); model.setValue("/root/main/prninfo/mpphontel", model.getValue("/root/main/rareobstinfo/rareobstinfo/mpphontel") ); model.setValue("/root/main/prninfo/orddeptnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddeptnm") ); model.setValue("/root/main/prninfo/orddrnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddrnm") ); model.setValue("/root/main/prninfo/orddrnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddrnm") ); model.setValue("/root/main/prninfo/orddrnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddrnm") ); model.setValue("/root/main/prninfo/jawkind", model.getValue("/root/main/rareobstinfo/rareobstinfo/jawkind") ); model.setValue("/root/main/prninfo/rgstkindcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") ); model.setValue("/root/main/prninfo/tempjawyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/tempjawyn") ); model.setValue("/root/main/prninfo/instcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/instcd") ); model.setValue("/root/main/prninfo/insukind", model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") ); model.setValue("/root/main/prninfo/tootfact", model.getValue("/root/main/rareobstinfo/rareobstinfo/tootfact") ); model.setValue("/root/main/prninfo/regkind", model.getValue("/root/main/rareobstinfo/rareobstinfo/regkind") ); model.setValue("/root/main/prninfo/reregkind", model.getValue("/root/main/rareobstinfo/rareobstinfo/reregkind") ); model.setValue("/root/main/prninfo/reregstart", model.getValue("/root/main/rareobstinfo/rareobstinfo/reregstart") ); model.setValue("/root/main/prninfo/reregresn", model.getValue("/root/main/rareobstinfo/rareobstinfo/reregresn") ); model.setValue("/root/main/prninfo/regstatus", model.getValue("/root/main/rareobstinfo/rareobstinfo/regstatus") ); model.setValue("/root/main/prninfo/cancelresn", model.getValue("/root/main/rareobstinfo/rareobstinfo/cancelresn") ); model.setValue("/root/main/prninfo/canceltodd", model.getValue("/root/main/rareobstinfo/rareobstinfo/canceltodd").toDate().getDateFormat("YYYY/MM/DD") ); model.setValue("/root/main/prninfo/cancelgubun", model.getValue("/root/main/rareobstinfo/rareobstinfo/cancelgubun") ); model.setValue("/root/main/prninfo/cancelitem", model.getValue("/root/main/rareobstinfo/rareobstinfo/cancelitem") ); model.setValue("/root/main/prninfo/cancelbefore", model.getValue("/root/main/rareobstinfo/rareobstinfo/cancelbefore") ); model.setValue("/root/main/prninfo/cancelafter", model.getValue("/root/main/rareobstinfo/rareobstinfo/cancelafter") ); model.setValue("/root/main/prninfo/cancelregdd", model.getValue("/root/main/rareobstinfo/rareobstinfo/cancelregdd")); var indd = model.getValue("/root/main/rareobstinfo/rareobstinfo/indd"); if (indd != "") { model.makeValue("/root/main/prninfo/indd", indd.toDate().getDateFormat("YYYY/MM/DD")); } if(model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd") != "00000000"){ model.setValue("/root/main/prninfo/rareobstfromdd", model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd").toDate().getDateFormat("YYYY/MM/DD") ); } else { model.setValue("/root/main/prninfo/rareobstfromdd", ""); } //if ( model.getValue("/root/main/listinfo/rareobstlist/rareobstlist/ioflag") == "I") { if ( model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag") == "I") { model.setValue("/root/main/prninfo/genrflagcd", "ÀÔ¿ø"); } else { model.setValue("/root/main/prninfo/genrflagcd","¿Ü·¡"); } model.setValue("/root/main/prninfo/rareobstcnfmdd", model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstcnfmdd").toDate().getDateFormat("YYYY/MM/DD") ); //ÀÔ/Åð¿øÀÏ Ãâ·Â if (model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") >= "21" && model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") <= "25" ) { model.setValue("/root/main/prninfo/infromdd", model.getValue("/root/main/rareobstinfo/rareobstinfo/infromdd").toDate().getDateFormat("YYYY/MM/DD") ); if ((model.getValue("/root/main/rareobstinfo/rareobstinfo/intodd") == "99991231") || (model.getValue("/root/main/rareobstinfo/rareobstinfo/intodd") == "00000000")) { //ÀÇ·á±Þ¿©À̸鼭 Àç¿øÁßÀÎ °æ¿ì - ÀÔ¿øÁ¾·áÀÏÀÚ model.setValue("/root/main/prninfo/intodd", "" ); } else { model.setValue("/root/main/prninfo/intodd", model.getValue("/root/main/rareobstinfo/rareobstinfo/intodd").toDate().getDateFormat("YYYY/MM/DD") ); } if (model.getValue("/root/main/rareobstinfo/rareobstinfo/infromdd") == "00000000") { //ÀÇ·á±Þ¿©À̸鼭 Àç¿øÁßÀÎ °æ¿ì - ÀÔ¿ø½ÃÀÛÀÏÀÚ model.setValue("/root/main/prninfo/infromdd", "" ); } } //ÀÇ·áÁ¤º¸»óº´ÄÚµå ÀÚ¸£±â - »óº´±âÈ£(knuh_20110110 ¼öÁ¤) //tmpstr = model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagcd").split("."); tmpstr = model.getValue("/root/main/rareobstinfo/rareobstinfo/maindiagcd").split("."); //ÀÇ·áÁ¤º¸»óº´ÄÚµå ÀÚ¸£±â KNUH_201111_¹Ú¼ºÈ£ ¼öÁ¤_KCD6·Î ÀÎÇÏ¿© ICD10ÀÌ 6ÀÚ¸®±îÁö ¹ß»ýÇÏ¿© ¼Ò¼ýÁ¡ ÀÚ¸® °è»ê ¾î·Á¿ò if (model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagcd") != "") { tmpstr = model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagcd").split("."); } else { tmpstr = model.getValue("/root/main/rareobstinfo/rareobstinfo/maindiagcd").split("."); } model.setValue("/root/main/prninfo/maindiagcd", tmpstr[0].getTrim()); /* // KNUH_201111_¹Ú¼ºÈ£ ¼öÁ¤_KCD6·Î ÀÎÇÏ¿© ICD10ÀÌ 6ÀÚ¸®±îÁö ¹ß»ýÇÏ¿© ¼Ò¼ýÁ¡ ÀÚ¸® °è»ê ¾î·Á¿ò if(tmpstr[0].length > 3){ var c = tmpstr[0].substr(0,tmpstr[0].length-1); var d = tmpstr[0].substr(c.length,1); var kk = c + "." + d; //model.setValue("/root/main/prninfo/maindiagcd", kk+" ("+model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagnm")+")" ); model.setValue("/root/main/prninfo/maindiagcd", kk); } else { //model.setValue("/root/main/prninfo/maindiagcd", tmpstr[0].getTrim()+" ("+model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagnm")+")" ); model.setValue("/root/main/prninfo/maindiagcd", tmpstr[0].getTrim()); } */ model.setValue("/root/main/prninfo/maindiagnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagnm")); //Áø´Ü¸í model.setValue("/root/main/prninfo/serdiag", "0"); //ÃÖÁ¾Áø´Ü¹æ¹ý ±¸ºÐ - ¾Ï model.setValue("/root/main/prninfo/rareobst", "1"); //ÃÖÁ¾Áø´Ü¹æ¹ý ±¸ºÐ - Èñ±Í³­Ä¡ //ÃÖÁ¾Áø´Ü¹æ¹ý üũ model.setValue("/root/main/prninfo/cnfmmthditem1", "0"); for (var i = 1; i <= getNodesetCount("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist"); i++) { switch (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/cdid") ){ case "01" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem1", "0"); model.setValue("/root/main/prninfo/cnfmmthditem2", "0"); }else{ model.setValue("/root/main/prninfo/cnfmmthditem2", "0"); } case "02" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem1", "0"); model.setValue("/root/main/prninfo/cnfmmthditem3", "0"); }else{ model.setValue("/root/main/prninfo/cnfmmthditem3", "0"); } case "03" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem1", "0"); model.setValue("/root/main/prninfo/cnfmmthditem4", "0"); }else{ model.setValue("/root/main/prninfo/cnfmmthditem4", "0"); } case "04" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem1", "0"); model.setValue("/root/main/prninfo/cnfmmthditem5", "0"); //model.setValue("/root/main/prninfo/cnfmmthdetc5", model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/diagetccnts")); }else{ model.setValue("/root/main/prninfo/cnfmmthditem5", "0"); } case "05" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem6", "0"); } else { model.setValue("/root/main/prninfo/cnfmmthditem6", "0"); } case "06" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem7", "0"); } else { model.setValue("/root/main/prninfo/cnfmmthditem7", "0"); } case "07" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem8", "0"); } else { model.setValue("/root/main/prninfo/cnfmmthditem8", "0"); } case "08" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem9", "0"); } else { model.setValue("/root/main/prninfo/cnfmmthditem9", "0"); } case "09" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem10", "0"); } else { model.setValue("/root/main/prninfo/cnfmmthditem10", "0"); } case "10" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/cnfmmthditem11", "0"); //model.setValue("/root/main/prninfo/cnfmmthdetc12", model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/diagetccnts")); } else { model.setValue("/root/main/prninfo/cnfmmthditem11", "0"); } } } model.setValue("/root/main/prninfo/rareitem1", "0"); for (var i = 1; i <= getNodesetCount("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist"); i++) { switch (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/cdid") ){ case "01" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem1", "1"); model.setValue("/root/main/prninfo/rareitem2", "1"); }else{ model.setValue("/root/main/prninfo/rareitem2", "0"); } case "02" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem1", "1"); model.setValue("/root/main/prninfo/rareitem3", "1"); }else{ model.setValue("/root/main/prninfo/rareitem3", "0"); } case "03" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem1", "1"); model.setValue("/root/main/prninfo/rareitem4", "1"); }else{ model.setValue("/root/main/prninfo/rareitem4", "0"); } case "04" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem1", "1"); model.setValue("/root/main/prninfo/rareitem5", "1"); model.setValue("/root/main/prninfo/raredetc5", model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/diagetccnts")); }else{ model.setValue("/root/main/prninfo/rareitem5", "0"); } case "05" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem6", "1"); } else { model.setValue("/root/main/prninfo/rareitem6", "0"); } case "06" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem7", "1"); } else { model.setValue("/root/main/prninfo/rareitem7", "0"); } case "07" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem8", "1"); } else { model.setValue("/root/main/prninfo/rareitem8", "0"); } case "08" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem9", "1"); model.setValue("/root/main/prninfo/raredetc10", model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/diagetccnts")); } else { model.setValue("/root/main/prninfo/rareitem9", "0"); model.setValue("/root/main/prninfo/raredetc10", ""); } case "09" : if (model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/chkflag") == "true") { model.setValue("/root/main/prninfo/rareitem10", "1"); model.setValue("/root/main/prninfo/raredetc11", model.getValue("/root/main/diagdetlinfo/rareobstdetllist/rareobstdetllist[" + i + "]/diagetccnts")); } else { model.setValue("/root/main/prninfo/rareitem10", "0"); model.setValue("/root/main/prninfo/raredetc11", ""); } } } submit("TRMRD02011"); var hospnm = model.getValue("/root/main/hospinfo/hospnm"); // º´¿ø¸í var reprtel1 = model.getValue("/root/main/hospinfo/reprtel1"); // ´ëÇ¥ÀüÈ­1 var proccorpcd = model.getValue("/root/main/hospinfo/proccorpcd"); // ¿ä¾ç±â°ü±âÈ£ model.setValue("/root/main/prninfo/hosinfo", hospnm +" (" + proccorpcd + ")" ); model.setValue("/root/main/prninfo/hospnm", hospnm); model.setValue("/root/main/prninfo/proccorpcd", proccorpcd ); model.setValue("/root/main/prninfo/reprtel1", reprtel1 ); model.setValue("/root/main/prninfo/licnsno", model.getValue("/root/main/rareobstinfo/rareobstinfo/licnsno") ); model.setValue("/root/main/prninfo/appmannm", model.getValue("/root/main/rareobstinfo/rareobstinfo/appmannm") ); model.setValue("/root/main/prninfo/rrgstno", model.getValue("/root/main/rareobstinfo/rareobstinfo/rrgstno") ); model.setValue("/root/main/prninfo/relation", model.getValue("/root/init/M0263/M0263[cdid="+model.getValue("/root/main/rareobstinfo/rareobstinfo/relaflag")+"]/cdnm") ); model.setValue("/root/main/prninfo/genrdd", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd").toDate().getDateFormat("YYYY/MM/DD") ); model.setValue("/root/main/prninfo/elctsignkey", model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsignkey") ); //µ¿ÀÇÀμ­¸í model.setValue("/root/main/prninfo/elctsigncnts", model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts") ); model.setValue("/root/main/prninfo/agrsignkey", model.getValue("/root/main/rareobstinfo/rareobstinfo/agrsignkey") ); //½ÅûÀμ­¸í model.setValue("/root/main/prninfo/agrsigncnts", model.getValue("/root/main/rareobstinfo/rareobstinfo/agrsigncnts") ); //ÀÌÀ±ÁÖ Ãß°¡(20160411) model.makeValue("/root/main/prninfo/orgaddr", model.getValue("/root/main/rareobstinfo/rareobstinfo/orgaddr")); model.makeValue("/root/main/prninfo/orgzip", model.getValue("/root/main/rareobstinfo/rareobstinfo/orgzip")); model.setValue("/root/send/docinfo/userid", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddrid") ); submit("TRMRF01205"); model.setValue("/root/main/prninfo/signimge", model.getValue("/root/hidden/docinfo/signimge") ); setImageRefInstance("/root/main/prninfo/signimge") if(model.getValue("/root/main/signpad/trgtcd") == "ep-661" ) { //µ¿ÀÇÀμ­¸í var sSignName = model.getValue("/root/main/rareobstinfo/rareobstinfo/pid"); KiccDSCX1.Seed = model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsignkey"); KiccDSCX1.SignStr = model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts"); model.setValue("/root/main/sign/signseed" , KiccDSCX1.Seed); model.setValue("/root/main/sign/signstr" , KiccDSCX1.SignStr); model.refresh(); var sSignFolder = "C:\\Program Files\\himed\\components\\KICC\\EasyPad\\HElct" +sSignName + ".bmp"; KiccDSCX1.BmpSaveToFile ("C:\\Program Files\\himed\\components\\KICC\\EasyPad\\HElct" +sSignName + ".bmp"); // pid_ ³¯Â¥ model.setValue("/root/main/prninfo/pidsignimage", sSignFolder); // model.setValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts", KiccDSCX1.SignStr); // model.setValue("/root/main/rareobstinfo/rareobstinfo/elctsignkey", KiccDSCX1.Seed); // model.refresh(); //½ÅûÀμ­¸í var sSignName2 = model.getValue("/root/main/rareobstinfo/rareobstinfo/pid"); KiccDSCX1.Seed = model.getValue("/root/main/rareobstinfo/rareobstinfo/agrsignkey"); KiccDSCX1.SignStr = model.getValue("/root/main/rareobstinfo/rareobstinfo/agrsigncnts"); model.setValue("/root/main/sign/signseed" , KiccDSCX1.Seed); model.setValue("/root/main/sign/signstr" , KiccDSCX1.SignStr); model.refresh(); var sSignFolder2 = "C:\\Program Files\\himed\\components\\KICC\\EasyPad\\HAgr" +sSignName2 + ".bmp"; KiccDSCX1.BmpSaveToFile ("C:\\Program Files\\himed\\components\\KICC\\EasyPad\\HAgr" +sSignName2 + ".bmp"); // pid_ ³¯Â¥ model.setValue("/root/main/prninfo/agrsignimage", sSignFolder2); } if(model.getValue("/root/main/signpad/trgtcd") == "sign-1000" ) { var key = model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts"); var key2 = model.getValue("/root/main/rareobstinfo/rareobstinfo/agrsigncnts"); var pid = model.getValue("/root/main/rareobstinfo/rareobstinfo/pid"); //µ¿ÀÇÀμ­¸í url = 'C:\\Program Files\\himed\\components\\KICC\\EasyPad\\Elct' + pid +'.bmp'; //sign = SignPad.GetOnlyData(url); SignPad.GetBMPReal(key,url); model.setValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts", key); SignPad_img.attribute("src") = url; SignPad_img.refresh(); kocces_grup.attribute("visibility") = "hidden"; SignPad_img.attribute("visibility") = "visible"; model.makeValue("/root/main/prninfo/pidsignimage", url); //½ÅûÀμ­¸í url2 = 'C:\\Program Files\\himed\\components\\KICC\\EasyPad\\Agr' + pid +'.bmp'; //sign2 = SignPad2.GetOnlyData(url2); SignPad.GetBMPReal(key2,url2); model.setValue("/root/main/rareobstinfo/rareobstinfo/agrsigncnts", key2); SignPad_img.attribute("src") = url2; SignPad_img.refresh(); kocces_grup.attribute("visibility") = "hidden"; SignPad_img.attribute("visibility") = "visible"; model.makeValue("/root/main/prninfo/agrsignimage", url2); } // KNUH_2010106_¹Ú¼ºÈ£_start »çÀÎÆÐµå Ãß°¡ if(model.getValue("/root/main/signpad/trgtcd") == "kovan-K700PSR" ) { var key = model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts"); var key2 = model.getValue("/root/main/rareobstinfo/rareobstinfo/agrsigncnts"); model.makeValue("/root/main/prninfo/pidsignimage", key); model.makeValue("/root/main/prninfo/agrsignimage", key2); //setImageRefInstance("/root/main/prninfo/pidsignimage"); //setImageRefInstance("/root/main/prninfo/agrsignimage"); } // KNUH_2010106_¹Ú¼ºÈ£_end // 2010.07.08. ÀÌÀº¿µ... ÁßÁõÈ­»ó Á¤º¸ Á¶È¸Çϱâ... if (model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") == "") { model.makeValue("/root/send/serdiagburn/instcd", getUserInfo("dutplceinstcd")); model.makeValue("/root/send/serdiagburn/genrdd", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd")); model.makeValue("/root/send/serdiagburn/genrno", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrno")); model.makeValue("/root/send/serdiagburn/histno", model.getValue("/root/main/rareobstinfo/rareobstinfo/histno")); model.makeValue("/root/send/serdiagburn/pid" , model.getValue("/root/main/rareobstinfo/rareobstinfo/pid")); submit("TRMRD02013"); } model.makeValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd" , model.getValue("/root/main/serdiagburninfo/rgstkindcd")); model.makeValue("/root/main/rareobstinfo/rareobstinfo/burnicd10desc", model.getValue("/root/main/serdiagburninfo/burnicd10desc")); model.makeValue("/root/main/rareobstinfo/rareobstinfo/spclcd" , model.getValue("/root/main/serdiagburninfo/spclcd")); model.makeValue("/root/main/prninfo/rgstkindcd" , model.getValue("/root/main/serdiagburninfo/rgstkindcd")); model.makeValue("/root/main/prninfo/burnicd10desc", model.getValue("/root/main/serdiagburninfo/burnicd10desc")); model.makeValue("/root/main/prninfo/spclcd" , model.getValue("/root/main/serdiagburninfo/spclcd")); // 2010.07.08. ÀÌÀº¿µ... ÁßÁõÈ­»ó Á¤º¸ Á¶È¸Çϱâ... // 2010.11.26. ÀÌÀº¿µ ¼öÁ¤ : ÀçÃâ·Â½Ã µ¿ÀÇÀÏÀÚ¸¦ Ãâ·ÂÀÏÀڷΠó¸®ÇÔ. (¼­¿ï¼º¸ð ¿ø¹«ÆÀ °­½Å¹® »ù ¿äû) model.makeValue("/root/main/prninfo/prntdt", model.getValue("/root/main/rareobstinfo/rareobstinfo/prntdt")); // knuh_20110117 ƯÁ¤±âÈ£ model.makeValue("/root/main/prninfo/spclcd1", model.getValue("/root/main/rareobstinfo/rareobstinfo/spclcd1")); } /** * @ver : 2010-07-07 * @desc : fSrchTerm * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fSrchTerm(flag, code, ref, resref, nmref){ if(flag == "toph"){ model.removeNodeset("/root/temp/terminfo/tplinfo"); setParameter("SPMRT01500_param_nodepath", "/root/temp/terminfo/tplinfo"); setParameter("SPMRT01500_SEARCHDATA", code); setParameter("SPMRT01500_FLAG", "3"); modal("SPMRT01500"); if(getParameter("SPMRT01500_FLAG") == ""){ return; } model.setValue(ref, model.getValue("/root/temp/terminfo/tplinfo/tophlgcd")); model.setValue(nmref, model.getValue("/root/temp/terminfo/tplinfo/engnm")); model.setValue(resref, model.getValue("/root/temp/terminfo/tplinfo/seqno")); } else if(flag == "morph1"){ model.removeNodeset("/root/temp/terminfo/icdo3info"); setParameter("SPMRT01500_param_nodepath", "/root/temp/terminfo/icdo3info"); setParameter("SPMRT01500_SEARCHDATA", code); setParameter("SPMRT01500_FLAG", "2"); modal("SPMRT01500"); if(getParameter("SPMRT01500_FLAG") == ""){ return; } model.setValue(ref, model.getValue("/root/temp/terminfo/icdo3info/histlgccd")); model.setValue(nmref, model.getValue("/root/temp/terminfo/icdo3info/engnm")); model.setValue(resref, model.getValue("/root/temp/terminfo/icdo3info/seqno")); } else if(flag == "morph2"){ model.removeNodeset("/root/temp/terminfo/icdo3info"); setParameter("SPMRT01500_param_nodepath", "/root/temp/terminfo/icdo3info"); setParameter("SPMRT01500_SEARCHDATA", code); setParameter("SPMRT01500_FLAG", "2"); modal("SPMRT01500"); if(getParameter("SPMRT01500_FLAG") == ""){ return; } model.setValue(ref, model.getValue("/root/temp/terminfo/icdo3info/histlgccd")); model.setValue(nmref, model.getValue("/root/temp/terminfo/icdo3info/engnm")); model.setValue(resref, model.getValue("/root/temp/terminfo/icdo3info/seqno")); }else if(flag == "icd10"){ model.removeNodeset("/root/temp/terminfo/icd10info"); setParameter("SPMRT01500_param_nodepath", "/root/temp/terminfo/icd10info"); setParameter("SPMRT01500_SEARCHDATA", code); setParameter("SPMRT01500_FLAG", "1"); modal("SPMRT01500"); if(getParameter("SPMRT01500_FLAG") == ""){ return; } model.setValue(ref, model.getValue("/root/temp/terminfo/icd10info/selectdiaglist/diagcd")); model.setValue(nmref, model.getValue("/root/temp/terminfo/icd10info/selectdiaglist/diagengnm")); } model.removeNodeset("/root/send/reqdata"); model.refresh(); } /** * @ver : 2010-07-07 * @desc : ȯÀÚÁ¶È¸ ÆË¾÷ * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGetPid(refPid) { //Á¶È¸°Ç¼ö°¡ 1°ÇÀÏ °æ¿ì ÆË¾÷âÀ» ¹Ù·Î ´Ý´Â´Ù. model.setValue("/root/hidden/tmp/pidpopupinfo/checkfnexam", "1"); model.setValue("/root/hidden/tmp/pidpopupinfo/autoflag", "N"); if( model.getValue("/root/hidden/tmp/pidpopupinfo/srchcond") == '' ){ model.setValue("/root/hidden/tmp/pidpopupinfo/srchcond", '2'); } modal("SPPMC02500", "1","150", "150", "SPPMC02500", "/root/hidden/tmp/pidpopupinfo", "/root/send"); model.resetInstanceNode("/root/source"); //ȯÀÚ¹øÈ£ copy var popupendflag = model.getValue("/root/main/popupendflag"); if (popupendflag == "ok") { model.setValue(refPid, model.getValue("/root/main/patinfo/patinfolist/pid")); model.refresh(); } } /** * @ver : 2010-07-07 * @desc : µ¿ÀÇÀμ­¸í ¹öư Ŭ¸¯½Ã * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fEasyPadCall(){ model.setValue("/root/main/sign/signflag", "ELCTSIGN"); if(model.getValue("/root/main/signpad/trgtcd") == "ep-661" ) { KiccDSCX1.Open = false; KiccDSCX1.Open = true; //ÃʱâÈ­ KiccDSCX1.ReqInit(); KiccDSCX1.ReqData = " 700081 "; KiccDSCX1.SignKind = 2; KiccDSCX1.ReqSign(); // // 20090608 ¼öÁ¤Ãß°¡ JHP, ½ÅûÀÎ ¼­¸íÀ» ´©¸£¸é ¼­¸íÀÌ È®ÀεǸé ÀÚµ¿À¸·Î È®Àιöư ¿ªÇÒÀ» ÇϰԲûÇÑ´Ù. model.setValue("/root/temp/signstr",KiccDSCX1.SignStr); // if( model.getValue("/root/tmp/signstr") == ""){ // // ÀÚµ¿ ½Ã°£Ã¼Å©ÇÏ¿© µî·¯¿À´Â °ª È®ÀÎ (¿À·ù°¡ ¸¹ÀÌ ³ª ÀÏ´Ü ÁÖ¼®Ã³¸®_20090709) // //clockTimer = window.setInterval("getReqSignChk()",200); // } } if(model.getValue("/root/main/signpad/trgtcd") == "sign-1000" ) { var rtn; // ¼­¸í ¿äûÇϱâ rtn = SignPad.SignRequest(9, 38400, ""); kocces_grup.attribute("visibility") = "visible"; SignPad_img.attribute("visibility") = "hidden"; } } /** * @ver : 2010-07-07 * @desc : ½ÅûÀμ­¸íŬ¸¯½Ã * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fEasyPadCall2(){ model.setValue("/root/main/sign/signflag", "AGRSIGN"); if(model.getValue("/root/main/signpad/trgtcd") == "ep-661" ) { KiccDSCX1.Open = false; KiccDSCX1.Open = true; //ÃʱâÈ­ KiccDSCX1.ReqInit(); KiccDSCX1.ReqData = " 700081 "; KiccDSCX1.SignKind = 2; KiccDSCX1.ReqSign(); // // 20090608 ¼öÁ¤Ãß°¡ JHP, ½ÅûÀÎ ¼­¸íÀ» ´©¸£¸é ¼­¸íÀÌ È®ÀεǸé ÀÚµ¿À¸·Î È®Àιöư ¿ªÇÒÀ» ÇϰԲûÇÑ´Ù. model.setValue("/root/temp/signstr",KiccDSCX1.SignStr); // if( model.getValue("/root/tmp/signstr") == ""){ // //clockTimer = window.setInterval("getReqSignChk2()",200); (¿À·ù°¡ ¸¹ÀÌ ³ª ÀÏ´Ü ÁÖ¼®Ã³¸®_20090709) // } } if(model.getValue("/root/main/signpad/trgtcd") == "sign-1000" ) { var rtn2; // ¼­¸í ¿äûÇϱâ rtn2 = SignPad.SignRequest(9, 38400, ""); kocces_grup.attribute("visibility") = "visible"; SignPad_img.attribute("visibility") = "hidden"; } } /** * @ver : 2010-07-07 * @desc : ±Ý¾×Ç¥½Ã±â¿¡ ±Ý¾× Ãâ·Â * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fDisplayTel(vPatnm, vTel, vRcptrnm) { if( AmtDispKind == 'POPUP' ){ if(vPatnm != '' || vPatnm != ' '){ vPatnm = vPatnm + '´Ô'; } var popupObjt = findChildWindowByScreenID("SPMRD02200"); if( popupObjt == null ){ open("SPMRD02200","2","1","1","SPMRD02200","","","caption:hidden;","false"); popupObjt = findChildWindowByScreenID("SPMRD02200"); popupObjt.window.javascript.fInit(); popupObjt.window.javascript.fSetMsg(vPatnm, vTel, vRcptrnm); }else{ popupObjt.window.javascript.fInit(); popupObjt.window.javascript.fSetMsg(vPatnm, vTel, vRcptrnm); } }else if( AmtDispKind == 'SERIAL' ){ //±Ý¾×Ç¥½Ã±â ocx //var AmtDisplay = NWSerial_OCX; var vreturn1 = -1; vreturn1 = TelDisplay.OpenCom(1,9600); //alert("opencom =>"+vreturn1); if (vreturn1 == 0) { TelDisplay.CloseCom(); TelDisplay.OpenCom(1,9600); } var vreturn2 = -1; vreturn2 = TelDisplay.ModeSend(2, "00", vPatnm, vTel ); }else if( AmtDispKind == '-' ){ AmtDispKind = fGetTelDispKind(); fDisplayTel(vPatnm, vTel, vRcptrnm); } } /** * @ver : 2010-07-07 * @desc : fOpenTelCom * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fOpenTelCom() { if( AmtDispKind == 'SERIAL' ){ var vreturn1 = -1; vreturn1 = TelDisplay.OpenCom(1,9600); //alert("opencom =>"+vreturn1); if (vreturn1 == 0) { TelDisplay.CloseCom(); TelDisplay.OpenCom(1,9600); } }else if( AmtDispKind == '-' ){ AmtDispKind = fGetTelDispKind(); fOpenTelCom(); } } /** * @ver : 2010-07-07 * @desc : fCloseTelCom * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fCloseTelCom() { if( AmtDispKind == 'POPUP' ){ var popupObjt = findChildWindowByScreenID("SPMRD02200"); if( popupObjt == null ){ return; }else{ popupObjt.window.javascript.fClose(); } }else if( AmtDispKind == 'SERIAL' ){ //Port Close var vreturn3 = -1; vreturn3 = TelDisplay.CloseCom(); if (vreturn3 == 0) { TelDisplay.CloseCom(); } }else if( AmtDispKind == '-' ){ AmtDispKind = fGetTelDispKind(); fCloseTelCom(); } } /** * @ver : 2010-07-07 * @desc : fInit_Tel_Display * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fInit_Tel_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; "); } TelDisplay = NWSerial_OCX; } catch(e) { TelDisplay = null; } return (TelDisplay != null); }else if( AmtDispKind == '-' ){ AmtDispKind = fGetTelDispKind(); fInit_Tel_Display(); } } /** * @ver : 2010-07-07 * @desc : ±Ý¾×Ç¥½Ã±â ŸÀÔ Á¶È¸ * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGetTelDispKind(){ 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 iCount = getNodesetCount("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); if (iCount > 0) { var cdnm = model.getValue("/root/hidden/pamcomcd/rcv/pamcd/cdnm"); model.removeNodeset("/root/hidden/pamcomcd"); return cdnm; }else{ model.removeNodeset("/root/hidden/pamcomcd"); return 'POPUP'; } } /** * @ver : 2010-07-07 * @desc : fDisplayTel_pamjs * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fDisplayTel_pamjs() { var opmi_rcptexpttel = model.getValue("/root/main/rareobstinfo/rareobstinfo/mpphontel"); //±Ý¾×Ç¥½Ã±â ÃʱâÈ­ fInit_Tel_Display(); //±Ý¾×Ç¥½Ã±â Æ÷Æ®¿­±â fOpenCom(); //±Ý¾×Ç¥½Ã±â Ç¥½Ã------------------------------------------------------------------ fDisplayTel(model.getValue("/root/main/rareobstinfo/rareobstinfo/appmannm"), opmi_rcptexpttel, getUserInfo("usernm")); } /** * @ver : 2010-07-07 * @desc : Ãâ·Â - ½Åû¼­ * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fPrnAppPaper() { if(model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") == model.getValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/insukind")){ model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "U"); }else{ model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "M"); model.setValue("/root/send/rareobstupdt/rareobstdetllist", grd_rareobstdetl.getUpdateDataAll("I")); } var baseaddr = model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplcebaseaddr"); var addr = model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplceaddr"); var acptplceaddr = baseaddr + " " + addr; model.setValue("/root/main/rareobstinfo/rareobstinfo/addr", acptplceaddr ); //ÀÔ¿øÀÏÀÚ if(model.getValue("/root/main/rareobstinfo/rareobstinfo/infromdd") == "") { model.setValue("/root/main/rareobstinfo/rareobstinfo/infromdd", "00000000"); model.refresh(); } //Åð¿øÀÏÀÚ if(model.getValue("/root/main/rareobstinfo/rareobstinfo/intodd") == "") { if(model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag") == "I") { model.setValue("/root/main/rareobstinfo/rareobstinfo/intodd", "99991231"); model.refresh(); }else{ model.setValue("/root/main/rareobstinfo/rareobstinfo/intodd", "00000000"); model.refresh(); } } //ÀÇ·áÁ¤º¸»óº´ÄÚµå(KNUH_20110116 Ãß°¡) if(model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagcd") == ""){ model.setValue("/root/main/rareobstinfo/rareobstinfo/healcarediagcd",model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarecd")); model.refresh(); } if(model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstno") == "") { model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobstno", "-"); model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd", "00000000"); model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobsttodd", "00000000"); model.refresh(); } var value_histno = model.getValue("/root/main/rareobstinfo/rareobstinfo/histno"); //³ëÀÎÆ²´Ï Ãâ·Â½Ã histno Áõ°¡¹æÁö¸¦ À§ÇÑ ·ÎÁ÷ Ãß°¡ 20130701 if(model.getValue("/root/main/rareobstinfo/rareobstinfo/prsntinsukind") != model.getValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/insukind")){ model.setValue("/root/main/rareobstinfo/rareobstinfo/histno", parseInt(model.getValue("/root/main/rareobstinfo/rareobstinfo/histno")) + parseInt(1)); }else{ model.setValue("/root/main/rareobstinfo/rareobstinfo/histno", model.getValue("/root/main/rareobstinfo/rareobstinfo/histno")); } model.refresh(); //³ëÀÎÆ²´Ï Ãâ·Â½Ã histno Áõ°¡¹æÁö¸¦ À§ÇÑ ·ÎÁ÷ Ãß°¡ 20130701 if(model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") =="03" ||model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") =="04"){ model.setValue("/root/main/rareobstinfo/rareobstinfo/histno", value_histno); } model.refresh(); //ÀüÈ­¹øÈ£-Áö¿ª¹øÈ£ ÀÔ·Â È®ÀÎ if (model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplcetel").substr(0,1) != "0") { alert("ÀüÈ­¹øÈ£°¡ Á¤È®È÷ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù\n¿¹Á¦) 02-325-7933" ); model.setFocus("input20"); return; } // ÀüÈ­¹øÈ£ "-" È®ÀÎ var tel = model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplcetel"); var j = 0; var k = 0; for(i=0; i<2; i++) { k = tel.indexOf("-", j); if (k>0) { j = j + k +1; }else{ //¹ÌÁ¸Àç alert("ÀüÈ­¹øÈ£¿¡ ±¸ºÐÀÌ ºüÁ® ÀÖ½À´Ï´Ù"); model.setFocus("input20"); return; } } if(model.getValue("/root/main/rareobstinfo/rareobstinfo/prstagtyn") == "Y"){ //ÇÚµåÆù¹øÈ£- ÀÔ·Â È®ÀÎ if (model.getValue("/root/main/rareobstinfo/rareobstinfo/mpphontel").substr(0,1) != "0") { alert("ÇÚµåÆù¹øÈ£°¡ Á¤È®È÷ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù\n¿¹Á¦) 010-3275-7933"); model.setFocus("input1"); return; } // ÇÚµåÆù¹øÈ£ "-" È®ÀÎ var mptel = model.getValue("/root/main/rareobstinfo/rareobstinfo/mpphontel"); var s = 0; var t = 0; for(p=0; p<2; p++) { t = mptel.indexOf("-", s); if (t>0) { s = s + t +1; }else{ //¹ÌÁ¸Àç alert("ÇÚµåÆù¹øÈ£¿¡ ±¸ºÐÀÌ ºüÁ® ÀÖ½À´Ï´Ù"); model.setFocus("input1"); return; } } } model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/rareobstinfo/rareobstinfo"); // KNUH_20110111_¹Ú¼ºÈ£ Ãß°¡_Ãâ·Â½Ã ÃÖÁ¾Áø´Ü¹æ¹ý ÀúÀåµÇµµ·Ï ¼öÁ¤ model.copyNode("/root/send/rareobstupdt/rareobstdetllist", "/root/main/diagdetlinfo/rareobstdetllist"); model.makeValue("/root/send/rareobstupdt/rareobstinfo/rgstfromdd", model.getValue("/root/init/srchinfo/rgstfromdd")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/rgsttodd", model.getValue("/root/init/srchinfo/rgsttodd")); model.setValue("/root/send/rareobstupdt/rareobstinfo/genrflagcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag")); model.setValue("/root/send/rareobstupdt/rareobstinfo/prntyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/prntyn")); model.setValue("/root/send/rareobstupdt/rareobstinfo/signyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/signyn")); model.setValue("/root/send/rareobstupdt/rareobstinfo/tahospchange", model.getValue("/root/main/rareobstinfo/rareobstinfo/tahospchange")); model.setValue("/root/send/rareobstupdt/rareobstinfo/insukind", model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind")); model.setValue("/root/send/rareobstupdt/rareobstinfo/orddeptcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddeptcd")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/histyn", model.getValue("/root/init/srchinfo/histyn")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/srchkind", model.getValue("/root/init/srchinfo/srchkind")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/disqualifiyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/disqualifiyn")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/relaflagcd", model.getValue("/root/init/srchinfo/relaflagcd")); submit("TXMRD02001"); model.toggle("case1"); var baseaddr = model.getValue("/root/hidden/rareobstchange/rareobstchange/acptplcebaseaddr"); var addr = model.getValue("/root/hidden/rareobstchange/rareobstchange/acptplceaddr"); var plceaddr = baseaddr + " " + addr; button8.disabled = false; btn_savexls.disabled = false; button64.selected = true; model.refresh(); fPrnInitialize(); //»çÀÎÆÐµå »ç¿ëÀ¸·Î OCR Ãâ·Â ¾ÈÇÔ 20090708 ¸·¾ÒÀ½(¼º°¡»©°í) // Èñ±Í³­Ä¡µî·Ï½Åû¼­ OCR Ãâ·Â var formcd = "0000001781"; var usernm = getUserName(); var pid = model.getValue("/root/main/rareobstinfo/rareobstinfo/pid"); var orddeptcd = model.getValue("/root/main/rareobstinfo/rareobstinfo/orddeptcd"); var orddd = model.getValue("/root/main/rareobstinfo/rareobstinfo/genrorddd"); var ordtype = model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag"); var orddrid = model.getValue("/root/main/rareobstinfo/rareobstinfo/orddrid"); model.makeValue("/root/send/req/formcd", formcd); model.makeValue("/root/send/req/pid", pid); model.makeValue("/root/send/req/orddeptcd", orddeptcd); model.makeValue("/root/send/req/orddd", orddd); model.makeValue("/root/send/req/ordtype", ordtype); //submit("TRMRD02009"); 20120711 ÀÌÀ±ÁÖ ¸·À½ var rrgstno1 = model.getValue("/root/main/prnpatinfo/rrgstno1"); var rrgstno2 = model.getValue("/root/main/prnpatinfo/rrgstno2"); var orddeptnm = model.getValue("/root/main/prnpatinfo/orddeptnm"); var seq = model.getValue("/root/main/prnpatinfo/seq"); var formfromdt = model.getValue("/root/main/prnpatinfo/formfromdt"); var orddeptabbr = model.getValue("/root/main/prnpatinfo/orddeptabbr"); //var orddd = model.getValue("/root/main/prninfo/genrdd"); //var ordtype = model.getValue("/root/main/prninfo/genrflagcd"); var cretno = model.getValue("/root/main/prnpatinfo/cretno"); var insukind = model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind"); var prstagtyn = model.getValue("/root/main/rareobstinfo/rareobstinfo/prstagtyn"); var rgstkindcd = model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd"); var genrdd = model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd"); //20120706 ÀÌÀ±ÁÖ ¼öÁ¤ if (prstagtyn != "Y") { switch (rgstkindcd){ case "01": case "09": case "07": case "08": if (insukind == "11") { exeReportPreview("RMMRD02000_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { if (ISPRNT == "Y") { exeReportPreview("RMMRD02002_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //ÀÇ·á±Þ¿© } } break; case "02": if (ISPRNT == "Y") { if (insukind == "11"){ exeReportPreview("RMMRD02000_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02002_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //ÀÇ·á±Þ¿© } } break; case "03": //³ëÀÎÆ²´Ï(»ó¾Ç) if (genrdd < "20150701") { // Ãâ·Â ¾à½Ä º¯°æ 2015.07.06 ¾ö¿µ¸¸ if (insukind == "11") { exeReportPreview("RMMRD02003_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02004_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } else { if (insukind == "11") { exeReportPreview("RMMRD02009_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02010_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } break; case "04": //³ëÀÎÆ²´Ï(ÇϾÇ) if (genrdd < "20150701") { // Ãâ·Â ¾à½Ä º¯°æ 2015.07.06 ¾ö¿µ¸¸ if (insukind == "11") { exeReportPreview("RMMRD02003_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02004_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } else { if (insukind == "11") { exeReportPreview("RMMRD02009_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02010_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } break; case "05": // ÀÓÇöõÆ® var regstatus = model.getValue("/root/main/rareobstinfo/rareobstinfo/regstatus"); // // µî·Ï»óÅÂ(A:µî·Ï, B:½Ã¼úÁßÁö, C:º¯°æ, D:ÇØÁö, E:Ãë¼Ò) if(regstatus == "A") { if (insukind == "11") { exeReportPreview("RMMRD02005_ÀÓÇöõÆ®°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02006_ÀÓÇöõÆ®ÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } else { if (insukind == "11") { exeReportPreview("RMMRD02007_ÀÓÇöõÆ®ÇØÁö°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02008_ÀÓÇöõÆ®ÇØÁöÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } break; } } ISPRNT = "Y"; model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "P"); model.setValue("/root/main/rareobstinfo/rareobstinfo/prntyn", "Y"); model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/rareobstinfo/rareobstinfo"); model.makeValue("/root/send/rareobstupdt/rareobstinfo/rgstfromdd", getCurrentDate()); model.makeValue("/root/send/rareobstupdt/rareobstinfo/rgsttodd", getCurrentDate()); model.setValue("/root/send/rareobstupdt/rareobstinfo/genrflagcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag")); model.setValue("/root/send/rareobstupdt/rareobstinfo/prntyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/prntyn")); model.setValue("/root/send/rareobstupdt/rareobstinfo/signyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/signyn")); model.setValue("/root/send/rareobstupdt/rareobstinfo/insukind", model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind")); model.setValue("/root/send/rareobstupdt/rareobstinfo/orddeptcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddeptcd")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/histyn", model.getValue("/root/init/srchinfo/histyn")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/srchkind", model.getValue("/root/init/srchinfo/srchkind")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/disqualifiyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/disqualifiyn")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/relaflagcd", model.getValue("/root/init/srchinfo/relaflagcd")); submit("TXMRD02001"); var baseaddr = model.getValue("/root/send/rareobstupdt/rareobstinfo/acptplcebaseaddr"); var addr = model.getValue("/root/send/rareobstupdt/rareobstinfo/acptplceaddr"); var plceaddr = baseaddr + " " + addr; model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/addr",plceaddr); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/insukind",model.getValue("/root/send/rareobstupdt/rareobstinfo/insukind")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/rareobstcnfmdd",model.getValue("/root/send/rareobstupdt/rareobstinfo/rareobstcnfmdd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/rareobstno",model.getValue("/root/send/rareobstupdt/rareobstinfo/rareobstno")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/rareobstfromdd",model.getValue("/root/send/rareobstupdt/rareobstinfo/rareobstfromdd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/rareobsttodd",model.getValue("/root/send/rareobstupdt/rareobstinfo/rareobsttodd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/prstagtyn",model.getValue("/root/send/rareobstupdt/rareobstinfo/prstagtyn")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/zipcdhead",model.getValue("/root/send/rareobstupdt/rareobstinfo/zipcdhead")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/zipcdfoot",model.getValue("/root/send/rareobstupdt/rareobstinfo/zipcdfoot")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/maindiagcd",model.getValue("/root/send/rareobstupdt/rareobstinfo/maindiagcd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/maincd",model.getValue("/root/send/rareobstupdt/rareobstinfo/maincd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/healcarediagcd",model.getValue("/root/send/rareobstupdt/rareobstinfo/healcarediagcd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/healcarecd",model.getValue("/root/send/rareobstupdt/rareobstinfo/healcarecd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/acptplcetel",model.getValue("/root/send/rareobstupdt/rareobstinfo/acptplcetel")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/acptplceaddr",model.getValue("/root/send/rareobstupdt/rareobstinfo/acptplceaddr")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/remfact",model.getValue("/root/send/rareobstupdt/rareobstinfo/remfact")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/hngnm",model.getValue("/root/send/rareobstupdt/rareobstinfo/hngnm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/orddeptnm",model.getValue("/root/send/rareobstupdt/rareobstinfo/orddeptnm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/orddrnm",model.getValue("/root/send/rareobstupdt/rareobstinfo/orddrnm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/rrgstno",model.getValue("/root/send/rareobstupdt/rareobstinfo/rrgstno")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/insuno",model.getValue("/root/send/rareobstupdt/rareobstinfo/insuno")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/insdnm",model.getValue("/root/send/rareobstupdt/rareobstinfo/insdnm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/relaflag",model.getValue("/root/send/rareobstupdt/rareobstinfo/relaflag")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/appmannm",model.getValue("/root/send/rareobstupdt/rareobstinfo/appmannm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/intodd",model.getValue("/root/send/rareobstupdt/rareobstinfo/intodd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/infromdd",model.getValue("/root/send/rareobstupdt/rareobstinfo/infromdd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/healcarediagnm",model.getValue("/root/send/rareobstupdt/rareobstinfo/healcarediagnm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/mpphontel",model.getValue("/root/send/rareobstupdt/rareobstinfo/mpphontel")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/roomcd",model.getValue("/root/send/rareobstupdt/rareobstinfo/roomcd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/icd10cd",model.getValue("/root/send/rareobstupdt/rareobstinfo/icd10cd")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/cncrnm",model.getValue("/root/send/rareobstupdt/rareobstinfo/cncrnm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/lastdiagmthdcdnm",model.getValue("/root/send/rareobstupdt/rareobstinfo/lastdiagmthdcdnm")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/acptplcebaseaddr",model.getValue("/root/send/rareobstupdt/rareobstinfo/acptplcebaseaddr")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/prntyn",model.getValue("/root/send/rareobstupdt/rareobstinfo/prntyn")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/prntdt",getCurrentDate()); model.setValue("/root/main/rareobstinfo/rareobstinfo/signyn", "Y"); fGridUpdtSignY(); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/signyn",model.getValue("/root/send/rareobstupdt/rareobstinfo/signyn")); model.setValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/signdt",getCurrentDate()); model.refresh(); } /** * @ver : 2010-07-07 * @desc : ÀçÃâ·Â - ½Åû¼­ * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fRePrnAppPaper() { if(model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") == model.getValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/insukind")){ model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "U"); }else{ model.setValue("/root/main/rareobstinfo/rareobstinfo/status", "M"); model.setValue("/root/send/rareobstupdt/rareobstdetllist", grd_rareobstdetl.getUpdateDataAll("I")); } var baseaddr = model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplcebaseaddr"); var addr = model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplceaddr"); var acptplceaddr = baseaddr + " " + addr; model.setValue("/root/main/rareobstinfo/rareobstinfo/addr", acptplceaddr ); //ÀÔ¿øÀÏÀÚ if(model.getValue("/root/main/rareobstinfo/rareobstinfo/infromdd") == "") { model.setValue("/root/main/rareobstinfo/rareobstinfo/infromdd", "00000000"); model.refresh(); } //Åð¿øÀÏÀÚ if(model.getValue("/root/main/rareobstinfo/rareobstinfo/intodd") == "") { if(model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag") == "I") { model.setValue("/root/main/rareobstinfo/rareobstinfo/intodd", "99991231"); model.refresh(); }else{ model.setValue("/root/main/rareobstinfo/rareobstinfo/intodd", "00000000"); model.refresh(); } } if(model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstno") == "") { model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobstno", "-"); model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd", "00000000"); model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobsttodd", "00000000"); model.refresh(); } if(model.getValue("/root/main/rareobstinfo/rareobstinfo/prsntinsukind") != model.getValue("/root/main/listinfo/rareobstlist/rareobstlist["+ grd_rareobstinfo.row +"]/insukind")){ model.setValue("/root/main/rareobstinfo/rareobstinfo/histno", parseInt(model.getValue("/root/main/rareobstinfo/rareobstinfo/histno")) + parseInt(1)); }else{ model.setValue("/root/main/rareobstinfo/rareobstinfo/histno", model.getValue("/root/main/rareobstinfo/rareobstinfo/histno")); } model.refresh(); //ÀüÈ­¹øÈ£-Áö¿ª¹øÈ£ ÀÔ·Â È®ÀÎ if (model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplcetel").substr(0,1) != "0") { alert("ÀüÈ­¹øÈ£°¡ Á¤È®È÷ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù\n¿¹Á¦) 02-325-7933" ); model.setFocus("input20"); return; } // ÀüÈ­¹øÈ£ "-" È®ÀÎ var tel = model.getValue("/root/main/rareobstinfo/rareobstinfo/acptplcetel"); var j = 0; var k = 0; for(i=0; i<2; i++) { k = tel.indexOf("-", j); if (k>0) { j = j + k +1; }else{ //¹ÌÁ¸Àç alert("ÀüÈ­¹øÈ£¿¡ ±¸ºÐÀÌ ºüÁ® ÀÖ½À´Ï´Ù"); model.setFocus("input20"); return; } } if(model.getValue("/root/main/rareobstinfo/rareobstinfo/prstagtyn") == "Y"){ //ÇÚµåÆù¹øÈ£- ÀÔ·Â È®ÀÎ if (model.getValue("/root/main/rareobstinfo/rareobstinfo/mpphontel").substr(0,1) != "0") { alert("ÇÚµåÆù¹øÈ£°¡ Á¤È®È÷ ÀԷµÇÁö ¾Ê¾Ò½À´Ï´Ù\n¿¹Á¦) 010-3275-7933"); model.setFocus("input1"); return; } // ÇÚµåÆù¹øÈ£ "-" È®ÀÎ var mptel = model.getValue("/root/main/rareobstinfo/rareobstinfo/mpphontel"); var s = 0; var t = 0; for(p=0; p<2; p++) { t = mptel.indexOf("-", s); if (t>0) { s = s + t +1; }else{ //¹ÌÁ¸Àç alert("ÇÚµåÆù¹øÈ£¿¡ ±¸ºÐÀÌ ºüÁ® ÀÖ½À´Ï´Ù"); model.setFocus("input1"); return; } } } model.copyNode("/root/send/rareobstupdt/rareobstinfo", "/root/main/rareobstinfo/rareobstinfo"); model.makeValue("/root/send/rareobstupdt/rareobstinfo/rgstfromdd", model.getValue("/root/init/srchinfo/rgstfromdd")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/rgsttodd", model.getValue("/root/init/srchinfo/rgsttodd")); model.setValue("/root/send/rareobstupdt/rareobstinfo/genrflagcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag")); model.setValue("/root/send/rareobstupdt/rareobstinfo/prntyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/prntyn")); model.setValue("/root/send/rareobstupdt/rareobstinfo/signyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/signyn")); model.setValue("/root/send/rareobstupdt/rareobstinfo/tahospchange", model.getValue("/root/main/rareobstinfo/rareobstinfo/tahospchange")); model.setValue("/root/send/rareobstupdt/rareobstinfo/insukind", model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind")); model.setValue("/root/send/rareobstupdt/rareobstinfo/orddeptcd", model.getValue("/root/main/rareobstinfo/rareobstinfo/orddeptcd")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/histyn", model.getValue("/root/init/srchinfo/histyn")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/srchkind", model.getValue("/root/init/srchinfo/srchkind")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/disqualifiyn", model.getValue("/root/main/rareobstinfo/rareobstinfo/disqualifiyn")); model.makeValue("/root/send/rareobstupdt/rareobstinfo/relaflagcd", model.getValue("/root/init/srchinfo/relaflagcd")); //submit("TXMRD02001"); var insukind = model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind"); var prstagtyn = model.getValue("/root/main/rareobstinfo/rareobstinfo/prstagtyn"); var rgstkindcd = model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd"); var genrdd = model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd"); model.toggle("case1"); var baseaddr = model.getValue("/root/hidden/rareobstchange/rareobstchange/acptplcebaseaddr"); var addr = model.getValue("/root/hidden/rareobstchange/rareobstchange/acptplceaddr"); var plceaddr = baseaddr + " " + addr; button8.disabled = false; btn_savexls.disabled = false; button64.selected = true; model.refresh(); fPrnInitialize(); //20120706 ÀÌÀ±ÁÖ ¼öÁ¤ switch (rgstkindcd){ case "01": case "09": case "08": case "07": if (insukind == "11"){ exeReportPreview("RMMRD02000_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 }else{ exeReportPreview("RMMRD02002_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } break; case "06": //°áÇÙ if (insukind == "11"){ exeReportPreview("RMMRD02000_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 }else{ exeReportPreview("RMMRD02002_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } break; case "02": //ÁßÁõÈ­»ó if (insukind == "11"){ exeReportPreview("RMMRD02000_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02002_Èñ±Í³­Ä¡¼ºÁúȯ½Åû¼­","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //ÀÇ·á±Þ¿© } break; case "03": //³ëÀÎÆ²´Ï(»ó¾Ç) if (genrdd < "20150701") { // Ãâ·Â ¾à½Ä º¯°æ 2015.07.06 ¾ö¿µ¸¸ if (insukind == "11") { exeReportPreview("RMMRD02003_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02004_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } else { if (insukind == "11") { exeReportPreview("RMMRD02009_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02010_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } break; case "04": //³ëÀÎÆ²´Ï(ÇϾÇ) if (genrdd < "20150701") { // Ãâ·Â ¾à½Ä º¯°æ 2015.07.06 ¾ö¿µ¸¸ if (insukind == "11") { exeReportPreview("RMMRD02003_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02004_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } else { if (insukind == "11") { exeReportPreview("RMMRD02009_³ëÀÎÆ²´Ï°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02010_³ëÀÎÆ²´ÏÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } break; case "05": // ÀÓÇöõÆ® var regstatus = model.getValue("/root/main/rareobstinfo/rareobstinfo/regstatus"); // // µî·Ï»óÅÂ(A:µî·Ï, B:½Ã¼úÁßÁö, C:º¯°æ, D:ÇØÁö, E:Ãë¼Ò) if(regstatus == "A") { if (insukind == "11") { exeReportPreview("RMMRD02005_ÀÓÇöõÆ®°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02006_ÀÓÇöõÆ®ÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } else { if (insukind == "11") { exeReportPreview("RMMRD02007_ÀÓÇöõÆ®ÇØÁö°Ç°­º¸Çè","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } else { exeReportPreview("RMMRD02008_ÀÓÇöõÆ®ÇØÁöÀÇ·á±Þ¿©","XMLSTR","","","true","","","","","true","","","","","","1","","","","",""); //º¸Çè - 2 } } break; } messageBox("Ãâ·ÂÀÌ ", "I002"); model.refresh(); } /** * @ver : 2010-07-07 * @desc : Á¶È¸¸®½ºÆ® ´õºíŬ¸¯ * @ * @by : ÀÌÀº¿µ * @param : * @return : * @--------------------------------------------------- */ function fGridDbClick() { model.resetInstanceNode("/root/temp/rareobstpam/rareobstpamlist"); //¼±ÅÃµÈ È¯ÀÚ ¿ø¹«Èñ±Íµî·Ï ¿©ºÎ var currow = grd_rareobstinfo.row; var curcol = grd_rareobstinfo.col; if( grd_rareobstinfo.isCell(event.target) && grd_rareobstinfo.row >= grd_rareobstinfo.fixedRows ) { button4.visible = true; //µ¿ÀÇÀμ­¸í bt_Sign_Req.visible = true; //µ¿ÀÇÀÎÀç¼­¸í¹öư bt_Sign_Cancle.visible = true; // µ¿ÀÇÀÎÃë¼Ò¹öư bt_Sign_Save.visible = true; //µ¿ÀÇÀÎÈ®Àιöư // model.copyNode("/root/main/rareobstinfo/rareobstinfo", "/root/main/listinfo/rareobstlist/rareobstlist["+currow+"]"); model.makeNode("/root/send/reqdata"); model.makeValue("/root/send/reqdata/genrdd", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+currow+"']/genrdd")); model.makeValue("/root/send/reqdata/genrno", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+currow+"']/genrno")); model.makeValue("/root/send/reqdata/histno", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+currow+"']/histno")); if(!submit("TRMRD02014")){ messageBox ( "»ó¼¼Á¤º¸ Á¶È¸¿¡ ½ÇÆÐ ÇÏ¿´½À´Ï´Ù.", "E" ); return; } // KNUH_20101216_¹Ú¼ºÈ£_start »çÀÎÆÐµå Ãß°¡ if(model.getValue("/root/main/signpad/trgtcd") == "kovan-K700PSR" ) { fsignpad_close(); fsignpad_init(); model.refresh(); var key = model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsignkey"); if (key != "") { fsignpad_view(model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsignkey") , model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts")); model.makeValue("/root/main/rexpert/rareobstinfo/signimgsign", model.getValue("/root/main/rareobstinfo/rareobstinfo/elctsigncnts")); bt_Sign_Cancle.disabled = false; //Ãë¼Ò bt_Sign_Req.disabled = false; //Àç¼­¸í bt_Sign_Save.disabled = false; //È®ÀÎ button4.disabled = true; } else { fsignpad_close(); bt_Sign_Cancle.disabled = true; //Ãë¼Ò bt_Sign_Req.disabled = true; //Àç¼­¸í bt_Sign_Save.disabled = true; //È®ÀÎ button4.disabled = false; } } if ( model.getValue("/root/main/rareobstinfo/rareobstinfo/appmannm") == "" ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/appmannm", model.getValue("/root/main/rareobstinfo/rareobstinfo/hngnm") ); model.setValue("/root/main/rareobstinfo/rareobstinfo/relaflag", model.getValue("/root/init/M0263/M0263[cdnm='º»ÀÎ']/cdid") ); } if ( model.getValue("/root/main/rareobstinfo/rareobstinfo/healcarediagcd") == "" ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/healcarecd", model.getValue("/root/main/rareobstinfo/rareobstinfo/maincd") ); model.setValue("/root/main/rareobstinfo/rareobstinfo/healcarediagnm", model.getValue("/root/main/rareobstinfo/rareobstinfo/maindiagnm") ); } submit("TRMRD02002"); rdo_insukind.disabled = true; if (model.getValue("/root/main/rareobstinfo/rareobstinfo/ioflag") == "I") { group3.visible = true; } else { group3.visible = false; } if (model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") >= "21" && model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") <= "25" ) { cap_insukind.visible = true; cap_insukind.value = rdo_insukind.label; group3.visible = true; } else { cap_insukind.visible= false; group3.visible = false; if (model.getValue("/root/main/rareobstinfo/rareobstinfo/prstagtyn") != "Y") { model.setValue("/root/main/rareobstinfo/rareobstinfo/prstagtyn", "N"); } } if (model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") == "03" || model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") == "04") { // Ʋ´Ï »ó¾Ç, ÇÏ¾Ç grp_dental.visible = true; } else { grp_dental.visible = false; } if (model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") == "05") { // ÀÓÇöõÆ® grp_implant.visible = true; } else { grp_implant.visible = false; } submit("TRMRD02008"); //¿ø¹« Èñ±Í³­Ä¡ µî·Ï¿©ºÎ var cnt = getNodeSetCnt("/root/temp/rareobstpam/rareobstpamlist"); if(cnt > 0){ alert("¿ø¹« Èñ±Í³­Ä¡ µî·ÏÀÚ·á°¡ Á¸ÀçÇÕ´Ï´Ù."); } if (model.getValue("/root/main/rareobstinfo/rareobstinfo/insuno").substr(0,1) == "6" ){ alert("°Ç°­º¸ÇèÁõ ¹øÈ£°¡ 6À¸·Î ½ÃÀÛÇÕ´Ï´Ù."); } if (model.getValue("/root/main/rareobstinfo/rareobstinfo/insukindnm2") != ""){ if (model.getValue("/root/main/rareobstinfo/rareobstinfo/prsntinsukind") != model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") ){ alert("ȯÀÚÀÚ°ÝÀÌ "+model.getValue("/root/main/rareobstinfo/rareobstinfo/insukindnm2")+"¿¡¼­ "+model.getValue("/root/main/rareobstinfo/rareobstinfo/insukindnm1")+"À¸·Î º¯°æ µÇ¾ú½À´Ï´Ù."); btn_Bi.disabled = false; } } //±â°£ ¼³Á¤ if (model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") >= "10" && model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind") <= "20" ) { //º¸ÇèÀÎ °æ¿ì ³¯Â¥ ¼¼ÆÃ if (model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd") == "00000000" ) { model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd",model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstcnfmdd") ); //³ëÀÎÆ²´Ï ½Åû¼­ ±â°£ µû·Î °ü¸®¸¦ À§ÇÑ ·ÎÁ÷ Ãß°¡ 20130701 if(model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") =="03" ||model.getValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd") =="04"){ model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobsttodd", ((model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd").toDate()).getAddDate(7, "Y").getAddDate(-1)).getDateFormat() ); }else{ model.setValue("/root/main/rareobstinfo/rareobstinfo/rareobsttodd", ((model.getValue("/root/main/rareobstinfo/rareobstinfo/rareobstfromdd").toDate()).getAddDate(5, "Y").getAddDate(-1)).getDateFormat() ); } } } model.setValue("/root/hidden/insuno", model.getValue("/root/main/rareobstinfo/rareobstinfo/insuno")); model.setValue("/root/hidden/insukind", model.getValue("/root/main/rareobstinfo/rareobstinfo/insukind")); button1.selected = true; caption2.value = "Èñ±Í³­Ä¡ ÁßÁõÈ­»ó ȯÀÚ µî·Ï ¹× ¼öÁ¤"; //Åð¿øÀÏÀÚ 99991231ÀÎ °æ¿ì °ªÀ» °ø¹éó¸® ¶Ç´Â 00000000 //ÀÔ¿øÀÏÀÚ if(model.getValue("/root/main/rareobstinfo/rareobstinfo/infromdd") == "00000000") { model.setValue("/root/main/rareobstinfo/rareobstinfo/infromdd", ""); model.refresh(); } //Åð¿øÀÏÀÚ if(model.getValue("/root/main/rareobstinfo/rareobstinfo/intodd") == "99991231" || model.getValue("/root/main/rareobstinfo/rareobstinfo/intodd") == "00000000") { model.setValue("/root/main/rareobstinfo/rareobstinfo/intodd", ""); model.refresh(); } if(model.getValue("/root/main/rareobstinfo/rareobstinfo/histcd") == "T"){ model.setValue("/root/main/rareobstinfo/rareobstinfo/tahospchange", "Y"); btn_prnt.visible = false; btn_sign.visible = false; model.refresh(); }else{ submit("TRMRD02012"); btn_prnt.visible = true; btn_sign.visible = true; } model.toggle("case2"); button8.disabled = true; btn_savexls.disabled = true; } // 2010.07.08. ÀÌÀº¿µ... ÁßÁõÈ­»ó Á¤º¸ Á¶È¸Çϱâ... model.makeValue("/root/send/serdiagburn/instcd", getUserInfo("dutplceinstcd")); model.makeValue("/root/send/serdiagburn/genrdd", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrdd")); model.makeValue("/root/send/serdiagburn/genrno", model.getValue("/root/main/rareobstinfo/rareobstinfo/genrno")); model.makeValue("/root/send/serdiagburn/histno", model.getValue("/root/main/rareobstinfo/rareobstinfo/histno")); model.makeValue("/root/send/serdiagburn/pid" , model.getValue("/root/main/rareobstinfo/rareobstinfo/pid")); submit("TRMRD02013"); //20120706 ÀÌÀ±ÁÖ ¼öÁ¤ //model.makeValue("/root/main/rareobstinfo/rareobstinfo/rgstkindcd" , model.getValue("/root/main/serdiagburninfo/rgstkindcd")); model.makeValue("/root/main/rareobstinfo/rareobstinfo/burnicd10desc", model.getValue("/root/main/serdiagburninfo/burnicd10desc")); model.makeValue("/root/main/rareobstinfo/rareobstinfo/spclcd" , model.getValue("/root/main/serdiagburninfo/spclcd")); // 2010.07.08. ÀÌÀº¿µ... ÁßÁõÈ­»ó Á¤º¸ Á¶È¸Çϱâ... } /* * ½ÅûÃë¼Ò */ function fRequestCancel(){ // messageBox("½Åû Ãë¼Ò±â´ÉÀÌ ¾ø½À´Ï´Ù","I"); // return; var current_row=grd_rareobstinfo.row; var fixed_rows=grd_rareobstinfo.fixedRows; if(fixed_rows <= current_row){ model.makeNode("/root/send/reqdata"); model.makeValue("/root/send/reqdata/genrdd", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/genrdd")); model.makeValue("/root/send/reqdata/genrno", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/genrno")); model.makeValue("/root/send/reqdata/histno", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/histno")); model.makeValue("/root/send/reqdata/continueflag", ""); if(model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/histcd")!="N"){ model.makeValue("/root/send/reqdata/histcd", "H"); }else{ model.makeValue("/root/send/reqdata/histcd", "O"); } } if(submit("TXMRD02103")){ button5.dispatch("DOMActivate"); } model.refresh(); } /* * ¿¬ÀåÃë¼Ò */ function fRenewCancel(){ var current_row=grd_rareobstinfo.row; var fixed_rows=grd_rareobstinfo.fixedRows; if(fixed_rows <= current_row){ model.makeNode("/root/send/reqdata"); model.makeValue("/root/send/reqdata/genrdd", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/genrdd")); model.makeValue("/root/send/reqdata/genrno", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/genrno")); model.makeValue("/root/send/reqdata/histno", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/histno")); model.makeValue("/root/send/reqdata/pid", model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/pid")); model.makeValue("/root/send/reqdata/histcd", ""); if(model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/continueflag")=="N"){ model.makeValue("/root/send/reqdata/continueflag", "Y"); }else{ model.makeValue("/root/send/reqdata/continueflag", "N"); } } if(submit("TXMRD02103")){ button5.dispatch("DOMActivate"); } model.refresh(); } /* * ÀÓÇöõÆ® ÁßÁö/º¯°æ/ÇØÁö/Ãë¼Ò */ function fReqImplantCancel(){ var current_row=grd_rareobstinfo.row; var fixed_rows=grd_rareobstinfo.fixedRows; if(fixed_rows <= current_row){ var sAnoHospRgstFlag = model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/anohosprgstflag"); var sRareObstNo = model.getValue("/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']/rareobstno"); if(sRareObstNo == "-" || sRareObstNo == "") { // °ø´Ü µî·Ï¹øÈ£°¡ ¾ø´Â °æ¿ì messageBox("º¸Çè°ø´Ü µî·Ï¹øÈ£°¡ ¹ß±ÞµÇÁö ¾Ê¾Æ ÁßÁö/º¯°æ/ÇØÁö/Ãë¼Ò°¡ ºÒ°¡´É ÇÕ´Ï´Ù.", "I999"); return; } if(sAnoHospRgstFlag == "Y") { // Ÿº´¿ø µî·ÏÀΰæ¿ì messageBox("Ÿº´¿ø¿¡¼­ µî·ÏÇÑ Á¤º¸´Â ÁßÁö/º¯°æ/ÇØÁö/Ãë¼Ò°¡ ºÒ°¡´É ÇÕ´Ï´Ù.", "I999"); return; } modal("SPMMO25200", 1, 0, 40, "SPMMO25200", "/root/main/listinfo/rareobstlist/rareobstlist['"+current_row+"']", "/root/main/implantinfo"); } button5.dispatch("DOMActivate"); model.refresh(); } function fTrns(trnsyn) { var chkcnt = getNodeSetCnt("/root/main/listinfo/rareobstlist/rareobstlist[chk = '1']"); if (chkcnt==0) { messageBox("¼±ÅÃµÈ ÇàÀÌ ¾ø½À´Ï´Ù","I"); return; } if ("6" != messageBox(chkcnt+"ÇàÀÌ ¼±ÅõǾú½À´Ï´Ù ÁøÇàÇϽðڽÀ´Ï±î?","Q")) { return; } model.removeNodeset("/root/chksend"); model.makeNode("/root/chksend/chklist"); copyNodesetType("/root/chksend/chklist","/root/main/listinfo/rareobstlist/rareobstlist[chk = '1']"); model.makeValue("/root/chksend/bizflag", "A"); //Èñ±Í³­Ä¡ model.makeValue("/root/chksend/trns", trnsyn); //Àü¼Û¿©ºÎ submit("TXMRD02104"); button5.dispatch("DOMActivate"); }