//ÃʱâÈ­			
function fInit() {	

	var param = opener.javascript.getParameter("SPMMO32000_param");
	param = param.split("¢Ë");
	model.setValue("/root/tmp/patinfo/pid", param[0]);
	model.setValue("/root/tmp/patinfo/orddd", param[1]);
	model.setValue("/root/tmp/patinfo/cretno", param[2]);
	model.setValue("/root/tmp/patinfo/visitno", param[3]);
	
    mmbfGetHardCodeInfoNm("/root/send/reqdata" , "/root/init/ercallno"     , 7);	

	submit("TRMNE05202"); //ȯÀÚÁ¤º¸ °¡Á®¿È
	var pid = model.getValue("/root/main/erpat/erpatinfo/pid");
	var nm = model.getValue("/root/main/erpat/erpatinfo/nm");
	var sa = model.getValue("/root/main/erpat/erpatinfo/sa");
	var indt = model.getValue("/root/main/erpat/erpatinfo/indt");
	var deptengabbr = model.getValue("/root/main/erpat/erpatinfo/deptengabbr");
	caption2.value = nm + "(" + pid + ") " + sa + " "  + indt + " " + deptengabbr;
	

	//@ºÎ¼­Á¤º¸ ºÒ·¯¿À±â.
	var instcd = getUserInfo("dutplceinstcd");
	var standard_yn = "orduseyn";
	var ord_deptflag = 'D';
	var rslt_ref  = "/root/init/orddeptinfo";
	var sort_field = "depthngnm";
	var sort_method = "asc";
	zbcfGetDeptCodeList(instcd, standard_yn, ord_deptflag, rslt_ref, sort_field, sort_method);
	
	model.setValue("/root/main/cond/callcnts", "ÀÀ±Þ½Ç ȯÀÚ " + nm + "(" + pid + ")´Ô Áø·á ¹Ù¶ø´Ï´Ù. ");
	model.setValue("/root/main/cond/callpsnno", model.getValue("/root/init/ercallno/hardcd/hardcd"));

	model.refresh();
	
}


//ÀÇ»ç ½ºÄÉÁì üũ
function fChkErSheduleList(){
	
	model.makeValue("/root/send/deptchk/erorddeptcd",model.getValue("/root/main/cond/orddeptcd"));
	model.makeValue("/root/send/deptchk/deptpartinfo",model.getValue("/root/main/cond/deptpartinfo"));

	if(!submit("TRMMO31003")){
		messageBox('ÀÀ±ÞÀÇ»ç ½ºÄÉÁì Á¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.', 'E');
	}
	var a = instance1.selectNodes("/root/temp/erorshedulchk/shedulchk");
	if(a.length == "0"){
		messageBox('ÇØ´çºÎ¼­¿¡ ÀÀ±ÞÈ£Ãâ µî·ÏµÈ Àǻ簡 ¾ø½À´Ï´Ù.', 'E999');
	}else{
		if(model.getValue("/root/temp/erorshedulchk/shedulchk/chkflag") != "-"){
			messageBox('ÁÖÄ¡ÀǸ¦ ¼±ÅÃÇϽʽÿÀ.', 'I');
			model.setFocus("cmb_erdr");
		}
	}
}

//20091104 dhkim 
//È£Ãâ À¯È¿¼º üũ
function fIsValidErCallDr(params){

	var paramArr = params.split('|');
	var pid      = paramArr[0];
	var indd     = paramArr[1];
	var cretno   = paramArr[2];
	var visitno  = paramArr[3];
	var intm     = paramArr[4];
	var erorddeptcd   = paramArr[5];
	
	//ȯÀÚÁ¤º¸°¡ ¾ø´Â°æ¿ì
	if(pid == '' || indd == '' || cretno == '' || visitno == '' || intm == ''){
		messageBox('ȯÀÚÁ¤º¸°¡ Á¸ÀçÇÏÁö ¾Ê¾Æ È£Ãâ ÇÒ ¼ö ¾ø½À´Ï´Ù.', 'E');
		return false;
	}
	
	//ÀÀ±ÞÈ£Ãâ°ú¸¦ ¼±ÅÃÇÏÁö ¾ÊÀº°æ¿ì
	if(erorddeptcd == ""){
		messageBox('ÀÀ±ÞÈ£ÃâÇÒ °ú¸¦ ¼±ÅÃÇϽʽÿÀ.', 'E');
		return false;
	}
	
	return true;
}

