/*
  
      °ø¿©ÀÚ¹®Áø(SMLBD00700.xfm - JScript )

      - Version :
          1)  : Ver.1.00.01
 */


//-----------------------------------
// È­¸é È£Ãâ½Ã
//-----------------------------------
var focusInBackColor	= "#ffcc99";
var focusOutBackColor	= "#ffffff";

function finit() {

	model.setValue("/root/main/dnorinqrinfo/dnorprcp/testdd",  getCurrentDate());
	
	model.removeNodeset("/root/main/patmapinfo/patmap");
	model.removeNodeset("/root/main/dnorinfo/inqrlist");
	model.removeNodeset("/root/main/dnorinqrinfo/donlist");
	fcode();
	
	zbcfGetCodeList(new Array("M0376"), new Array("/root/init/M0376list"));	//Ç÷¾×Çü

	fGetPatinfo();
}

//--------------------------
// ÄÁÆ®·Ñfocusin backcolor
//--------------------------
function ffocusInBackColor() {
	var Control = document.all.item(event.currentTarget);
	Control.attribute("background-color") = focusInBackColor;
}
function ffocusOutBackColor() {
	var Control = document.all.item(event.currentTarget);	
	Control.attribute("background-color") = focusOutBackColor;
}

//--------------------------
// »ó´ÜÁ¤º¸ ³»¸®±â
//--------------------------
function fGetPatinfo() {

	var sPath = "/root/main/paminfo";	
	//¼³Á¤µÈ »ó´ÜÁ¤º¸¸¦ ºÒ·¯¿È
	var node = getGlobalVariable("paminfo");	

	if (node !=null) {
		model.makeNode(sPath);		

		setCSVToNode(sPath, node);

		var pid, indd, cretno, mskind, histstat;	
		pid = model.getValue(sPath +"/list/pid");
		
		//patinfo Á¤º¸ ¼ÂÆÃ
		if ( !isNull(pid) ) {
			
			model.setValue("/root/main/leftref/code1" 	, 	"1");
			model.setValue("/root/main/leftref/code2"	,	"1");
			model.setValue("/root/main/leftref/codedata",	model.getValue(sPath +"/list/pid") );		
			fpatmapsel();
		}		
	}
}
/**
 * @group  :
 * @ver    : 2007.12.28
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function 
 * @access : public
 * @desc   : °øÅëÄÚµå Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fcode(flag){ 
	submit("TRLBD00701")
}

/**
 * @group  :
 * @ver    : 2007.12.28
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function 
 * @access : public
 * @desc   : Mapping Á¤º¸ Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fpatmapsel(flag){
	var cond1     = model.getValue("/root/main/leftref/code1");
	var cond2     = model.getValue("/root/main/leftref/code2");
	var conddata  = model.getValue("/root/main/leftref/codedata");

	if(conddata.length==0){
		messageBox("°Ë»öÇÒ °ªÀ»", "C001");
		return;
	}
	if(cond2 == "2"){
		if(conddata.length<6){
			if(conddata.length==0){
			}else{
				messageBox("ÃÖ¼Ò6ÀÚ ÀÌ»ó", "C001");
				return;
			}
		}
	}
	
	if(cond2 == "3"){
		if(conddata.length<2){
			if(conddata.length==0){
				return;
			}else{
				messageBox("ÃÖ¼Ò2ÀÚ ÀÌ»ó", "C001");
				return;
			}
		}
	}

	model.removeNodeset("/root/send");
	model.makeValue("/root/send/code1",model.getValue("/root/main/leftref/code1"));
	model.makeValue("/root/send/code2",model.getValue("/root/main/leftref/code2"));
	model.makeValue("/root/send/codedata",conddata);
	submit("TRLBD00702")
}

/**
 * @group  :
 * @ver    : 2007.12.28
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function 
 * @access : public
 * @desc   : °ø¿©ÀÚ ¹®Áø³»¿ª Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fdnorsel(flag){
	var iRow = datagrid1.row - 1
	var xPatMap = "/root/main/patmapinfo/patmap";
	
	model.removeNodeset("/root/send");
	model.makeValue("/root/send/tnsrpid",model.getValue(xPatMap+"["+iRow+"]/tnsrpid"));
	model.makeValue("/root/send/dnorno",model.getValue(xPatMap+"["+iRow+"]/dnorno"));
	model.makeValue("/root/send/dnorseqno",model.getValue(xPatMap+"["+iRow+"]/dnorseqno"));
	
	submit("TRLBD00703")
	resetfunc();
}

/**7
 * @group  :
 * @ver    : 2007.12.29
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function 
 * @access : public
 * @desc   : ¹®Áø³»¿ª Á¶È¸ÈÄ ±â·ÏÁ¤º¸ ¼¼ÆÃ
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function resetfunc(){
	model.resetInstanceNode("/root/main/dnorinqrinfo/dnorprcp");
	model.removeNodeset("/root/main/dnorinqrinfo/donlist");
	model.refresh();
	
	var irow = datagrid1.row - 1;
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/tnsrpid",		model.getValue("/root/main/patmapinfo/patmap[" + irow + "]/tnsrpid"));
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/tnsrnm",		model.getValue("/root/main/patmapinfo/patmap[" + irow + "]/tnsrnm"));
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/dnorno",		model.getValue("/root/main/patmapinfo/patmap[" + irow + "]/dnorno"));
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/dnorseqno",	model.getValue("/root/main/patmapinfo/patmap[" + irow + "]/dnorseqno"));
	
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/btype",		model.getValue("/root/main/dnorinfo/dnordetl/btype"));
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/tnsrabo",		"-");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/tnsrrh",		"-");
	
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/bpjudg", 		"1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/bptpjudg", 	"1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/pulsejudg",	"1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/blodjudg",		"1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/hemogjudg",	"1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/bplateletjudg","1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/pasttotprotjudg",	"1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/agejudg", 		"1");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/tnsrrh", 		"+");
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/inqrdd", 		getCurrentDate());
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/ingrtm", 		getCurrentTime());
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/ingrrid",		getUserId());
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/recrid",		getUserId());
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/recnm",		getUserName());
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/recdd",		getCurrentDate());
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/rectm",		getCurrentTime());
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/iudgb",		"I");
	
	//----------------(20080204)
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/testdd",		getCurrentDate());	
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/patrela",		"2");	
	model.setValue("/root/main/dnorinqrinfo/dnorprcp/donflag",		"2");
	//----------------
	
	case1.disabled = false;
	model.setFocus("inp_testdd");
	model.refresh();
}

/**
 * @group  :
 * @ver    : 2007.12.29
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function 
 * @access : public
 * @desc   : ±â·ÏÁ¤º¸ ÀúÀå
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fSave(){
 	
 	//----------------(20080204)
 	// ÇʼöÀԷ»çÇ× Ã¼Å©
// 	var sPath = "/root/main/dnorinqrinfo/dnorprcp"; 	
// 	if (model.getValue(sPath + "/testdd") == "") {
//		messageBox("°Ë»çÀÏÀÚ°¡ Á¸ÀçÇÏÁö ¾Ê½À´Ï´Ù.", "E999", "");		
//		return;
//	}
	
	var xPath = "/root/main/dnorinqrinfo/dnorprcp";				
	var nNode = model.instances(0).selectSingleNode(xPath);
	var max = nNode.childNodes.length;

	for (var idx=0;idx<max;idx++) {		
		var obj = nNode.childNodes(idx);
		var objNm = obj.nodeName;
		var chkflag = false;
		
		//ÇʼöüũÇ׸ñ¸®½ºÆ®
		switch (objNm) {
			case	"recrid":
			case	"recnm":
			case	"recdd":
			case	"rectm":
			case	"testdd":
			case	"btype":
			case	"tnsrabo":
			case	"tnsrrh":
			case	"patrela":
			//case	"patrelachon":
			case	"doncareryn":
			//case	"rectdondd":
			case	"donflag":
			case	"donkind":
			case	"comdon":
			case	"donrefrslt":
			case	"donchfmmthd":
			//case	"etcresn":
			case	"bpnval1":
			case	"bpnval2":
			case	"bpjudg":
			case	"bdtpnval":
			case	"bptpjudg":
			case	"pulsenval":
			case	"pulsejudg":
			case	"blodnval":
			case	"blodjudg":
			case	"hemognval":
			case	"hemogjudg":
			case	"bplateletnval":
			case	"bplateletjudg":
			case	"pasttotprotnval":
			case	"pasttotprotjudg":
			case	"agenval":
			case	"agejudg":
					
				if (model.getValue(xPath + "/" + objNm) == "") {
					chkflag = true;
					break;			
				}
		}
		if (chkflag == true) {
			messageBox("ÇʼöÀԷ»çÇ×ÀÔ´Ï´Ù.", "E999", "");
			var objContNm = fControlFind(xPath + "/" + objNm);
			if (objContNm != "") {
				model.setFocus(objContNm);
			}
			return;
		}
//		alert(obj.text,obj.xml,obj.nodeName );	
	}
//	alert("ÀúÀåÈ®ÀÎ");
//	return;
 	//----------------
	model.removeNodeset("/root/send");
	model.makenode("/root/send/dnorprcp")
	model.copyNode("/root/send/dnorprcp", "/root/main/dnorinqrinfo/dnorprcp");
	model.makeValue("/root/send/donlist",datagrid2.getUpdateDataAll("i"));

	if (submit("TXLBD00701")){
		var dayt = model.getValue("/root/main/dnorinqrinfo/dnorprcp/recdd");
		var timet = model.getValue("/root/main/dnorinqrinfo/dnorprcp/rectm");
		var gs = dayt+timet
		fdnorsel();
		fdnorprcpsel(gs)
	}
}

//---------------------
// control ã±â
//---------------------
function fControlFind(xPath) {

	var childObjCnt = document.controls.length;
	var childObj;
						
	for (var i=0; i < childObjCnt; i++) {
		childObj = document.controls.item(i);
		var ref = childObj.attribute("ref");
		
		if (ref == xPath) {
			return childObj.attribute("id");
			break;
		}
	}
	return "";
}
//---------------------



/**
 * @group  :
 * @ver    : 2007.12.29
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function 
 * @access : public
 * @desc   : ±â·ÏÁ¤º¸ Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fdnorprcpsel(flag){
	var xInqrList = "/root/main/dnorinfo/inqrlist";
	if(flag != null){
		var Row = datagrid4.rows;

		for(i=0; i<Row; i++){
			var tt = model.getValue(xInqrList+"["+i+"]/inqrddtm")
			if(flag == tt){
				var	iRow = i
				break;
			}
		}
	}else{
		var iRow = datagrid4.row;
	}
	
	model.removeNodeset("/root/send");
	model.makeValue("/root/send/tnsrpid",	model.getValue(xInqrList+"["+iRow+"]/tnsrpid"));
	model.makeValue("/root/send/dnorno",	model.getValue(xInqrList+"["+iRow+"]/dnorno"));
	model.makeValue("/root/send/dnorseqno",	model.getValue(xInqrList+"["+iRow+"]/dnorseqno"));
	model.makeValue("/root/send/seqno",		model.getValue(xInqrList+"["+iRow+"]/seqno"));
	
	if (submit("TRLBD00704")){
	}
}

/**
 * @group  :
 * @ver    : 2007.12.29
 * @by     : ½ÅÇõÃá
 * @---------------------------------------------------
 * @type   : function 
 * @access : public
 * @desc   : ±â·ÏÁ¤º¸ »èÁ¦
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
 function fdel(){
	model.removeNodeset("/root/send");
	model.makenode("/root/send/dnorprcp")
	model.copyNode("/root/send/dnorprcp", "/root/main/dnorinqrinfo/dnorprcp");
	
	if (submit("TXLBD00702")){
		fdnorsel();
	}
}


// --------------------------------------------------
// ¿À¸¥ÂÊ ¸¶¿ì½º¹öÆ°
// --------------------------------------------------
function fnonmousedown() {

	var pGrd = datagrid1;
	pGrd.row = pGrd.mouseRow;
	if (pGrd.rows <= 1 || pGrd.row <= 0 ) return;	
	fShowPopupMenu("datagrid1","/root/main/menuitems/inmenu/item");	
	
/*
	if (model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/pid")== "") return;					

	var colnm = grd_dscList.valueMatrix(0, grd_dscList.mouseCol);
	var tmpcareinrmdd = model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/tmpcareinrmdd");
	var oppatflagcd  = model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/oppatflagcd");
	colnm = colnm.substring(0,2);
	
	var sdschdd1 = model.getValue( "/root/main/dsc/dscList["+grd_dscList.mouseRow+"]/dschdd");
	sdschdd1 = 	sdschdd1.replace("-","");
	sdschdd1 = 	sdschdd1.substring(0,1);
		
	//---(¼ö¼úȯÀÚ+angio(¼ö¼úÁ¤º¸¾øÀ½) 
//						if(oppatflagcd=="D"&&colnm== "ÀÔ½Ç"&&tmpcareinrmdd.substring(0,1)=="-") {  // DSC ȯÀÚ,  ÀԽǽð¢Ä®·³, ÀԽǽð¢ÀÌ Àû¿ëµÇÁö ¾ÊÀº °æ¿ì("-")¿¡¸¸ ÀԽǽ𢠸޴º ³ªÅ¸³ªµµ·Ï
//							fShowPopupMenu("grd_dscList","/root/main/menuitems/inmenu/item");
//					       }else {
//							fShowPopupMenu("grd_dscList","/root/main/menuitems/grdmenu/item");						       	
//					       }					
	
	if (rdo_dscflag.value == "D") {	
		//if(colnm== "ÀÔ½Ç"&&tmpcareinrmdd.substring(0,1)=="-")  { // DSC ȯÀÚ,  ÀԽǽð¢Ä®·³, ÀԽǽð¢ÀÌ Àû¿ëµÇÁö ¾ÊÀº °æ¿ì("-")¿¡¸¸ ÀԽǽ𢠸޴º ³ªÅ¸³ªµµ·Ï
		if(colnm== "ÀÔ½Ç")  { // DSC ȯÀÚ,  ÀԽǽð¢Ä®·³, ÀԽǽð¢ÀÌ Àû¿ëµÇÁö ¾ÊÀº °æ¿ì("-")¿¡¸¸ ÀԽǽ𢠸޴º ³ªÅ¸³ªµµ·Ï
			fShowPopupMenu("grd_dscList","/root/main/menuitems/inmenu/item");
		}else  {
			fShowPopupMenu("grd_dscList","/root/main/menuitems/grdmenu/item");								
		}	
	} else {
		fShowPopupMenu("grd_dscList","/root/main/menuitems/grdmenu/item");
	}
	*/
}

 // --------------------------------------------------
 // Æ˾÷¸Þ´º
 // --------------------------------------------------
