YNU_JEUS/app_home/himed/webapps/pam/opatmngtweb/js/PMOCOM.js

/* =================================================================================================
- 외래등록 PMOCOM.js
- 작성자       : 유정란
- 작성시작일자 : 2007.04.27
================================================================================================== */

var PMO001_MINDATE = "19000101";
var PMO001_MAXDATE = "99991231";
var PMO001_TODAY   = getCurrentDate().toString();

//global 변수 선언
var gsBoHeom    = "11";          //건강보험
var gsBoHo1     = "21";          //의료급여1
var gsBoHo2     = "22";          //의료급여2
var gsHangYeo   = "24";          //행여
var gsJaboKind  = "31";          //자보
var gsSanJae    = "41";          //산재
var gsGongSang  = "42";          //공상
var gsIlBan     = "51";          //일반
var gsForIn     = "61";          //외국인
var gsImSang    = "71";          //임상시험

//2007-08-31 이동식 추가
var boHeom_insucd = "0015"		 //건강보험 보험자 기호
/*
var supp_BASE   = "-";           //정상
var supp_100    = "C";           //본인100%
var supp_SJTR   = "D";           //보조 산정특례
var supp_GAEDU  = "R";           //개두술
var supp_GAESIM = "Q";           //개심술
var supp_AM     = "S";           //보조 암
var supp_INGONG = "I";           //인공신장
var supp_HANDI  = "O";           //장애인
var supp_JABH   = "B";           //전액보험자부담액(한도액)
var supp_IMSANG = "T";           //임상연구
var supp_LESSTHANSIXAGE = "U";   //6세미만
*/

//2007-08-31 이동식 추가 및 수정
var supp_BASE               = "00";           //정상
var supp_100                = "01";           //전액본인100%
var supp_INGONG             = "02";           //인공신장투석
var supp_BOKMAK             = "03";           //복막관류슐
var supp_LESSTHANSIXAGE     = "08";           //6세미만
var supp_NATRBABY           = "09";           //자연분만 0%
var supp_SJTR               = "07";           //보조 산정특례 20

//20090701 2.희귀난친성산정특례 고시적용
var supp_RAREOBST_SJ		= "50";			  //희귀난치성산정특례 10%
var supp_RAREOBST_SJ_HOME	= "51"; 		  //가정간호(희귀난치성산정특례 10%)
var RAREOBST_APPDD 			= "20091001"; 	  //적용일자 (7/1~9/30 유예기간, 10/1 적용)

//var supp_AM             	= "05";           //중증질환 10
var supp_GAESIMGAEDU      	= "05";           //개심,개두 10%
var supp_CANCER		        = "06";			  //등록암 10%
var supp_CANCER_HOME  		= "11"; 		  //가정간호(등록암 10%)
var supp_CANCER_HOME_HOSPICE= "56"; 		  //가정형 호스피스(등록암)


//var supp_GAEDU          	= "33";           //개두술
var supp_HOMECARE         	= "10";           //가정간호
var supp_SUTAK          	= "12";           //수탁
var supp_JSJA             	= "14";           //정신과정액
var supp_HANDI          	= "71";           //장애인
var supp_JABH             	= "19";           //전액청구
var supp_IMSANG           	= "T";            //임상연구
var ER                    	= "";
//END..

/**---------------------------------------------------
 * @desc   : 세션정보 추출하기 
 * @---------------------------------------------------
 */