/**
/*  È£Ãâ	
/* ¼öÁ¤ÀÌ·Â : 20091116 dhkim grtype±¸ºÐÀÚÃß°¡
/* ¼öÁ¤ÀÌ·Â : 20100512 kimsj È£ÃâÀÚ¹øÈ£(¿¬¶ôó) Ãß°¡ 
*/
function fErCallDr(){
	//ÁÖÄ¡ÀÇ ¼±ÅÃ
	var a = instance1.selectNodes("/root/temp/erorshedulchk/shedulchk");
	var b = model.getValue("/root/main/cond/ordrid");
	var flag = model.getValue("/root/temp/erorshedulchk/shedulchk/chkflag")

	if(a.length>0 && b==""&& flag != "-"){
		messageBox('ÁÖÄ¡ÀǸ¦ ¼±ÅÃÇϽʽÿÀ', 'E999');
		model.setFocus("cmb_erdr");
		return;
	}

	//ȯÀÚÁ¤º¸
	var pid         = model.getValue("/root/main/erpat/erpatinfo/pid");
	var indd        = model.getValue("/root/main/erpat/erpatinfo/indd");
	var cretno      = model.getValue("/root/main/erpat/erpatinfo/cretno");
	var visitno     = model.getValue("/root/tmp/patinfo/visitno");
	var intm        = model.getValue("/root/main/erpat/erpatinfo/intm");
	var patnm       = model.getValue("/root/main/erpat/erpatinfo/nm");
	var erorddeptcd = model.getValue("/root/main/cond/orddeptcd");
	var callcnts    = model.getValue("/root/main/cond/callcnts");
	var deptpartinfo = model.getValue("/root/main/cond/deptpartinfo");
	var callpsnno	= model.getValue("/root/main/cond/callpsnno");

	//È£ÃâÀü À¯È¿¼ºÃ¼Å©
	var params = pid     + '|' 
	           + indd    + '|' 
	           + cretno  + '|' 
	           + visitno + '|' 
	           + intm    + '|'
			   + erorddeptcd;

	if(!fIsValidErCallDr(params))	return;
	
	//ÇØ´ç°úÀÇ ½ºÄÉÁì Á¶È¸ ¹× ÀÇ»çÈ£Ãâ
	model.makeValue("/root/send/reqdata/pid"            , pid);
	model.makeValue("/root/send/reqdata/indd"           , indd);
	model.makeValue("/root/send/reqdata/cretno"         , cretno);
	model.makeValue("/root/send/reqdata/visitno"        , visitno);
	model.makeValue("/root/send/reqdata/erorddeptcd"    , erorddeptcd);
	model.makeValue("/root/send/reqdata/hngnm"          , patnm);
	model.makeValue("/root/send/reqdata/callcnts"       , callcnts);
	model.makeValue("/root/send/reqdata/deptpartinfo"       , deptpartinfo);
	model.makeValue("/root/send/reqdata/callpsnno"		, callpsnno);
	
	if(!submit("TRMMO31002")){
		messageBox('ÀÇ»çÁ¶È¸ ½ÇÆÐÇÏ¿´½À´Ï´Ù.', 'E');
		return;
	}
	
	var a = instance1.selectNodes("/root/temp/erorshedulelist/erorlist");
	if(a.length == "0"){
		messageBox('ÇØ´çºÎ¼­¿¡ ÀÀ±ÞÈ£Ãâ µî·ÏµÈ Àǻ簡 ¾ø½À´Ï´Ù.', 'E');
		return;
	}

	if(flag != "-"){
		model.setValue("/root/temp/erorshedulelist/erorlist[erorddoctcd='"+b+"']/mainyn","M");
	}

	if(submit("TXMMO31002")){
		messageBox('È£ÃâµÇ¾ú½À´Ï´Ù.', 'I');
	}else{
		messageBox('È£Ãâ ½ÇÆÐÇÏ¿´½À´Ï´Ù.', 'E');
	}


}