function fShowPopupMenu(gridID, menuPath)
{
	var gridObj = document.controls.item(gridID);

	if(event.button == 3) {
		if(gridObj.isCell(event.target) && gridObj.mouseRow >= gridObj.fixedrows){
			window.setPopupMenu(true, menuPath, "name", "func", false);
		}else{
			window.setPopupMenu(false);
		}
	}
}
//-------------------------------------
// ¿À¸¥ÂÊ ¸¶¿ì½º È£ÃâµÇ´Â Æ˾÷µÏENR
//-------------------------------------
function fSetPopup01() {
	//»ó´Ü¿Ã¸®±â
	fSetPatInfo();		
	modal("SMLBD01300", "", "", "", "", "", "");		//°ø¿©ÀÚó¹æÀÔ·Â
}
function fSetPopup02() {
	//»ó´Ü¿Ã¸®±â
	fSetPatInfo();		
	modal("SMLBD00600", "", "", "", "", "", "");		//°ø¿©ÀÚµî·Ï
}
function fSetPopup03() {
	//»ó´Ü¿Ã¸®±â
	fSetPatInfo();		
	modal("SMMRF02300", "", "", "", "", "", "");		//ocr¼­½ÄÁöÃâ·Â
}
function fSetPopup04() {
	//»ó´Ü¿Ã¸®±â
	fSetPatInfo();		
	modal("SMLBD00900", "", "", "", "", "", "");		//°Ë»ç°á°úÆÇÁ¤Á¶È¸
}