function fGetUserInfosSampling(){
	var sUserInfosS = getUserInfos(); 
	
	sUserInfosS = sUserInfosS + "|";
	
	var UserInfosS_Array = sUserInfosS.split("|");
	
	var userid        = UserInfosS_Array[0];  //사용자번호
	var usernm        = UserInfosS_Array[1];  //사용자이름
	var posinstcd     = UserInfosS_Array[2];  //소속기관코드
	var posinstnm     = UserInfosS_Array[3];  //소속기관명
	var posdeptcd     = UserInfosS_Array[4];  //소속부서코드
	var posdeptnm     = UserInfosS_Array[5];  //소속부서명
	var dutplceinstcd = UserInfosS_Array[6];  //근무지기관코드
	var dutplceinstnm = UserInfosS_Array[7];  //근무지기관명
	var dutplcecd     = UserInfosS_Array[8];  //근무지부서코드
	var dutplcenm     = UserInfosS_Array[9];  //근무지부서명
	var jobkindcd     = UserInfosS_Array[10]; //직종코드
  var jobkindnm     = UserInfosS_Array[11]; //직종명
  var jobposcd      = UserInfosS_Array[12]; //직위코드
  var jobposnm      = UserInfosS_Array[13]; //직위명
  var jobrespcd     = UserInfosS_Array[14]; //직책코드
  var jobrespnm     = UserInfosS_Array[15]; //직책명
  var prfshipflagcd = UserInfosS_Array[16]; //교직구분코드
  var prfshipflagnm = UserInfosS_Array[17]; //고직구분명
  var licnsno       = UserInfosS_Array[18]; //자격면허번호
  var specordyn     = UserInfosS_Array[19]; //선택진료여부
  var deptabbr      = UserInfosS_Array[20]; //부서약어
  var orddeptflag   = UserInfosS_Array[21]; //진료과구분
  var wardflag      = UserInfosS_Array[22]; //병동구분
  var systemcd      = UserInfosS_Array[23]; //시스템코드
  var systemnm      = UserInfosS_Array[24]; //시스템명칭
  var systeminstcd  = UserInfosS_Array[25]; //시스템소속기관코드
  var systeminstnm  = UserInfosS_Array[26]; //시스템소속기관명
  var logindt       = UserInfosS_Array[27]; //로그인일시밀리쵸
  
  model.makeNode("/root/hidden/session/sess_" + "userid");
  model.makeNode("/root/hidden/session/sess_" + "usernm");
  model.makeNode("/root/hidden/session/sess_" + "posinstcd");
  model.makeNode("/root/hidden/session/sess_" + "posinstnm");
  model.makeNode("/root/hidden/session/sess_" + "posdeptcd");
  model.makeNode("/root/hidden/session/sess_" + "posdeptnm");
  model.makeNode("/root/hidden/session/sess_" + "dutplceinstcd");
  model.makeNode("/root/hidden/session/sess_" + "dutplceinstnm");
  model.makeNode("/root/hidden/session/sess_" + "dutplcecd");
  model.makeNode("/root/hidden/session/sess_" + "dutplcenm");
  model.makeNode("/root/hidden/session/sess_" + "jobkindcd");
  model.makeNode("/root/hidden/session/sess_" + "jobkindnm");
  model.makeNode("/root/hidden/session/sess_" + "jobposcd");
  model.makeNode("/root/hidden/session/sess_" + "jobposnm");
  model.makeNode("/root/hidden/session/sess_" + "jobrespcd");
  model.makeNode("/root/hidden/session/sess_" + "jobrespnm");
  model.makeNode("/root/hidden/session/sess_" + "prfshipflagcd");
  model.makeNode("/root/hidden/session/sess_" + "prfshipflagnm");
  model.makeNode("/root/hidden/session/sess_" + "licnsno");
  model.makeNode("/root/hidden/session/sess_" + "specordyn");
  model.makeNode("/root/hidden/session/sess_" + "deptabbr");
  model.makeNode("/root/hidden/session/sess_" + "orddeptflag");
  model.makeNode("/root/hidden/session/sess_" + "wardflag");
  model.makeNode("/root/hidden/session/sess_" + "systemcd");
  model.makeNode("/root/hidden/session/sess_" + "systemnm");
  model.makeNode("/root/hidden/session/sess_" + "systeminstcd");
  model.makeNode("/root/hidden/session/sess_" + "systeminstnm");
  model.makeNode("/root/hidden/session/sess_" + "logindt");  
  
  if (userid == null || userid == "" || userid == " " || userid == "-") userid = "pam";
  if (posinstcd == null || posinstcd == "" || posinstcd == " " || posinstcd == "-") posinstcd = "012";
  
  model.setValue("/root/hidden/session/sess_userid",userid);  
  model.setValue("/root/hidden/session/sess_usernm",usernm);  
  model.setValue("/root/hidden/session/sess_posinstcd",posinstcd);
  model.setValue("/root/hidden/session/sess_posinstnm",posinstnm);
  model.setValue("/root/hidden/session/sess_posdeptcd",posdeptcd);
  model.setValue("/root/hidden/session/sess_posdeptnm",posdeptnm);
  model.setValue("/root/hidden/session/sess_dutplceinstcd",dutplceinstcd);
  model.setValue("/root/hidden/session/sess_dutplceinstnm",dutplceinstnm);
  model.setValue("/root/hidden/session/sess_dutplcecd",dutplcecd);
  model.setValue("/root/hidden/session/sess_dutplcenm",dutplcenm);
  model.setValue("/root/hidden/session/sess_jobkindcd",jobkindcd);
  model.setValue("/root/hidden/session/sess_jobkindnm",jobkindnm);
  model.setValue("/root/hidden/session/sess_jobposcd",jobposcd);
  model.setValue("/root/hidden/session/sess_jobposnm",jobposnm);
  model.setValue("/root/hidden/session/sess_jobrespcd",jobrespcd);
  model.setValue("/root/hidden/session/sess_jobrespnm",jobrespnm);
  model.setValue("/root/hidden/session/sess_prfshipflagcd",prfshipflagcd);
  model.setValue("/root/hidden/session/sess_prfshipflagnm",prfshipflagnm);
  model.setValue("/root/hidden/session/sess_licnsno",licnsno);
  model.setValue("/root/hidden/session/sess_specordyn",specordyn);
  model.setValue("/root/hidden/session/sess_deptabbr",deptabbr);
  model.setValue("/root/hidden/session/sess_orddeptflag",orddeptflag);
  model.setValue("/root/hidden/session/sess_wardflag",wardflag);
  model.setValue("/root/hidden/session/sess_systemcd",systemcd);
  model.setValue("/root/hidden/session/sess_systemnm",systemnm);
  model.setValue("/root/hidden/session/sess_systeminstcd",systeminstcd);
  model.setValue("/root/hidden/session/sess_systeminstnm",systeminstnm);
  model.setValue("/root/hidden/session/sess_logindt",logindt);
  
  model.refresh();  
}