function fGetDeptDetlFlag() {
	var ref = "/root/send";
	var rstRef = "/root/init/deptpartinfo";
	//var orddeptcd = model.getValue('/root/cond/orddeptcd');	
	var orddeptcd = model.getValue('/root/main/cond/orddeptcd');	
	model.makeValue("/root/send/orddeptcd", orddeptcd);
	model.removenode("/root/main/cond/deptpartinfo");
	
	var srchym = fGetToDaySchym();
	var srchymfirstday = srchym.concat("01");
	var srchymlastday = srchym.concat(fGetLastDay(srchym));
	model.makeValue("/root/send/srchymfirstday", srchymfirstday );
	model.makeValue("/root/send/srchymlastday ", srchymlastday );
	
	if( !submit("TRMMO30002", "false", ref, rstRef)){
		messageBox('Áø·á°úº° ÆÄÆ®Á¤º¸ Á¶È¸¸¦ ½ÇÆÐÇÏ¿´½À´Ï´Ù.', 'E999');
		cmb_deptdetlflag.refresh();
		return false;
	}
	
	model.makeNode("/root/main/cond/deptpartinfo");
	/*
	var nodeList = instance1.selectNodes('/root/init/deptpartinfo/partlist');
	if( nodeList.length <= 0 ){
		//alert( nodeList.length + " nodeList.length ");
		model.removenode("/root/send/deptpartinfo");
		cmb_partinfo.disabled="true";
	}
	else{
		cmb_partinfo.disabled ="false";
		messageBox('ÇØ´ç°úÀÇ ÆÄÆ®Á¤º¸¸¦ ÀÔ·ÂÇØÁֽʽÿÀ.', 'I');
		model.setFocus("cmb_deptdetlflag");
		
	}
	*/
	// model.setValue("/root/cond/deptpartinfo", deptpartinfo );
}

// ºÎ¼­ ÆÄÆ® Á¤º¸°¡ ÀÖ´ÂÁö üũ
// ºÎ¼­ ÆÄÆ® Á¤º¸°¡ Àִµ¥ ÆÄÆ® Á¤º¸¸¦ ÀÔ·ÂÇÏÁö ¾Ê¾ÒÀ» °æ¿ì true¸®ÅÏ
function fChkDeptDetlFlag(){
	var nodeList = instance1.selectNodes('/root/init/deptpartinfo/partlist');
	var deptdetlflag = model.getValue("/root/main/cond/deptpartinfo");
	//var orddeptnm = model.getValue("/root/cond/orddeptcd");
	if( nodeList.length > 0 && ( deptdetlflag == null || deptdetlflag =="") ){
		//messageBox(orddeptnm + "´Â ÆÄÆ®Á¤º¸°¡", "I003");
		//model.removeNodeset("/root/main/workerinfo/workerinfolist");
		return true;
	}
	
	return false;
}

function fChkSelDeptDetlFlag(){
	//var selDeptDetlFlag = model.getValue("/root/cond/deptpartinfo");
	var nodeList = instance1.selectNodes('/root/init/deptpartinfo/partlist');
	if ( fChkDeptDetlFlag() ){
		//cmb_partinfo.select(0);
		cmb_partinfo.disabled="false";
		messageBox('ÆÄÆ®Á¤º¸¸¦  ¼±ÅÃÇϽʽÿÀ.', 'I');
		model.setFocus("cmb_partinfo");
	}
	else if( nodeList.length > 0 ){
		cmb_partinfo.disabled="false";
	}
	else{
		cmb_partinfo.disabled="true";
		model.removenode("/root/main/cond/deptpartinfo");
	}
}
function fGetToDaySchym(){
	var today = new Date();
	 var year = today.getFullYear();
	 var month = today.getMonth()+1;
	 year = year.toString();
	 month = fAddZero(month);

	return year.concat(month.toString());
}

function fAddZero(n){
	return n < 10 ? "0" + n : n;
}
function fGetLastDay(mm){
	var dd = 31;
	
	switch(mm){
		case 4:
		case 6:
		case 9:
		case 11:
			dd = 30;
		break;
		case 2:
			if( (yyyy%4)==0 || (yyyy%100)==0){
				dd=29;
			}
			else{
				dd=28;
			}
		break;
	}
	
	return dd;
}