/*
  
(TRMNW05600_HSCT CBC.xrw - JScript )

- Version :
1)  : Ver.1.00.01
 */
var xTopAttributePath = "/root/main/topattribute";
var xRecgrupListPath = "/root/main/recgrup/recgruplist";
var xHIsgrupListPath = "/root/main/histgrup/histgruplist";
var xRecHIstPntListPath = "/root/main/rechistpntgrup/rechistpntlist";
var xClsListPath = "/root/main/detlgrup/detlgruplist"
var xHIsgrupListBKPath = "/root/temp/histgrup/histgruplist";

var xlrgListPath = "/root/main/lrggrup/lrggruplist"
var xCondPath = "/root/main/cond";
var xClsListBKPath = "/root/temp/main/detlgrup/detlgruplist";
var xPopWndClsListBKPath = "/root/temp/main/cond/execpopwnddetlgrup/execpopwnddetlgruplist";
var xExecDetlListPath = "/root/main/cond/execdetlgrup/execdetlgruplist";
var xPopWndExecDetlListPath = "/root/main/cond/execpopwnddetlgrup/execpopwnddetlgruplist";

var xDelDeliveExecPrcpListPath = "/root/main/cond/delivedetlgrup/delivedetlgruplist";
var xBlodReturnReqGrupListPath = "/root/main/cond/blodreturnreqgrup/blodreturnreqgruplist";
var xBlodExecRecGrupListPath = "/root/main/cond/blodexecrecgrup/blodexecrecgruplist";


 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  HSCT CBC »ó¼¼Á¡¼ö display : true , false / ÃÑÁ¡ HSCT CBC
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
  
function fColLqidty(arg) {

	if( arg == "one" ) {

		var no2 = 1 ;			

		for( var i = 0 ; i < 17 ; i++ ) {

			no2++ ;
			notitl++ ;

			datagrid3.colhidden(no2) = true;	

			datagrid3.colwidth(no2) = 10;

			datagrid3.valuematrix(0,no2) = "" ;

			datagrid3.valuematrix(1,no2) = "" ;

			datagrid3.valuematrix(2,no2) = "" ;

		}

		var cNt = 1 ;

		if(cNt > 0 ){

			var no = 1 ;
			var notitl = 0 ;

			for( var i = 0 ; i < cNt ; i++ ) {

				no++ ;
				notitl++ ;

				datagrid3.colhidden(no) = false;	

				datagrid3.colwidth(no) = 80;

				datagrid3.valuematrix(0,no) = combo2.value ;

				datagrid3.valuematrix(1,no) = model.getValue("/root/main/cond/patientgrup/patientgruplist["+ notitl +"]/patientnm") ;

				datagrid3.valuematrix(2,no) = "" ;

			}

		}

	} else {

		var no3 = 1 ;			

		for( var i = 0 ; i < 17 ; i++ ) {

			no3++ ;
			notitl++ ;

			datagrid3.colhidden(no3) = true;	

			datagrid3.colwidth(no3) = 10;

			datagrid3.valuematrix(0,no3) = "" ;

			datagrid3.valuematrix(1,no3) = "" ;

			datagrid3.valuematrix(2,no3) = "" ;

		}

		var cNt = combo8.length ;

		if(cNt > 0 ){

			var no = 1 ;
			var notitl = 0 ;

			for( var i = 0 ; i < cNt ; i++ ) {

				no++ ;
				notitl++ ;

				datagrid3.colhidden(no) = false;	

				datagrid3.colwidth(no) = 80;

				datagrid3.valuematrix(0,no) = combo2.value ;

				datagrid3.valuematrix(1,no) = model.getValue("/root/main/cond/patientgrup/patientgruplist["+ notitl +"]/patientnm") ;

				datagrid3.valuematrix(2,no) = "" ;

			}

		}

	}

	datagrid3.refresh();	

}



 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  HSCT CBC »ó¼¼Á¡¼ö ³»¿ª / Çѱ۸í / üũ Á¡¼ö ¸ñ·Ï
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fRecHistPntList(){

	var iRow = datagrid2.row;

	model.removenode("/root/send");

	model.makeValue("/root/send/pid",		model.getvalue(xRecgrupListPath+"["+iRow+"]/pid"));
	model.makeValue("/root/send/execdt",	model.getvalue(xRecgrupListPath+"["+iRow+"]/execdt"));
	model.makeValue("/root/send/clsflag",	model.getvalue(xRecgrupListPath+"["+iRow+"]/clsflag"));
	model.makeValue("/root/send/recflag",	model.getvalue(xRecgrupListPath+"["+iRow+"]/recflag"));
	model.makeValue("/root/send/grupcd",	model.getvalue(xRecgrupListPath+"["+iRow+"]/grupcd"));

	if(submit("TRMNW04007")){

		var iRowNum = datagrid1.row;

	}

	var iRow = grd_histgrup.row;
	var iCol = grd_histgrup.col;

	/* HSCT CBC »ó¼¼³»¿ª ±¸ºÐ üũ ½ÃÀÛ */

	var nodelist = bind1.nodeset;

	var cNt = nodelist.length;

	for(var ins = 1 ; ins <= cNt; ins++ ){// üũµÈ °ª Àüü¸¦ µ·´Ù.

		for(var i = 1 ; i < grd_histgrup.rows; i++ ){// Àüü¸¦ µ¹¸é¼­ ±×·ì¿¡ °ªÀÌ Ã¼Å©µÇ¾î ÀÖ´Â°Í ÃʱâÈ­

//			alert("55 : " + model.getValue(xHIsgrupListPath+"["+ i +"]/supcd"));
//			alert("66 : " + model.getValue("/root/main/rechistpntgrup/serdiaghislist["+ ins +"]/supcd"));
//			alert("77 : " + model.getValue(xHIsgrupListPath+"["+ i +"]/refseq"));
//			alert("88 : " +model.getValue("/root/main/rechistpntgrup/serdiaghislist["+ ins +"]/refseq"));

			if(	
				(model.getValue(xHIsgrupListPath+"["+ i +"]/supcd") ==  model.getValue("/root/main/rechistpntgrup/serdiaghislist["+ ins +"]/supcd")) &&  
				(model.getValue(xHIsgrupListPath+"["+ i +"]/refseq") ==  model.getValue("/root/main/rechistpntgrup/serdiaghislist["+ ins +"]/refseq"))

				) {

				grd_histgrup.textmatrix(i,1) = "Y"; 
				grd_histgrup.textmatrix(i,0) = "-"; 

			}	
			
		}

	}

	/* HSCT CBC »ó¼¼³»¿ª ±¸ºÐ üũ ³¡ */

}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ȯÀÚ »ó¼¼Á¤º¸ Á¶È¸ combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatientInfo(){

	model.removenode("/root/send");
	
	model.makeValue("/root/send/wardcd", combo7.value);
	model.makeValue("/root/send/roomcd", combo2.value);

	if( input3.value != "" ){
		model.makeValue("/root/send/pid", input3.value);	
	} else if( model.makeValue("/root/send/pid", combo8.value) != "" ){
		model.makeValue("/root/send/pid", combo8.value);	
	}

	if(submit("TRMNW05605")){
	}	  

//	model.setfocus("button3");
}


 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ȯÀÚ Á¤º¸ Á¶È¸ combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetPatientList(){

	model.removenode("/root/send");
	
	model.makeValue("/root/send/wardcd", combo7.value);
	model.makeValue("/root/send/roomcd", combo2.value);

	if(submit("TRMNW05604")){
	}	  

	fColLqidty();

//	model.setfocus("combo8");

}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  º´½Ç Á¶È¸ combo
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetRoomList(){

	model.removenode("/root/send");
	
	model.makeValue("/root/send/wardcd", combo7.value);

	//alert(cmb_wardcd.value);

	if(submit("TRMNW05603")){
	}	 
	
//	model.setfocus("combo2");

}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  º´µ¿ Á¶È¸
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetWardList(){

	model.removenode("/root/send");
	
	model.makeValue("/root/send/wardcd", model.getValue("/root/main/cond/wardcdgrup/wardcdgruplist/wardcd"));

	if(submit("TRMNW05602")){
	}	  

//	model.setfocus("combo7");
}


 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  HSCT CBC init
 * @param  :
 * @return :
 * @---------------------------------------------------
 */