/**---------------------------------------------------
 * @desc   : 자체기초코드 조회 : 할인,진료과,진료의사,보험유형,보조유형
             TRPMOCOM01
 * @---------------------------------------------------
 */
function fComCDRef(){
	submit("TRPMOCOM01");	
	//원무사용 기초코드 조회 cache기능 추가
/*	
	if ( copyFromCache("TRPMOCOM01_depttree","/root/init/basecdlist") ) {
		//
	} else {

		if ( submit("TRPMOCOM01") ) {
			storeIntoCache("TRPMOCOM01_depttree","/root/init/basecdlist","540");
		}
	}
*/
/*	
	var orddeptcd_list = instance1.selectNodes("/root/init/orddeptcd");	
	var orddeptcd_len  = orddeptcd_list.length;	
	//var orddeptcd_len = getNodesetCount("/root/init/orddeptcd");
	//orddeptcd_len = orddeptcd_len + 1;
	model.makeNode("/root/init/orddeptcd["+orddeptcd_len + 1+"]");
	model.makeNode("/root/init/orddeptcd["+orddeptcd_len + 1+"]/cd");
	model.makeNode("/root/init/orddeptcd["+orddeptcd_len + 1+"]/nm");	
	model.setValue("/root/init/orddeptcd["+orddeptcd_len + 1+"]/cd","10157");
	model.setValue("/root/init/orddeptcd["+orddeptcd_len + 1+"]/nm","가상진료과");	
	
	var orddrid_list = instance1.selectNodes("/root/init/orddrid");	
	var orddrid_len  = orddrid_list.length;		
	//var orddrid_len = getNodesetCount("/root/init/orddrid");
	//orddrid_len = orddrid_len + 1;	
	model.makeNode("/root/init/orddrid["+orddrid_len + 1+"]");
	model.makeNode("/root/init/orddrid["+orddrid_len + 1+"]/cd");
	model.makeNode("/root/init/orddrid["+orddrid_len + 1+"]/nm");	
	model.makeNode("/root/init/orddrid["+orddrid_len + 1+"]/dp");
	model.makeNode("/root/init/orddrid["+orddrid_len + 1+"]/sp");
	model.setValue("/root/init/orddrid["+orddrid_len + 1+"]/cd","11111111");
	model.setValue("/root/init/orddrid["+orddrid_len + 1+"]/nm","가상의사");	
	model.setValue("/root/init/orddrid["+orddrid_len + 1+"]/dp","10157");	
	model.setValue("/root/init/orddrid["+orddrid_len + 1+"]/sp","N");	
*/	
	zbcfGetCodeList( 
	  new Array("P0006","P0015","P0016","P0020","P0021",
	            "P0022","P0032","P0034","P0158","P0328",
	            "P0341","P0342", "P0157", "P0380", "P0313", 
	            "P0327", "P0400", "P0329", "A0420", "P0029", "M0525", "P0477"),
	  new Array("/root/init_com/init/P0006list",  //주부유형
	            "/root/init_com/init/P0015list",  //직원과의관계
	            "/root/init_com/init/P0016list",  //피보험자관계
	            "/root/init_com/init/P0020list",  //변경취소사유
	            "/root/init_com/init/P0021list",  //초재진
	            "/root/init_com/init/P0022list",  //연속기타 접수구분..
	            "/root/init_com/init/P0032list",  //유형보조사유계
	            "/root/init_com/init/P0034list",  //원외처방예외사유
	            "/root/init_com/init/P0158list",  //내원경유
	            "/root/init_com/init/P0328list",  //임상시험
	            "/root/init_com/init/P0341list",  //예약구분
	            "/root/init_com/init/P0342list",  //진찰료미산정사유
	            "/root/init_com/init/P0157list",  //종교
	            "/root/init_com/init/P0380list",   //진료의뢰서구분
	            "/root/init_com/init/P0313list",   //성별구분
	            "/root/init_com/init/P0327list",   //추천인관
	            "/root/init_com/init/P0400list",	 //국적코드
	            "/root/init_com/init/P0329list",	 //협력의뢰구분
	            "/root/init_com/init/A0420list",	 //원스탑
	            "/root/init_com/init/P0029list",	 //이력상태
	            "/root/init_com/init/M0525list", 	 //협진팀코드
	            "/root/init_com/init/P0477list"	 	 //VIP구분코드
	            )  
            );
  
  if (instance1.selectSingleNode("/root/init_com/init/P0015list") != null)
  {          
	  model.setValue("/root/init_com/init/P0015list/P0015/cdid","-");
	  model.setValue("/root/init_com/init/P0015list/P0015/cdnm","-");
	}
  
  if (instance1.selectSingleNode("/root/init_com/init/P0016list") != null)
  {
	  model.setValue("/root/init_com/init/P0016list/P0016/cdid","-");
	  model.setValue("/root/init_com/init/P0016list/P0016/cdnm","-");
	}
  
  if (instance1.selectSingleNode("/root/init_com/init/P0020list") != null)
  {
	  model.setValue("/root/init_com/init/P0020list/P0020/cdid","-");
	  model.setValue("/root/init_com/init/P0020list/P0020/cdnm","-");
	}

	if (instance1.selectSingleNode("/root/init_com/init/P0022list") != null)
  {
	  model.setValue("/root/init_com/init/P0022list/P0022/cdid","-");
	  model.setValue("/root/init_com/init/P0022list/P0022/cdnm","-");
	}
  
  if (instance1.selectSingleNode("/root/init_com/init/P0032list") != null)
  {
	  model.setValue("/root/init_com/init/P0032list/P0032/cdid","-");
	  model.setValue("/root/init_com/init/P0032list/P0032/cdnm","-");  
	}
  
  if (instance1.selectSingleNode("/root/init_com/init/P0158list") != null)
  {
	  model.setValue("/root/init_com/init/P0158list/P0158/cdid","-");
	  model.setValue("/root/init_com/init/P0158list/P0158/cdnm","-");
	}
}

