/* - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì °ü½ÉȯÀÚµî·Ï (SPMMO08200_°ü½ÉȯÀÚµî·Ï.xrw - JScript ) - ¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì¢Ì */ var sPATINFO_PARAM; // ȯÀÚÀÇ µî·Ï¹øÈ£, ÀÔ¿ø(¿Ü·¡)ÀÏÀÚ ¹× Çѱ۸íÀ» ¹Þ´Â Parameter var sINPATINFO_PATH = "/root/hidden/patinfo"; var sCONCPATINFO_PATH = "/root/main/concpatinfo/concpatinfo"; var sCONCPATINFOHIST_PATH = "/root/main/concpatinfohist/concpatinfohist" var sCONDITION_PATH = "/root/main/cond"; /** * @desc : È­¸é ÃʱâÈ­ * @ * @param : * @return : * @--------------------------------------------------- */ function fInitialize(){ model.setValue("/root/init/today", getCurrentDate()); model.setValue("/root/main/concpatinfo/concpatinfo/valifromdd", getCurrentDate()); model.setValue("/root/main/concpatinfo/concpatinfo/valitodd", "99991231"); zbcfGetCodeList(new Array("M0001"), new Array("/root/init/M0001")); model.refresh(); if(checkOpener()){ sPATINFO_PARAM = opener.javascript.getParameter("param"); fSetPatInfo(sPATINFO_PARAM); fReqConcPatInfo(grd_concpatinfohist); //°ü½ÉȯÀÚ Á¤º¸ Á¶È¸ fReqConcTypeCd(); //°ü½ÉºÐ·ùÄÚµå Á¶È¸ } } /** * @desc : °ü½ÉȯÀÚ Á¤º¸ ¼³Á¤ * @ * @param : * @return : * @--------------------------------------------------- */ function fSetPatInfo(param){ //param±¸Á¶ genrflagcd + "¢Ì" + pid + "¢Ì" + hngnm + "¢Ì" + indd + "¢Ì" + cretno + "¢Ì" + seqno + "¢Ì" + instcd; if(param != ""){ var paramArray = param.split("¢Ì"); model.setValue(sCONCPATINFO_PATH + "/pid" , paramArray[1]); model.setValue(sCONDITION_PATH + "/dd" , paramArray[3]); model.setValue(sCONCPATINFO_PATH + "/hngnm" , paramArray[2]); model.setValue(sCONCPATINFO_PATH + "/instcd" , paramArray[6]); model.setValue(sCONCPATINFO_PATH + "/valifromdd", model.getValue("/root/init/today")); } else{ var paminfo = getGlobalVariable("paminfo"); setCSVToNode("/root/paminfo", paminfo); model.setValue(sCONCPATINFO_PATH + "/pid" , getPatientInfo("pid")); model.setValue(sCONDITION_PATH + "/dd" , model.getValue("/root/paminfo/list/indd")); model.setValue(sCONCPATINFO_PATH + "/hngnm" , getPatientInfo("pname")); model.setValue(sCONCPATINFO_PATH + "/instcd" , getUserInfo("posinstcd")); model.setValue(sCONCPATINFO_PATH + "/valifromdd", model.getValue("/root/init/today")); } model.refresh(); } /** * @desc : °ü½ÉȯÀÚ Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqConcPatInfo(grdObj){ model.copyNode("/root/send/reqdata", sCONCPATINFO_PATH); model.makeValue("/root/send/reqdata/conckindcd", model.getValue(sCONCPATINFO_PATH + "/conckindcd")); model.refresh(); if(submit("TRMMO08203")){ var totRow = grdObj.rows - grdObj.fixedRows + 1; if(totRow < 2){ model.setValue(sCONDITION_PATH + "/status", "i"); model.setValue(sCONDITION_PATH + "/statusnm", "½Å±Ôµî·Ï"); model.refresh(); }else{ model.copyNode(sCONCPATINFO_PATH, sCONCPATINFOHIST_PATH + "[" + 1 + "]"); } } } /** * @desc : °ü½ÉȯÀÚ Á¤º¸ ¼öÁ¤ »óÅ·Πº¯°æ * @ * @param : * @return : * @--------------------------------------------------- */ function fSetUpdtStatus(){ var status = model.getValue(sCONDITION_PATH + "/status"); if(status == "i"){ return; }else{ model.setValue(sCONDITION_PATH + "/status", "u"); model.setValue(sCONDITION_PATH + "/statusnm", "¼öÁ¤ Áß"); } model.refresh(); } /** * @desc : ½Å±Ô °ü½ÉȯÀÚ µî·Ï * @ * @param : * @return : * @--------------------------------------------------- */ function fRgstNewConcPatInfo(){ model.resetInstanceNode(sCONCPATINFO_PATH); fSetPatInfo(sPATINFO_PARAM); model.setValue(sCONCPATINFO_PATH + "/conckindcd", "P"); model.setValue(sCONDITION_PATH + "/status" , "i"); model.setValue(sCONDITION_PATH + "/statusnm" , "½Å±Ôµî·Ï"); //model.setValue(sCONDITION_PATH + "/valitodd" , "99991231"); //091103 ¹ÚÀ¯Áø ÃʱâÈ­½Ã Ãʱâ todd ÁöÁ¤µÇÁö ¾Ê¾Æ ¼öÁ¤ÇÔ. model.setValue(sCONCPATINFO_PATH + "/valitodd" , "99991231"); model.refresh(); } /** * @desc : °ü½ÉºÐ·ù¸í ¹× ÄÚµå Á¶È¸ * @ * @param : * @return : * @--------------------------------------------------- */ function fReqConcTypeCd(){ model.removeNodeset("/root/send/reqdata"); model.makeValue("/root/send/reqdata/conckindcd", model.getValue(sCONCPATINFO_PATH + "/conckindcd")); if(submit("TRMMO08301")){ } } /** * @desc : °ü½ÉȯÀÚÁ¤º¸ ÀúÀå * @ * @param : * @return : * @--------------------------------------------------- */ function fSaveConcPatInfo(){ if(ipt_pid.value == ""){ messageBox("µî·Ï¹øÈ£¸¦", "C001"); return; } if(opt_unitcd.value == ""){ messageBox("ȯÀÚ¸íÀ»", "C001"); return; } var conctypecd = model.getValue(sCONCPATINFO_PATH + "/conctypecd"); if(conctypecd == ""){ //°ü½ÉºÐ·ù¸íÀ» ¼±ÅÃÇÏÁö ¾ÊÀº °æ¿ì error!! messageBox("ºÐ·ù¸íÀ»", "C001"); return; } model.copyNode("/root/send/savedata" , sCONCPATINFO_PATH); model.makeValue("/root/send/savedata/status", model.getValue(sCONDITION_PATH + "/status")); if(submit("TXMMO08203")){ var rsltnode = model.instance1.selectNodes(sCONCPATINFOHIST_PATH); if(rsltnode.length > 0){ grd_concpatinfohist.row = 1; fSelectConcPatInfo(); } } } /** * @desc : °ü½ÉȯÀÚÁ¤º¸ ¼±Åà - »ó¼¼ Á¤º¸¸¦ º¸¿©ÁÜ, ¼öÁ¤ÇÒ ¼ö ÀÖµµ·Ï ó¸®ÇÔ * @ * @param : * @return : * @--------------------------------------------------- */ function fSelectConcPatInfo(){ var currow = grd_concpatinfohist.row; model.copyNode(sCONCPATINFO_PATH, sCONCPATINFOHIST_PATH + "[" + currow + "]"); model.setValue(sCONDITION_PATH + "/status" , "u"); model.refresh(); } /** * @desc : µî·Ï¹øÈ£·Î ȯÀÚ°Ë»ö * @ * @param : * @return : * @--------------------------------------------------- */ function fAfSignPatSrch(){ var fPid = model.getValue("/root/main/concpatinfo/concpatinfo/pid"); if(fPid == ""){ fPid = getPatientInfo("pid"); } if(fPid == ""){ messageBox("µî·Ï¹øÈ£¸¦", "C001"); return; } model.setValue ( "/root/send/cond1", "1"); model.setValue ( "/root/send/cond2", fPid); model.setValue ( "/root/send/cond3", getUserInfo("dutplceinstcd")); model.setValue ( "/root/send/cond4", "N"); model.setValue ( "/root/send/cond5", "N"); model.setValue ( "/root/send/cond6", "-"); model.setValue ( "/root/send/cond10", ((getCurrentDate().toDate()).getAddDate(-3,"M")).getDateFormat()); model.setValue ( "/root/send/cond11", getCurrentDate()) if (!submit ( "TRMMO00200",false )) { //°Ë»ö ½ÃÀÛ °ªÀÌ ¾øÀ¸¸é clear ÇÑ´Ù. fClearAddPrcp(); return; } var srcNodeList = model.instances(0).selectNodes("/root/patordinfo/patordinfolist"); var currentDate = getCurrentDate(); setParameter ( "SPMMO09100_paminfoyn", "N"); //model.setValue("/root/formerkey/pseuacptflag", "N"); if ( srcNodeList.length >= 1 ) { //°ªÀÌ ÇѰ³ÀÌ»óÀÌ¸é ÆË¾÷À» ¶ç¿î´Ù. var xpt = window.screenleft + 50; var ypt = window.screenTop + 80; var coord = getRelativeCoordinate ( xpt, ypt ); var mon = coord[0]; xpt = coord[1]; ypt = coord[2]; modal ( "SPMMO09100", mon, xpt, ypt, "patordinfo", "/root/patordinfo", "/root/patordinfo", "", false ); // ÆË¾÷¿¡¼­ Ãë¼Ò ½Ã À̺¥Æ® ó¸® var cancelKey = getParameter ( "SPMMO09100_rtnyn"); if (cancelKey != "Y") { fClearAddPrcp(); clearParameter("SPMMO09100_rtnyn" ); clearParameter("SPMMO09100_paminfoyn" ); return ; } model.removeNodeset("/root/patordinfo/patordinfolist"); var rtnparam = getParameter( "SPMMO09100_rtn_param"); setCSVToNode("/root/patordinfo", rtnparam, "patordinfolist"); var pid = getParameter ( "SPMMO09100_pid" ); var orddd = getParameter ( "SPMMO09100_orddd"); var cretno = getParameter ( "SPMMO09100_cretno"); var instcd = getParameter ( "SPMMO09100_instcd"); var ioflag = getParameter ( "SPMMO09100_ioflag"); var orddeptcd = getParameter ( "SPMMO09100_orddeptcd"); var orddrid = getParameter ( "SPMMO09100_orddrid"); var indschacptstat = getParameter ( "SPMMO09100_indschacptstat"); var dschdd = getParameter ( "SPMMO09100_dschdd"); var insukind = getParameter ( "SPMMO09100_insukind"); var suppkind = getParameter ( "SPMMO09100_suppkind"); model.setValue("/root/main/concpatinfo/concpatinfo/hngnm", model.getValue("/root/patordinfo/patordinfolist/hngnm")); model.setValue("/root/main/cond/dd", model.getValue("/root/patordinfo/patordinfolist/orddd")); model.setValue("/root/main/concpatinfo/concpatinfo/instcd", model.getValue("/root/patordinfo/patordinfolist/instcd")); /* if ( getParameter ( "SPMMO09100_dc") != "DC" ) { // Áø·áÀϰú ÇöÀçÀÏÀÌ ´Ù¸¥ °æ¿ì °¡Á¢¼ö ÈÄ µ¥ÀÌŸ ¼ÂÆÃ. 20090604 Åð¿øÈÄ ¹Ù·Î °¡Á¢¼ö󸮰Ƕ§¹®¿¡ ¿Ü·¡¿¡¸¸ Àû¿ë. //if ( currentDate != orddd ) { if ( currentDate != orddd && (ioflag == "O" || ioflag == "S")) { // Áø´Ü¸í Á¶È¸¸¦ À§ÇÑ ±¸ Ű ¼ÂÆÃ model.setValue("/root/formerkey/pid", pid); model.setValue("/root/formerkey/orddd_old", orddd); model.setValue("/root/formerkey/cretno_old", cretno); model.setValue("/root/formerkey/instcd", instcd); model.setValue("/root/formerkey/genrflagcd_old", ioflag); model.setValue("/root/formerkey/pseuacptflag", "Y"); var returnkey = fSetAssumAccept(pid, orddd, cretno, "O"); if (returnkey == false) return ; pid = model.getValue ( "/root/execpatordinfo/execpatordinfolist/otpt_pid" ); orddd = model.getValue ( "/root/execpatordinfo/execpatordinfolist/otpt_orddd" ); cretno = model.getValue ( "/root/execpatordinfo/execpatordinfolist/otpt_cretno" ); model.setValue("/root/formerkey/orddd", orddd); model.setValue("/root/formerkey/cretno", cretno); model.setValue("/root/formerkey/genrflagcd", ioflag); } else if ( (ioflag == "I" || ioflag == "D" || ioflag == "E") && indschacptstat == "D" ) { // Áø´Ü¸í Á¶È¸¸¦ À§ÇÑ ±¸ Ű ¼ÂÆÃ model.setValue("/root/formerkey/pid", pid); model.setValue("/root/formerkey/orddd_old", orddd); model.setValue("/root/formerkey/cretno_old", cretno); model.setValue("/root/formerkey/instcd", instcd); model.setValue("/root/formerkey/genrflagcd_old", ioflag); model.setValue("/root/formerkey/pseuacptflag", "Y"); var returnkey = fSetAssumAccept(pid, orddd, cretno, "I", orddeptcd, orddrid, insukind, suppkind ); if (returnkey == false) return ; pid = model.getValue ( "/root/followup/followup/otpt_pid" ); orddd = model.getValue ( "/root/followup/followup/otpt_orddd" ); cretno = model.getValue ( "/root/followup/followup/otpt_cretno" ); ioflag = "O" ; // °­Á¦·Î ¿Ü·¡ ¼ÂÆÃ model.setValue( "/root/patordinfo/patordinfolist/ioflag", ioflag); model.setValue("/root/formerkey/orddd", orddd); model.setValue("/root/formerkey/cretno", cretno); model.setValue("/root/formerkey/genrflagcd", ioflag); } //} } */ clearParameter("SPMMO09100_pid" ); clearParameter("SPMMO09100_orddd"); clearParameter("SPMMO09100_cretno"); clearParameter("SPMMO09100_instcd"); clearParameter("SPMMO09100_ioflag"); clearParameter("SPMMO09100_orddeptcd"); clearParameter("SPMMO09100_orddrid"); clearParameter("SPMMO09100_indschacptstat"); clearParameter("SPMMO09100_dschdd"); clearParameter("SPMMO09100_dc"); clearParameter("SPMMO09100_insukind"); clearParameter("SPMMO09100_suppkind"); /* if ( isNull(pid )) { fClearAddPrcp(); } else { fAddPrcpInitConDone( pid, orddd, cretno, instcd, ioflag , "N", dschdd ); fPatDethInfo(); //»ç¸ÁȯÀÚ alert(2009.12.21 JJE) } */ } model.refresh(); } function fClearAddPrcp() { //cmb_prcpdd.visible = false; //cmb_issdept.visible = false; //cmb_hosinprcpresn.visible = false; //caption14.visible = false; //cmb_prcpkind.visible = false; // btn_prcpsave.disabled = true; //model.setValue ( "/root/init/srchcond2","" ); //model.setValue ( "/root/init/srchcond3","" ); //model.setValue ( "/root/init/rrgstno2","" ); //model.setValue ( "/root/init/orddeptnm","" ); //model.removeNodeSet ( "/root/main/diaginfo/diagcdlist"); //model.removeNodeSet ( "/root/main/prcp/prcplist"); //model.removeNodeSet ( "/root/paminfo/list"); //model.removeNodeSet ( "/root/patflag/list"); //output2.value = ""; //output3.value = ""; //output4.value = ""; //output6.value = ""; //output7.value = ""; //appendChildPrcp ( "/root/reset/prcplist", "/root/main/prcp", "main" ) //btn_prmsprcp.selected = true; //ivw_prcp.src = "SMMMO02300_¾à¼Óó¹æ.xrw"; //btn_issdept.visible = false; //model.refresh(); return; }