/* --------------------------------------------------------------------- ¼ö¼ú¸¶Ãë¸ÞÀÎ (SMMNP00100.xfm - JScript ) - Version : 1) : Ver.1.00.01 : Create By Francis Choi : 2015.05.02 ---------------------------------------------------------------------- */ var s1=""; /** * @group : * @ver : 2007.04.17 * @by : Choi HakRok * @--------------------------------------------------- * @type : function * @access : public * @desc : ¼ö¼ú ¿¹¾àÁ¤º¸ °¡Á®¿À±â * @param : * @return : * @--------------------------------------------------- */ function fInit(){ //grp_ordmn.visible = false; //grp_opm.visible = true; //roundrect1.visible = true; //cap_state.visible = true; chk_opnmen.value = "Y"; chk_diagnmkr.value = "Y"; group1.visible = true; grp_opmdisc.visible = true; var param = getScreenMenuParameter(); var node = getGlobalVariable("operation"); setCSVToNode("/root/main/operation", node); inp_opddfr.value = getCurrentDate(); inp_opddto.value = getCurrentDate(); grd_oppatlist.explorerbar = "sortshow"; model.setValue("/root/main/cond/usernm", getUserName() ); model.setValue("/root/main/cond/orddd" , getCurrentDate());//¾÷¹«ÀÏÀÚ(Order Manage Á¶È¸ÀÏÀÚ) model.removenode("/root/send"); model.makeValue("/root/send/flag" , "X" ); model.makeValue("/root/send/searchitem", "XX" ); model.makeValue("/root/send/deptflag" , "011" ); submit("TRMNP00107", false); submit("TRMNP03004") // ¼ö¼ú½Ç(Rosette) °¡Á®¿À±â model.removenode("/root/send"); model.makeNode("/root/send"); model.makeValue("/root/send/opcnfmdd" , model.getValue("/root/main/cond/opddfr")); model.makeValue("/root/send/rosette" ,model.getValue("/root/main/cond/oprosette")); submit("TRMNP03002"); // ¼ö¼ú½ÇÄÚµå °¡Á®¿À±â addComboItem("cmb_oproomlist","Àüü","","above"); //addComboItem("cmb_oproomlist", "Àü ü", "", "above" ); //2009-03-16 TRMNP03004 Ãß°¡·Î ÀÎÇÏ¿© »èÁ¦ ó¸® addComboItem("cmb_orddept" , "Àü ü" , "" , "above" ); addComboItem("cmb_ccrtstatlist" , "Àü ü" , "" , "above" ); //2009/01/07 Ãß°¡ºÎºÐ addComboItem("cmb_rosette" , "Àü ü" , "" , "above" ); if( param == "ordmn" ) {//¸Þ´º¸¦ ÅëÇØ Order Manage¸¦ ¼±ÅÃÇÑ °æ¿ì fSeletedToggle( param ); }else { fSelectPos(); } } /* --------------------------------------------------*/ /* type : function */ /* access : public */ /* desc : ¼ö¼ú/¸¶Ãë ¸ÞÀÎ Á¶È¸ */ /* param : */ /* return : */ /* --------------------------------------------------*/ function fSelectPos() { var iRows = -1; var opflagcd, callyn; var sPrcpCnt = 0; var sDispCnt = 0; model.removenode("/root/send"); model.makeNode("/root/send/reqdata" ); //ÀúÀå ÈÄ Á¶È¸Á¶°Ç model.copyNode("/root/send/reqdata", "/root/main/cond"); submit("TRMNP00401"); iRows = getNodesetCount("/root/main/opPatlist/opPatInfo"); var refMsg = model.getValue("/root/properties/error/msg"); var refMsgCnt = refMsg.substring(0, 1); if( refMsgCnt == "0" ) { model.removeNodeset("/root/main/opPatlist/opPatInfo"); if(chk_opnmen.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "0"; } if(chk_opnmkr.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "0"; } if(chk_afopnm.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "0"; } model.refresh(); return; }else { var ii = 0 ; var wCnfmDT = ""; var sRoomCd = ""; var wRoomCd = model.getValue("/root/main/opPatlist/opPatInfo[1]/oproomcd"); for(var i = 1; i<=iRows; i++) { wCnfmDT = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/opcnfmdd") + model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/fstrgstdt").substr(0,4); model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/fstrgstdt", wCnfmDT); sRoomCd = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/oproomcd"); callyn = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/callyn"); opflagcd = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/opflagcd"); if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/delivefact") != "") { grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("delivefactyn")) = "../../../com/commonweb/images/icon_list.gif"; }else{ grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("delivefactyn")) = ""; } if(model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp1") == "Y" || model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp2") == "Y" || model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp3") == "Y" ){ sDispCnt++; } //°¨¿°Á¤º¸ if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp1") == "Y") { grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp1img")) = "../../../com/hismainweb/images/injector_en.gif"; }else{ grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp1img")) = ""; } if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp2") == "Y") { grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp2img")) = "../../../com/hismainweb/images/touch_en.gif"; }else{ grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp2img")) = ""; } if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/disp3") == "Y") { grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp3img")) = "../../../com/hismainweb/images/air_en.gif"; }else{ grd_oppatlist.cellstyle("background-image", i, grd_oppatlist.colRef("disp3img")) = ""; } if(model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/uncnfm") != "0/0/0"){ sPrcpCnt++; } //º¯°æ¿©ºÎ var cnfmcnclresncd = model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd"); if( ( cnfmcnclresncd == "302" )||( cnfmcnclresncd == "303" ) ) {//¼ö¼ú½Ã°£º¯°æ(ȯÀÚ, º´¿ø»çÀ¯) model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨à"); }else if( cnfmcnclresncd == "305" ) {//¼ö¼úÁýµµÀÇ º¯°æ model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Û"); }else if( cnfmcnclresncd == "301" ) {//¼ö¼ú¸í º¯°æ model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Ú"); }else if( cnfmcnclresncd == "307" ) {//¸¶Ãë¹æ¹ý º¯°æ model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Í"); }else if( cnfmcnclresncd == "306" ) {//¼ö¼ú¹æ º¯°æ model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Þ"); }else if( cnfmcnclresncd == "308" ) {//¼ö¼úÁýµµ°ú º¯°æ model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨Ð"); }else if( cnfmcnclresncd == "309" ) {//¼ö¼úüÀ§ º¯°æ model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", "¨ß"); }else{ model.setValue("/root/main/opPatlist/opPatInfo["+i+"]/cnfmcnclresncd", ""); } if( wRoomCd != sRoomCd ) { ii++; wRoomCd = sRoomCd; } if( ii % 2 == 0 ) {//¦¼ö grd_oppatlist.rowstyle( i , "data", "background-color") = "#FFFFFF"; }else { grd_oppatlist.rowstyle( i , "data", "background-color") = "#F7FFF7"; } if( (opflagcd == "1")||(opflagcd == "3") ){//Á¤±Ô, Ãß°¡ grd_oppatlist.rowstyle( i , "data", "color") = "#2D2D2D"; } if( opflagcd == "2" ) {//ÀÀ±Þ grd_oppatlist.rowstyle( i , "data", "color") = "#D22D2D"; } // 2008-03-13 ¼öÁ¤ ¿äûÀ¸·Î... // 2008-08-22 ¿ÀÀü 10:27:32 ÁÖ¼®ÇØÁ¦ //if( opflagcd == "3" ) {//Ãß°¡ // grd_oppatlist.rowstyle( i , "data", "color") = "#000000"; //} if( callyn == "Y" ) {//È£Ãâ¿©ºÎ grd_oppatlist.rowstyle( i , "data", "background-color") = "#c9d6b9"; } if( opflagcd == "4" ) {//Ãë¼Ò grd_oppatlist.rowstyle( i , "data", "color") = "#2D2DD2"; } if (model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/opstatcd").substr(1,1)=="9") {//ÀÓ½ÃÃë¼Ò grd_oppatlist.rowstyle( i , "data", "color") = "#2D2DD2"; } // ¸¶Ãëȸº¹½Ç ÀÀ±ÞCCDBAG »ç¿ë Çß´ÂÁö ¿©ºÎ¿¡ µû¶ó ¸é»ö Ç¥±â if( model.getValue("/root/main/opPatlist/opPatInfo["+i+"]/aerbgcd") != ""){ grd_oppatlist.cellStyle("background-color",i, grd_oppatlist.colRef("ccrtstatnm"), i, grd_oppatlist.colRef("ccrtstatnm")) = "#FFFF00"; } } if(chk_opnmen.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdenm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "0"; } if(chk_opnmkr.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("opcdknm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "0"; } if(chk_diagnmen.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("diagengnm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("diagengnm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdenm")) = "0"; } if(chk_diagnmkr.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("diagcdnm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("diagcdnm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("opcdknm")) = "0"; } if(chk_afopnm.value == "Y"){ grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = false; //grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "115"; }else{ grd_oppatlist.colHidden(grd_oppatlist.colRef("afopnm")) = true; //grd_oppatlist.colWidth(grd_oppatlist.colRef("afopnm")) = "0"; } } // Ç÷¾×ÁغñÀÚ ¸®½ºÆ® ¹× Ç÷¾×Ç¥½Ã ±â´É Á¶È¸ Ãß°¡_20091007(ByJA) var blodpreppatlist = ""; for(var i=1; i 0){ var sOprsrvno = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/oprsrvno"); var sInstcd = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/instcd"); var sOphistno = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/ophistno"); var sOphistcd = model.getValue("/root/main/opPatlist/opPatInfo["+grd_oppatlist.row+"]/ophistcd"); model.setAttribute("SuSulOrder_Oprsinfo_oprsrvno", sOprsrvno); model.setAttribute("SuSulOrder_Oprsinfo_instcd" , sInstcd); model.setAttribute("SuSulOrder_Oprsinfo_ophistno", sOphistno); model.setAttribute("SuSulOrder_Oprsinfo_ophistcd", sOphistcd); } } open("SMMNP01800", "", "100", "100", "SMMNP01800", "", ""); break; case 3://¸¶¾à󹿰ü¸® open("SMADT30400", "", "100", "100", "SMADT30400", "", ""); break; case 4://Ç÷¾×ºÒÃâ°ü¸® setParameter("SMMNR010_Param", "IPRC1"); open("SMMNR01000", "", "100", "100", "SMMNR01000", "", ""); break; case 5://ÇöÀå°Ë»çÀÔ·Â open("SMLLR91100", "", "100", "100", "SMLLR91100", "", ""); break; case 6://¹ÙÄÚµåÃâ·Â open("SMLLC00200", "", "100", "100", "SMLLC00200", "", ""); break; case 7://NAME LABEL Ãâ·Â group5.visible = true;//Ãâ·ÂÀå¼ö ¼±Åà //var iRow = -1; //iRow = grd_oppatlist.row; //var pid = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/pid"); //var hngnm = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/hngnm"); //var sexage = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/sa"); //fPrintNameLabel(pid, hngnm, sexage); break; case 8://¼ö¼ú°£È£±â·Ï open("SMMNP00300", "", "100", "100", "SMMNP00300", "", ""); break; case 9://¼ö¼ú½Ç Àü±¤ÆÇ°ü¸® open("SMMNP06100", "", "100", "100", "SMMNP06100", "", ""); break; case 10://´Ü¹®¸Þ½ÃÁö ¹ß¼Û open("SPZMS00100", "", "100", "100", "SPZMS00100", "", ""); break; case 11://ÀÌ¼Û¿ä¿øÈ£Ãâ var pid = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/pid"); var prcpnm = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/opcdknm"); var kind = "5";//±âŸ var arvposcd = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/startposcd"); var rsrvdt = ""; var startposcd = getUserInfo("dutplcecd"); fInsTranCallOP(pid, prcpnm, kind, rsrvdt, arvposcd, startposcd); modal("SMMNB01800" ,"", "200", "200", "SMMNB01800", "", ""); break; case 12://º¸È£ÀÚ È£Ãâ var iRow = -1; var message = ""; iRow = grd_oppatlist.row; var pid = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/pid" ); var patnm = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/hngnm" ); var oproomcd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oproomcd"); var oprsrvno = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno"); var sa = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/sa" ); var opdd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opcnfmdd"); var callyn = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/callyn"); var calltel = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/calltel"); var opstatcd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opstatcd"); var curtDate = getCurrentDate(); curtDate = curtDate.substring(0, 8); oproomcd = oproomcd.setReplaceWord("0", ""); //'0'À» °ø¹éÀ¸·Î ´ëü // 2009-03-02 ycd È£Ãâ Message ¼±Åà ±â´É Ãß°¡·Î ÀÎÇÏ¿© »èÁ¦ ó¸® //message = patnm + "(" + sa + ") º¸È£ÀÚºÐÀº ¼ö¼ú½Ç ÀÔ±¸·Î ¿À½Ã±â ¹Ù¶ø´Ï´Ù."; if( (opstatcd == "10")||(opstatcd == "19")||(opstatcd == "20")||(opstatcd == "29")||(opstatcd == "39")||(opstatcd == "49")||(opstatcd == "50")||(opstatcd == "70") ){ messageBox("¼ö¼ú ¿¹Á¤, Ãë¼Ò, Á¾·á ȯÀÚ´Â º¸È£ÀÚ È£ÃâÀ»", "E001"); return; } if( opdd == curtDate ) { if( oprsrvno != "" ) { if( callyn == "Y" ) { messageBox("ÀÌ¹Ì È£Ãâ Áß ", "E008"); }else { if( calltel == "" ) {//È£Ãâ ÀüÈ­¹øÈ£°¡ ¾øÀ¸¸é NÀ¸·Î ¼ÂÆÃ //calltel = "N"; messageBox("È£Ãâ ÀüÈ­¹øÈ£°¡ ", "I004"); return; } //2009-03-02 YCD Message ¼±Åà ȭ¸é Parameter ¼³Á¤ ¹× È£Ãâ Ãß°¡ setParameter("SPMNP00101_Param", "patnm¢Ëoproomcd¢Ì" + patnm + "¢Ë" + oproomcd + "¢Ì"); setParameter("SPMNP00101_RtnData", ""); modal("SPMNP00101"); message = getParameter("SPMNP00101_RtnData"); if(message == ""){ return; } model.removenode("/root/send"); model.makeValue("/root/send/savedata/oprsrvno", oprsrvno); model.makeValue("/root/send/savedata/message", message); model.makeValue("/root/send/savedata/calltel", calltel); model.makeValue("/root/send/savedata/patnm", patnm); model.makeValue("/root/send/savedata/callyn", callyn); model.makeValue("/root/send/savedata/stat", "I"); submit("TXMNP00101"); messageBox("È£Ãâ ", "I002"); } }else { messageBox("¼ö¼ú¿¹¾à¹øÈ£°¡ ", "I004"); } }else { messageBox("ÇöÀç ³¯Â¥ ÀÌ¿ÜÀÇ È¯Àڴ ȣÃâ ", "E001"); } fSelectPos(); break; case 13://º¸È£ÀÚ È£ÃâÃë¼Ò var iRow = -1; iRow = grd_oppatlist.row; var oprsrvno = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno"); var callyn = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/callyn"); var opdd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opcnfmdd"); var curtDate = getCurrentDate(); curtDate = curtDate.substring(0, 8); if( opdd == curtDate ) { if( oprsrvno != "" ) { if( callyn != "Y" ) { messageBox("¹ÌÈ£Ãâ »óÅ ", "E008"); }else { model.removenode("/root/send"); model.makeValue("/root/send/savedata/oprsrvno", oprsrvno); model.makeValue("/root/send/savedata/stat", "C"); submit("TXMNP00101"); messageBox("È£Ãâ Ãë¼Ò¸¦ ", "I002"); } }else { messageBox("¼ö¼ú¿¹¾à¹øÈ£°¡ ", "I004"); } }else { messageBox("ÇöÀç ³¯Â¥ ÀÌ¿ÜÀÇ È¯Àڴ ȣÃâ Ãë¼Ò", "E001"); } fSelectPos(); break; case 14://ÀÔ ½Ç Ãë ¼Ò // Á÷À§ 1140:°£È£»ç, 1110:¼ö°£È£»ç // if (getUserInfo("jobposcd") == "1140" || // getUserInfo("jobposcd") == "1110" ) { // fInOutRoomSave("9"); // ¼ö¼ú±â·Ï 1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò µî·Ï/¼öÁ¤/»èÁ¦ ¿äûÀ» ó¸®ÇÑ´Ù. // } else { // alert("ÀÔ½Ç Ãë¼Ò´Â ¼ö°£È£»ç ¼±»ý´Ô¸¸ °¡´ÉÇÕ´Ï´Ù.("+getUserInfo("jobkindnm")+")"); // return; // } fInOutRoomSave("9"); // ¼ö¼ú±â·Ï 1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò µî·Ï/¼öÁ¤/»èÁ¦ ¿äûÀ» ó¸®ÇÑ´Ù. break; case 15://Àç¼ö¼ú ½ÂÀÎ/Ãë¼Ò // 2009-03-02 YCD Àç¼ö¼úÀÏ °æ¿ì ¼ö¼úÀüÁغñÈ®ÀÎ ¾øÀÌ °£È£±â·ÏÀÌ °¡´ÉÇϵµ·Ï ó¸® Çϱâ À§ÇÏ¿© Àç¼ö¼ú üũ ´©¶ô°Ç¿¡ ÇÑ¿¡¼­ °£È£¿¡¼­ // Àç¼ö¼ú ½ÂÀÎÀ» ÇÒ ¼ö ÀÖµµ·Ï ó¸®Çϵµ·Ï ÇÔ. Ãë¼Ò´Â °£È£»ç°¡ Àç¼ö¼ú ½ÂÀÎÇÑ °æ¿ì¿¡¸¸ °¡´ÉÇÔ. var iRow = -1; iRow = grd_oppatlist.row; var pid = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/pid" ); var patnm = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/hngnm" ); var oproomcd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oproomcd" ); var oprsrvno = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/oprsrvno" ); var sa = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/sa" ); var opdd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opcnfmdd" ); var callyn = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/callyn" ); var calltel = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/calltel" ); var opstatcd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/opstatcd" ); var reopflag = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/reopflag" ); var nursreoprgstid = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/nursreoprgstid" ); var nursreoprgstdt = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/nursreoprgstdt" ); var nursreopcncldt = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/nursreopcncldt" ); var indd = model.getValue("/root/main/opPatlist/opPatInfo[" + iRow + "]/iindd" ); var procflag = "E"; //R : Àç¼ö¼ú ó¸®, C : Àç¼ö¼ú Ãë¼Ò, E : ½ÇÇà Á¾·á ó¸® var rtnmsg = ""; if(reopflag == "Y"){ //Àç¼ö¼ú üũ°¡ µÇ¾î ÀÖÀ» °æ¿ì if(nursreoprgstid == "-"){ procflag = "E"; messageBox("ÀÇ»ç Àç¼ö¼ú ÁöÁ¤ ½ºÄÉÁìÀÔ´Ï´Ù.", "I000"); return; }else{ procflag = "C"; } }else{ procflag = "R"; } if(procflag == "R"){ rtnmsg = messageBox("Àç¼ö¼ú 󸮸¦","Q004"); }else if(procflag == "C"){ rtnmsg = messageBox("Àç¼ö¼ú Ãë¼Ò 󸮸¦","Q004"); }else{ return; } if(rtnmsg == "6"){ model.removenode("/root/send"); model.makeValue("/root/send/savedata/oprsrvno" , oprsrvno ); model.makeValue("/root/send/savedata/procflag" , procflag ); model.makeValue("/root/send/savedata/pid" , pid ); model.makeValue("/root/send/savedata/opcnfmdd" , opdd ); submit("TXMNP00103"); }else{ return; } fSelectPos(); break; case 16: var pid = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/pid"); var hngnm = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/hngnm"); var orddeptcd = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/orddeptcd"); var medispclid = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/medispclid"); var diag = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/diagcdnm"); var diagcd = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/diagcd"); var sexagestr = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/sa").split("/"); if( sexagestr[0] == "F" ){ var sex = "¿©ÀÚ"; } if( sexagestr[0] == "M" ){ var sex = "³²ÀÚ"; } var age = sexagestr[1]; var wardcd = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/wardcd"); var roomcd = model.getValue("/root/main/opPatlist/opPatInfo[" + grd_oppatlist.row + "]/patposplcecd"); var ioflag = "I"; setParameter("SMMQR00100_PARAM", pid + "¢Ë" + hngnm + "¢Ë" + orddeptcd + "¢Ë" + medispclid + "¢Ë" + diag + "¢Ë" + diagcd + "¢Ë" + sex + "¢Ë" + age + "¢Ë" + wardcd + "¢Ë" + roomcd + "¢Ë" + ioflag); modal("../../../emr/qiweb/xrw/SMMQR00100", "","", "", "SMMQR00100", "", ""); break; default : break; } // } } // -------------------------------------------------------------------------- // ¼ö¼ú±â·Ï 1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò µî·Ï/¼öÁ¤/»èÁ¦ ¿äûÀ» ó¸®ÇÑ´Ù. // -------------------------------------------------------------------------- function fInOutRoomSave(pFlag){ model.removenode("/root/send"); var wRow = grd_oppatlist.row; var wDataPath = "/root/main/opPatlist/opPatInfo[" + wRow + "]" sPid = model.getValue(wDataPath + "/pid" ); // 01 ȯÀÚ¹øÈ£ sOprsrvno = model.getValue(wDataPath + "/oprsrvno"); // 02 ¼ö¼ú¿¹¾à(ÀÇ·Ú)¹øÈ£(³âµµ+ÀϷùøÈ£) sOphistno = model.getValue(wDataPath + "/ophistno"); // 03 ¿¹¾à¹øÈ£¿¡µû¸¥À̷¹øÈ£ sInstcd = model.getValue(wDataPath + "/instcd" ); // 04 ±â°üÄÚµå sJobProc = "pid" + "¢Ë" // 01 ȯÀÚ¹øÈ£ + "oprsrvno" + "¢Ë" // 02 ¼ö¼ú¿¹¾à + "ophistno" + "¢Ë" // 03 À̷¹øÈ£ + "instcd" + "¢Ë" // 04 ±â°üÄÚµå + "jobflag" + "¢Ì" // 05 ÀÛ¾÷±¸ºÐ(1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò) + sPid + "¢Ë" // 01 ȯÀÚ¹øÈ£ + sOprsrvno + "¢Ë" // 02 ¼ö¼ú¿¹¾à + sOphistno + "¢Ë" // 03 À̷¹øÈ£ + sInstcd + "¢Ë" // 04 ±â°üÄÚµå + pFlag + "¢Ì" // 05 ÀÛ¾÷±¸ºÐ(1:ÀÔ½ÇÀúÀå,2:Åð½ÇÀúÀå,9:ÀÔ½ÇÃë¼Ò) model.makeValue("/root/send/JobProc", sJobProc); //alert(sJobProc); if (submit("TXMNP00102")){ // ¼ö¼ú°£È£±â·ÏÁ¤º¸ ÀÔ½ÇÃë¼Ò messageBox("ÀÔ½ÇÃë¼Ò°¡", "I002" ); } } /** * @group : * @ver : 2008.08.01 * @by : dhkim * @--------------------------------------------------- * @type : function * @access : public * @desc : ȯÀÚ name¶óº§ Ãâ·Â * @param : * @return : * @--------------------------------------------------- */ function fPrintNameLabel(pid, hngnm, sexage, oproomcdnm, depthngnm, prncnt, pPort,roomcd, allyn){ ////////////////////////////////////////////////////////////////////////////////////////// ¿øº»_20090522 // //20080905 portã±â // //portÁ¤º¸ °¡Á®¿À±â // model.removenode('/root/send'); // model.removenode('/root/main/barcdprntsetup'); // model.makenode('/root/main/barcdprntsetup'); // model.makeValue('/root/send/scrnid', 'SMMNP00100'); // if(submit('TRLLC90101')){ // pPort = model.getValue('/root/main/barcdprntsetup/prntsetupinfo/setupinfo[1]/comm02/comm'); // } // // if(document.all("CommAX") != null) { // //¹ÙÄÚµå Ãâ·Â ½ÃÀÛ // // 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") { // // var iLeft = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/left"); // var iTop = model.getValue("/root/main/barcdprntsetup/prntsetupinfo/setupinfo/blank/top"); // // if(iLeft == "" || iLeft == "-"){ // iLeft = 0; // } // if(iTop == "" || iTop == "-"){ // iTop = 0; // } // // var sData = "^XA^LH0,20";//Ãâ·Â½ÃÀÛÁ¡ // // //Ãâ·ÂÀÏ // var prndd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2); // sData += "^CFA,20,20";//bold, height, width // sData += "^FO10,20";//À§Ä¡ÁöÁ¤(xÃà, yÃà) // sData += "^FD"+ prndd + "^FS"; // // //¼ö¼úÁ¤º¸ // var opinfo = oproomcdnm + "R " + depthngnm + " " + pid; // sData += CommAX.PrtImgOut(20, 60, opinfo, 1, 1);//PrtImgOut(xÃà, yÃà, data, width, heigt) // sData += CommAX.HanImageData(); // // // //ȯÀÚ¸í // //±ÛÀÚ¼ö°¡ 4ÀÌ»óÀ̸é leftÁ¤·Ä 4ÀÌÇÏÀ̸é centerÁ¤·Ä // var hx = 20; var hy = 105; // /*var len = hngnm.length; // if(len > 4){ // hx = 10; // }else if(len == 4){ // hx = 90; // }else if(len == 3){ // hx = 120; // }else if(len == 2){ // hx = 150; // }else if(len == 1){ // hx = 180; // }*/ // sData += CommAX.PrtImgOut(hx, hy, hngnm, 2, 2);//PrtImgOut(xÃà, yÃà, data, width, heigt) // sData += CommAX.HanImageData(); // // //sexage // sData += "^CFE,20,20"; // sData += "^FO300,120";//À§Ä¡ÁöÁ¤ // sData += "^FD"+ sexage + "^FS"; // // sData += "^PQ"+ prncnt + "^XZ";//Ãâ·ÂÀå¼ö // // CommAX.SendMessage(sData); // Ãâ·Â // CommAX.PortOpen("false"); // Ãâ·ÂÁ¾·á // // // } else { // messageBox("¾Æ·¡ »çÇ×À» È®ÀÎÈÄ ÀçÃâ·ÂÇØÁֽʽÿÀ." // + " \n 1.ÇÁ¸°Æ®¼³Á¤ È­¸é¿¡¼­ Åë½ÅÀ¯ÇüÀ» com À¸·Î ¼±ÅÃÇÑ °æ¿ì port ¹øÈ£ È®ÀÎ" // + " \n 2.ÄÉÀ̺í È®ÀÎ" // + " \n 3.¸ÕÀú Ãâ·ÂÁßÀÎ ¹ÙÄÚµå È®ÀÎ(¸ðµÎ Ãâ·ÂµÈ ÈÄ ÀçÃâ·ÂÇϽʽÿÀ.)", "I", ""); // return; // } // } /////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////// // SATO¿ë Ãß°¡_20090522(ByJA) if(prncnt > 0){ //1. ¹ÙÄÚµå ¶óº§ ¼³Á¤°ª Á¶È¸ var scrnid = "SMMNP00400"; model.removeNodeset("/root/main/barcdprntsetup"); fGetBarCodeInfo(scrnid); // CareCom.js lzzfMakeBrcdPrntObjHanDo("CommAX"); //2. ¹ÙÄÚµå ¶óº§ È¯°æ¼³Á¤ var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo"; var portOpenTF = fSetNursBarcdInfo(barcdRef); // CareCom.js ¹ÙÄÚµåÇÁ¸°Åͺ° ȯ°æ¼³Á¤(Zebra,SATO) /** *°³¹ßÀϽÃ: 2010.05.13 *°³¹ßÀÚ: ¾çõ´ö *¿äûº´¿ø: ¼¼Á¾º´¿ø *¿äûÆÄÆ®: °£È£ *°³¹ß³»¿ë: ¹ÙÄÚµå Ãâ·Â Çü½Ä º¯°æÀ¸·Î ¼öÁ¤ ó¸®(¼ö¼ú) */ if(allyn == "N") { fPrtORPatNameLabel(barcdRef, pid, hngnm, sexage, oproomcdnm, depthngnm, prncnt, roomcd); } else if(allyn == "Y") { fPrtAllORPatNameLabel(barcdRef); } return; //3. ȯÀÚ¶óº§Ãâ·Â var esc = String.fromCharCode(27); var sPrntKind = model.getvalue(barcdRef + "/prntkind"); var iLeft = model.getValue(barcdRef + "[1]/blank/left"); var iTop = model.getValue(barcdRef + "[1]/blank/top"); var prndd = getCurrentDate().substr(0,4) + "/" + getCurrentDate().substr(4,2) + "/" + getCurrentDate().substr(6,2); if(iLeft == "" || iLeft == "-"){ iLeft = 0; } if(iTop == "" || iTop == "-"){ iTop = 0; } // SATOÀÏ °æ¿ì if(sPrntKind == "2" || sPrntKind == "6" || sPrntKind == "7"){ // ½ÃÀÛÀ§Ä¡ ¼ÂÆÃ (A1aaaabbbb:Ãâ·Â ¿ëÁö ±Ô°Ý(aaaa:¼¼·ÎÅ©±â_ÃÖ´ë 2848, bbbb:°¡·ÎÅ©±â_ÃÖ´ë 832)) var sSndMsg = esc + "A" + esc + "A103500500"; // Ãâ·ÂÇÒ µ¥ÀÌÅÍ »ý¼º sSndMsg += esc + "V" + (parseInt(iTop)+20) + esc + "H" + (parseInt(iLeft)+50) + esc + "M" + prndd; sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+60 , parseInt(iLeft)+50, oproomcdnm + "R " + depthngnm + " " + pid, 1, 1); // ÇѱÛÃâ·Â½Ã PrtImgOutÇÔ¼ö ÀÌ¿ë sSndMsg += CommAX.PrtImgOut(parseInt(iTop)+105, parseInt(iLeft)+50, hngnm, 2, 2); // ÇѱÛÃâ·Â½Ã PrtImgOutÇÔ¼ö ÀÌ¿ë sSndMsg += esc + "V" + (parseInt(iTop)+120) + esc + "H" + (parseInt(iLeft)+320) + esc + "M" + sexage; // Á¾·á ¹× Ãâ·Â¹° Ãâ·Â¼ö·® sSndMsg += esc + "Q" + prncnt + esc + "Z"; var a = CommAX.SendMsg(sSndMsg); CommAX.PortOpen("false"); } // SATO°¡ ¾Æ´Ò °æ¿ì(±âÁ¸) else{ if(portOpenTF == "TRUE"){ var sData = "^XA^LH0,20";//Ãâ·Â½ÃÀÛÁ¡ sData += "^CFA,20,20^FO"+(parseInt(iLeft)+10)+","+(parseInt(iTop)+20)+"^FD"+ prndd + "^FS"; //Ãâ·ÂÀÏ bold, height, width, À§Ä¡ÁöÁ¤(xÃà, yÃà) sData += CommAX.PrtImgOut((parseInt(iLeft)+20),(parseInt(iTop)+60) , oproomcdnm + "R " + depthngnm + " " + pid, 1, 1);//¼ö¼úÁ¤º¸ PrtImgOut(xÃà, yÃà, data, width, heigt) sData += CommAX.HanImageData(); sData += CommAX.PrtImgOut((parseInt(iLeft)+20),(parseInt(iTop)+105), hngnm, 2, 2);//ȯÀÚ¸í ±ÛÀÚ¼ö°¡ 4ÀÌ»óÀ̸é leftÁ¤·Ä 4ÀÌÇÏÀ̸é centerÁ¤·Ä PrtImgOut(xÃà, yÃà, data, width, heigt) sData += CommAX.HanImageData(); sData += "^CFE,20,20^FO"+(parseInt(iLeft)+300)+","+(parseInt(iTop)+120)+"^FD"+ sexage + "^FS"; sData += "^PQ"+ prncnt + "^XZ";//Ãâ·ÂÀå¼ö CommAX.SendMessage(sData); // Ãâ·Â CommAX.PortOpen("false"); // Ãâ·ÂÁ¾·á } else { messageBox("¾Æ·¡ »çÇ×À» È®ÀÎÈÄ ÀçÃâ·ÂÇØÁֽʽÿÀ." + " \n 1.ÇÁ¸°Æ®¼³Á¤ È­¸é¿¡¼­ Åë½ÅÀ¯ÇüÀ» com À¸·Î ¼±ÅÃÇÑ °æ¿ì port ¹øÈ£ È®ÀÎ" + " \n 2.ÄÉÀ̺í È®ÀÎ" + " \n 3.¸ÕÀú Ãâ·ÂÁßÀÎ ¹ÙÄÚµå È®ÀÎ(¸ðµÎ Ãâ·ÂµÈ ÈÄ ÀçÃâ·ÂÇϽʽÿÀ.)", "I", ""); return; } } } } /** * @group : * @ver : 2007.10.17 * @by : Grace * @--------------------------------------------------- * @type : function * @access : public * @desc : Exel ÀúÀå * @param : * @return : * @--------------------------------------------------- */ function fSaveExcel(){ var opfromdd = model.getValue("/root/main/cond/opddfr"); var optodd = model.getValue("/root/main/cond/opddto"); model.removenode("/root/send"); model.makeNode("/root/send/reqdata"); model.copyNode("/root/send/reqdata", "/root/main/cond"); submit("TRMNP00106"); var fileName = window.fileDialog("save", ",", false, "¼ö¼ú½ºÄÉÁì("+opfromdd+"~"+optodd+")", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls"); if (fileName != "") { grd_excel.saveExcel(fileName, "SheetName", true, true, "", "", false); } } /** * @group : * @ver : 2009.10.12 * @by : ¾çõ´ö * @--------------------------------------------------- * @type : function * @access : public * @desc : ¼ö¼ú½Ç ÀÌ¼Û¿ä¿ø È£Ãâ ÇÔ¼ö * @param : * @return : * @--------------------------------------------------- */ function fInsTranCallOP(pid, prcpnm, kind, rsrvdt, arvposcd, startposcd){ setParameter("status", "OP"); setParameter("pid", pid); setParameter("prcpnm", prcpnm); setParameter("kind", kind); setParameter("rsrvdt", rsrvdt); setParameter("arvposcd", arvposcd); setParameter("startposcd", startposcd); modal("SMMNB01810" ,"", "300", "150", "SMMNB01810", "", ""); } /** * @desc : È­¸éID¿¡ ÇØ´çÇÏ´Â Ä÷³¼ø¼­¸¦ Á¶È¸ÇÑ´Ù. * @ * @param : * @return : * @author : ±è¿µÇÐ * @--------------------------------------------------- */ function reqOrderInfoOfCol(scrnid, grdid, compscd){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/scrnid" , scrnid); model.makeValue("/root/send/reqdata/compscd" , compscd); if(submit("TRMNB02401", false)){ var refdata = model.getValue("/root/init/userscrnenvinfo/gridseq/compsrefcnts"); var sizedata = model.getValue("/root/init/userscrnenvinfo/gridseq/compssizecnts"); if(refdata != "" || sizedata != ""){ setOrderInfoOfCol(grdid , refdata, sizedata); } } } function setOrderInfoOfCol(grdID, refdata, sizedata){ var grdObj = document.controls.item(grdID); var refArray = refdata.split("^"); var sizeArray = sizedata.split("^"); for(var i = 0; i < refArray.length; i++){ var colcnt = grdObj.colref("" + refArray[i] + ""); if (colcnt <0 ) colcnt = 0; // À̵¿ Ä÷³°ú ´ë»óÄ÷³ÀÇ À妽º°¡ °°Áö ¾ÊÀº °æ¿ì¸¸ À̵¿. if (colcnt != i) { grdObj.colMove(i, colcnt, "before", false); } var size = sizeArray[i]; if(size == 0){ // size of column 0 -> hidden grdObj.colHidden(i) = true; }else{ grdObj.colHidden(i) = false; } grdObj.colWidth(i) = eval(size); } model.refresh(); } function fColumSetMove(scrnid, grd_nm) { // Ä÷³ ¼ø¼­ ÀúÀå¿¡ µû¸¥ ºÒ·¯¿À±â Ãß°¡ : 2009. 10. 11 han19 var sWardCD = getScreenMenuParameter();//model.getValue("/root/main/cond/wardcd") //20080725_¸Þ´º¼³Á¤¿¡ µû¸¥ ±×¸®µå µ¿Àû»ý¼ºÀ¸·Î º¯°Ï(ByJA) var prestimportid = model.getValue("/root/main/cond/prestimportid"); var compscd = ""; if(prestimportid == "nm") { if (sWardCD == "Partrtn") { // ºÐ¸¸ compscd = "PA"; } else if(sWardCD == "NBaby"){ // ½Å»ý¾Æ compscd = "NB"; } else if(sWardCD == "BMT"){ //BMT compscd = "BT"; } else if(sWardCD == "spclinj"){ // Ư¼öÁÖ»ç½Ç compscd = "SJ"; } else { compscd = "NM"; } } else if (prestimportid == "td") { // Todo List : Ä÷³¼³Á¤Àº ÇÏÁö ¾ÊÁö¸¸ ±¸ºÐ°ªÀº ³Ö¾î³õÀ½ compscd = "TD"; } else if (prestimportid =="om") { // Order Manage compscd = "OM"; } else { if (sWardCD == "Partrtn") { // ºÐ¸¸ compscd = "PA"; } else if(sWardCD == "NBaby"){ // ½Å»ý¾Æ compscd = "NB"; } else if(sWardCD == "BMT"){ //BMT compscd = "BT"; } else if(sWardCD == "spclinj"){ // Ư¼öÁÖ»ç½Ç compscd = "SJ"; } else { compscd = "NM"; } } reqOrderInfoOfCol(scrnid, grd_nm, compscd); // Ä÷³ ¼ø¼­ ÀúÀå¿¡ µû¸¥ ºÒ·¯¿À±â Ãß°¡ : 2009. 10. 11 han19 } /* ------------------------------------------------- */ /* ------End Of List ------------------------------- */ /* -------------------------------------------------- */