// --------------------------------------------------
// »ó´ÜȯÀÚÁ¤º¸¼¼ÆÃÇϱâ
// --------------------------------------------------
function fSetPatInfo()
{
	return;
	
	var pGrd = datagrid1;
	
	if (pGrd.rows <=1 || pGrd.row <= 0) return;
	
    var sPath = "/root/main/patmapinfo/patmap["+ pGrd.row+"]" ;
	
//¿ìÃø¸¶¿ì½º¹öưŬ¸¯½Ãµµ »ó´Ü¿Ã¸±¼ö ÀÖµµ·Ï	
//	var sChk  = model.getValue(sPath + "/flag");				//¼±ÅõÈÀڷḸ
//	if (sChk != "1") return;
	
	var siogb = model.getValue(sPath + "/iogb");	
	if (siogb == "ÀÔ¿ø") siogb = "I";
	if (siogb == "¿Ü·¡") siogb = "O";
	
	if (siogb == "") {
		messageBox("Á¢¼öÁ¤º¸°¡ ¾ø½À´Ï´Ù.", "E999", "");
		return;
	}

	var pid		= model.getValue(sPath + "/pid");
	var orddd	= model.getValue(sPath + "/orddd");
	var cretno	= model.getValue(sPath + "/cretno");
	var instcd	= getUserInfo("dutplceinstcd");	
  	
  	var param = siogb + "¢Ë" + pid + "¢Ë" + orddd + "¢Ë" + cretno + "¢Ë" + instcd;
  	
  	setParameter("condparam", param);   
    modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");
/*
    var useyn = getParameter("SPMMO08900_rtn_useyn");
    if(useyn == "Y"){
       setParameter("SPMMO08900_rtn_useyn", "");
       fInitPamInfo(); //È­¸é ±âº» Á¤º¸ ¼³Á¤
       
    }else{
       return;
       
    }
*/    
}