function fSubmitBefore(){	
	model.removeNodeset("/root/send/data0");
	model.removeNodeset("/root/send/data1");
	model.removeNodeset("/root/send/data2");
	model.removeNodeset("/root/send/data3");
	model.removeNodeset("/root/send/data4");
	model.removeNodeset("/root/send/data5");
	model.removeNodeset("/root/send/data6");
	model.removeNodeset("/root/send/data7");
	model.removeNodeset("/root/send/data8");
	model.removeNodeset("/root/send/data9");
	model.removeNodeset("/root/send/data10");
	model.removeNodeset("/root/send/data11");
	model.removeNodeset("/root/send/data12");
	model.removeNodeset("/root/send/data13");
	model.removeNodeset("/root/send/data14");
	model.removeNodeset("/root/send/data15");
	model.removeNodeset("/root/send/data16");
	model.removeNodeset("/root/send/data17");
	model.removeNodeset("/root/send/data18");
	model.removeNodeset("/root/send/data19");
	model.removeNodeset("/root/send/data20");
	model.removeNodeset("/root/send/data21");
	model.removeNodeset("/root/send/data22");
	model.removeNodeset("/root/send/data23");
	model.removeNodeset("/root/send/data24");
	model.removeNodeset("/root/send/data25");
	model.removeNodeset("/root/send/data26");
	model.removeNodeset("/root/send/data27");
	model.removeNodeset("/root/send/data28");
	model.removeNodeset("/root/send/data29");
	model.removeNodeset("/root/send/data30");
	model.removeNodeset("/root/send/data31");
	model.removeNodeset("/root/send/data32");
	model.removeNodeset("/root/send/data33");
	model.removeNodeset("/root/send/data34");
	model.removeNodeset("/root/send/data35");
	model.removeNodeset("/root/send/data36");
	
	model.makeNode("/root/send/data0");
	model.makeNode("/root/send/data1");
	model.makeNode("/root/send/data2");
	model.makeNode("/root/send/data3");
	model.makeNode("/root/send/data4");
	model.makeNode("/root/send/data5");
	model.makeNode("/root/send/data6");
	model.makeNode("/root/send/data7");
	model.makeNode("/root/send/data8");
	model.makeNode("/root/send/data9");
	model.makeNode("/root/send/data10");
	model.makeNode("/root/send/data11");
	model.makeNode("/root/send/data12");
	model.makeNode("/root/send/data13");
	model.makeNode("/root/send/data14");
	model.makeNode("/root/send/data15");
	model.makeNode("/root/send/data16");
	model.makeNode("/root/send/data17");
	model.makeNode("/root/send/data18");
	model.makeNode("/root/send/data19");
	model.makeNode("/root/send/data20");
	model.makeNode("/root/send/data21");
	model.makeNode("/root/send/data22");
	model.makeNode("/root/send/data23");
	model.makeNode("/root/send/data24");
	model.makeNode("/root/send/data25");	
	model.makeNode("/root/send/data26");
	model.makeNode("/root/send/data27");
	model.makeNode("/root/send/data28");
	model.makeNode("/root/send/data29");
	model.makeNode("/root/send/data30");
	model.makeNode("/root/send/data31");
	model.makeNode("/root/send/data32");
	model.makeNode("/root/send/data33");
	model.makeNode("/root/send/data34");
	model.makeNode("/root/send/data35");
	model.makeNode("/root/send/data36");
}

function fSubmitAfter(){
	model.removeNodeset("/root/hidden/rcv");
	model.makeNode("/root/hidden/rcv");
}

function fOrddridSet(otpt_orddeptcd)
{			
	//model.setValue("/root/main/otpt/otpt_orddrid", '');
	cmb_orddrid.choices.itemset.attribute("nodeset") = "/root/init/orddrid[dp = '"+otpt_orddeptcd+"']";				
	cmb_orddrid.refresh();
	//var lst_orddrid = document.all("lst_orddrid");
	//if( lst_orddrid != null ){
	//	lst_orddrid.choices.itemset.attribute("nodeset") = "/root/init/orddrid[dp = '"+otpt_orddeptcd+"']";				
	//	lst_orddrid.refresh();
	//}
	//model.setValue("/root/main/otpt/otpt_subdeptcd", '');
	cmb_subdeptcd.choices.itemset.attribute("nodeset") = "/root/init/subdeptcd/subdeptcdlist[dp = '"+otpt_orddeptcd+"' or dp = '-']";				
	cmb_subdeptcd.refresh();
}