function fInit(){

	fGetWardList();// º´µ¿ÄÚµå ¸®½ºÆ®

}

 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 /* ¼öÇ÷°£È£ ±â·Ï Âü°í ½ºÅ©¸³Æ® ½ÃÀÛ */

 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¹Ì¼öÇà±â·Ï ¸ñ·Ï¿¡¼­ ¼±ÅÃÇ׸ñ üũ(´õºíŬ¸¯)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fGridSel() {

	var sRowCnt2 = datagrid2.rows-datagrid2.fixedrows;

	var iRow = datagrid2.Row ;

	if( datagrid2.labelmatrix(iRow, 1) == "FALSE" || datagrid2.labelmatrix(iRow, 1) == "false" ){
		datagrid2.textmatrix(iRow, 1) = "true" ;
	} else if( datagrid2.labelmatrix(iRow, 1) == "true"  ) {
		datagrid2.textmatrix(iRow, 1) = "FALSE" ;
	}

}

 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¼öÇà±â·Ï ³»¿ª »ó¼¼Á¤º¸ (´õºíŬ¸¯)
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fBlodExecRecDetlinfo() {

	var sRowCnt = datagrid3.rows-datagrid3.fixedrows;

	var iRow = datagrid3.row ;

	model.setValue(output5.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/blodno"));
	model.setValue(output6.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/prcpnm"));
	model.setValue(output7.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/abo") + model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/rh") );
	model.setValue(input4.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrddtm").substring(0,8));
	model.setValue(input5.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrddtm").substring(8,14));

	model.setValue(input6.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendddtm").substring(0,8));
	model.setValue(input7.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendddtm").substring(8,14));
	model.setValue(output10.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptnm"));
	model.setValue(output11.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursenm"));
	model.setValue(output8.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptnm"));


	model.setValue(output9.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm"));
	model.setValue(combo3.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnssideeffect"));
	model.setValue(input1.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/caution"));
	model.setValue(radio1.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinuyn"));
	model.setValue(combo4.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/discontinu"));

	model.setValue(input8.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/drugqty"));
	model.setValue(textarea1.attribute("ref"), model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsrec"));

/* 
	model.makeValue("/root/send/tnsstrnurseid",		sp[0] );
	model.makeValue("/root/send/tnsstrnursenm",		sp[1] );
	model.makeValue("/root/send/tnsstrnursedeptcd", sp[5] );
	model.makeValue("/root/send/tnsstrnursedeptnm", sp[4] );
*/
	model.setValue(output12.attribute("ref"), 
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnurseid")+","+
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursenm")+","+","+","+
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptnm")+","+
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsstrnursedeptcd")

	);

//	alert(output12.value);

	model.setValue(output13.attribute("ref"), 
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnurseid")+","+
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm")+","+","+","+
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptnm")+","+
		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptcd")

	);

//	alert(output13.value);

//			model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnurseid")+","+
//		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm")+","+
//		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursedeptcd")+","+
//		model.getValue(xBlodExecRecGrupListPath+"["+iRow+"]/tnsendnursenm")		

	model.refresh();

	var sRowCnt2 = datagrid2.rows-datagrid2.fixedrows;
	
	for(var i=1; i<= sRowCnt2; i++){ // ¼±ÅÃÇÑ °ªÀÌ ºÒÃâ½Åû »óÅÂÀÎÁö üũ

		datagrid2.textmatrix(i, 1) = "FALSE" ;

	}

}


 /**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¼öÇ÷ ¼öÇà ³»¿ª ¸®½ºÆ®
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetBlodExecRecList(blodpidflag){

	var sRowCnt = datagrid5.rows-datagrid5.fixedrows;	

	if( model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") == "" && model.getValue("/root/main/cond/blodno") == "" ){
	
		messageBox("Ç÷¾×¹øÈ£/µî·Ï¹øÈ£¸¦ ","C001");
		model.setfocus("input13");
		return;	
	
	}

	model.refresh();

	model.makeValue("/root/send/blodpidflag",blodpidflag);	

	model.makeValue("/root/send/blodno", input13.value  );
	model.makeValue("/root/send/prcpddfrom", input9.value  );
	model.makeValue("/root/send/prcpddto", input10.value  );
	model.makeValue("/root/send/wardcd", combo5.value  );
	model.makeValue("/root/send/roomcd", combo1.value  );
	model.makeValue("/root/send/hngnm", combo6.value  );
	model.makeValue("/root/send/pid", input12.value  );

	if(submit("TRMNW05624")){
	}	  

}

  /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¼öÇ÷°£È£±â·Ï ±â·ÏÀúÀå ¹öÆ°
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fTnsRecSave(){


	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/blodno") == ""){

		messageBox("Ç÷¾×¹øÈ£¸¦ ","C002");
		return;	

	}

	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/prcpnm") == ""){

		messageBox("Ç÷¾×¸íÀ» ","C002");
		return;	

	}

	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/abo") == ""){

		messageBox("Ç÷¾×ÇüÀ» ","C002");
		return;	

	}

	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrdd") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrtm") == "" ) {

		messageBox("¼öÇ÷½ÃÀ۽ð£À» ","C001");
		return;	

	}

	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm") == "" ) {

		messageBox("¼öÇ÷Á¾·á½Ã°£À» ","C001");
		return;	

	}

	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursdeptnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursall") == "") {

		messageBox("¼öÇ÷½ÃÀÛ °£È£»ç¸¦ ","C002");
		return;	

	}

	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursdeptnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursnm") == "" || model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursall") == "") {

		messageBox("¼öÇ÷Á¾·á °£È£»ç¸¦ ","C002");
		return;	

	}

	if(model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsrec") == "" ) {

		messageBox("¼öÇ÷±â·ÏÀ» ","C001");
		return;	

	}

	model.removenode("/root/send");

	model.makeValue("/root/send/pid",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") ) ;
	model.makeValue("/root/send/blodno",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/blodno") ) ;

	model.makeValue("/root/send/tnsstrddtm",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrdd") + model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrtm") );
	model.makeValue("/root/send/tnsendddtm",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsenddd") + model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendtm") );
	
	model.makeValue("/root/send/tnsstrnursall",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursall") );
	model.makeValue("/root/send/tnsendnursall",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursall") );
	model.makeValue("/root/send/sideeffectcomcodelist",model.getValue("/root/main/cond/tnsnursereccdgrup/sideeffectcomcodelist") );
	model.makeValue("/root/send/caution",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/caution") );
	model.makeValue("/root/send/discontinuyn",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/discontinuyn") );

	model.makeValue("/root/send/discontinucomcodelist",model.getValue("/root/main/cond/tnsnursereccdgrup/discontinucomcodelist") );
	model.makeValue("/root/send/drugqty",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/drugqty") );
	model.makeValue("/root/send/tnsrec",model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsrec") );

	var sp = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsstrnursall").split(",");

	//alert(sp);

	model.makeValue("/root/send/tnsstrnurseid",		sp[0] );
	model.makeValue("/root/send/tnsstrnursenm",		sp[1] );
	model.makeValue("/root/send/tnsstrnursedeptcd", sp[5] );
	model.makeValue("/root/send/tnsstrnursedeptnm", sp[4] );

	var sp2 = model.getValue("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist/tnsendnursall").split(",");

	//alert(sp2);

	model.makeValue("/root/send/tnsendnurseid",		sp2[0] );
	model.makeValue("/root/send/tnsendnursenm",		sp2[1] );
	model.makeValue("/root/send/tnsendnursedeptcd", sp2[5] );
	model.makeValue("/root/send/tnsendnursedeptnm", sp2[4] );



	/*	ÀúÀå / ¾÷µ¥ÀÌÆ® ±¸ºÐ üũ ½ÃÀÛ */

	var check = "" ;

	var sRowCnt = datagrid3.rows-datagrid3.fixedrows;
	
	for(var i=1; i<= sRowCnt; i++){ // ¼±ÅÃÇÑ °ªÀÌ ºÒÃâ½Åû »óÅÂÀÎÁö üũ

//		alert(datagrid3.labelmatrix(i, 3));
//
//		alert(output5.value);

		if( datagrid3.labelmatrix(i, 3) == output5.value ) {

			check = "Y" ;

		}

	}

	/*	ÀúÀå / ¾÷µ¥ÀÌÆ® ±¸ºÐ üũ ³¡ */


	if( check != "Y" ){// ½Å±Ô ÀúÀå

		//alert("½Å±Ô ÀúÀå");

		model.makeValue("/root/send/detlgrup",datagrid2.getupdatedataAll("i"));

		if(messageBox("","Q002") != 6) return;// ÀúÀåÇϽðڽÀ´Ï±î?

		if(submit("TXMNR01031")){
			model.copyNode("/root/hidden/main","/root/main");

			var pidblodflag = '';
			if(input12.value != ""){
				pidblodflag = 'pid';
			} else if (input13.value !="") {
				pidblodflag = 'blod';										
			}
			fBlodDeliveList(pidblodflag);// Ç÷¾×ºÒÃâ³»¿ª ¸®½ºÆ®	
			fGetBlodNoExecRecList(pidblodflag); //¼öÇ÷ ¹Ì¼öÇà ³»¿ª ¸®½ºÆ®																		
			fGetBlodExecRecList(pidblodflag); //¼öÇ÷ ¼öÇà ³»¿ª ¸®½ºÆ®	
		}

	} else if( check == "Y") {// ¾÷µ¥ÀÌÆ®

		//alert("¾÷µ¥ÀÌÆ®");

		if(messageBox("","Q002") != 6) return;// ÀúÀåÇϽðڽÀ´Ï±î?

		model.makeValue("/root/send/detlgrup",datagrid3.getupdatedataAll("i"));

		if(submit("TXMNR01032")){
			model.copyNode("/root/hidden/main","/root/main");

			var pidblodflag = '';
			if(input12.value != ""){
				pidblodflag = 'pid';
			} else if (input13.value !="") {
				pidblodflag = 'blod';										
			}
			fBlodDeliveList(pidblodflag);// Ç÷¾×ºÒÃâ³»¿ª ¸®½ºÆ®	
			fGetBlodNoExecRecList(pidblodflag); //¼öÇ÷ ¹Ì¼öÇà ³»¿ª ¸®½ºÆ®																		
			fGetBlodExecRecList(pidblodflag); //¼öÇ÷ ¼öÇà ³»¿ª ¸®½ºÆ®	
		}

	}

}

  /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¹Ì¼öÇà±â·Ï¸ñ·Ï¿¡¼­ ¼±ÅÃÇÑ Ç÷¾×Á¤º¸ ±â·Ï¹öÆ°
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fExecRec(){

	var sRowCnt = datagrid2.rows-datagrid2.fixedrows;		

	var cnt = 0 ;

	model.removenode("/root/send");
	model.makeValue("/root/send/detlgrup",datagrid2.getupdatedataAll("i"));
	
	var blodno = "" ;
	var prcpnm = "" ;
	var aborh = "" ;
	
	for(var i=1; i<= sRowCnt; i++){

//		alert(datagrid2.labelmatrix(i, 1));

		if( datagrid2.labelmatrix(i, 1) == "true" ) {

			blodno += datagrid2.labelmatrix(i, 2) + "," ;
			prcpnm += datagrid2.labelmatrix(i, 3) + "," ;
			aborh += datagrid2.labelmatrix(i, 4)+datagrid2.labelmatrix(i, 5) + "," ;

			cnt = cnt + 1;

		}

	}

//	alert(blodno.substr(0,blodno.length-1));

	if(cnt < 1){
		messageBox("¼±Åà Á¤º¸°¡ ","I004");
		return;	
	};

	fClearChildNode("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist");
	fClearChildNode("/root/main/cond/tnsnursereccdgrup/sideeffectcomcodelist");
	fClearChildNode("/root/main/cond/tnsnursereccdgrup/discontinucomcodelist");
	
	model.refresh();	

	model.setValue(output5.attribute("ref"), blodno.substr(0,blodno.length-1) );
	model.setValue(output6.attribute("ref"), prcpnm.substr(0,prcpnm.length-1) );
	model.setValue(output7.attribute("ref"), aborh.substr(0,aborh.length-1) );
	model.setValue(radio1.attribute("ref"), "N" );

	model.setValue(input4.attribute("ref"), getCurrentDate() );
	model.setValue(input5.attribute("ref"), getCurrentTime() );

	if(submit("TRMNW05623")){
		model.copyNode("/root/hidden/main","/root/main");
	}

}

 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  Ç÷¾×¿äû¼­ ¼±ÅÃÇßÀ»¶§...
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fBlodReqDoc(){

	var sRowCnt = datagrid7.rows-datagrid7.fixedrows;
	
	var cnt = 0 ;

	model.removeNode ("/root/send/report"); 

	for(var i=1; i<= sRowCnt; i++){ // ¼±ÅÃÇÑ °ªÀÌ ºÒÃâ½Åû »óÅÂÀÎÁö üũ

//		alert(datagrid7.labelmatrix(i, 1));

		if( datagrid7.labelmatrix(i, 1) == "true" ) {

			cnt = cnt + 1;

			if( datagrid7.labelmatrix(i, 2) != "¸ÅĪ°Ë»ç" ) {
			
				messageBox("¸ÅĪ°Ë»ç »óÅ ÀÌ¿Ü¿¡´Â Ç÷¾×¿äû¼­¸¦ Ãâ·Â ","E001");
				return;	
			
			}

			if( datagrid7.labelmatrix(i, 8).length <  5 ) {
			
				messageBox("Ç÷¾×¹øÈ£°¡ ","I004");
				return;	
			
			}

			model.makeValue("/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]","");

			model.copyNode( "/root/send/report/delivedetlgrup/delivedetlgruplist["+cnt+"]", "/root/main/cond/delivedetlgrup/delivedetlgruplist["+i+"]" );
//			alert(instance1.selectSingleNode("/root/send/report/delivedetlgrup/delivedetlgruplist"+"["+cnt+"]").xml);

		}

	}

	if(cnt < 1){
		messageBox("¼±Åà Á¤º¸°¡ ","I004");
		return;	
	};													

	model.makeValue("/root/send/report/patientnm",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/patientnm") );									
	model.makeValue("/root/send/report/pid",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") );	
	model.makeValue("/root/send/report/sexage",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/sexage") );	
	model.makeValue("/root/send/report/btypee",model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/btype") );									
	
	
	exeReportPreview("RFMNR01000", "XMLSTR");	
	
}


 /**
 * @group  :
 * @ver    : 2007.07.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  Ç÷¾×ºÒÃâ ³»¿ª ¼±Åà »èÁ¦
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fDelDeliveExecPrcp(){

	var sRowCnt = datagrid7.rows-datagrid7.fixedrows;	

	var cnt = 0 ;

	for(var i=1; i<= sRowCnt; i++){ // ¼±ÅÃÇÑ °ªÀÌ ºÒÃâ½Åû »óÅÂÀÎÁö üũ

	//		alert(datagrid7.labelmatrix(i, 1));

		if( datagrid7.labelmatrix(i, 1) == "true" ) {

			cnt = cnt + 1;

			if( datagrid7.labelmatrix(i, 2) != "ºÒÃâ½Åû" ) {
			
				messageBox("ºÒÃâ½Åû ÀÌ¿ÜÀÇ »óÅ¿¡¼­´Â »èÁ¦ÇÒ ¼ö ","I004");
				return;	
			
			}

		}

	}

	if(cnt < 1){
		messageBox("¼±Åà Á¤º¸°¡ ","I004");
		return;	
	};

	alert("°³¹ß ÁßÀÔ´Ï´Ù.");

	return ;

//	model.removenode("/root/send");

	model.refresh();

	model.makeValue("/root/send/blodpidflag",blodpidflag);	

	model.makeValue("/root/send/blodno", input13.value  );
	model.makeValue("/root/send/prcpddfrom", input9.value  );
	model.makeValue("/root/send/prcpddto", input10.value  );
	model.makeValue("/root/send/wardcd", combo5.value  );
	model.makeValue("/root/send/roomcd", combo1.value  );
	model.makeValue("/root/send/hngnm", combo6.value  );
	model.makeValue("/root/send/pid", input12.value  );

	if(submit("TRMNW05621")){
	}	  


	//model.setfocus("input13");

	fGetExecDetlList();// ¼öÇàó¹æ³»¿ª¸®½ºÆ®	
	fGettDeliveDetlList();//  ºÒÃâ½Åû ³»¿ª ¸®½ºÆ®									

}

 /**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¼öÇ÷ ¹Ì¼öÇà ³»¿ª ¸®½ºÆ®
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetBlodNoExecRecList(blodpidflag){

	var sRowCnt = datagrid5.rows-datagrid5.fixedrows;	

	if( model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") == "" && model.getValue("/root/main/cond/blodno") == "" ){
	
		messageBox("Ç÷¾×¹øÈ£/µî·Ï¹øÈ£¸¦ ","C001");
		model.setfocus("input13");
		return;	
	
	}

	/* ¼öÇ÷°£È£±â·Ï ³»¿ë ÃʱâÈ­ */
	fClearChildNode("/root/main/cond/tnsnurserecgrup/tnsnurserecgruplist");
	fClearChildNode("/root/main/cond/tnsnursereccdgrup/sideeffectcomcodelist");
	fClearChildNode("/root/main/cond/tnsnursereccdgrup/discontinucomcodelist");
	
	model.refresh();

	model.makeValue("/root/send/blodpidflag",blodpidflag);	

	model.makeValue("/root/send/blodno", input13.value  );
	model.makeValue("/root/send/prcpddfrom", input9.value  );
	model.makeValue("/root/send/prcpddto", input10.value  );
	model.makeValue("/root/send/wardcd", combo5.value  );
	model.makeValue("/root/send/roomcd", combo1.value  );
	model.makeValue("/root/send/hngnm", combo6.value  );
	model.makeValue("/root/send/pid", input12.value  );

	if(submit("TRMNW05621")){
	}	  

}

  /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  Ç÷¾×ºÒÃâ³»¿ªÀÇ Ç÷¾×¹Ý³³ÀÇ·Ú ÀúÀå
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fBlodReturnSave(){

	var sRowCnt = datagrid1.rows-datagrid1.fixedrows;		

	var cnt = 0 ;

	model.removenode("/root/send");
	model.makeValue("/root/send/detlgrup",datagrid1.getupdatedataAll("i"));	
	
	var saveyn = 0 ;

	for(var i=1; i<= sRowCnt; i++){

		//alert(datagrid1.labelmatrix(i, 1));

		if( datagrid1.labelmatrix(i, 1) == "true" ) {

			cnt = cnt + 1;

			// ****************************** ¹Ý³³»çÀ¯ Çʼö ·ÎÁ÷ Ãß°¡ ***************************************

			//alert(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd"));

			if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/reqflag") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/reqflag") == ""){//¹Ý³³/Æó±â¸¦ üũ
				messageBox("¹Ý³³/Æó±â¸¦ ","C002");
				return;			
			}

			if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/returnabandondate") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/returnabandondate") == ""){//¹Ý³³/Æó±âÀÏ Ã¼Å©
				messageBox("¹Ý³³/Æó±âÀÏÀ» ","C002");
				return;			
			}

			if(model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd") == "-" || model.getValue(xBlodReturnReqGrupListPath+"["+i+"]/etcprcpresncd") == ""){//¹Ý³³»çÀ¯ üũ
				messageBox("¹Ý³³/Æó±â »çÀ¯¸¦ ","C002");
				return;			
			}

		}

	}

	if(cnt < 1){
		messageBox("¼±Åà Á¤º¸°¡ ","I004");
		return;	
	};

	if(submit("TXMNR01030")){
		model.copyNode("/root/hidden/main","/root/main");
	}

	/* ¹Ý³³/Æó±â ÀÌÈÄ Á¤º¸ Á¶È¸ ½ÇÇà */

	var pidblodflag = '';
	if(input12.value != ""){
		pidblodflag = 'pid';
	} else if (input13.value !="") {
		pidblodflag = 'blod';										
	}								
	fBlodDeliveList(pidblodflag); //Ç÷¾×ºÒÃâ ¸®½ºÆ® Á¶È¸¹öÆ°
	fGetBlodNoExecRecList(pidblodflag); //¼öÇ÷ ¹Ì¼öÇà ³»¿ª ¸®½ºÆ®

}

 /**
 * @group  :
 * @ver    : 2007.07.16
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  Ç÷¾×ºÒÃâ ³»¿ª Á¶È¸ ¸®½ºÆ®
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fBlodDeliveList(blodpidflag){

	var sRowCnt = datagrid5.rows-datagrid5.fixedrows;	

	if( model.getValue("/root/main/cond/patientgrupInfo/patientgruplistInfo/pid") == "" && model.getValue("/root/main/cond/blodno") == "" ){
	
		messageBox("Ç÷¾×¹øÈ£/µî·Ï¹øÈ£¸¦ ","C001");
		model.setfocus("input13");
		return;	
	
	}

	model.removenode("/root/send");

	model.refresh();

	model.makeValue("/root/send/blodpidflag",blodpidflag);	

	model.makeValue("/root/send/blodno", input13.value  );
	model.makeValue("/root/send/prcpddfrom", input9.value  );
	model.makeValue("/root/send/prcpddto", input10.value  );
	model.makeValue("/root/send/wardcd", combo5.value  );
	model.makeValue("/root/send/roomcd", combo1.value  );
	model.makeValue("/root/send/hngnm", combo6.value  );
	model.makeValue("/root/send/pid", input12.value  );

	if(submit("TRMNW05620")){
	}	  

	model.setfocus("input13");		

}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ºÒÃâ½Åû ³»¿ª Á¶È¸ ¸®½ºÆ®
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGettDeliveDetlList(){


	if( model.getValue("/root/main/cond/wardcdgrup/wardcdgruplist") == "" ){
	
//		messageBox("º´µ¿À» ","C002");
//		model.setfocus("combo7");
//		return;	
	
	}

	model.removenode("/root/send");
	
	model.makeValue("/root/send/prcpddfrom", input2.value);
	model.makeValue("/root/send/prcpddto", input11.value);
	model.makeValue("/root/send/wardcd", combo7.value);	
	model.makeValue("/root/send/roomcd", combo2.value);	
	model.makeValue("/root/send/hngnm", combo8.value);
	model.makeValue("/root/send/pid", input3.value);

	if(submit("TRMNW05609")){
	}	  

}

/**
 * @group  :
 * @ver    : 2007.04.02
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¼öÇàó¹æ ¼±Åýà üũ»çÇ×
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 	
function fSelchange(){

	var iRow = datagrid5.row ;

//	alert(parseInt(model.getValue(xExecDetlListPath+"["+iRow+"]/prcpqty")));
//
//	alert(parseInt(model.getValue(xExecDetlListPath+"["+iRow+"]/appno")));

	if( parseInt(model.getValue(xExecDetlListPath+"["+iRow+"]/prcpqty")) <= parseInt(model.getValue(xExecDetlListPath+"["+iRow+"]/appno")) ) {

		model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;

		messageBox("½Åû¼ö·®ÀÌ Ã³¹æ¼ö·®º¸´Ù Ŭ ¼ö ","I004");
		return;			

	}

	if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "D/C") {

		model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;

		messageBox("D/C »óÅ¿¡¼­´Â ½ÅûÇÒ ¼ö ","I004");
		return;			

	} else 	if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "˂ȍ") {

		model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;

		messageBox("ÀÇ»ç »óÅ¿¡¼­´Â ½ÅûÇÒ ¼ö ","I004");
		return;			

	} else 	if( model.getValue(xExecDetlListPath+"["+iRow+"]/prcpstatcd") == "¿Ï·á") {

		model.setValue(xExecDetlListPath+"["+iRow+"]/sel", "false" ) ;

		messageBox("¿Ï·á »óÅ¿¡¼­´Â ½ÅûÇÒ ¼ö ","I004");
		return;			

	}
	
}


/**
 * @group  :
 * @ver    : 2007.04.02
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ±×¸®µåÀÇ °ªÀÌ º¯°æµÇ¾úÀ»¶§, »óÅ°ªÀ» º¯°æÇÑ´Ù.
 * @param  :
 * @return :
 * @---------------------------------------------------
 */ 	
function fChangedGridCol(){

	var sDetlGrupRow = datagrid5.row;
	var sDetlGrupBKRow=0;

	var num = model.getValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/num");

	for(var i=1; i<= getNodesetCount(xPopWndClsListBKPath); i++){
		if(model.getValue(xPopWndClsListBKPath+"["+i+"]/num") == num){
			sDetlGrupBKRow = i;
			break;
		}
	}

	if(event.keyCode == "32") {
		messageBox("½Åû¼ö·®¿¡ ½ºÆäÀ̽º¸¦ ³ÖÀ» ¼ö ","I004");
		model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/stat","-");
		model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/appno","");
		datagrid5.refresh();
		return;											
	}

	var irr = datagrid5.textmatrix(sDetlGrupRow,6) ;

	if(model.getValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/appno") == "0" || model.getValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/appno") == ""){
		model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/stat","-");
		datagrid5.rebuild();
		//return;	
	}

//	alert(instance1.selectSingleNode(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]").xml);
//
//	alert(instance1.selectSingleNode(xPopWndClsListBKPath+"["+sDetlGrupBKRow+"]").xml);

	if(instance1.selectSingleNode(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]").xml != instance1.selectSingleNode(xPopWndClsListBKPath+"["+sDetlGrupBKRow+"]").xml){
		model.setValue(xPopWndExecDetlListPath+"["+sDetlGrupRow+"]/stat","I");
		datagrid5.rebuild();

	} 

}

 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  HSCT CBC init
 * @param  :
 * @return :
 * @---------------------------------------------------
 */

function fPopWndSave(){

	var sRowCnt = datagrid5.rows-datagrid5.fixedrows;		

	model.removenode("/root/send");
	model.makeValue("/root/send/detlgrup",datagrid5.getupdatedataAll("i"));	
	
	var saveyn = 0 ;

	for(var i=1; i<= sRowCnt; i++){

		if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/stat") != "-") {

			saveyn = 1 ;

		}

		if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/stat") != "-" && model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno") == ""){
			messageBox("½Åû¼ö·®Àº ","I003");
			return;			
		}

//		if(	!isNumber(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno"))	) {
//
//			messageBox("¼ýÀÚÇüÀ» ","C001");
//			return;	
//
//		}

		if( parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno")) < 1 || parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno")) == " " ) {

			messageBox("½Åû¼ö·®Àº 1°Ç ÀÌÇÏ·Î ÀÔ·ÂÇÒ ¼ö ","E001");
			return;			
		}
		
		if( parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/delivepossno")) < parseInt(model.getValue(xPopWndExecDetlListPath+"["+i+"]/appno")) ) {

			messageBox("½Åû¼ö·®Àº ºÒÃâ¼ö·®º¸´Ù Å©°Ô ÀÔ·Â ","E001");
			return;			
		}

//		alert( model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd")  );
//		alert( model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm")  );

		if(model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopedd") == "" || model.getValue(xPopWndExecDetlListPath+"["+i+"]/prcphopetm") == ""){
			messageBox("¿¹¾àÀÏÀÚ/¿¹¾à½Ã°£Àº ","I003");
			return;			
		}


	
	}

	if(saveyn <= 0 ){
		messageBox("¼öÁ¤»çÇ×ÀÌ ¾ø¾î ÀúÀå ","E001");
		return;
	}
	
			//alert("result : " + saveyn);
//	if(saveyn <= 0 ){
//		messageBox("¼öÁ¤»çÇ×ÀÌ ¾ø¾î ÀúÀå ","E001");
//		return;	
//	}

	//alert(model.getValue("/root/main/cond/clsflag"));
	//alert(model.getValue("/root/main/cond/recflag"));
	
	
	//if(messageBox("","Q002") != 6) return;
	//alert(model.getValue("/root/main/cond/todd"));
//	model.makeValue("/root/send/lrggrupcd", model.getValue(xCondPath+"/lrggrupcd"));
//	model.makeValue("/root/send/clsflag", model.getValue("/root/main/cond/clsflag"));
//	model.makeValue("/root/send/recflag", model.getValue("/root/main/cond/recflag"))
//	model.makeValue("/root/send/todd2", model.getValue("/root/main/cond/todd"))
	//alert(model.getValue("/root/send/todd2"));		
	if(submit("TXMNR01008")){
		model.copyNode("/root/hidden/main","/root/main");
	}

//	grd_detlgrup.row = 1;

	window.close();

}

 /**
 * @group  :
 * @ver    : 2007.05.09
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  HSCT CBC init
 * @param  :
 * @return :
 * @---------------------------------------------------
 */


function fPopWndInit(){

	model.makeValue("/root/send/prcpddfrom",          opener.window.javascript.getParameter("prcpddfrom") );
	model.makeValue("/root/send/prcpddto",			  opener.window.javascript.getParameter("prcpddto") );
	model.makeValue("/root/send/wardcd",		      opener.window.javascript.getParameter("wardcd") );
	model.makeValue("/root/send/roomcd",			  opener.window.javascript.getParameter("roomcd") );
	model.makeValue("/root/send/pid",				  opener.window.javascript.getParameter("pid") );
	model.makeValue("/root/send/queryprcpdd",		  opener.window.javascript.getParameter("queryprcpdd") );
	model.makeValue("/root/send/queryprcpno",		  opener.window.javascript.getParameter("queryprcpno") );
	model.makeValue("/root/send/queryprcphistno",	  opener.window.javascript.getParameter("queryprcphistno") );


	//alert(prcpddfrom);	alert(prcpddto);	alert(wardcd);	alert(roomcd);	alert(pid);
					
	if(submit("TRMNW05607")){

		model.copyNode("/root/temp/main","/root/main");
	}	

}


 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  Ç÷¾×ºÒÃâ½Åû Æ˾÷
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fPopWnd(){

	var iRows = datagrid5.rows;

	var queryprcpdd = "" ;
	var queryprcpno = "" ;
	var queryprcphistno = "" ;

	var checkcnt = 0 ;

	for(var i = 1 ; i < datagrid5.rows; i++ ) {// Àüü¸¦ µ¹¸é¼­ ±×·ì¿¡ °ªÀÌ Ã¼Å©µÇ¾î ÀÖ´Â°Í ÃʱâÈ­

		if(	model.getValue(xExecDetlListPath+"["+ i +"]/sel") ==  "true" ) {

			// alert("111");

			queryprcpdd		= queryprcpdd		+ "'" + model.getValue(xExecDetlListPath+"["+ i +"]/prcpdd2") + "'," ;
			queryprcpno		= queryprcpno		+ "" + model.getValue(xExecDetlListPath+"["+ i +"]/prcpno") + "," ;
//			alert(model.getValue(xExecDetlListPath+"["+ i +"]/prcphistno"));
			queryprcphistno = queryprcphistno	+ "" + model.getValue(xExecDetlListPath+"["+ i +"]/prcphistno") + "," ;

			checkcnt++ ;

		} else {

			 // alert("222");
		
		}
		
	}

	if( checkcnt <= 0 ) {
	
		messageBox("¼öÇ÷ó¹æ³»¿ªÀ» ","C002");
		return 0 ;	
	
	}

	queryprcpdd = queryprcpdd.replace(/-/g,"")

//	alert(queryprcpdd.replace(/-/g,""));
//	alert(queryprcpdd.substr(0,queryprcpdd.length-1));
//	alert(queryprcpno.substr(0,queryprcpno.length-1));
//	alert(queryprcphistno.substr(0,queryprcphistno.length-1));

	queryprcpdd = queryprcpdd.substr(0,queryprcpdd.length-1) ;
	queryprcpno = queryprcpno.substr(0,queryprcpno.length-1) ;
	queryprcphistno = queryprcphistno.substr(0,queryprcphistno.length-1) ;

//	for(var i = 0 ; i < data.length; i++ ) {
//
//		queryprcpno =  queryprcpno + data[i]  ;
//
//	}


	setParameter("prcpddfrom", input2.value);
	setParameter("prcpddto", input11.value);
	setParameter("wardcd", combo7.value);
	setParameter("roomcd", combo2.value);
	setParameter("pid", input3.value);
	setParameter("queryprcpdd", queryprcpdd);
	setParameter("queryprcpno", queryprcpno);
	setParameter("queryprcphistno", queryprcphistno);


	var left = event.screenX-1000;
	var top = event.screenY+50;
	modal("SMMNR01001",1,left,top);


}

 /**
 * @group  :
 * @ver    : 2007.06.18
 * @by     : Á¤Âù¼º 
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   :  ¼öÇàó¹æ³»¿ª Á¶È¸ ¸®½ºÆ®
 * @param  :
 * @return :
 * @---------------------------------------------------
 */
function fGetExecDetlList(){

	if( model.getValue("/root/main/cond/wardcdgrup/wardcdgruplist") == "" ){
	
//		messageBox("º´µ¿À» ","C002");
//		model.setfocus("combo7");
//		return;	
	
	}

	model.removenode("/root/send");

	model.makeValue("/root/send/prcpddfrom", input2.value);
	model.makeValue("/root/send/prcpddto", input11.value);
	model.makeValue("/root/send/wardcd", combo7.value);	
	model.makeValue("/root/send/roomcd", combo2.value);	
	model.makeValue("/root/send/hngnm", combo8.value);
	model.makeValue("/root/send/pid", input3.value);

	if(submit("TRMNW05606")){
	}	  

}



 /* ¼öÇ÷°£È£ ±â·Ï Âü°í ½ºÅ©¸³Æ® ³¡ */