//------------------------
// Ç÷¾× ºÎÀû°Ý Ç׸ñ ³»¿ª row Ãß°¡
//------------------------
function fAddRow() {
	datagrid2.addRow();
	var irow = datagrid2.row;
	var irow1 = datagrid1.row - 1;
	model.setValue("/root/main/dnorinqrinfo/donlist[" + irow + "]/tnsrpid", model.getValue("/root/main/patmapinfo/patmap[" + irow1 + "]/tnsrpid"));
	model.setValue("/root/main/dnorinqrinfo/donlist[" + irow + "]/dnorno", model.getValue("/root/main/patmapinfo/patmap[" + irow1 + "]/dnorno"));
	model.setValue("/root/main/dnorinqrinfo/donlist[" + irow + "]/dnorseqno", model.getValue("/root/main/patmapinfo/patmap[" + irow1 + "]/dnorseqno"));
	model.refresh();
	
	//ù¹ø° ÄÄ·³À¸·Î À̵¿ÇÏ°í ÀԷ¸ðµåÀ̺¥Æ®¸¦ È£ÃâÇÔ
	datagrid2.col= datagrid2.colRef("disqitemno");								
	datagrid2.dispatch("onentercell");
}
//------------------------
// Ç÷¾× ºÎÀû°Ý Ç׸ñ ³»¿ª row »èÁ¦
//------------------------
function fDeleteRow() {
	datagrid2.deleteItem(datagrid2.row);
}
//------------------------
// Ç÷¾× ºÎÀû°Ý Ç׸ñ ÀÔ·Â ¸ðµå ¼³Á¤(onentercellÀ̺¥Æ®¿¡¼­ È£Ãâ)
//------------------------
function fEditMode() {
	//±×¸®µå ÀԷ»çÇ×À̸é edit ¸ðµå·Î ¼³Á¤ÇÔ
	if( datagrid2.colType(datagrid2.col) == "input" ) {
		datagrid2.editCell();						
	}
	var colref = datagrid2.colAttribute(datagrid2.col,"ref");
	
	switch (colref) {
		case "disqdetlresn":
			datagrid2.colAttribute(datagrid2.col, "imemode") ="hangul";		//Çѱۼ³Á¤
			break;
	}
}