YNU_JEUS/app_home/himed/xpapps/ast/examcurexp/xp/AEZ0001.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
/**
 * 파일명 : AEZ0001.js
 * 작성일자 : 2007.5.18
 */

/**
 * 세션 GET 
 */
 
 
var suppdeptcd ;
 
function lf_aezfSetSuppDeptcd() {
	
	var dutplcecd 		= sysf_getUserInfo("dutplcecd");
	var selectplcecd 	= frmf_getPrestDeptCd(); 
	if(utlf_isNull(selectplcecd)) {
		selectplcecd 	= dutplcecd;
	}
	
	suppdeptcd = selectplcecd;
//	sysf_trace("suppdeptcd == " + suppdeptcd);
	frmf_setParameter("AST_DEPTCD", suppdeptcd);
}
function lf_aezfSetSuppDeptcd_main() {
	
	var dutplcecd 		= sysf_getUserInfo("dutplcecd");
	var selectplcecd 	= frmf_getPrestDeptCd(); 
	if(utlf_isNull(selectplcecd)) {
		selectplcecd 	= dutplcecd;
	}
	
	suppdeptcd = selectplcecd;
//	sysf_trace("suppdeptcd == " + suppdeptcd);
//	frmf_setParameter("AST_DEPTCD", suppdeptcd);
}

/****************************************************************************************
 * Argument			: oTrgtGrid 	- 그리드ID
 *					: nColumnIndx	- Col Index
 * Description		: 그리드 바인딩 Cell Name
 ****************************************************************************************/
function lf_aezfGetBindCellName(oTrgtGrid, nColumnIndx){
	var sRtnText  = "";
	var sTrgtText = oTrgtGrid.getCellProperty("body", nColumnIndx, "text");
	if(!utlf_isNull( sTrgtText)){
		sRtnText = sTrgtText.replace("bind:", "");
	}
	
	return sRtnText;
}


/************************************************************************************************
함수명 : lf_aezfSetCellStyle ()
인자 :
				String	gridID		- 그리드 아이디
				String	styleFlag	- 컬러 인덱스
				String	data		- 데이터 값
				Srting	colRef		- 비교할 컬럼 Ref
				String	setColRef	- 변경할 컬럼 Ref
				String  fillflag    - 변경할 항목 구분(B: background, F: font)
결과값 :
함수설명 :  그리드 특정 컬럼값을 비교하여 셀 백컬러 변경
	* 사용예) aezfSetCellStyle(Grid00,"0^1^2","V^P^D","Column0","Column1","B");
************************************************************************************************
작   성   자 : 어 승옥
작   성   일 : 2006. 12. 01
************************************************************************************************/
function lf_aezfSetCellStyle( gridID , styleFlag , data , colRef , setColRef, fillflag ) {



    var fillStyle = "";
    var style;
    
    var styleFlags = styleFlag.split("^");
 	var datas = data.split("^");
 	var setCellIdx = gridID.getBindCellIndex( "body", setColRef);
    
    if ( fillflag == "B" ) {
    	style = new Array("#ffff00", "#ccffcc", "#FF9A00"); 
    	gridID.setCellProperty("body", setCellIdx, "background" ,"");
 	    gridID.setCellProperty("body", setCellIdx, "background2" ,"");
 	    gridID.setCellProperty("body", setCellIdx, "font" ,"");
    } else if ( fillflag == "F" ) {
    	style = new Array("#ffff00", "#ccffcc", "#FF9A00"); 
    	gridID.setCellProperty("body", setCellIdx, "color" ,"");
 	    gridID.setCellProperty("body", setCellIdx, "color2" ,"");
 	    gridID.setCellProperty("body", setCellIdx, "font" ,"");
    }
	
	var BackGroundFont = "";
	var end = "";
	var font = "";
	
	if(datas.length == 1){
	  BackGroundFont += "expr:" + colRef+"  == '" + dataValue +"' ? '"+styleValue+"' : ''";
	  font += "expr:" + colRef+"  == '" + dataValue +"' ? 'Dotum,9,bold' : ''";
	}else{
		for( var j = 0 ; j < datas.length ; j++ ) {
			
			var dataValue = datas[j];
			var styleValue = style[styleFlags[j]];
			
			if(j == datas.length-1){
			   BackGroundFont += colRef+" == '" + dataValue +"' ? '"+styleValue+"' : ''";
			   font += colRef+" == '" + dataValue +"' ? 'Dotum,9,bold' : ''";
			
			}else if(j == 0){
			   BackGroundFont += "expr:" + colRef+"  == '" + dataValue +"' ? '"+styleValue+"' : (";
			   font += "expr:" + colRef+"  == '" + dataValue +"' ? 'Dotum,9,bold' : (";
			
			}else{
			   BackGroundFont += colRef+"  == '" + dataValue +"' ? '"+styleValue+"' : (";
			   font += colRef+"  == '" + dataValue +"' ? 'Dotum,9,bold' : (";
			}
			
			if( j<datas.length-1)
			end += ")";
			
			
		} 
		
		BackGroundFont += end;
		font += end;
    }
    
	if ( fillflag == "B" ) {
    	gridID.setCellProperty("body", setCellIdx, "background" ,BackGroundFont);
 	    gridID.setCellProperty("body", setCellIdx, "background2" ,BackGroundFont);
 	    gridID.setCellProperty("body", setCellIdx, "font" ,font);
    } else if ( fillflag == "F" ) {
    	gridID.setCellProperty("body", setCellIdx, "color" ,BackGroundFont);
 	    gridID.setCellProperty("body", setCellIdx, "color" ,BackGroundFont);
 	    gridID.setCellProperty("body", setCellIdx, "font" ,font);
    }
}	

/************************************************************************************************
함수명 : lf_aezfSetRowStyle ()
인자 :
				objects	gridID		- 그리드 Object
				String	styleFlag	- 컬러 인덱스
				String	data			- 데이터 값
				Srting	colRef		- 비교할 컬럼 Ref
				String	[control]		- 조건 	smaller | smallerThen | equal | biggerThen | bigger
				number startCol 	- 그리드 시작 위치(null 이면 0으로 초기값 셋팅)
결과값 :
함수설명 :  그리드 특정 컬럼값을 비교하여 로우 백컬러 변경
	* 사용예) lf_aezfSetRowStyle( Grid00 , "0^2" , "3^5" , "Column1" , "small^small" )
************************************************************************************************
작   성   자 : 어 승옥
작   성   일 : 2006. 12. 01
************************************************************************************************/
function lf_aezfSetRowStyle( gridID , styleFlag , data , colRef , control, startCol ) {

    var fillStyle = "";
    var style = new Array("#fcd2c1" , "#ffe79d" , "#f3e1bf" , "#7BE6B7" , "#b9e5fb" , "#f7a08b" , "#fec34d" , "#dec6a4" , "#c8e67b" , 
 	                      "#43c8f5" , "#ff9933" , "#3399ff" , "#9999cc" , "#FFC8C8" , "#fab7bf" , "#ffff00" , "#ccffcc" , "#FF9A00", "#ff0000");
    
    var styleFlags = styleFlag.split("^");
 	var datas = data.split("^");
    
    if( utlf_isNull(control))
		control = "equal";
		
	var controls = control.split("^"); 
	
	var BackGroundFont = "";
	var end = "";
//	var font = "";
	for( var j = 0 ; j < datas.length ; j++ ) {
		
		var dataValue = datas[j];
		var styleValue = style[styleFlags[j]];
		
		
		if(utlf_isNull(controls[j]))
				controls[j] = "equal"; 
	
	    var ctrl = "";
		switch( controls[j] ) {	
				case "small":
					ctrl = "<";  
					break;
				case "smallThen":
					ctrl = "<=";  
					break;
				case "bigger":
					ctrl = ">";  
					break;
				case "biggerThen":
					ctrl = ">=";  
					break;
				case "equal":		
                    ctrl = "==";  
					break;
			}
		if(j == datas.length-1){
		   if(datas.length == 1){
		     BackGroundFont = "expr:" +colRef+" "+ctrl+ " '" + dataValue +"' ? '"+styleValue+"' : ''";
		   }else{
		     BackGroundFont += colRef+" "+ctrl+ " '" + dataValue +"' ? '"+styleValue+"' : ''";
		   }
		   //font += colRef+" == '" + dataValue +"' ? 'Dotum,9,bold' : ''";
		
		}else if(j == 0){
		   BackGroundFont += "expr:" + colRef+" "+ctrl+ " '" + dataValue +"' ? '"+styleValue+"' : (";
		   //font += "expr:" + colRef+"  == '" + dataValue +"' ? 'Dotum,9,bold' : (";
		
		}else{
		   BackGroundFont += colRef+" "+ctrl+ " '" + dataValue +"' ? '"+styleValue+"' : (";
		   //font += colRef+"  == '" + dataValue +"' ? 'Dotum,9,bold' : (";
		}
		
		if( j<datas.length-1)
		end += ")";	
	} 
	
	BackGroundFont += end;
//	font += end;
 //   sysf_trace(BackGroundFont);
//	if ( fillflag == "B" ) {

	if(utlf_isNull(startCol))
	{
		startCol = 0;
	}

   for(var i=startCol; i<gridID.getCellCount("body");i++){
		if(gridID.getCellProperty("body",i,"celltype") == "head") continue;
    	gridID.setCellProperty("body", i, "background" ,BackGroundFont);
 	    gridID.setCellProperty("body", i, "background2" ,BackGroundFont);
   }	    
// 	    gridID.setCellProperty("body", setCellIdx, "font" ,font);
//     } else if ( fillflag == "F" ) {
//     	gridID.setCellProperty("body", setCellIdx, "color" ,BackGroundFont);
//  	    gridID.setCellProperty("body", setCellIdx, "color" ,BackGroundFont);
//  	    gridID.setCellProperty("body", setCellIdx, "font" ,font);
//     }
	
}
		
/****************************************************************************************
 * Argument			: vGrdObj		: 목적그리드
 *					: vSrcXPath		: 목적노드set
 * Description		: Add PrcpMngt value check. 
 ****************************************************************************************/
function lf_aezfAddPrcpMngt(vGrdObj, vSrcXPath) {
	var objDs 			= eval(vGrdObj.binddataset);
	var i 				= objDs.rowposition;
	var pid             = objDs.getColumn(i,"pid");
	var orddd           = objDs.getColumn(i,"orddd");
	var cretno          = objDs.getColumn(i,"cretno");
	var instcd          = sysf_getUserInfo("dutplceinstcd");
	var ioflag          = objDs.getColumn(i,"prcpgenrflag");
	var issdept         = suppdeptcd;
	var menuparam		= frmf_getMenuParam();
	var totalexecdeptcd = objDs.getColumn(i,"mrsmissdeptcd");

	if ( ioflag == "O" || ioflag == "S" ) ioflag = "O";
	else ioflag = "I";
	//집계부서가 있으면 추가처방시 집계부서를 아니면 suppdeptcd를 넘긴다
	if(totalexecdeptcd != "" && totalexecdeptcd!= null){
		issdept = totalexecdeptcd;
	}	
	
	frmf_setParameter ( "SMMMO00200_pid", pid );
	frmf_setParameter ( "SMMMO00200_orddd", orddd);// ( orddd: 입원:입원일, 외래:수진일)
	frmf_setParameter ( "SMMMO00200_cretno", cretno );
	frmf_setParameter ( "SMMMO00200_instcd", instcd);
	frmf_setParameter ( "SMMMO00200_ioflag", ioflag );
	frmf_setParameter ( "SMMMO00200_issdept", issdept );

	if(menuparam == "PAM"){
		sysf_setGlobalVariable("menuparam", "PAM");
	}

// 	var agument = {	 plgv_SMMMO00200_pid:pid
// 					,plgv_SMMMO00200_orddd:orddd
// 					,plgv_SMMMO00200_cretno:cretno
// 					,plgv_SMMMO00200_instcd:instcd
// 					,plgv_SMMMO00200_ioflag:ioflag
// 					,plgv_SMMMO00200_issdept:issdept };

	//frmf_modal("SMMMO00200", "SMMMO00200",agument, "", "", "", "", "", "", "", "", "", "M");
	frmf_modal("SMMMO00200", "SMMMO00200","", "", "", "", "", "", "", "", "", "", "M");
}
	
/************************************************************************************************
**fCheckDup
@param : 
* vGrdObj : grid control
* vCheckVal : dup check 대상 값
desc :  grid dup value check. 
*************************************************************************************************/
		function lf_checkDup( vGrdObj, vCheckCol , vCheckVal ){ 
			var objDs = eval(vGrdObj.binddataset);
			
			var nFrow = objDs.findRow( vCheckCol, vCheckVal );

            if(nFrow > 0){    
              return false;
            } 
		}			

// /************************************************************************************************
//  * @group  :
//  * @ver    : 2007.12.12
//  * @by     : 장준원  
//  * @---------------------------------------------------
//  * @type   : function
//  * @access : public
//  * @desc   : OCR출력 과 출력 리스트 조회 
//  * @return :
// *************************************************************************************************/ 
// 
// function aezfOcrListPrint(xpath, row1, colid1, colid2, colid3, colid4, colid5, colid6, colid7, colid8, colid9, colid10, colid11, colid12) {
// 
// 	model.removeNodeset("/root/temp/para");
// 	
// 	model.makeValue("/root/temp/para/pid",                     model.getValue(xpath+"[" + row1 + "]/" + colid1       ) );
// 	model.makeValue("/root/temp/para/orddd",                   model.getValue(xpath+"[" + row1 + "]/" + colid2       ) );
// 	model.makeValue("/root/temp/para/orddeptcd",               model.getValue(xpath+"[" + row1 + "]/" + colid3       ) );
// 	model.makeValue("/root/temp/para/orddeptnm",               model.getValue(xpath+"[" + row1 + "]/" + colid4       ) );
// 	model.makeValue("/root/temp/para/orddrid",                 model.getValue(xpath+"[" + row1 + "]/" + colid5       ) );
// 	model.makeValue("/root/temp/para/drnm",                    model.getValue(xpath+"[" + row1 + "]/" + colid6       ) );
// 	
// 	// I/ O /E만 받는다.
// 	if ( colid7 == "S" ) colid7 = "O";
// 	else if( colid7 == "D" ) colid7 = "I";
// 	else colid7 = colid7;
// 	
// 	model.makeValue("/root/temp/para/ordtype",                 model.getValue(xpath+"[" + row1 + "]/" + colid7       ) );
// 	model.makeValue("/root/temp/para/patnm",                   model.getValue(xpath+"[" + row1 + "]/" + colid8       ) );
// 	model.makeValue("/root/temp/para/inroomcd",                model.getValue(xpath+"[" + row1 + "]/" + colid9       ).getTrim() );
// 	model.makeValue("/root/temp/para/rrgstno1",                model.getValue(xpath+"[" + row1 + "]/" + colid10      ) );
// 	model.makeValue("/root/temp/para/rrgstno2",                model.getValue(xpath+"[" + row1 + "]/" + colid11      ) );
// 	model.makeValue("/root/temp/para/cretno",                  model.getValue(xpath+"[" + row1 + "]/" + colid12      ) );
// 
//     model.refresh();
// 
// 	modal("SMMRF02300", "", "200", "200", "SMMRF02300","/root/temp/para","/root/temp/para");	
// 
// } 	

/************************************************************************************************
 * @group  :
 * @ver    : 2007.12.12
 * @by     : 장준원  
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : OCR출력 과 출력 리스트 조회 
 * @return :
*************************************************************************************************/ 

function lf_aezfOcrListPrint(gridId, row1, colid1, colid2, colid3, colid4, colid5, colid6, colid7, colid8, colid9, colid10, colid11, colid12) {

	//model.removeNodeset("/root/temp/para");
	var objDs = eval(gridId.binddataset);
	var pid = objDs.getColumn(row1,colid1);
	var orddd = objDs.getColumn(row1,colid2);
	var orddeptcd = objDs.getColumn(row1,colid3);
	var orddeptnm = objDs.getColumn(row1,colid4);
	var orddrid = objDs.getColumn(row1,colid5);
	var drnm = objDs.getColumn(row1,colid6);
	var ordtype = objDs.getColumn(row1,colid7);
	// I/ O /E만 받는다.
	if ( ordtype == "S" ) ordtype = "O";
	else if( ordtype == "D" ) ordtype = "I";
	else ordtype = ordtype;
	
	var patnm = objDs.getColumn(row1,colid8);
	var inroomcd = objDs.getColumn(row1,utlf_trim(colid9));
	var rrgstno1 = objDs.getColumn(row1,colid10);
	var rrgstno2 = objDs.getColumn(row1,colid11);
	var cretno = objDs.getColumn(row1,colid12);

//	var agument = {pid:pid
// 	              ,orddd:orddd
// 	              ,orddeptcd:orddeptcd
// 	              ,orddeptnm:orddeptnm
// 	              ,orddrid:orddrid
// 	              ,drnm:drnm
// 	              ,ordtype:ordtype
// 	              ,patnm:patnm
// 	              ,inroomcd:inroomcd
// 	              ,rrgstno1:rrgstno1
// 	              ,rrgstno2:rrgstno2
// 	              ,cretno:cretno};
	dsf_createDsRow("ds_temp_para", [
									{col:"pid", type:"STRING", size:256, val:pid}
								  , {col:"orddd", type:"STRING", size:256, val:orddd}
								  , {col:"orddeptcd", type:"STRING", size:256, val:orddeptcd}
								  , {col:"orddeptnm", type:"STRING", size:256, val:orddeptnm}
								  , {col:"orddrid", type:"STRING", size:256, val:orddrid}
								  , {col:"drnm", type:"STRING", size:256, val:drnm}
								  , {col:"ordtype", type:"STRING", size:256, val:ordtype}
								  , {col:"patnm", type:"STRING", size:256, val:patnm}
								  , {col:"inroomcd", type:"STRING", size:256, val:inroomcd}
								  , {col:"rrgstno1", type:"STRING", size:256, val:rrgstno1}
								  , {col:"rrgstno2", type:"STRING", size:256, val:rrgstno2}
								  , {col:"cretno", type:"STRING", size:256, val:cretno}
									]);
	var objArg = new Object();
	objArg.arg_ds_temp_para= ds_temp_para;	
	
	//as-is:2020.03.17 수정
    //frmf_modal("SMMRF02300", "SMMRF02300", objArg, "", "", 200, 200, "", "", "", "", "", "M");
    frmf_modal("SPMRF04601", "SPMRF04601", objArg, "", "", 200, 200, "", "", "", "", "", "M");

	//modal("SMMRF02300", "", "200", "200", "SMMRF02300","/root/temp/para","/root/temp/para");	

} 

/**
*	Age Calculation =======================================================================================================================================
*/	
function lf_aezfgetFullAge(pResidentNo, pDate, pPosition)
{
	if(isNaN(pResidentNo)) return -1;

	var pivotYY = "";
	var pivotMM = "";
	var pivotDD = "";
	var regYY = "";
	var regMM = "";
	var regDD = "";

	if(typeof(pDate) == "undefined" || pDate == "" || pDate == null) {
		var today = new Date();
		pivotYY = today.getYear();
		pivotMM = today.getMonth() + 1;
		pivotDD = today.getDate();
	} else {
		pivotYY = pDate.getYear();
		pivotMM = pDate.getMonth() + 1;
		pivotDD = pDate.getDate();
	}

	if(pResidentNo.length == 13 ){
		gender = pResidentNo.substr(6, 1);
		regYY = eval(pResidentNo.substr(0, 2));
		regMM = eval(pResidentNo.substr(2, 2));
		regDD = eval(pResidentNo.substr(4, 2));

		if(gender == '3' || gender == '4' || gender == '7' || gender == '8') {
			regYY += 2000;
		} else if(gender == '0' || gender == '9') {
			regYY += 1800;
		} else {
			regYY += 1900;
		}
	}else if(pResidentNo.length == 8 && utlf_isValidDateTime(pResidentNo, "YYYYMMDD")){
		regYY = eval(pResidentNo.substr(0, 4));
		regMM = eval(pResidentNo.substr(4, 2));
		regDD = eval(pResidentNo.substr(6, 2));
	}else{
		return -1;
	}

	var age = pivotYY - regYY;

	if(age > 0) {
		if(pivotMM == regMM) {
			if(pivotDD < regDD) {
				age -= 1;
			}
		} else if(pivotMM < regMM) {
			age -= 1;
		}
	}
	
	if ( pPosition == "M")
	{
		//12개월이하일때 계산
		if(age <= 0){
			if(pivotYY > regYY) {
				pivotMM += 12;
			}
			age = pivotMM - regMM ;
			if(pivotDD < regDD) {
				age -= 1;
			}
			age = "0."+age;
		}
	}

	return age;
}

/****************************************************************************************
 * Argument			: N/A
 * Description		: 팝업화면 오픈
 ****************************************************************************************/
function lf_aezfPopUpModalessSample(displayid, maingridlistid) {
	var objDs = eval(maingridlistid.binddataset);
	if ( objDs.rowcount == 0 ) return;
 	var row =  maingridlistid.rowpositon;

	frmf_setParameter("opener_parameter_id",objDs.getColumn(row, "pid"));
 	frmf_open(displayid,displayid,null, null, null, null, null, null, null, null, null, null, "M");
}

function lf_aezfPopUpRsrvSample(displayid, maingridlistid) {
		//if ( maingridlistid.row == 0 ) return;
		var objDs = eval(maingridlistid.binddataset);
		if ( objDs.rowcount == 0 ) return;
		
		//var pid = model.getValue(path+"[" + row + "]/pid");
		
		var pid = objDs.getColumn(objDs.rowposition,"pid");
		 
		var suppdeptcd2 = suppdeptcd;
		var sflag = pid + "▦" + "A" + "▦" + suppdeptcd2; 

		frmf_setParameter("opener_parameter_id", sflag);
		//alert(getParameter("opener_parameter_id"));
		//open(displayid, 1, "", "", "", "", "", "left:0; right:0; width:0; height:0;  min:hidden, max:hidden;");
		frmf_open(displayid, displayid,{sflag: sflag}, "", "", "", "", "", "", "", "", "", "M");
		//frmf_open
}

/************************************************************************************************
 * @group  :
 * @ver    : 2007.11.09
 * @by     : 이상준  
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 지정된 인스턴스를 삽입
 * @return :
*************************************************************************************************/ 

function lf_aezfInsertInstance(cdGroupID, codeName, codeID) {
	//model.refresh();
	
// 	model.copyNode("/root/hidden/comcd",targetXpath);
// 
// 	var nodelist = instance1.selectNodes("/root/hidden/comcd/"+cdGroupID);
// 
// 	var newNode = instance1.createNode("element", cdGroupID, "");
// 
// 	var childnode1 = instance1.createNode("element", "cdnm", "");
// 	var childnode2 = instance1.createNode("element", "cdid", "");
// 	newNode.appendChild(childnode1);
// 	newNode.appendChild(childnode2);
// 
// 	if (nodelist.length > 0)
// 	{
// 		//var currNode = root.hidden.comcd.insertBefore(newNode, nodelist.item(0)); 
// 
// 		model.setValue("/root/hidden/comcd/"+cdGroupID+"[1]/cdnm", codeName);
// 		model.setValue("/root/hidden/comcd/"+cdGroupID+"[1]/cdid", codeID);
// 	}
    var dsNm = "ds_temp_"+cdGroupID;
    var rtn = this.all[dsNm];
	if (!rtn) {
	      var nRow = rtn.addRow();
	      rtn.setColumn(nRow,"cdnm",codeName);
	      rtn.setColumn(nRow,"cdid",codeID);
	}
} 
	

function lf_aezfGetSrchPatInfo(cond1, cond2, cond3, cond99, rtnXpath) {
	
// 	model.makeValue ( "/root/send/cond1",     cond1 );
// 	model.makeValue ( "/root/send/cond2",     cond2 );
// 	model.makeValue ( "/root/send/cond3",     cond3 );
// 	model.makeValue ( "/root/send/cond99",    cond99 );
// 
// 	if (!submit ( "TRMMO02501",false )) {
// 		model.resetInstanceNode (rtnXpath );
// 		model.refresh();							
// 		return "0";
// 	}else {
// 		return "1";
// 	}
	
	var sInDsName = dsf_createDsRow("ds_temp_req"
	                                , [{col: "cond1", val: cond1}
	                                ,  {col: "cond2", val: cond2}
	                                ,  {col: "cond3", val: cond3}
	                                ,  {col: "cond4", val: ""}
	                                ,  {col: "cond5", val: ""}
	                                ,  {col: "cond6", val: ""}
	                                ,  {col: "cond7", val: ""}
	                                ,  {col: "cond8", val: ""}
	                                ,  {col: "cond21", val: ""}
	                                ,  {col: "cond22", val: ""}
	                                ,  {col: "cond99", val: cond99}
	                                ,  {col: "scrnflag", val: ""}
	                                ,  {col: "addprcpyn", val: ""}
	                                ,  {col: "issdeptcd", val: ""}
	                                ]);									
									
									
	// 서브밋호출
	tranf_submit({
                     id: "TRMMO02501"
                   , service: "prcpmngtapp.PrcpMngt"
	               , method: "reqGetComnPatInfo"
	               , inds : "req="+sInDsName
	               , outds: "ds_data_patinfolist=patchosinfolist"
	               , async: false
     });


      var rtn = this.all["ds_temp_req"];
	  if(rtn) {
	     var objDs = this.removeChild("ds_temp_req");
		  delete objDs;
		  objDs = null;
	  }  
	  
	  if(ds_data_patinfolist.rowcount == 0){
	     return "0";
	  }else{
	     return "1";
	  }
}	

function lf_aezfTopMost(id,xPos,yPos,wid,ref,resultref,userProp) {
	var rtn = "";

	//body.disabled = true;

	if (userProp == null) {
		//userProp = "min:hidden;max:hidden;";

		var style = "min=false,max=false";
	} else {

	    var style = "min=false,max=false";
		//userProp = "min:hidden;max:hidden;" + userProp;
	}
	
	var sURL = sysf_getScreenURL(id);
	///model.makeValue(gvMyCBOnClosePath,onCloseEvent);
	//rtn = openInternal("modeless_topmost",id,"scn",monNo,xPos,yPos,wid,ref,resultref,userProp,prevPos);
	rtn = frmf_open("modeless_topmost",id,{userProp:userProp},null,xPos,yPos,null,null,style,userProp, "", "", "M");
	//frmf_openInternal
	//body.disabled = false;
	return rtn;
}

			
/************************************************************************************************
 * 간호일지 II 호출 
 * 비처방기준 
 * 20080923 , 장준원
*************************************************************************************************/
function lf_aezfGetNurseRecII(Xpath, Row, Gbn) {

    var objDs = Xpath;
 //   trace(objDs.saveXML());
    // Gbn : 1 (Angio) , 2 (심도자) , 3 (CT)
// 	var orddd 		= model.getValue(Xpath+"[" + Row + "]/orddd");
// 	var cretno 		= model.getValue(Xpath+"[" + Row + "]/cretno");
// 	var instcd 		= sysf_getUserInfo("dutplceinstcd");
// 	var orddeptcd	= model.getValue(Xpath+"[" + Row + "]/orddeptcd");
// 	var orddrid		= model.getValue(Xpath+"[" + Row + "]/orddrid");
// 	var pid 		= model.getValue(Xpath+"[" + Row + "]/pid");
// 	var hngnm 		= model.getValue(Xpath+"[" + Row + "]/patnm");
// 	var age 		= model.getValue(Xpath+"[" + Row + "]/age");
// 	var rrgstno1    = model.getValue(Xpath+"["+Row+"]/rrgstno1");
// 	var rrgstno2    = model.getValue(Xpath+"["+Row+"]/rrgstno2");
// 	if ( age == "" )  age = model.getValue(Xpath+"[" + Row + "]/age");
// 	var ioflag 		= model.getValue(Xpath+"[" + Row + "]/prcpgenrflag");
//	var Baseparam 	= "recflag▦dutplaccd▦reclnkkey▩N▦019▦" + pid + "," + orddd + "," + cretno +"," + instcd + "," + orddeptcd + "▩";   

	var orddd       = objDs.getColumn(Row,"orddd");
	var cretno 		= objDs.getColumn(Row,"cretno");
	var instcd 		= sysf_getUserInfo("dutplceinstcd");
	var orddeptcd 	= objDs.getColumn(Row,"orddeptcd");
	var orddrid 	= objDs.getColumn(Row,"orddrid");
	var pid 		= objDs.getColumn(Row,"pid");
	var hngnm 		= objDs.getColumn(Row,"patnm");
    var rrgstno1 	= objDs.getColumn(Row,"rrgstno1");
    var rrgstno2 	= objDs.getColumn(Row,"rrgstno2");
	var age         = lf_aezfgetFullAge(rrgstno1+rrgstno2);
	if ( age == "" )  age = objDs.getColumn(Row,"age");
	var ioflag 		= objDs.getColumn(Row,"prcpgenrflag");
	var Baseparam = "";
	
	if ( Gbn == "1" )  Baseparam 	= "recflag▦dutplaccd▦reclnkkey▩N▦019▦" + pid + "," + orddd + "," + cretno +"," + instcd + "," + orddeptcd + "▩";
	if ( Gbn == "2" )  Baseparam 	= "recflag▦dutplaccd▦reclnkkey▩Q▦020▦" + pid + "," + orddd + "," + cretno +"," + instcd + "," + orddeptcd + "▩";
	if ( Gbn == "3" )  Baseparam 	= "recflag▦dutplaccd▦reclnkkey▩N▦025▦" + pid + "," + orddd + "," + cretno +"," + instcd + "," + orddeptcd + "▩";

	var ASTparam    = "pid ▦ instcd ▦ hngnm ▦ age ▦ orddd ▦ cretno ▦ ioflag ▦ orddeptcd ▦ orddrid ▩" + pid + "▦" +  instcd  + "▦" + hngnm + "▦" + age + "▦" + orddd + "▦" +  cretno+ "▦" + ioflag  + "▦" + orddeptcd  + "▦" + orddrid + "▩";

// 	alert('Baseparam->'+Baseparam);
// 	alert('ASTparam->'+ASTparam);
		
	//setParameter("SMMNR03400_ParamBase", Baseparam);
	//setParameter("SMMNR03400_AST", ASTparam );

	frmf_setParameter("SMMNR03400_ParamBase", Baseparam);
	frmf_setParameter("SMMNR03400_AST", ASTparam );
	
	
	//modal("SMMNR03400");
	var arrList = this.getOwnerFrame().all;
	
	if(arrList["SMMNR03400"] == null)
	{
 		var xpt = 300;
 		var ypt = 0;
		
	    lf_aezfTopMost("SMMNR03400",xpt,ypt,"SMMNR03400","","","",0,0);
		
	}else {
	    var popupObj = arrList["SMMNR03400"];
	    popupObj.form.reload();	
// 		window.children.item("SMMNR03400").model.refresh();
// 		window.children.item("SMMNR03400").model.dispatch("xforms-ready");
	}
}	

/************************************************************************************************
함수명 : lf_aezfSetRowStyle ()
인자 :
				String	gridID		- 그리드 아이디
				String	styleFlag	- 컬러 인덱스
				String	data			- 데이터 값
				Srting	colRef		- 비교할 컬럼 Ref
				String	[control]		- 조건 	smaller | smallerThen | equal | biggerThen | bigger | equalBold
결과값 :
함수설명 :  그리드 특정 컬럼값을 비교하여 로우 글씨컬러 및 폰트bold 변경
	* 사용예) lf_aezfSetFontRowStyle(Grid00 , "0^5" , "3^5" , "Column1" , "equalBold^small");	
************************************************************************************************/			
function lf_aezfSetFontRowStyle( gridID , styleFlag , data , colRef , control ) {

// 	var style = new Array("#fcd2c1" , "#ffe79d" , "#f3e1bf" , "#7BE6B7" , "#b9e5fb" , "#f7a08b" , "#fec34d" , 
// 	                                  "blue" ,
// 	                                  "#c8e67b" , 
// 	                                  "green" ,
// 	                                  "#ff9933" , 
// 	                                  "red" , 
// 	                                  "#9999cc",
// 	                                  "#5A5A5A",
// 	                                  "#000000"
// 	                                  );
// 
// 	var styleFlags = styleFlag.split("^");
// 	var datas = data.split("^");
// 	
// 	if( control == null || control == "" )
// 		control = "equal";
// 		
// 	var controls = control.split("^"); 
// 
// 	gridObj = document.all(gridID);
// 
// 	gridObj.backcoloralternate = "transparent";
// 	
// 	for( var j = 0 ; j < datas.length ; j++ ) {
// 		
// 		var dataValue = datas[j];
// 		var styleValue = style[styleFlags[j]];
// 		
// 		for( var i = gridObj.fixedRows ; i < gridObj.Rows ; i++ ) {
// 			
// 			if(controls[j] == null)
// 				controls[j] = "equal"; 
// 			
// 			switch( controls[j] ) {	
// 				case "small":
// 					if( gridObj.labelMatrix(i , gridObj.colRef(colRef)) < dataValue ) {
// 						
// 						gridObj.rowstyle( i , "data" , "color" ) = styleValue;
// //						gridObj.rowstyle( i , "data" , "font-weight" ) = "bold";
// 					}
// 					break;
// 				case "smallThen":
// 					if( gridObj.labelMatrix(i , gridObj.colRef(colRef)) <= dataValue ) {
// 						
// 						gridObj.rowstyle( i , "data" , "color" ) = styleValue;
// //						gridObj.rowstyle( i , "data" , "font-weight" ) = "bold";
// 					}
// 					break;
// 				case "bigger":
// 					if( gridObj.labelMatrix(i , gridObj.colRef(colRef)) > dataValue ) {
// 						
// 						gridObj.rowstyle( i , "data" , "color" ) = styleValue;
// //						gridObj.rowstyle( i , "data" , "font-weight" ) = "bold";
// 					}
// 					break;
// 				case "biggerThen":
// 					if( gridObj.labelMatrix(i , gridObj.colRef(colRef)) >= dataValue ) {
// 						
// 						gridObj.rowstyle( i , "data" , "color" ) = styleValue;
// //						gridObj.rowstyle( i , "data" , "font-weight" ) = "bold";
// 					}
// 					break;
// 			/*	
// 				case "notEqual":
// 					if( gridObj.labelMatrix(i , gridObj.colRef(colRef)) != dataValue ) {
// 						
// 						gridObj.rowstyle( i , "data" , "background-color" ) = styleValue;
// 					}
// 					break;
// 			*/
// 				case "equalBold":		
// 					if( gridObj.labelMatrix(i , gridObj.colRef(colRef)) == dataValue ) {
// 						gridObj.rowstyle( i , "data" , "color" ) = styleValue;
// 						gridObj.rowstyle( i , "data" , "font-weight" ) = "bold";
// 					}
// 				case "equal":		
// 					if( gridObj.labelMatrix(i , gridObj.colRef(colRef)) == dataValue ) {
// 						gridObj.rowstyle( i , "data" , "color" ) = styleValue;
// //						gridObj.rowstyle( i , "data" , "font-weight" ) = "bold";
// 					}
// 					break;
// 			}
// 		}
// 	} 
// 	
	
	
	
	
	var fillStyle = "";
    var style = new Array("#fcd2c1" , "#ffe79d" , "#f3e1bf" , "#7BE6B7" , "#b9e5fb" , "#f7a08b" , "#fec34d" , 
	                                  "blue" ,
	                                  "#c8e67b" , 
	                                  "green" ,
	                                  "#ff9933" , 
	                                  "red" , 
	                                  "#9999cc",
	                                  "#5A5A5A",
	                                  "#000000"
	                                  );
    
    var styleFlags = styleFlag.split("^");
 	var datas = data.split("^");
    
    if( control == null || control == "" )
		control = "equal";
		
	var controls = control.split("^"); 
	
	var BackGroundFont = "";
	var end = "";
	var endBold = "";
	var boldFont = "";
	var fontCnt = 0;
	for( var j = 0 ; j < datas.length ; j++ ) {
		
		var dataValue = datas[j];
		var styleValue = style[styleFlags[j]];
		
		var bold = false;
		if(controls[j] == null)
				controls[j] = "equal"; 
	
	    var ctrl = "";
		switch( controls[j] ) {	
				case "small":
					ctrl = "<";  
					break;
				case "smallThen":
					ctrl = "<=";  
					break;
				case "bigger":
					ctrl = ">";  
					break;
				case "biggerThen":
					ctrl = ">=";  
					break;
				case "equal":		
                    ctrl = "==";  
					break;
				case "equalBold":
				    ctrl = "==";  
				    bold = true;
					break;
			}
		if(j == datas.length-1){
		   if(datas.length == 1){
		     BackGroundFont = "expr:" +colRef+" "+ctrl+ " " + dataValue +" ? '"+styleValue+"' : ''";
		     if(bold){
		       boldFont  = "expr:" +colRef+" "+ctrl+ " " + dataValue +" ? 'Dotum,9,bold' : 'Dotum,9'";
		       fontCnt++;
		     }
		   }else{
		     BackGroundFont += colRef+" "+ctrl+ " " + dataValue +" ? '"+styleValue+"' : ''";
		     if(bold){
		       if(fontCnt > 0){
		          boldFont  += colRef+" "+ctrl+ " " + dataValue +" ? 'Dotum,9,bold' : 'Dotum,9'";
		          fontCnt++;
		       }else{
		          boldFont  = "expr:" + colRef+" "+ctrl+ " " + dataValue +" ? 'Dotum,9,bold' : 'Dotum,9'";
		          fontCnt++;
		       }
		     }
		   }
		   //font += colRef+" == '" + dataValue +"' ? 'Dotum,9,bold' : ''";
		
		}else if(j == 0){
		   BackGroundFont += "expr:" + colRef+" "+ctrl+ " " + dataValue +" ? '"+styleValue+"' :  (";
		   //font += "expr:" + colRef+"  == '" + dataValue +"' ? 'Dotum,9,bold' : (";
		   if(bold){
		       boldFont   += "expr:" + colRef+" "+ctrl+ " " + dataValue +" ? 'Dotum,9,bold' :  (";
		       fontCnt++
		   }
		}else{
		   BackGroundFont += colRef+" "+ctrl+ " " + dataValue +" ? '"+styleValue+"' : (";
		   if(bold){
		      if(fontCnt == 0){
		       boldFont   += "expr:" + colRef+" "+ctrl+ " " + dataValue +" ? 'Dotum,9,bold' :  (";
		       fontCnt++;
		      }else{
		       boldFont   += colRef+" "+ctrl+ " " + dataValue +" ? 'Dotum,9,bold' :  (";
		       fontCnt++;
		      } 
		   }
		   //font += colRef+"  == '" + dataValue +"' ? 'Dotum,9,bold' : (";
		}
		
		
		if(bold && fontCnt>1) endBold += ")";	
		
		if( j<datas.length-1) end += ")";	
	} 
	
	if(fontCnt == 1){
	   boldFont = boldFont.replace("(","'Dotum,9'");
	}
	
	BackGroundFont += end;
	boldFont += endBold;
//	font += end;
//    trace(BackGroundFont);
//	if ( fillflag == "B" ) {
   for(var i=0; i<gridID.getCellCount("body");i++){
    	gridID.setCellProperty("body", i, "color" ,BackGroundFont);
 	    gridID.setCellProperty("body", i, "color2" ,BackGroundFont);
 	    gridID.setCellProperty("body", i, "font" ,boldFont);
   }	    
// 	    gridID.setCellProperty("body", setCellIdx, "font" ,font);
//     } else if ( fillflag == "F" ) {
//     	gridID.setCellProperty("body", setCellIdx, "color" ,BackGroundFont);
//  	    gridID.setCellProperty("body", setCellIdx, "color" ,BackGroundFont);
//  	    gridID.setCellProperty("body", setCellIdx, "font" ,font);
//     }
	
}
	
/************************************************************************************************
*
* aezfGridSetColor
@param
*  path			    : 목적그리드
*  chkcol			: 목적ColRef
*  chkval          : 비교value
*  imagename  : ImageName
* desc :  Background Image check. 
*************************************************************************************************/
function lf_aezfGridSetColor(chkcol, chkval, imagename ) {
					//alert('IN');
// 	var srchLength1 = model.instances(0).selectNodes( path ).length;				
// 	for ( var i = 1; i <= srchLength1; i++ ) {  
// 		if ( model.getValue ( path+"["+ i +"]/"+chkcol ) == chkval ) {
// 			grd_subresultdetail1.rowstyle(i, "data", "background-image") = "../../../com/commonweb/images/"+imagename;
// 			grd_subresultdetail1.rowstyle(i, "data", "background-repeat") = "repeat-x";				
// 			//grd_subresultdetail1.rowstyle(i, "data", "text-align") = "center";										
// 		}  else {
// 			grd_subresultdetail1.rowstyle(i, "data", "background-image") = "";
// 			//grd_subresultdetail1.rowstyle(i, "data", "text-align") = "left";							
// 		}
// 	}
    var expr ="";
     expr = 'expr:'+chkcol+' == chkval ? "IMG::'+imagename+' repeat-x" : ""';
    for(var i=0; i< grd_subresultdetail1.getCellCount("body");i++){
        grd_subresultdetail1.setCellProperty("body",i,"background",expr);
        grd_subresultdetail1.setCellProperty("body",i,"background2",expr);
    } 
}

/*
	그리드 row 삭제 (선택된 row)
	grdObj : 대상그리드
	그리드 row의 내용이 수정되면 상태값이 1 > 3으로 변경되어 row 삭제가 불가능한 현상 반영
	-그리드를 update상태로 변경후 삭제를하면 6상태로 변경됨
	2013 05 16 이창기
*/
function lf_aSTDeleteSelectedRows(grdObj){
// 	for(var i = grdObj.fixedRows ; i < grdObj.rows ; i++){
// 		if(grdObj.isSelected(i) == true && grdObj.rowStatus(i) == 3){
// 			grdObj.rowStatus(i) = 1;
// 		}
// 		else if(grdObj.isSelected(i) == true && grdObj.rowStatus(i) == 6){
// 			grdObj.rowStatus(i) = 4;
// 		}
// 	}
	
	dsf_deleteSelectedRows(grdObj, true);
}

/************************************************************************************************
 * @group  :
 * @ver    : 2007.12.12
 * @by     : 장준원  
 * @---------------------------------------------------
 * @type   : function
 * @access : public
 * @param
 *  baseXpath			    : Send Instance (검색조건)
 *  rtnXpath			    : Return Instance (Userid+Usernm, 등등)
 *  copyXpath			    : Return Copy Instance (Userid)
 *  copyXpath2			    : Return Copy Instance (Usernm, 등등)
 * @desc   : 사용자정보 팝업창 호출
 * @return :
*************************************************************************************************/

function lf_aezfCommUserInfoList( rtnXpath, copyXpath, copyXpath2) {
     
	//var usrb_usrid = model.getValue(copyXpath);
	
	var usrb_usrid = copyXpath;
	
	if (usrb_usrid == null || usrb_usrid == "" || usrb_usrid == " ") {
		sysf_messageBox("사용자번호가 입력되지","E007");
		//model.setValue( copyXpath,  "");
		//model.setValue( copyXpath2, "");
		//model.refresh();
		copyXpath = "";
		copyXpath2 = "";
		return false;	
	}else {
// 		model.resetInstanceNode(baseXpath);    // Instance 초기화
// 		model.removeNodeset(rtnXpath+"/list");    // Instance 초기화
		
		//model.setValue(baseXpath+"/param", "_OneS"); // 사용자 한 명만을 검색하기 위한 파라미터 설정

		//modal("SPZSU10103", "", "200", "200", "SPZSU10103", baseXpath, "/root/main/temp");
	 	var objDs = eval(rtnXpath.binddataset);
		
		var agument = {param:"_OneS"};

        var rtn = frmf_modal("SPZSU10103", "SPZSU10103",agument, "", "", "", "", "", "", "", "", "", "M");
		
		
		//var iParam = getParameter("SPZSU10103_"); 
		//setCSVToNode(rtnXpath, iParam);
		
		objDs.copyData(rtn);
		
		grdf_exportCsv(rtnXpath,"SPZSU10103_");
		//clearParameter("SPZSU10103_");
		
													
// 		model.setValue( copyXpath,  model.getValue(rtnXpath+"/list/userid") );		// 사용자 ID
// 		model.setValue( copyXpath2, model.getValue(rtnXpath+"/list/usernm") );		// 사용자 이름+등등
// 	
// 		model.refresh();
        copyXpath = objDs.getColumn(0,"userid");
        copyXpath2 = objDs.getColumn(0,"usernm");
	}
} 


/**
*	처방마스터 대상그리드 set=======================================================================================================================================
*  vGrdObj			: 대상그리드
*  vSrcXPath		: 목적노드set
*  vDupCheckCo	: dup check column no 
*  vDupCheck		: dup check yn 
*  vCodeNode		: 수가코드 목적 노드
*  vNameNode		: 수가처방명 목적 노드
* vHeaderAddRows : header row default값(1) 보다 큰 row수
*/
function lf_setPrcpcd(vGrdObj, vSrcXPath, vDupCheckCol, vDupCheck,  vCodeNode, vNameNode, vSessiondept ) {
	if(utlf_isNull(vGrdObj)) return ; 
	if(utlf_isNull(vSrcXPath)) return ;  
	if(ds_temp.getColumn(0,"okflag")  != "ok" ) return ; 
// 	var cnt = getNodesetCount(vSrcXPath); 
// 	 
// 	var grdcnt  = vGrdObj.rows; 
// 	if( vHeaderAddRows != "" ){
// 		grdcnt  =parseInt( vGrdObj.rows) -  parseInt( vHeaderAddRows  ) ;
// 	} 
    var objDs = eval(vGrdObj.binddataset);
    var rowCnt = objDs.rowcount;
	var vDupCheckVal = "";
	var i = 0;    
	if( rowCnt == 1 ) { 
		//vDupCheckVal = model.getValue(vSrcXPath + "/prcpcd" );
		vDupCheckVal = utlf_transNullToEmpty(objects[vSrcXPath].getColumn(0,"prcpcd"));
		if( vDupCheck == "Y" ) {
				if( lf_checkDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){
					if( sysf_messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){
						return ;
					}
				}
		}
		var nRow = objDs.addRow();
		//그리드 상태보여주기
		grdf_setRowTypeIcon(vGrdObj, 0)
		//vGrdObj.cellStyle("background-image", vGrdObj.rows-1, 1) = "../../../com/commonweb/images/icon_i.gif";
		if( !utlf_isNull(vCodeNode) ){ 
			model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vCodeNode 	,  vDupCheckVal );
			objDs.setColumn(nRow, vCodeNode,vDupCheckVal);
		}
		if( !utlf_isNull(vNameNode) ){ 
			//model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vNameNode	, model.getValue(vSrcXPath + "/ordnm"    ) );   
			objDs.setColumn(nRow, vNameNode,objects[vSrcXPath].getColumn(0,"ordnm"));
		}
							
// 		model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucd" );
// 		model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucd"             , vDupCheckVal );

        objDs.setColumn(nRow, "excucd",vDupCheckVal);
		//model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucdnm" );
		//처방명 P 한글명 H 영문명 E 선택한 값이 들어가도록 2013 06 10 윤범섭
		//if(model.getValue(vSrcXPath + "/prcpflag" )=="P")
		if(objects[vSrcXPath].getColumn(0,"prcpflag")=="P")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucdnm"   		, model.getValue(vSrcXPath + "/prcpnm" )   ); 
		objDs.setColumn(nRow, "excucdnm",objects[vSrcXPath].getColumn(0,"prcpnm"));
		//if(model.getValue(vSrcXPath + "/prcpflag" )=="H")
		if(objects[vSrcXPath].getColumn(0,"prcpflag")=="H")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucdnm"   		, model.getValue(vSrcXPath + "/hngnm" )   ); 
		objDs.setColumn(nRow, "excucdnm",objects[vSrcXPath].getColumn(0,"hngnm"));
		//if(model.getValue(vSrcXPath + "/prcpflag" )=="E")
		if(objects[vSrcXPath].getColumn(0,"prcpflag")=="E")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucdnm"   		, model.getValue(vSrcXPath + "/engnm" )   ); 
		objDs.setColumn(nRow, "excucdnm",objects[vSrcXPath].getColumn(0,"engnm"));
		//model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/basesuppdeptcd" );
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/basesuppdeptcd"   	, vSessiondept   ); 
		objDs.setColumn(nRow, "basesuppdeptcd",vSessiondept);
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excutodd"   		, '99991231'   ); 
		objDs.setColumn(nRow, "excutodd",'99991231' );
		// 외래시행부서 O 입원시행부서 I
		//if(model.getValue(vSrcXPath + "/execdeptflag" )=="O")
		if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="O")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd" )   ); 
		objDs.setColumn(nRow, "prcpexecdeptcd",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd"));
		//if(model.getValue(vSrcXPath + "/execdeptflag" )=="I")
		//if(vSrcXPath.getColumn(0,"execdeptflag")=="I")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd2" )   ); 
		
		//if(model.getValue(vSrcXPath + "/execdeptflag" )=="O")
		if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="O")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd1"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd" )   ); 
		objDs.setColumn(nRow, "prcpexecdeptcd1",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd"));
		if(objects[vSrcXPath].getColumn(0,"execdeptflag" )=="I")
		if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="I")
		objDs.setColumn(nRow, "prcpexecdeptcd",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd2"));
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd1"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd2" )   );
		objDs.setColumn(nRow, "prcpexecdeptcd",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd2"));
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/anotestyn"   	    , "Y"   ); 
		objDs.setColumn(nRow, "anotestyn","Y");
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/rsrvupdtcncllimdayno", "0"   );
		objDs.setColumn(nRow, "rsrvupdtcncllimdayno","0");
	
		// 2010.11.19  c y w  검사코드 추가시 기본값셋팅 		
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/excuclscd",	"-");
		objDs.setColumn(nRow, "excuclscd","-");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/eqmtifyn",	"N");
		objDs.setColumn(nRow, "eqmtifyn","N");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/readdrid3nm",	"-");
		objDs.setColumn(nRow, "readdrid3nm","-");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsltdispyn",	"Y");
		objDs.setColumn(nRow, "rsltdispyn","Y");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsltdispgbn",	model.getValue(vSrcXPath + "/rsltdispgbn" )  );	
		objDs.setColumn(nRow, "rsltdispgbn",objects[vSrcXPath].getColumn(0,"rsltdispgbn"));			
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/partcntstats",	"1");
		objDs.setColumn(nRow, "partcntstats","1");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/phocntstats",	"1");
		objDs.setColumn(nRow, "phocntstats","1");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/curetims",	"1");
		objDs.setColumn(nRow, "curetims","1");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvexcupossyn",	"Y");
		objDs.setColumn(nRow, "rsrvexcupossyn","Y");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvplceflag",	"2");
		objDs.setColumn(nRow, "rsrvplceflag","2");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/excutm",	"0");
		objDs.setColumn(nRow, "excutm","0");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvmultitmplcd",	"-");
		objDs.setColumn(nRow, "rsrvmultitmplcd","-");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvexmpcnt",	"1");
		objDs.setColumn(nRow, "rsrvexmpcnt","1");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvupdtcncllimdayno",	"0");
		objDs.setColumn(nRow, "rsrvupdtcncllimdayno","0");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/pacsnocretyn",	"N");
		objDs.setColumn(nRow, "pacsnocretyn","N");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/etceqmtifyn",	"-");
		objDs.setColumn(nRow, "etceqmtifyn","-");
		//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/anotestyn",	"Y");
		objDs.setColumn(nRow, "anotestyn","Y");
		//if(model.getValue(vSrcXPath + "/execdeptflag" )=="O")
		if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="O")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd" )   ); 
		objDs.setColumn(nRow, "prcpexecdeptcd",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd"));
		objDs.setColumn(nRow, "prcpexecdeptcd1",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd"));
		//if(model.getValue(vSrcXPath + "/execdeptflag" )=="I")
		if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="I")
		//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd2" )   );
		objDs.setColumn(nRow, "prcpexecdeptcd",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd2"));
		objDs.setColumn(nRow, "prcpexecdeptcd1",objects[vSrcXPath].getColumn(0,"prcpexecdeptcd2"));
// 		if(model.getValue(vSrcXPath + "/execdeptflag" )=="O")
// 		model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd1"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd" )   ); 
// 		if(model.getValue(vSrcXPath + "/execdeptflag" )=="I")
// 		model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd1"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd2" )   );
		
		
	}
	else {
		for( var i = 0 ; i < rowCnt ; i++ ){
			//vDupCheckVal = model.getValue(vSrcXPath + "[" + i + "]/prcpcd" );
			vDupCheckVal = utlf_transNullToEmpty(objects[vSrcXPath].getColumn(i,"prcpcd"));
			if( vDupCheck == "Y" ) {
				if( lf_checkDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){
					if( sysf_messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){
						continue ;
					}
				}
			}
			//vGrdObj.addRow();     
			var nRow = objDs.addRow();
			if( !utlf_isNull(vCodeNode) ){
				//model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vCodeNode 	,  vDupCheckVal );
				objDs.setColumn(nRow, vCodeNode, vDupCheckVal);
				
			}
			if( !utlf_isNull(vNameNode) ){
				//model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/" + vNameNode	, model.getValue(vSrcXPath + "[" + i + "]/prcpnm"    ) );   
				objDs.setColumn(nRow, vNameNode, objects[vSrcXPath].getColumn(i,"prcpnm"));
			}
			
			
// 			model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/excucd" );
// 			model.setValue(vGrdObj.nodeset + "[" + grdcnt + "]/excucd"   	        , vDupCheckVal );
            objDs.setColumn(nRow, "excucd", vDupCheckVal);
//			model.makeNode(vGrdObj.nodeset + "[" + grdcnt + "]/excucdnm" );
			//처방명 P 한글명 H 영문명 E 선택한 값이 들어가도록 2013 06 10 윤범섭
			//if(model.getValue(vSrcXPath + "/prcpflag" )=="P")
			if(objects[vSrcXPath].getColumn(0,"prcpflag")=="P")
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucdnm"   		, model.getValue(vSrcXPath + "/prcpnm" )   ); 
			objDs.setColumn(nRow, "excucdnm",objects[vSrcXPath].getColumn(0,"prcpnm"));
			//if(model.getValue(vSrcXPath + "/prcpflag" )=="H")
			if(objects[vSrcXPath].getColumn(0,"prcpflag")=="H")
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucdnm"   		, model.getValue(vSrcXPath + "/hngnm" )   ); 
			objDs.setColumn(nRow, "excucdnm",objects[vSrcXPath].getColumn(0,"hngnm"));
			//if(model.getValue(vSrcXPath + "/prcpflag" )=="E")
			if(objects[vSrcXPath].getColumn(0,"prcpflag")=="E")
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excucdnm"   		, model.getValue(vSrcXPath + "/engnm" )   ); 
			objDs.setColumn(nRow, "excucdnm",objects[vSrcXPath].getColumn(0,"engnm"));
			//model.makeNode(vGrdObj.nodeset 	+ "[" + grdcnt + "]/basesuppdeptcd" );
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/basesuppdeptcd"   	, vSessiondept   ); 
			objDs.setColumn(nRow, "basesuppdeptcd", vSessiondept);
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/excutodd"   		, '99991231'   ); 
			objDs.setColumn(nRow, "excutodd", '99991231');
			// 외래시행부서 O 입원시행부서 I
			//if(model.getValue(vSrcXPath + "/execdeptflag" )=="O")
			if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="O")
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd" )   ); 
			objDs.setColumn(nRow, "prcpexecdeptcd", objects[vSrcXPath].getColumn(0,"prcpexecdeptcd"));
			//if(model.getValue(vSrcXPath + "/execdeptflag" )=="I")
			if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="I")
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd2" )   );
	        objDs.setColumn(nRow, "prcpexecdeptcd", objects[vSrcXPath].getColumn(0,"prcpexecdeptcd2"));
	        //model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/anotestyn"   	    , "Y"   ); 
	        objDs.setColumn(nRow, "anotestyn", "Y");
	        //model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/rsrvupdtcncllimdayno", "0"   );
			objDs.setColumn(nRow, "rsrvupdtcncllimdayno", "0");
			
	// 2010.11.19  c y w  검사코드 추가시 기본값셋팅 		
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/excuclscd",	"-");
			objDs.setColumn(nRow, "excuclscd", "-");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/eqmtifyn",	"N");
			objDs.setColumn(nRow, "eqmtifyn", "N");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/readdrid3nm",	"-");
			objDs.setColumn(nRow, "readdrid3nm", "-");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsltdispyn",	"Y");
			objDs.setColumn(nRow, "rsltdispyn", "Y");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsltdispgbn",	model.getValue(vSrcXPath + "/rsltdispgbn" )  );				
			objDs.setColumn(nRow, "rsltdispgbn", objects[vSrcXPath].getColumn(0,"rsltdispgbn"));
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/partcntstats",	"1");
			objDs.setColumn(nRow, "partcntstats", "1");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/phocntstats",	"1");
			objDs.setColumn(nRow, "phocntstats", "1");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/curetims",	"1");
			objDs.setColumn(nRow, "curetims", "1");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvexcupossyn",	"Y");
			objDs.setColumn(nRow, "rsrvexcupossyn", "Y");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvplceflag",	"2");
			objDs.setColumn(nRow, "rsrvplceflag", "2");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/excutm",	"0");
			objDs.setColumn(nRow, "excutm", "0");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvmultitmplcd",	"-");
			objDs.setColumn(nRow, "rsrvmultitmplcd", "-");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvexmpcnt",	"1");
			objDs.setColumn(nRow, "rsrvexmpcnt", "1");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/rsrvupdtcncllimdayno",	"0");
			objDs.setColumn(nRow, "rsrvupdtcncllimdayno", "0");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/pacsnocretyn",	"N");
			objDs.setColumn(nRow, "pacsnocretyn", "N");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/etceqmtifyn",	"-");
			objDs.setColumn(nRow, "etceqmtifyn", "-");
			//model.setValue(vGrdObj.nodeset  + "[" + grdcnt + "]/anotestyn",	"Y");
			objDs.setColumn(nRow, "anotestyn", "Y");
			//if(model.getValue(vSrcXPath + "/execdeptflag" )=="O")
			if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="O")
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd" )   ); 
			objDs.setColumn(nRow, "prcpexecdeptcd", objects[vSrcXPath].getColumn(0,"prcpexecdeptcd"));
			objDs.setColumn(nRow, "prcpexecdeptcd1", objects[vSrcXPath].getColumn(0,"prcpexecdeptcd"));
			//if(model.getValue(vSrcXPath + "/execdeptflag" )=="I")
			if(objects[vSrcXPath].getColumn(0,"execdeptflag")=="I")
			//model.setValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd2" )   );
			objDs.setColumn(nRow, "prcpexecdeptcd", objects[vSrcXPath].getColumn(0,"prcpexecdeptcd2"));
			objDs.setColumn(nRow, "prcpexecdeptcd1", objects[vSrcXPath].getColumn(0,"prcpexecdeptcd2"));
			//if(model.getValue(vSrcXPath + "/execdeptflag" )=="O")
			//if(vSrcXPath.getColumn(0,"execdeptflag")=="O")
			//model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd1"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd" )   ); 
			
			//if(model.getValue(vSrcXPath + "/execdeptflag" )=="I")
			//if(vSrcXPath.getColumn(0,"execdeptflag")=="I")
			//model.makeValue(vGrdObj.nodeset 	+ "[" + grdcnt + "]/prcpexecdeptcd1"   	, model.getValue(vSrcXPath + "/prcpexecdeptcd2" )   );
            
			//grdcnt++;
		}
	}
}	

/* 
 그리드 tab 세로이동		2013 04 19 이창기
 그리드 이벤트 : onnext
*/
var onselectchangedIdx = -1;
function lf_gridTabHMove(gridObj){
// 	event.preventDefault();
// 	event.defaultAction = "cancel";
//  	if(e.keycode == 9){			//tab
// // 		gridObj.row = gridObj.row +1;
// // 		/*
// // 		if(gridObj.row == (gridObj.rows - 1)){
// // 			alert("");
// // 			gridObj.col = gridObj.col+1;
// // 			gridObj.row =  gridObj.fixedRows;
// // 		}
// // 		*/
//         trace("tab");
// 	}
//   var objDs = eval(gridObj.binddataset);
//   trace(objDs.rowposition);
    onselectchangedIdx = gridObj.onselectchanged.addHandler(lf_grid_onselectchanged);
 
    var nIndex = gridObj.onkeyup.addHandler(
		function (obj:Grid, e:KeyEventInfo){
		    var nKeycode = e.keycode; 
		    
		    if(nKeycode == 37){		//방향키 왼쪽
		  	     if(onselectchangedIdx != -1) obj.onselectchanged.removeHandler(lf_grid_onselectchanged);
				 var bSuccess = obj.moveToPrevCell();
				 obj.showEditor(true);
				 onselectchangedIdx = obj.onselectchanged.addHandler(lf_grid_onselectchanged);  
			}else if(nKeycode == 39){		//방향키 오른쪽
			     if(onselectchangedIdx != -1) obj.onselectchanged.removeHandler(lf_grid_onselectchanged);
				 var bSuccess = obj.moveToNextCell();
				 obj.showEditor(true);
				 onselectchangedIdx = obj.onselectchanged.addHandler(lf_grid_onselectchanged);    
			}else if(nKeycode == 40){		//방향키 위
			     if(onselectchangedIdx != -1) obj.onselectchanged.removeHandler(lf_grid_onselectchanged);
				 obj.showEditor(true);
				 onselectchangedIdx = obj.onselectchanged.addHandler(lf_grid_onselectchanged); 
			}else if(nKeycode == 38){		//방향키 아래
			     if(onselectchangedIdx != -1) obj.onselectchanged.removeHandler(lf_grid_onselectchanged);
				 obj.showEditor(true);
				  onselectchangedIdx = obj.onselectchanged.addHandler(lf_grid_onselectchanged); 
			}else{
			 
			}
		}
    ); 
}

function lf_grid_onselectchanged(obj:Grid, e:GridSelectEventInfo){ 
   obj.setCellPos(e.oldcell);
}

/* @group	: Popup 공통 1 
 * @ver		: 2007.06.14
 * @by		: 장준원
 * @-----------------------------------
 * @type		: function
 * @access	: public
 * @desc		: Popup Sample
*/
function lf_aezfPopUpSample(displayid, maingridlistid, targetpath) {
// 		if ( maingridlistid.row == 0 ) return;
// 		var row =  maingridlistid.row;
		
		var objBindDs = eval(maingridlistid.binddataset);
		
		if(objBindDs.rowcount == 0) return;
		
		
		var objDs = new Dataset;
        objDs.name = "ds_temp_paramDs";
        this.addChild(objDsNm, objDs);
        
        objDs.copyData(objBindDs);
        objDs.clearData();
        
        objDs.addRow();
        objDs.copyRow(0,objBindDs,objBindDs.rowposition);
        
       //modal		
		//modal(displayid,"","","","",path+"[" + row + "]/pid", targetpath);
		var agument = {targetpath:objDs};

        var rtn = frmf_modal(displayid, displayid,agument, "", "", "", "", "", "", "", "", "", "M");
		
		 var rtn = this.all["ds_temp_paramDs"];
		if(rtn) {
		   var objDs = this.removeChild("ds_temp_paramDs");
		   delete objDs;
		   objDs = null;
		}  
}	

/*그리드에서 같은 글자는 merge하도록 하는 함수
  grid : 그리드 ID , cols: 그리드 전체 컬럼 수
  
  %타이틀 변경전에 선언되어야 합니다.%
  grid.userdata = datagrid1.getFormatString();
  grid.formats = datagrid1.userdata;*/


function grdTitleMerge(grid){

	var headCols = grid.getCellCount("body");
	var headCells = grid.getCellCount("head"); 
	
	
	var headArrR1 = new Array();
	var headArrR2 = new Array();
	var headArrR3 = new Array();
	
	var headArrR2No = new Array();
	var headArrR3No = new Array();
	
	var headArrR2NoIdx = 0;
	var headArrR3NoIdx = 0;
	
	var headArrMer12No = "";
	var headArrMer13No = "";
	
	var headArrMer12NoIdx = 0;
	var headArrMer13NoIdx = 0;
	
	var mergeScol = 0;
	var mergeEcol = 0;
	var index = 0;
	var calindex = 0;
	var calindex1 = 0;
	var calindex11 = 0;
	
	
	grid.splitContentsCell("head",0,0,3,headCols,true);
	
	
		for(var i=0; i<headCells;i++){
				if( parseInt(i/headCols)==0 ){
					headArrR1[i%headCols] = grid.getCellText(-1,i);
				}
				if( parseInt(i/headCols)==1 ){
					headArrR2[i%headCols] = grid.getCellText(-1,i);
				}
				if( parseInt(i/headCols)==2 ){
					headArrR3[i%headCols] = grid.getCellText(-1,i);
				}
			
		}//for(var i=0; i<headCells;i++) 끝
		
		//로우 병합
		for(var i=0; i<headCols; i++){
				
				if(headArrR1[i]==headArrR2[i]){
					index = i;
					calindex++;
					grid.mergeContentsCell("head",0,i,1,i,index,false);
					headArrMer12No+=i+"^";
					headArrMer12NoIdx++;
				}else{
						headArrR2No[headArrR2NoIdx]=i;
						headArrR2NoIdx++;
				}
				if(headArrR2[i]==headArrR3[i]){
					index = eval(i)+eval(headCols)-calindex;
					grid.mergeContentsCell("head",1,i,2,i,index,false);
					calindex1++;
					if(headArrR2[i]==headArrR1[i]){
						index = eval(i)+eval(headCols)-calindex;
						grid.mergeContentsCell("head",0,i,2,i,i,false);
						calindex11++;
						headArrMer13No+=i+"^";
						headArrMer13NoIdx++;
					}
				}else{
						headArrR3No[headArrR3NoIdx]=i;
						headArrR3NoIdx++;
				}
				
		}//for(var i=0; i<headCols; i++) 끝
	
	//배치가 바뀌어 재분배
	var headCells2 = grid.getCellCount("head"); 
	
	var headArr1 = new Array();
	var headArr2 = new Array();
	var headArr3 = new Array();
	var headArr3idx = 0;
	var headArr2idx = 0;
	
		for(var i=0; i<headCells2;i++){
		
				if( parseInt(i/headCols)==0 ){
					headArr1[i%headCols] = grid.getCellText(-1,i);
				}else if( eval(i)< headCols*2-eval(calindex)){
					headArr2[headArr2idx] = grid.getCellText(-1,i);
					headArr2idx++;
				}else{
					headArr3[headArr3idx] = grid.getCellText(-1,i);
					headArr3idx++;
				}
			
		}//for(var i=0; i<headCells;i++) 끝
	
	//컬럼 병합
	var tmp1 = "";
	var tmp1idx = 0;
	var tmp2 = "";
	var tmp2idx = 0;
	var col = 0;
	var index = 0;
	var calcolindex = 0;
		for(var i=0; i<headArr1.length;i++){
				
				if(i==0){
					tmp1 = headArr1[0];
					tmp1idx = 0;
				}else{
					tmp2 = headArr1[i];
					tmp2idx = i;
				}
				idx = i-calcolindex-1;
				if(tmp1==tmp2){
					grid.mergeContentsCell("head",0,tmp1idx,0,tmp2idx,idx,false);
					calcolindex++;
				}else{
					tmp1 = headArr1[i];
					tmp1idx = i;
				}
		}//for(var i=0; headArr1.legnth();i++) 끝
		
	var tmp1 = "!";
	var tmp2 = "!";
	var tmp2idx = 0;	
	var calcolindex1 = 0;
	var idx = 0;
		for(var i=0; i<headArr2.length;i++){
				if(i==0){
					tmp1 = headArr2[0];
					tmp1idx = 0;
				}else{
					tmp2 = headArr2[i];
					tmp2idx = headArrR2No[i];
				}
				var cnt12R = biggerCnt(headArrR2No[i],headArrMer12No);
				idx = (headCols+headArrR2No[i]) - calcolindex - eval(calindex) + cnt12R - eval(calcolindex1)-1;
				
				if(tmp1==tmp2){
					grid.mergeContentsCell("head",1,tmp1idx,1,tmp2idx,idx,false);
					calcolindex1++;
				}else{
					tmp1 = headArr2[i];
					tmp1idx = headArrR2No[i];
				}
		}//for(var i=0; headArr2.legnth();i++) 끝
	
	
	
	var tmp1 = "!";
	var tmp2 = "!";
	var tmp2idx = 0;
	var calcolindex11 = 0;
		for(var i=0; i<headArr3.length; i++){
				if(i==0){
					tmp1 = headArr3[0];
					tmp1idx = 0;
				}else{
					tmp2 = headArr3[i];
					tmp2idx = headArrR3No[i];
				}
				var cnt13R = biggerCnt(headArrR3No[i],headArrMer13No);
				idx = (headCols*2+headArrR3No[i]) - calcolindex - calcolindex1 - calcolindex11 - calindex - calindex1 + cnt13R;
				if(tmp1==tmp2){
					grid.mergeContentsCell("head",2,tmp1idx,2,tmp2idx,idx,false);
					calcolindex11++;
				}else{
					tmp1 = headArr3[i];
					tmp1idx = headArrR3No[i];
				}
		}
		
		
}

function biggerCnt(num,idxArr){
	var rtn=0;
	var arr = new Array();
	var idxA = new String(idxArr);
	arr = idxA.substr(0,idxA.length-1).split("^");
	for(var i=0; i<arr.length; i++){
		if(num<arr[i]){
			rtn++;
		}
	}
	return rtn;
}

//트러스트폼에서 attribute("ref")대용으로 사용
function checkColClick(grid){
	var colbind = grid.getCellProperty("Body",grid.currentcol,"text");//컬럼에 바인드된 값을 갖고옴
	if(colbind==null)return;
	var colbindL = colbind.length;
	return colbind.substr(5,colbindL);
}

/*
멀티체크박스 사용
boxid : checkBox
cnt : checkBox갯수
allIdx : 전체항목이 있을경우 아무 값이나 적용
*/
function multiCheckBox(boxid,cnt,allIdx){
	var rtn="";
	if(allIdx==null){
		for(var i=0; i<cnt ;i++){
			if(eval(boxid+i+".value")!=false){
				rtn += eval(boxid+i+".value")+" ";
			}	
		}
	}else{
		for(var i=0; i<cnt ;i++){
			if(eval(boxid+"0"+".value")!=false){
				if(i==0){
					rtn = eval(boxid+"0"+".value")+" ";
				}else{
					eval(boxid+i).value=false;
				}	
			}else{
				if(eval(boxid+i+".value")!=false){
					rtn += eval(boxid+i+".value")+" ";
				}
			}	
		}
	}
	return rtn;
}

/*그리드 합계 
	grid : 그리드명
*/
function grd_getSum(grid){
	var ds = grid.binddataset;
	eval(ds).addRow();
	var all = 0;
	var sum = 0;
	
	for(var i=0; i<grid.getCellCount("body");i++  ){
		if(grid.getCellProperty("body",i,"displaytype")=="number"){
			for(var j=0; j<eval(ds).rowcount-1;j++){
				
				sum+=eval(eval(ds).getColumn(j,i));
			}
			eval(ds).setColumn(grid.currentrow,i,sum);
			all++;
			sum=0;
		}else{
			if(all==0){
				eval(ds).setColumn(grid.currentrow,1,"합계");
			}
		}
	}
}

/***********************************
그리드 관련 달력 함수 시작
************************************/
var aezBaseCalsdd = "";
var aezBaseCaledd = "";
var aezCalpath;
var aezCalColor = "";
var aezMemoBgc = "";
/*
	달력을 갖고오는 함수 onload 시점에 사용
*/
function aezGetCalendar(calpath,setColor,setMemoBgc){
	if(calpath==null){
		aezCalpath = "CalDiv";
	}else{
		aezCalpath = calpath;
	}
	
	aezCalColor = setColor;
	aezMemoBgc = setMemoBgc;
	if(eval(aezCalpath).opt_year.value==null || eval(aezCalpath).opt_year.value==""){
		var sdate = new String(utlf_getCurrentDate());
		eval(aezCalpath).opt_year.value = sdate.substr(0,4);
		eval(aezCalpath).opt_month.value = sdate.substr(4,2) ;
	}
	
	var dateObj = eval(aezCalpath).opt_year.value+""+eval(aezCalpath).opt_month.value;
	
	aezBaseCalsdd = dateObj+00;
	aezBaseCaledd = dateObj+32;
	
	dsf_createDsRow("ds_cond_req",
		[{col:"date", val:dateObj}
		,{col:"srchflag", val:"T"}
		,{col:"basesuppdeptcd", val:suppdeptcd}]);
	dsf_createDsRow("ds_grid_calendarAST",
		[{col:"basedd", val:""}
		,{col:"holinm", val:""}
		,{col:"holiflag", val:""}
		,{col:"dutflag", val:""}
		]);
	
	var objParam = new Object();
	objParam.id = "TRAEA03203";
	objParam.service = "examcurersrvapp.RsrvTm";
	objParam.method = "reqGetHospitalCalendar";
	objParam.inds = "req=ds_cond_req";
	objParam.outds ="ds_grid_calendarAST=caldata";
	objParam.callback = "cbf_TRAEA03203";
	objParam.progress =  false;

	tranf_submit(objParam);
}

function cbf_TRAEA03203(strSvcID, nErrorCode, strErrorMsg){
//여기
	//에러 처리
	if(nErrorCode == 0){
		ds_grid_calendarAST.filter("basedd>'"+aezBaseCalsdd+"'&& basedd<'"+aezBaseCaledd+"'");
		ds_grid_calendarAST.addColumn("memo1","String");
		ds_grid_calendarAST.addColumn("memo2","String");
		setCalWeek();
		aezSetCalMemo();	
		setBgcExpr();
	}else{

	}
}

function setTodayColor(){
	
	if(aezCalColor=="N")return;
	
	if(utlf_getYear()==eval(aezCalpath).opt_year.value && utlf_getMonth()==eval(aezCalpath).opt_month.value){
		var toDate = new String(utlf_getDate());
		if(toDate.charAt(0)==0){
			toDate=toDate.charAt(1);
		}
		for(var i=0; i<7;i++){
			for(var j=0; j<ds_grid_grd_calendar.rowcount;j++){
				if(ds_grid_grd_calendar.getColumn(j,i)==toDate){
					ds_grid_grd_calendar.setColumn(j,i+28,"#95d4fbff");
					ds_grid_grd_calendar.rowposition = j;
					eval(aezCalpath).grd_calendar.setCellPos(i);
				}
			}
			eval(aezCalpath).grd_calendar.setCellProperty("Body",i,"selectbackground","#daa7d9ff");
		}
	}
}

function setBgcExpr(){

	setTodayColor();
	
	if(aezMemoBgc!="Y" && aezCalColor=="N")return;

	for(var i=0; i<7;i++){
		eval(aezCalpath).grd_calendar.setCellProperty("Body",i,"background","EXPR(getColumn(currow,"+eval(i+28)+"))");
		eval(aezCalpath).grd_calendar.setCellProperty("Body",i,"background2","EXPR(getColumn(currow,"+eval(i+28)+"))");
	}
}

function setCalWeek(){
	
	var dayNum = utlf_getDay(ds_grid_calendarAST.getColumn(0,"basedd"));
	var dayArr = ["sun","mon","tue","wed","thu","fri","sat"]
	var dutArr = ["sun_dut","mon_dut","tue_dut","wed_dut","thu_dut","fri_dut","sat_dut"]
	var holiArr = ["sun_holi","mon_holi","tue_holi","wed_holi","thu_holi","fri_holi","sat_holi"]
	
	ds_grid_grd_calendar.clearData();
	for(var i=0; i<dayArr.length; i++){
		ds_grid_grd_calendar.addColumn(dayArr[i],"String");
	}
	for(var i=0; i<dutArr.length; i++){
		ds_grid_grd_calendar.addColumn(dutArr[i],"String");
	}
	for(var i=0; i<holiArr.length; i++){
		ds_grid_grd_calendar.addColumn(holiArr[i],"String");
	}
	for(var i=0; i<eval((ds_grid_calendarAST.rowcount+dayNum)/7);i++){
		ds_grid_grd_calendar.addRow();
 	}
	
	var day = 1;
	var idx = 0;
	
	for(var i=dayNum; i<eval(ds_grid_calendarAST.rowcount+dayNum) ;i++){
		ds_grid_grd_calendar.setColumn(parseInt(i/7),dayArr[i%7],day++);
		ds_grid_grd_calendar.setColumn(parseInt(i/7),dutArr[i%7],ds_grid_calendarAST.getColumn(idx,"dutflag"));
		ds_grid_grd_calendar.setColumn(parseInt(i/7),holiArr[i%7],ds_grid_calendarAST.getColumn(idx,"holiflag"));
		idx++;
	}
}
/* aezSetCalMemo()를 사용하지 않을 경우가 있기 때문에 임시로 만들어 두었음
   삭제 하면 안됨*/
function aezSetCalMemo(){}
/*
	memods : 메모를 갖고 있는 데이터셋
	col1 : 메모데이터1
	flag : col1과 col2의 사이에 들어가는 문자열
	col2 : 메모데이터2

*/
function setCalMemo(memods,col1,flag,col2){
	
	var dayNum = utlf_getDay(ds_grid_calendarAST.getColumn(0,"basedd"));
	var dayArr = ["sun_memo","mon_memo","tue_memo","wed_memo","thu_memo","fri_memo","sat_memo"]
	var bgcArr = ["sun_bgc","mon_bgc","tue_bgc","wed_bgc","thu_bgc","fri_bgc","sat_bgc"]
	var idx = 0;
	
	for(var i=0; i<dayArr.length; i++){
		ds_grid_grd_calendar.addColumn(dayArr[i],"String");
	}
	
	for(var i=0; i<bgcArr.length; i++){
		ds_grid_grd_calendar.addColumn(bgcArr[i],"String");
	}
	
	for(var i=dayNum; i<eval(ds_grid_calendarAST.rowcount+dayNum) ;i++){
		if(eval(memods).getColumn(idx,col2)!=null){
			ds_grid_grd_calendar.setColumn(parseInt(i/7),dayArr[i%7],eval(memods).getColumn(idx,col1)+""+flag+""+eval(memods).getColumn(idx,col2));
		}
		if(aezMemoBgc=="Y"){
			if(eval(utlf_transNullToEmpty(eval(memods).getColumn(idx,col1)).trim())<eval(utlf_transNullToEmpty(eval(memods).getColumn(idx,col2)).trim())){
				ds_grid_grd_calendar.setColumn(parseInt(i/7),bgcArr[i%7],"#c4e693ff");
			}else{
				ds_grid_grd_calendar.setColumn(parseInt(i/7),bgcArr[i%7],"default");
			}
		}
		idx++;
	}
	setTodayColor();
}

function clickCalButton(obj:Button, e:ClickEventInfo)
{
	var button = obj.class;
	
	if(button=="icon_pre_year"){
		eval(aezCalpath).opt_year.value = eval(eval(aezCalpath).opt_year.value)-1;
		aezGetCalendar(aezCalpath,aezCalColor,aezMemoBgc);
	}else if(button=="icon_pre_month"){
		if(eval(aezCalpath).opt_month.value=="01"){
			eval(aezCalpath).opt_year.value = eval(eval(aezCalpath).opt_year.value)-1;
			eval(aezCalpath).opt_month.value = "12";
		}else{
			var getMonth = eval(eval(aezCalpath).opt_month.value)-1;
			var month = getMonth>9? getMonth:"0"+getMonth;
			eval(aezCalpath).opt_month.value = month;
		}
		aezGetCalendar(aezCalpath,aezCalColor,aezMemoBgc);
	}else if(button=="icon_next_month"){
		if(eval(aezCalpath).opt_month.value=="12"){
			eval(aezCalpath).opt_year.value = eval(eval(aezCalpath).opt_year.value)+1;
			eval(aezCalpath).opt_month.value = "01";
		}else{
			var getMonth = eval(eval(aezCalpath).opt_month.value)+1;
			var month = getMonth>9? getMonth:"0"+getMonth;
			eval(aezCalpath).opt_month.value = month;
		}
		aezGetCalendar(aezCalpath,aezCalColor,aezMemoBgc);
	}else{
		eval(aezCalpath).opt_year.value = eval(eval(aezCalpath).opt_year.value)+1;
		aezGetCalendar(aezCalpath,aezCalColor,aezMemoBgc);
	}		
}

/*선택한 달력의 날짜 리턴*/
function getSelectCalDate(){
	var date = ds_grid_grd_calendar.getColumn(ds_grid_grd_calendar.rowposition,eval(aezCalpath).grd_calendar.currentcell);
	if(date==null)return;
	if(date.length==1){
		date= "0"+date;
	}
	return eval(aezCalpath).opt_year.value+""+eval(aezCalpath).opt_month.value+""+date;
}

/***********************************
그리드 관련 달력 함수 끝
************************************/


/***********************************
스위치 형태의 환자정보 갖고오는 함수 시작
***********************************/
/*
	D  : 상병 / ds_patinfo_diaginfo
	O  : 처방Comment,실시Comment,임상간호소견,검사주의사항 / ds_patinfo_prcpdeliveinfo
	     임상Comment / ds_patinfo_ipcmcmtlist    
	E  : 타검사현황 / ds_patinfo_excuinfolist    
	Y  : 미진료내역 / ds_patinfo_patotptinfolist
	S  : 사용안함
	C  : 환자Comment / 고정메모(ds_patinfo_patfixrem) 환자메모(ds_patinfo_patrem)
	M  : 부서메모 / ds_patinfo_deptmemoinfolist
	P  : 환자정보/ ds_patinfo_patbaseinfolist
	I  : 감염정보/ ds_patinfo_isolinfolist
	L  : LIS최근검사결과/ ds_patinfo_labrsltinfo
	A  : 재료소모조회/ ds_patinfo_materialconsumelist
	R  : 중증완료일자/ ds_patinfo_serdiag
	T  : 미시행처방/ ds_patinfo_actinfo
	RX : / ds_patinfo_rxnote
	B  : 통합예약관리 약날수/ ds_patinfo_drugperiod
	G  : 갑상선조직검사 초재진 조회/ ds_patinfo_thyroidinfo
	J  : 통합예약커멘트/ ds_patinfo_rsrvrem
	H  : 내시경 혈전제/ ds_patinfo_aspirinlist
*/
/*
	onload시 createPatInfoDs()선언;
	submit TRAEA01139 대신 get_sw_patinfo(ds 형태로 값을 전달);
	aezClearPatInfoBindDS(); 탭내용삭제
	aezPatInfo_excucdrem : 검사주의사항 변수
	
*/

function setTabPatInfoBtn(){}; // 사용자 정의 함수 값이 있을때 탭에 ■ 설정
function setPatInfoBindDS(){}; // 사용자 정의 함수 값을 넣을 수 있는 함수
function clearPatInfoBindDS(){}; // 사용자 정의 함수 값을 클리어할때 사용

var patInfoFlagArr = new Array();
var patInfoTabNum = 14;
function createPatInfoDs(){
	dsf_createDsRow("ds_patinfo_diaginfo",[{}]);
	dsf_createDsRow("ds_patinfo_prcpdeliveinfo",[{}]);
	dsf_createDsRow("ds_patinfo_ipcmcmtlist",[{}]);
	dsf_createDsRow("ds_patinfo_excuinfolist",[{}]);
	dsf_createDsRow("ds_patinfo_patotptinfolist",[{}]);
	dsf_createDsRow("ds_patinfo_patfixrem",[{col:"memodesc", val:""}]);
	dsf_createDsRow("ds_patinfo_patrem",[{col:"memodesc", val:""}]);
	dsf_createDsRow("ds_patinfo_deptmemoinfolist",[{}]);
	dsf_createDsRow("ds_patinfo_patbaseinfolist",[{}]);
	dsf_createDsRow("ds_patinfo_isolinfolist",[{}]);
	dsf_createDsRow("ds_patinfo_labrsltinfo",[{}]);
	dsf_createDsRow("ds_patinfo_materialconsumelist",[{}]);
	dsf_createDsRow("ds_patinfo_serdiag",[{}]);
	dsf_createDsRow("ds_patinfo_actinfo",[{}]);
	dsf_createDsRow("ds_patinfo_rxnote",[{}]);
	dsf_createDsRow("ds_patinfo_drugperiod",[{}]);
	dsf_createDsRow("ds_patinfo_thyroidinfo",[{}]);
	dsf_createDsRow("ds_patinfo_rsrvrem",[{}]);
	dsf_createDsRow("ds_patinfo_aspirinlist",[{}]);
	getTabPatInfoBtnName();
};
function get_sw_patinfo(obj){
	
	var flag = obj.getColumn(0,"patinfoflag");
	patInfoFlagArr = flag.split("^");
	var output = "";
	for(var i=0; i<patInfoFlagArr.length;i++){
		if(patInfoFlagArr[i]=="D"){
			output += "ds_patinfo_diaginfo=diaginfolist ";
		}
		if(patInfoFlagArr[i]=="O"){
			output += "ds_patinfo_prcpdeliveinfo=prcpdeliveinfolist ds_patinfo_ipcmcmtlist=ipcmcmtlist ";
		}
		if(patInfoFlagArr[i]=="E"){
			output += "ds_patinfo_excuinfolist=excuinfolist ";
		}
		if(patInfoFlagArr[i]=="Y"){
			output += "ds_patinfo_patotptinfolist=patotptinfolist ";
		}
		if(patInfoFlagArr[i]=="C"){
			output += "ds_patinfo_patfixrem=patfixrem ds_patinfo_patrem=patrem ";
		}
		if(patInfoFlagArr[i]=="M"){
			output += "ds_patinfo_deptmemoinfolist=deptmemoinfolist ";
		}
		if(patInfoFlagArr[i]=="P"){
			output += "ds_patinfo_patbaseinfolist=patbaseinfolist ";
		}
		if(patInfoFlagArr[i]=="I"){
			output += "ds_patinfo_isolinfolist=isolinfolist ";
		}
		if(patInfoFlagArr[i]=="L"){
			output += "ds_patinfo_labrsltinfo=labrsltinfo ";
		}
		if(patInfoFlagArr[i]=="A"){
			output += "ds_patinfo_materialconsumelist=materialconsumelist ";
		}
		if(patInfoFlagArr[i]=="R"){
			output += "ds_patinfo_serdiag=serdiag ";
		}
		if(patInfoFlagArr[i]=="T"){
			output += "ds_patinfo_actinfo=actinfo ";
		}
		if(patInfoFlagArr[i]=="RX"){
			output += "ds_patinfo_rxnote=rxnote ";
		}
		if(patInfoFlagArr[i]=="B"){
			output += "ds_patinfo_drugperiod=drugperiod ";
		}
		if(patInfoFlagArr[i]=="G"){
			output += "ds_patinfo_thyroidinfo=thyroidinfo ";
		}
		if(patInfoFlagArr[i]=="J"){
			output += "ds_patinfo_rsrvrem=rsrvrem ";
		}
		if(patInfoFlagArr[i]=="H"){
			output += "ds_patinfo_aspirinlist=aspirinlist ";
		}
	}
	
	submit_TRAEA01139(obj.name,output);
}

function submit_TRAEA01139(input,output){

	var objParam = new Object();
	objParam.id = "TRAEA01139";
	objParam.service = "examcureacptexecapp.PatRem";
	objParam.method = "reqGetPatTotalInfo";
	objParam.inds = "req="+input;
	objParam.outds = output;
	objParam.callback = "cbf_TRAEA01139";

	tranf_submit(objParam);
}

function cbf_TRAEA01139(strSvcID, nErrorCode, strErrorMsg){

	//에러 처리
	if(nErrorCode == 0){
		setPatInfoBindDS();
		aezSetPatInfoBindDS();
	}else{

	}
}

function aezClearPatInfoBindDS(){
	clearPatInfoBindDS();
	ds_patinfo_diaginfo.clear();
	ds_patinfo_prcpdeliveinfo.clear();
	ds_patinfo_ipcmcmtlist.clear();
	ds_patinfo_excuinfolist.clear();
	ds_patinfo_patotptinfolist.clear();
	ds_patinfo_patfixrem.clear();
	ds_patinfo_patrem.clear();
	ds_patinfo_deptmemoinfolist.clear();
	ds_patinfo_patbaseinfolist.clear();
	ds_patinfo_isolinfolist.clear();
	ds_patinfo_labrsltinfo.clear();
	ds_patinfo_materialconsumelist.clear();
	ds_patinfo_serdiag.clear();
	ds_patinfo_actinfo.clear();
	ds_patinfo_rxnote.clear();
	ds_patinfo_drugperiod.clear();
	ds_patinfo_thyroidinfo.clear();
	ds_patinfo_rsrvrem.clear();
	ds_patinfo_aspirinlist.clear();
	/*
	if(!utlf_isNull(this.objects["ds_rectmpdetail"])){
		ds_rectmpdetail.clear();
	}
	*/
	aezSetTabPatInfoBtn();
};

var tabPatInfoBtnName = new Array();
function getTabPatInfoBtnName(){
	for(var i=0; i<patInfoTabNum ;i++){
		tabPatInfoBtnName[i] = eval("sw_patinfo_btn_"+i).text;
	}
};
function aezSetTabPatInfoBtn(){
	setTabPatInfoBtn(){}
	for(var i=0; i<patInfoTabNum ;i++){
		if(i==12 || i==13)continue;
		eval("sw_patinfo_btn_"+i).text = tabPatInfoBtnName[i];
		eval("sw_patinfo_btn_"+i).style.color = "";
	}
	
	for(var i=0; i<patInfoFlagArr.length;i++){
		if(patInfoFlagArr[i]=="D"){
			if(ds_patinfo_diaginfo.getRowCount()>0){
				sw_patinfo_btn_6.text = ""+tabPatInfoBtnName[6]; 
				sw_patinfo_btn_6.style.color = "blue";
			}
		}
		if(patInfoFlagArr[i]=="O"){
			if(ds_patinfo_prcpdeliveinfo.getColumn(0,"prcpdelivefact")!="-" 
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"prcpdelivefact")!=""
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"prcpdelivefact")!=null){
				sw_patinfo_btn_0.text = ""+tabPatInfoBtnName[0];
				sw_patinfo_btn_0.style.color = "blue";
			}
			if(ds_patinfo_prcpdeliveinfo.getColumn(0,"suppdeptdelivefact")!="-"
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"suppdeptdelivefact")!=""
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"suppdeptdelivefact")!=null){
				sw_patinfo_btn_1.text = ""+tabPatInfoBtnName[1];
				sw_patinfo_btn_1.style.color = "blue";
			}
			if(ds_patinfo_prcpdeliveinfo.getColumn(0,"nursdelivefact")!="-"
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"nursdelivefact")!=""
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"nursdelivefact")!=null){
				sw_patinfo_btn_3.text = ""+tabPatInfoBtnName[3];
				sw_patinfo_btn_3.style.color = "blue";
			}
			if(ds_patinfo_ipcmcmtlist.getRowCount()>0){
				sw_patinfo_btn_2.text = ""+tabPatInfoBtnName[2];
				sw_patinfo_btn_2.style.color = "blue";
			}
			if(ds_patinfo_prcpdeliveinfo.getColumn(0,"excucdrem")!="-"
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"excucdrem")!=""
				&& ds_patinfo_prcpdeliveinfo.getColumn(0,"excucdrem")!=null){
				sw_patinfo_btn_11.text = ""+tabPatInfoBtnName[11];
				sw_patinfo_btn_11.style.color = "blue";
			}
		}
		if(patInfoFlagArr[i]=="E"){
			if(ds_patinfo_excuinfolist.getRowCount()>0){
				sw_patinfo_btn_7.text = ""+tabPatInfoBtnName[7];
				sw_patinfo_btn_7.style.color = "blue";
			}
		}
		if(patInfoFlagArr[i]=="Y"){
			if(ds_patinfo_patotptinfolist.getRowCount()>0){
				sw_patinfo_btn_8.text = ""+tabPatInfoBtnName[8];
				sw_patinfo_btn_8.style.color = "blue";
			}
		}
		if(patInfoFlagArr[i]=="C"){
			if(
				  (ds_patinfo_patfixrem.getColumn(0,"memodesc")!="-" || ds_patinfo_patrem.getColumn(0,"memodesc")!="-")
				&&(ds_patinfo_patfixrem.getColumn(0,"memodesc")!="" || ds_patinfo_patrem.getColumn(0,"memodesc")!="")
				&&(ds_patinfo_patfixrem.getColumn(0,"memodesc")!=null || ds_patinfo_patrem.getColumn(0,"memodesc")!=null)
			){
				sw_patinfo_btn_5.text = ""+tabPatInfoBtnName[5];
				sw_patinfo_btn_5.style.color = "blue";
			}
		}
		if(patInfoFlagArr[i]=="A"){
			if(ds_patinfo_materialconsumelist.getRowCount()>0){
				sw_patinfo_btn_4.text = ""+tabPatInfoBtnName[4];
				sw_patinfo_btn_4.style.color = "blue";
			}
		}	
		if(patInfoFlagArr[i]=="T"){
			if(ds_patinfo_actinfo.getRowCount()>0){
				sw_patinfo_btn_9.text = ""+tabPatInfoBtnName[9];
				sw_patinfo_btn_9.style.color = "blue";
			}
		}	
		if(patInfoFlagArr[i]=="J"){
			sw_patinfo.case10.patinfo_rsrvrem.binddataset = "ds_patinfo_rsrvrem";
			if(ds_patinfo_rsrvrem.getColumn(0,"rsrvrem")!="-" && ds_patinfo_rsrvrem.getColumn(0,"rsrvrem")!="" && ds_patinfo_rsrvrem.getColumn(0,"rsrvrem")!=null){
				sw_patinfo_btn_10.text = ""+tabPatInfoBtnName[10];
				sw_patinfo_btn_10.style.color = "blue";
			}
		}
		if(!utlf_isNull(this.objects["ds_rectmpdetail"])){
			if(ds_rectmpdetail.getColumn(0,"nuclcomment")!="-" && ds_rectmpdetail.getColumn(0,"nuclcomment")!=""){
				sw_patinfo_btn_10.text = ""+tabPatInfoBtnName[12];
				sw_patinfo_btn_10.style.color = "blue";
			}
			if(ds_rectmpdetail.getColumn(0,"lsnt1")!="-" && ds_rectmpdetail.getColumn(0,"lsnt1")!=""){
				sw_patinfo_btn_10.text = ""+tabPatInfoBtnName[13];
				sw_patinfo_btn_10.style.color = "blue";
			}
		}	
	}
};

var aezPatInfo_excucdrem = "-";
function aezSetPatInfoBindDS(){
	for(var i=0; i<patInfoFlagArr.length;i++){
		if(patInfoFlagArr[i]=="D"){
			sw_patinfo.case6.patinfo_diaginfo.binddataset = "ds_patinfo_diaginfo";				
		}
		if(patInfoFlagArr[i]=="O"){
			ds_patinfo_prcpdeliveinfo.addColumn("excucdrem","String");
			ds_patinfo_prcpdeliveinfo.setColumn(0,"excucdrem",aezPatInfo_excucdrem);
			sw_patinfo.case0.patinfo_prcpdelivefact.binddataset = "ds_patinfo_prcpdeliveinfo";//처방커멘트
			sw_patinfo.case1.patinfo_suppdeptdelivefact.binddataset = "ds_patinfo_prcpdeliveinfo";//실시커멘트
			sw_patinfo.case2.patInfo_ipcmcmtlist.binddataset = "ds_patinfo_ipcmcmtlist"; //임상진료소견
			sw_patinfo.case3.patinfo_nursdelivefact.binddataset = "ds_patinfo_prcpdeliveinfo";//임상간호소견
			sw_patinfo.case11.patinfo_excucdrem.binddataset = "ds_patinfo_prcpdeliveinfo";//검사주의사항
		}
		if(patInfoFlagArr[i]=="E"){
			sw_patinfo.case7.patinfo_excuinfolist.binddataset = "ds_patinfo_excuinfolist";
		}
		if(patInfoFlagArr[i]=="Y"){
			sw_patinfo.case8.patinfo_patotptinfolist.binddataset = "ds_patinfo_patotptinfolist";
		}
		if(patInfoFlagArr[i]=="C"){
			if(ds_patinfo_patfixrem.getColumn(0,"memodesc")==null){
				ds_patinfo_patfixrem.addColumn("memodesc","String",255);
				ds_patinfo_patfixrem.addRow();
				ds_patinfo_patfixrem.setColumn(0,"memodesc","-");
			}
			if(ds_patinfo_patrem.getColumn(0,"memodesc")==null){
				ds_patinfo_patrem.addColumn("memodesc","String",255);
				ds_patinfo_patrem.addRow();
				ds_patinfo_patrem.setColumn(0,"memodesc","-");
			}
			sw_patinfo.case5.patinfo_patfixrem.binddataset = "ds_patinfo_patfixrem";		
			sw_patinfo.case5.patinfo_patrem.binddataset = "ds_patinfo_patrem";
		}
		if(patInfoFlagArr[i]=="A"){
			sw_patinfo.case4.patinfo_materialconsumelist.binddataset = "ds_patinfo_materialconsumelist";
		}	
		if(patInfoFlagArr[i]=="T"){
			sw_patinfo.case9.patinfo_actinfo.binddataset = "ds_patinfo_actinfo";
		}	
		if(patInfoFlagArr[i]=="J"){
// 			if(ds_patinfo_rsrvrem.getColumn(0,"rsrvrem")==null){
// 				ds_patinfo_rsrvrem.addColumn("rsrvrem","String",255);
// 				ds_patinfo_rsrvrem.addRow();
// 				ds_patinfo_rsrvrem.setColumn(0,"rsrvrem","-");
// 			}
			sw_patinfo.case10.patinfo_rsrvrem.binddataset = "ds_patinfo_rsrvrem";
		}	
	}
	aezSetTabPatInfoBtn();
};
function sw_patinfo_btn_onclick(obj:Button,  e:ClickEventInfo)
{	
	var tabname = new String(obj.name).substr(0,15);
	var tabidx = new String (obj.name).substr(15,2); 
	sw_patinfo.tabindex = tabidx;
	
	for(var i = 0; i<patInfoTabNum; i++){
		eval(tabname+i).class = "btn_tab";
		if(obj.name == tabname+i ){
			eval(tabname+i).class = "btn_tab_S";
		}
		if(tabidx==1 || tabidx==5 || tabidx==10){
			btn_acptremsave.enable = true;
		}else{
			btn_acptremsave.enable = false;
		}
		
	}
}
/******************************************************
스위치 형태의 환자정보 갖고오는 함수 끝
******************************************************/


/******************************************************
Java 익셉션을 Script 형태로 변환하는 함수
******************************************************/
function astErrorMsg(strErrorMsg){
	var errorArr = strErrorMsg.split("|");
	var message = errorArr[0].replace("?","").trim();
	if(message == "데이터베이스 처리 중 중복된 데이터의 입력 시도로 고유성 위반에러가 발생하였습니다." || message == "sql.error.23505"){
		sysf_messageBox("중복된 데이터가 존재합니다.","I999");
	}else if(message=="업무처리 시 오류가 발생하였습니다." || message.substr(0,6)=="데이터베이스"){
		sysf_messageBox(errorArr[1].replace("?",""),"I999");
		var errorArr2 = errorArr[2].split(" ");
		alert(errorArr2[5]+"/"+errorArr2[3]);
		system.setClipboard("CF_TEXT", errorArr2[5]);
	}else if(message=="조회된 결과가 없습니다."){
		return;
	}else{
		sysf_messageBox(errorArr[0].replace("?",""),"I999");
	}	
}

/******************************************************
그리드 컬럼사이즈를 0으로 줄였을때 표시하는 요구사항 반영함수

astGetGridComponents : 각 폼에서 Grid Object 추출
astGridOncolresized : 컬럼사이즈 0으로 줄였을때 적용하는 함수
******************************************************/
function astGetGridComponents(sort){
	var formcomArr = this.components;
	var gridArr = new Array();
	
	var depthArr1 = new Array();
	for(var i=0; i<formcomArr.length; i++){
		if(formcomArr[i]=="[object Grid]"){
			gridArr[gridArr.length] = formcomArr[i].name; 
		}else if(formcomArr[i]=="[object Div]" || formcomArr[i]=="[object Tab]"){
			depthArr1[depthArr1.length] = formcomArr[i].name;
		}
	}
	
	while(!depthArr1.length==0){
		var compoArr = new Array();
		var depthArr2 = new Array();
		
		for(var i=0; i<depthArr1.length; i++){
			compoArr=eval(depthArr1[i]).components;
			for(var j=0; j<compoArr.length; j++){
				if(compoArr[j]=="[object Grid]"){
					gridArr[gridArr.length] = depthArr1[i]+"."+compoArr[j].name; 
				}else if(compoArr[j]=="[object Div]" || compoArr[j]=="[object Tab]" || compoArr[j]=="[object Tabpage]"){
					depthArr2[depthArr2.length] = depthArr1[i]+"."+compoArr[j].name;
				}
			}
		}
		depthArr1=depthArr2.slice(0,depthArr2.length);
	}
	
	
	for(var i=0; i<gridArr.length; i++){
		eval(gridArr[i]).oncolresized.setHandler(astGridOncolresized);
		if(sort!="N"){
			grdf_setGridSort(eval(gridArr[i]));
		}
	}
}

function astGridOncolresized(obj:Grid, e:GridSizeChangedEventInfo){
	if(e.newvalue == 0){
		obj.setRealColSize(e.subindex, 1);
	}
}

function openSMAEA04300(obj:Form, e:KeyEventInfo){
	if(e.ctrlKey){
		if(e.keycode==112){
			frmf_open("SMAEA04300", "SMAEA04300", "", "", "", "", "", "", "", "", "", "", "M");
		}
	}
}

function lf_BarcdPrtSato(grd, orddeptnm,roomcd,prcpgenrflag,portyn,precureprcpflag) {
	//var barcdRef = "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
	var sPrntKind = ds_data_setupinfo.getColumn(0,"prntkind");
	var portOpenCheck = "";
	var LCount = 0;
	var iXPos   = 0;
	var iYPos   = 0;
	
	var sSndMsg = "";

	if (sPrntKind == 0) return;

	var sCommKind = ds_data_setupinfo.getColumn(0,"commkind");
	var sLeftBank = ds_data_blank.getColumn(0,"left");
	var sTopBank  = ds_data_blank.getColumn(0,"top");
	
	if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
	if (utlf_isNull(sTopBank) || sTopBank == "-")  sTopBank  = 0;
		
	var orddeptnm 			= orddeptnm;
	var roomcd 				= roomcd;
	var prcpgenrflag 		= prcpgenrflag;
	var portyn 				= portyn;
	var precureprcpflag 	= precureprcpflag;
				
	var sSndMsg   = "";
	var sBcNo     = "";
	var iprintcnt = 0;
	var pid = ds_selectpat.getColumn(0,"pid");
	var hngnm = ds_selectpat.getColumn(0,"hngnm");
	var sna = ds_selectpat.getColumn(0,"sna");
	var rrgstno = ds_selectpat.getColumn(0,"rrgstno");
	var styleFlags = utlf_transNullToEmpty(grp_body.group2.tar_prcpdelivefact.value).split("]");
	var cmt = styleFlags[0];
	
	//포터블 및 선처치 여부 ( 진료:Y, 간호:P )
	//간호포터블접수만 표시
	if(  portyn == "P" && precureprcpflag == "N") {
		portyn = "P";
	}
	else if(portyn == "N" && precureprcpflag == "Y" ) {
		portyn ="?";
	}
	else if(portyn == "N" && precureprcpflag == "N" ) {
		portyn ="";
	}
	else if(portyn == "P" && precureprcpflag == "Y") {
		portyn ="P?";
	} 
						
	sSndMsg =  String.fromCharCode(27) +"A" + String.fromCharCode(27) +"A103500500"; // 시작위치 셋팅
	// ????
	iXPos = Number(sLeftBank) + 5;
	iYPos = Number(sTopBank)  + 5;
		
	//sSndMsg += String.fromCharCode(27) +"V" + iXPos + String.fromCharCode(27) +"H" + iYPos + String.fromCharCode(27) +"S" + pid;
	//sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), pid, 1.5, 1);
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), pid + " [" + rrgstno.substring(0,6) + "]", 1.5, 1);
	
	// ??? + ????
	iXPos = Number(sLeftBank) + 5;
	iYPos = Number(sTopBank)  + 35;
	//sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, hngnm+"  "+ sna);
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), sna+"  "+ hngnm, 1.5, 1);	
	
	// ??? (??)
	if(prcpgenrflag =="I" || prcpgenrflag =="E" ) {
		iXPos = Number(sLeftBank) + 5;
		iYPos = Number(sTopBank)  + 65;
		//sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, orddeptnm + "("+ roomcd + ")" );
		sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), orddeptnm + "("+ roomcd + ")", 1.5, 1);	
	}
	else{
		iXPos = Number(sLeftBank) + 5;
		iYPos = Number(sTopBank)  + 65;
		//sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, orddeptnm );
		sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), orddeptnm, 1.5, 1);	
	}
									
	// ??? ? ?????
	iXPos = Number(sLeftBank) + 5;
	iYPos = Number(sTopBank)  + 95;
	//sSndMsg += CommAX.PrtImgOut(iYPos, iXPos, portyn );
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), portyn, 1.5, 1);	
						
	//Routine ? LongStream
	iXPos = Number(sLeftBank) + 60;
	iYPos = Number(sTopBank)  + 95;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), cmt +"]", 1.5, 1);
																
	//???
	iXPos = Number(sLeftBank) +125 ;
	iYPos = Number(sTopBank)  + 15;
	sSndMsg += String.fromCharCode(27) +"V" + iXPos + String.fromCharCode(27) +"H" + iYPos + String.fromCharCode(27) +"BG02100" + pid; // ???
	
						
	//???????
	iXPos = Number(sLeftBank) +50 ;
	iYPos = Number(sTopBank)  + 240;
	
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), "*" + pid +  "*", 0.5 , 0.5);
	
	//??(??)
	sSndMsg += String.fromCharCode(27) +"Q" + "1" + String.fromCharCode(27) +"Z";	

	CommAX.SendMsg(sSndMsg);
}

/****************************************************************************************
 * Argument			: pid				- 환자번호
 *					: patnm				- 환자명
 *					: sna				- 성별/나이
 *					: roomcd			- 병실
 *					: excupartcd		- 사용안함.. 제거
 *					: prcpdelivefact	- 처방전달사항
 *					: deptengabbr		- 진료과영문
 *					: erprcpflag		- 사용안함.. 제거
 *					: prcpnm			- 처방명
 *					: barpid			- 바코드ID
 * Description		: 촬영실 배정관리 SATO BarCode Print 설정
 ****************************************************************************************/
//function fBarcdPhoLbPrtSato(pid, patnm, sna, roomcd, excupartcd, prcpdelivefact, deptengabbr, erprcpflag, prcpnm, barpid) 
function lf_BarcdPhoLbPrtSato(pid, patnm, sna, roomcd, prcpdelivefact, deptengabbr, prcpnm, barpid) {
//	var barcdRef 		= "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
	var sPrntKind 		= ds_data_setupinfo.getColumn(0,"prntkind");
	var portOpenCheck 	= "";
	var LCount 			= 0;
	var iXPos   		= 0;
	var iYPos   		= 0;
	var sSndMsg 		= "";
	
	if (sPrntKind == 0) return;

	var sCommKind = ds_data_setupinfo.getColumn(0,"commkind");
	var sLeftBank = ds_data_blank.getColumn(0,"left");
	var sTopBank  = ds_data_blank.getColumn(0,"top");
	
	if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
	if (utlf_isNull(sTopBank)  || sTopBank == "-")  sTopBank  = 0;
				
	var sSndMsg    = "";
	var sBcNo      = "";
	var iprintcnt  = 0;
//	var styleFlags = model.getValue("/root/main/patrem/prcpdeliveinfo/prcpdelivefact").split("]");
//	var cmt = styleFlags[0];		
						
	sSndMsg = String.fromCharCode(27)+"A"+String.fromCharCode(27)+"A103500500"; // 시작위치 셋팅
	
	//바코드
	iXPos = Number(sLeftBank) + 140;
	iYPos = Number(sTopBank)  + 10;
	sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"BG02100" + barpid; // 바코드
								
	// 등록번호
	iXPos = Number(sLeftBank) + 0;
	iYPos = Number(sTopBank)  + 125;
	sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"L0203"+String.fromCharCode(27)+"U" + pid + String.fromCharCode(27)+"L0101";

	// 환자명
	iXPos = Number(sLeftBank) + 250;
	iYPos = Number(sTopBank)  + 125;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), patnm, 2.0, 1);	
	
	// 병실코드
	iXPos = Number(sLeftBank) + 0;
	iYPos = Number(sTopBank)  + 170;
	sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"L0203"+String.fromCharCode(27)+"U" + roomcd + String.fromCharCode(27)+"L0101";
	
	// 진료과
	iXPos = Number(sLeftBank) + 260;
	iYPos = Number(sTopBank)  + 170;
	sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"L0203"+String.fromCharCode(27)+"U" + deptengabbr + String.fromCharCode(27)+"L0101";
	
	// 성별나이
	iXPos = Number(sLeftBank) + 400;
	iYPos = Number(sTopBank)  + 170;
	sSndMsg += String.fromCharCode(27)+"V" + iYPos + String.fromCharCode(27)+"H" + iXPos + String.fromCharCode(27)+"L0203"+String.fromCharCode(27)+"U" + sna + String.fromCharCode(27)+"L0101";
	
	// 처방명
	iXPos = Number(sLeftBank) + 0;
	iYPos = Number(sTopBank)  + 210;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), prcpnm, 2, 1);	
	
	// 처방전달사항
	iXPos = Number(sLeftBank) + 0;
	iYPos = Number(sTopBank)  + 250; 
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), prcpdelivefact, 1,1);
	
	sSndMsg += String.fromCharCode(27)+"Q" + "1" + String.fromCharCode(27)+"Z";	

	CommAX.SendMsg(sSndMsg);
}

// 검사실용 동명이인 체크실시
function aezfCheckNameConflict(pid, suppdeptcd, excuroomcdid, excuroomgrpcdid) {
	// 필수체크
	if ( utlf_isNull(pid) )  {
		sysf_messageBox("차트번호가 입력되지 않았습니다.\r\n 차트번호를", "I007");
		return;
	} else {
		dsf_createDsRow("ds_send_nameconflict",	[
												{col:"pid", type:"STRING", size:256, val:pid}
											  , {col:"suppdeptcd", type:"STRING", size:256, val:suppdeptcd}
											  , {col:"excuroomcdid", type:"STRING", size:256, val:excuroomcdid}
											  , {col:"excuroomgrpcdid", type:"STRING", size:256, val:excuroomgrpcdid}
												]);
		dsf_createDs("ds_temp_nameconflict");
		
		var oParam = {};
			oParam.id          = "TRAER00209";
			oParam.service     = "examcureacptexecapp.ExamCureAcpt";
			oParam.method      = "reqGetNameConflict";
			oParam.inds        = "req=ds_send_nameconflict";
			oParam.outds       = "ds_temp_nameconflict=conflictyn";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAER00209";

		tranf_submit(oParam);
		
		if (ds_temp_nameconflict.getColumn(0,"conflictyn") == "Y") {			
			sysf_messageBox("현재 환자와 성명이 동일한 환자가 존재합니다.\r\n" +
							" 주의하여 작업하시기 바랍니다.", "I000");	
			return false;
		} else {
			return true;
		}
	}
}

//=====================================================================================================================================================================================
// @ SATO BarCode Print 설정
//=====================================================================================================================================================================================		
function lf_BarcdLbPrtSato(pid, patnm, gbn, rrgstno1, rrgstno2, barpid, excugrp, currentdate, sex, age) 
{
//	var barcdRef 		= "/root/main/barcdprntsetup/prntsetupinfo/setupinfo";
	var sPrntKind 		= ds_data_setupinfo.getColumn(0,"prntkind");
	var portOpenCheck 	= "";
	var LCount 			= 0;
	var iXPos   		= 0;
	var iYPos   		= 0;
	var sSndMsg 		= "";

	if (sPrntKind == 0) return;
	
	var sCommKind = ds_data_setupinfo.getColumn(0,"commkind");
	var sLeftBank = ds_data_blank.getColumn(0,"left");
	var sTopBank  = ds_data_blank.getColumn(0,"top");
	
	if (utlf_isNull(sLeftBank) || sLeftBank == "-") sLeftBank = 0;
	if (utlf_isNull(sTopBank)  || sTopBank == "-")  sTopBank  = 0;
				
	var sSndMsg    = "";
	var sBcNo      = "";
	var iprintcnt  = 0;

// 	var styleFlags = model.getValue("/root/main/patrem/prcpdeliveinfo/prcpdelivefact").split("]");
// 	
// 	var cmt = styleFlags[0];		

	sSndMsg = String.fromCharCode(27)+"A"+String.fromCharCode(27)+"A103500500"; // 시작위치 셋팅 
	
	iXPos 	= Number(sLeftBank) + 20;
	iYPos 	= Number(sTopBank)  + 75;
	sSndMsg += String.fromCharCode(27)+"V" + iXPos + String.fromCharCode(27)+"H" + iYPos + String.fromCharCode(27)+"BG02100" + "*"+pid+' '+excugrp+"*";
	
	// 등록번호 + 그룹코드
	iXPos = Number(sLeftBank) + 140;
	iYPos = Number(sTopBank)  + 130;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), "*"+pid+' '+excugrp+"*", 0.5, 1);	
	
	// 등록번호
	iXPos = Number(sLeftBank) + 30;
	iYPos = Number(sTopBank)  + 180;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), pid, 2.5, 1);	
	
	// 그룹코드
	iXPos = Number(sLeftBank) + 380;
	iYPos = Number(sTopBank)  + 180;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), excugrp, 2.5, 1);
	
	// 환자명
	iXPos = Number(sLeftBank) + 30;
	iYPos = Number(sTopBank)  + 230;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), patnm, 2.5, 1);	
									
	// 성별
	iXPos = Number(sLeftBank) + 260;
	iYPos = Number(sTopBank)  + 230;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), sex, 2.5, 1);	
						
	//나이
	iXPos = Number(sLeftBank) + 380;
	iYPos = Number(sTopBank)  + 230;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), age, 2.5, 1);

	//주민번호
	iXPos = Number(sLeftBank) + 280;
	iYPos = Number(sTopBank)  + 300;
	sSndMsg += CommAX.PrtImgOut(parseInt(iYPos), parseInt(iXPos), rrgstno1+"-"+gbn, 1.5 , 0.5);
	
	sSndMsg += String.fromCharCode(27)+"Q" + "1" + String.fromCharCode(27)+"Z";	

	CommAX.SendMsg(sSndMsg);
}

/****************************************************************************************
 * Argument			: grdobj	: 목적그리드
 * 					: colobj	: 목적ColRef
 * 					: xpath     : 목적노드set
 * Description		: Buffering Send check. 
 ****************************************************************************************/
function aezfSendMarkBuf(grdobj, colobj) {
//	var colref_viewcnts = grdobj.colref(colobj);
//	var rowidx;
	var bufCnts 		= "";
	var selectedRows 	= grdf_getSelectedRows(grdobj);
	var xpath 			= objects[grdobj.binddataset];

	for (var i = 0; i < selectedRows.length; i++){
		bufCnts += xpath.getColumn(selectedRows[i], colobj) + "\r\n";
	}
	
//	window.clipBoardData = bufCnts;
	system.setClipboard("CF_TEXT", bufCnts);
}		

/****************************************************************************************
 * Argument			: targetXpath	: 목적데이타셋
 * 					: cdGroupID		: 코드그룹
 * 					: codeName     	: 추가할 코드명
 * 					: codeID     	: 추가할 코드값
 * 					: baseXpath     : 소스데이타셋
 * Description		: 데이터셋을 새로 생상하여 소스데이터셋을 카피하면서 로우 추가
 ****************************************************************************************/
function aezfInsertInstance2(targetXpath, cdGroupID, codeName, codeID, baseXpath) {
	dsf_createDs(targetXpath);
	objects[targetXpath].copyData(baseXpath);
	
	if(utlf_isNull(objects[targetXpath].getColumnInfo("cdid"))) {
		objects[targetXpath].addColumn("cdid","string");
	}
	
	if(utlf_isNull(objects[targetXpath].getColumnInfo("cdnm"))) {
		objects[targetXpath].addColumn("cdnm","string");
	}
	
	objects[targetXpath].insertRow(0);
	
	objects[targetXpath].setColumn(0,"cdnm",codeName);
	objects[targetXpath].setColumn(0,"cdid",codeID);
} 

/****************************************************************************************
 * Argument			: SPAEB00201_PARAM1 : 검색구분(cd/nm)  
 * 					: SPAEB00201_PARAM2 : 검색조건(코드/명칭)
 * 					: SPAEB00201_PARAM3 : multiyn 
 * 					: SPAEB00201_PARAM4 : multi선택 시 setting할 목적노드 
 * 					: SPAEB00201_PARAM5 : code값을 setting할 목적노드
 * 					: SPAEB00201_PARAM6 : name값을 setting할 목적노드 
 * 					: SPAEB00201_PARAM7 : 수가를 setting할 목적노드   
 * Description		: 수가내역 가져오기
 ****************************************************************************************/
function fGetCalScorCd(vCond, vCdnm, bMultiyn, vMultiDestXPath, vCdDestXPath, vNmDestXPath, vAmtDestXPath) {
	frmf_clearParameter("SPAEB00201_PARAM1");    
	frmf_clearParameter("SPAEB00201_PARAM2");    
	frmf_clearParameter("SPAEB00201_PARAM3");    
	frmf_clearParameter("SPAEB00201_PARAM4");    
	frmf_clearParameter("SPAEB00201_PARAM5");    
	frmf_clearParameter("SPAEB00201_PARAM6");    
	//frmf_clearParameter("SPAEB00201_PARAM7");    

	frmf_setParameter ("SPAEB00201_PARAM1", vCond); 
	frmf_setParameter ("SPAEB00201_PARAM2", vCdnm); 
	frmf_setParameter ("SPAEB00201_PARAM3", bMultiyn); 
	frmf_setParameter ("SPAEB00201_PARAM4", vMultiDestXPath); 
	frmf_setParameter ("SPAEB00201_PARAM5", vCdDestXPath); 
	frmf_setParameter ("SPAEB00201_PARAM6", vNmDestXPath); 
	//frmf_setParameter ("SPAEB00201_PARAM7"		, vAmtDestXPath);  

	frmf_modal("SPAEB00201", "SPAEB00201", "", "", "", "", "", "", "", "", "", "", "M");
}	

/**@desc   : 함수 호출시 선택된 데이터를 특정 노드에 담아둔다.
 * @param1 : bufCnt: 첫번째 cnt일때 기존 노드를 삭제하기 위한 count
 * @param2 : bufRow: 노드에 담아놓을 그리드 row
 * @param4 : strDest: 목적지 주소값
 * @param3 : strSrc: 출발지 주소값
 * @return : void
 * @authur : 마정민 2007. 4. 3
*/
function fPrcpBuffer( bufCnt, bufRow, strDest, strSrc ) {
	var ds_src  = this.objects[strSrc];
	var ds_dest = this.objects[strDest];
	
    if (bufCnt == 1) { //첫번째 데이터이면 기존 노드를 삭제한다.
		ds_dest.clearData();
    }
        
    //대상노드로 복사한다.    
    var toRow = ds_dest.addRow();
    ds_dest.copyRow(toRow, ds_src, bufRow);
}

/**
*	수가내역 대상그리드 set=======================================================================================================================================
*  vGrdObj			: 대상그리드
*  vSrcXPath			: 목적노드set
*  vDupCheckCo	: dup check column no 
*  vDupCheck		: dup check yn 
*  vCodeNode		: 수가코드 목적 노드
*  vNameNode		: 수가처방명 목적 노드
* vHeaderAddRows : header row default값(1) 보다 큰 row수
*/
//function fSetOcd(vGrdObj, vSrcXPath, vDupCheckCol, vDupCheck,  vCodeNode, vNameNode, vSessiondept, vHeaderAddRows ) {
function fSetOcd(vGrdObj, vSrcXPath, vDupCheckCol, vDupCheck,  vCodeNode, vNameNode, vSessiondept) {
	if(utlf_isNull(vGrdObj)) return ; 
	if(utlf_isNull(vSrcXPath)) return ; 
	if( ds_temp.getColumn(0,"okflag")  != "ok" ) return ; 
	
	var nodesetT = objects[vGrdObj.binddataset];
	var nodesetS = objects[vSrcXPath];
	
	var grdcnt  = nodesetT.rowcount; 
	var cnt 	= nodesetS.rowcount; 

// 	if( !utlf_isNull(vHeaderAddRows) ){
// 		grdcnt  = parseInt( nodesetT.rowcount ) -  parseInt( vHeaderAddRows ) ;
// 	} 

	var vDupCheckVal = "";
	var i = 0;    
	
	if( cnt == 1 ) { 
		vDupCheckVal = nodesetS.getColumn(0,"calcscorcd" );
		if( vDupCheck == "Y" ) {
			if( lf_checkDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){
				if( sysf_messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){
					return ;
				}
			}
		}
		
		nodesetT.addRow();    		 
		 
		if( !utlf_isNull(vCodeNode) ){ 
			nodesetT.setColumn(grdcnt,"" + vCodeNode 	,  vDupCheckVal );
		}
		if( !utlf_isNull(vNameNode) ){ 
			nodesetT.setColumn(grdcnt,"" + vNameNode	, nodesetS.getColumn(0,"ordnm"    ) );   
		}
							
		nodesetT.addColumn("excucd","string" );
		nodesetT.addColumn("excucdnm","string" );
		nodesetT.addColumn("basesuppdeptcd","string" );
		nodesetT.addColumn("prcpexecdeptcd1","string" );
		nodesetT.addColumn("prcpexecdeptcd1","string" );
		
		nodesetT.setColumn(grdcnt,"excucd"          	, vDupCheckVal );
		nodesetT.setColumn(grdcnt,"excucdnm"   			, nodesetS.getColumn(0,"ordnm" )   ); 
		nodesetT.setColumn(grdcnt,"basesuppdeptcd"  	, vSessiondept   ); 
		nodesetT.setColumn(grdcnt,"excutodd"   			, '99991231'   ); 
		nodesetT.setColumn(grdcnt,"prcpexecdeptcd"  	, nodesetS.getColumn(0,"prcpexecdeptcd" )   ); 
		nodesetT.setColumn(grdcnt,"prcpexecdeptcd1"   	, nodesetS.getColumn(0,"prcpexecdeptcd" )   ); 
		nodesetT.setColumn(grdcnt,"anotestyn"   	    , "Y"   ); 
		nodesetT.setColumn(grdcnt,"rsrvupdtcncllimdayno", "0"   );
	
		// 2010.11.19  c y w  검사코드 추가시 기본값셋팅 		
		nodesetT.setColumn(grdcnt,"excuclscd"			,	"-");
		nodesetT.setColumn(grdcnt,"eqmtifyn"			,	"N");
		nodesetT.setColumn(grdcnt,"readdrid3nm"			,	"-");
		nodesetT.setColumn(grdcnt,"rsltdispyn"			,	"Y");
		nodesetT.setColumn(grdcnt,"rsltdispgbn"			,	nodesetS.getColumn(0,"rsltdispgbn" )  );				
		nodesetT.setColumn(grdcnt,"partcntstats"		,	"1");
		nodesetT.setColumn(grdcnt,"phocntstats"			,	"1");
		nodesetT.setColumn(grdcnt,"curetims"			,	"1");
		nodesetT.setColumn(grdcnt,"rsrvexcupossyn"		,	"Y");
		nodesetT.setColumn(grdcnt,"rsrvplceflag"		,	"2");
		nodesetT.setColumn(grdcnt,"excutm"				,	"0");
		nodesetT.setColumn(grdcnt,"rsrvmultitmplcd"		,	"-");
		nodesetT.setColumn(grdcnt,"rsrvexmpcnt"			,	"1");
		nodesetT.setColumn(grdcnt,"rsrvupdtcncllimdayno",	"0");
		nodesetT.setColumn(grdcnt,"pacsnocretyn"		,	"N");
		nodesetT.setColumn(grdcnt,"etceqmtifyn"			,	"-");
		nodesetT.setColumn(grdcnt,"anotestyn"			,	"Y");
		nodesetT.setColumn(grdcnt,"prcpexecdeptcd"		,	nodesetS.getColumn(0,"prcpexecdeptcd" ) );
		nodesetT.setColumn(grdcnt,"prcpexecdeptcd1"		,	nodesetS.getColumn(0,"prcpexecdeptcd" ) );
	} else {
		nodesetT.addColumn("excucd","string" );
		nodesetT.addColumn("excucdnm","string" );
		nodesetT.addColumn("basesuppdeptcd","string" );
		nodesetT.addColumn("prcpexecdeptcd","string" );
		nodesetT.addColumn("prcpexecdeptcd1","string" );
		
		for( var i = 0 ; i < cnt ; i++ ){
			vDupCheckVal = nodesetS.getColumn(i,"calcscorcd" );
			if( vDupCheck == "Y" ) {
				if( lf_checkDup(vGrdObj , vDupCheckCol, vDupCheckVal ) == false ){
					if( sysf_messageBox("중복되는 수가코드[" + vDupCheckVal + "] 를 추가", "S001") != 6 ){
						continue ;
					}
				}
			}
			
			nodesetT.addRow();     
			
			if( !utlf_isNull(vCodeNode) ){
				nodesetT.setColumn(grdcnt,"" + vCodeNode 	,  vDupCheckVal );
			}
			if( !utlf_isNull(vNameNode) ){
				nodesetT.setColumn(grdcnt,"" + vNameNode	, nodesetS.getColumn(i,"ordnm"    ) );   
			}

			
			nodesetT.setColumn(grdcnt,"excucd"   	        , vDupCheckVal );
			nodesetT.setColumn(grdcnt,"excucdnm"   	        , nodesetS.getColumn(i,"ordnm" )   ); 
			nodesetT.setColumn(grdcnt,"basesuppdeptcd"   	, vSessiondept   ); 
			nodesetT.setColumn(grdcnt,"excutodd"   			, '99991231'   ); 
			nodesetT.setColumn(grdcnt,"prcpexecdeptcd"   	, nodesetS.getColumn(i,"prcpexecdeptcd" )   ); 
			nodesetT.setColumn(grdcnt,"anotestyn"   	    , "Y"   ); 
			nodesetT.setColumn(grdcnt,"rsrvupdtcncllimdayno", "0"   );
			
			// 2010.11.19  c y w  검사코드 추가시 기본값셋팅 		
			nodesetT.setColumn(grdcnt,"excuclscd"			,	"-");
			nodesetT.setColumn(grdcnt,"eqmtifyn"			,	"N");
			nodesetT.setColumn(grdcnt,"readdrid3nm"			,	"-");
			nodesetT.setColumn(grdcnt,"rsltdispyn"			,	"Y");
			nodesetT.setColumn(grdcnt,"rsltdispgbn"			,	nodesetS.getColumn(i,"rsltdispgbn" )  );				
			nodesetT.setColumn(grdcnt,"partcntstats"		,	"1");
			nodesetT.setColumn(grdcnt,"phocntstats"			,	"1");
			nodesetT.setColumn(grdcnt,"curetims"			,	"1");
			nodesetT.setColumn(grdcnt,"rsrvexcupossyn"		,	"Y");
			nodesetT.setColumn(grdcnt,"rsrvplceflag"		,	"2");
			nodesetT.setColumn(grdcnt,"excutm"				,	"0");
			nodesetT.setColumn(grdcnt,"rsrvmultitmplcd"		,	"-");
			nodesetT.setColumn(grdcnt,"rsrvexmpcnt"			,	"1");
			nodesetT.setColumn(grdcnt,"rsrvupdtcncllimdayno",	"0");
			nodesetT.setColumn(grdcnt,"pacsnocretyn"		,	"N");
			nodesetT.setColumn(grdcnt,"etceqmtifyn"			,	"-");
			nodesetT.setColumn(grdcnt,"anotestyn"			,	"Y");
			nodesetT.setColumn(grdcnt,"prcpexecdeptcd"		,	nodesetS.getColumn(i,"prcpexecdeptcd" ) );
			nodesetT.setColumn(grdcnt,"prcpexecdeptcd1"		,	nodesetS.getColumn(i,"prcpexecdeptcd1" ) );

			grdcnt++;
		}
	}
}	

function aezfTrim(code1, value) 
{									
    var startPoint = 0;             // subString 하기 위한 시작 포인트
    var endPoint   = String(code1).length;   // subString 하기 위한 끝 포인트

    while( (startPoint < endPoint) && (String(code1).charCodeAt(startPoint) == value) )
    {
        startPoint++;
    }
				
    while( (startPoint < endPoint) && (String(code1).charCodeAt(endPoint-1) == value) )
    {
        endPoint--;
    }
    
    return ( (startPoint > 0) || (endPoint < String(code1).length) ) ? code1.substring(startPoint, endPoint) : code1;
}

//=====================================================================================================================================================================================
// @  문자전송 20180912 kya
//=====================================================================================================================================================================================

function fSmsSend(msgcnts, pid, hngnm, mpphonno, deptcd, gubun){
	
	ds_main_sms.clearData();
	ds_send_sms.clearData();	
	ds_send_sms.addRow();
	
	ds_send_sms.setColumn(0, "instcd",   sysf_getUserInfo("dutplceinstcd"));
	ds_send_sms.setColumn(0, "data",     deptcd);
	ds_send_sms.setColumn(0, "condflag", "4");
		
	var oParam = {};
    oParam.id       = "TRZSU00803";
    oParam.service  = "userdeptinfoapp.UserDeptInfo";
    oParam.method   = "reqGetDeptPhoneNoPlce";
    oParam.inds     = "req=ds_send_sms";
    oParam.outds    = "ds_main_sms=deptinfo";
    oParam.async    = false;
   // oParam.callback = "cf_TRZSU00803";

	tranf_submit(oParam);
	
	if (arErrorCode.pop("TRZSU00803") < 0) {
		return;
	}
	
	var calltelno = utlf_transNullToEmpty(ds_main_sms.getColumn(0, "cntctel"));
	
	ds_send_sms.setColumn(0, "calltype",  "msgcall");
	ds_send_sms.setColumn(0, "insuflag",  "3");
	ds_send_sms.setColumn(0, "msgcnts",   msgcnts);
	ds_send_sms.setColumn(0, "calltelno", calltelno);
	
	ds_send_rcv.clearData();
	ds_send_rcv.addRow();
	
	ds_send_rcv.setColumn(0, "usernm",    hngnm);
	ds_send_rcv.setColumn(0, "userid",    sysf_getUserInfo("userid"));
	ds_send_rcv.setColumn(0, "mpphonno",  mpphonno);
	ds_send_rcv.setColumn(0, "pid",       pid);
	ds_send_rcv.setColumn(0, "deptcd",    deptcd);

		
	ds_main_sms.clearData();
		
	var oParam = {};
    oParam.id       = "TXZMI00202";
    oParam.service  = "instantmsgapp.InstantMsg";
    oParam.method   = "reqExeSendUserMessage";
    oParam.inds     = "req=ds_send_sms "
                    + "recvr=ds_send_rcv";
    oParam.outds    = "ds_main_sms=succnt";
    oParam.async    = false;
   // oParam.callback = "cf_TXZMI00202";

	tranf_submit(oParam);
	
	if (arErrorCode.pop("TXZMI00202") < 0) {
		return;
	}
}

/****************************************************************************************
 * Function			: fPMIFPrintBarCode
 * Description		: 바코드 출력 함수(DSC, ER간호에서도 사용)
 * Argument			: 01.pPid		: 등록번호
 *					: 02.pIndd		: 입원일자
 *					: 03.pCretno	: 생성번호
 *					: 04.pMskind	: 주부유형
 *					: 05.pHiststat	: 이력상태
 *					: 06.pSetyn		: 프린터설정정보 셋팅여부
 *					: 07.pScrid		: 프린터설정정보 조회용 화면 아이디
 *					: 08.pBarcdRef	: 설정정보 xpath
 *					: 09.pRoomyn	: 병실코드
 *					: 10.pIsNEW	    :
 *					: 10.pAfrsYn	: 업무여부
 * return type		: String - dataset name
 * Creator			: PAM
 ****************************************************************************************/
function fPMIFPrintBarCode(pPid, pIndd, pCretno, pMskind, pHiststat, pSetyn, pScrid, pBarcdRef)
{
       var objExtCommon = new ExtCommon();
        //  1. 공통[시작] - 2009.05.25
       dsf_createDs("ds_send_data60", [{col:"pid"},
									{col:"usernm"},
									{col:"gubun"},
									{col:"cardid1"},
									{col:"indd"}]);
	
	   ds_send_data60.addRow();	 
	   dsf_createDs("ds_hidden_h_receipt_receipt", [{col:"pid"},
												{col:"hngnm"},
												{col:"hngnm2"},												
												{col:"gbn"},												
												{col:"rrgstno"},												
												{col:"sex"},
												{col:"age"},
												{col:"wardcddeptengabbr"},
												{col:"excupartcd"},
												{col:"roomcd"},
												{col:"examroomnm"},
												{col:"wardcdnm"},
												{col:"prcphopedd"},
												{col:"newprintflag"},												
												{col:"btype"},
												{col:"rfidyn"},												
												{col:"rfidcardid1"},
												{col:"babyyn"}											
												]);
		
		ds_hidden_h_receipt_receipt.addRow();				
		ds_hidden_h_receipt_receipt.setColumn(0,"pid", ds_subordlist1.getColumn(0,"pid"));
		ds_hidden_h_receipt_receipt.setColumn(0,"hngnm", ds_subordlist1.getColumn(0,"patnm"));
		ds_hidden_h_receipt_receipt.setColumn(0,"hngnm2", ds_subordlist1.getColumn(0,"patnm"));
		ds_hidden_h_receipt_receipt.setColumn(0,"btype", ds_subordlist1.getColumn(0,"btype"));		
		ds_hidden_h_receipt_receipt.setColumn(0,"rrgstno", ds_subordlist1.getColumn(0,"rgstno"));		
		//ds_hidden_h_receipt_receipt.setColumn(0,"rsrvdd", "");
		
		if (ds_subordlist1.getColumn(0,"sna").substr(0,1) == "M") ds_hidden_h_receipt_receipt.setColumn(0,"sex", "남");
		if (ds_subordlist1.getColumn(0,"sna").substr(0,1) == "F") ds_hidden_h_receipt_receipt.setColumn(0,"sex", "여");
		
		ds_hidden_h_receipt_receipt.setColumn(0,"age", ds_subordlist1.getColumn(0,"sna").substr(2));
		ds_hidden_h_receipt_receipt.setColumn(0,"wardcddeptengabbr", ds_subordlist1.getColumn(0,"prcpgenrflag"));
		ds_hidden_h_receipt_receipt.setColumn(0,"excupartcd", "");
		ds_hidden_h_receipt_receipt.setColumn(0,"roomcd", "");
		ds_hidden_h_receipt_receipt.setColumn(0,"examroomnm", ds_subordlist1.getColumn(0,"orddrnm"));
		ds_hidden_h_receipt_receipt.setColumn(0,"wardcdnm", ds_subordlist1.getColumn(0,"orddepthngnm"));									
		ds_hidden_h_receipt_receipt.setColumn(0,"prcphopedd", ds_subordlist1.getColumn(0,"prcpdd"));
		ds_hidden_h_receipt_receipt.setColumn(0,"newprintflag", ds_subordlist1.getColumn(0,"newprintflag"));
		//ds_hidden_h_receipt_receipt.setColumn(0,"rfidyn", ds_subordlist1.getColumn(0,"rfidyn"));
		ds_hidden_h_receipt_receipt.setColumn(0,"rfidyn", 'Y');
		
		var rfidcardid1 = 'P' + utlf_lPad(ds_subordlist1.getColumn(0,"pid"), 9,'0')+'0000';   //환자구분 + 환자번호 +일련번호고정
		ds_hidden_h_receipt_receipt.setColumn(0,"rfidcardid1", rfidcardid1);		
        
         //공통코드 P0045에서 프린터 명칭과 트레이 호출 
        fGetPrintName();
                         
        // 프린터정보
        var print_name = "";
        
        // 트레이정보
        var print_tray = "";
        
        var resultFlag = "";
          
         // 6세미만 체크
        if (ds_hidden_h_receipt_receipt.getColumn(0, "age") < 6) {
            
            resultFlag = sysf_messageBox("6세미만 환자입니다!!! \r\n\r\n소아용팔찌를 출력", "S006", "\r\n성인용팔찌를 출력|\r\n출력을 취소");
            
            // 취소한 경우
            if (resultFlag == "2") {
                return;
            }
        }
        // 소아용
        if (resultFlag == "6") {
            
            // 신형 프린터 설정
            if (ds_hidden_h_receipt_receipt.getColumn(0, "newprintflag") == "Y" || ds_hidden_h_receipt_receipt.getColumn(0, "newprintflag") == "B") {
                print_name = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_13_nm",    "p")); // SLP-T401
                print_tray = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_13_tray",  "p"));
                
            // 구형 프린터 설정
            } else {
                print_name = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_11_nm",    "p")); // HC101
                print_tray = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_11_tray",  "p"));
            }
            
            ds_hidden_h_receipt_receipt.setColumn(0, "babyyn",    "Y"); // 소아용
        
        // 성인용
        } else {
            
            // 신형 프린터 설정
            if (ds_hidden_h_receipt_receipt.getColumn(0, "newprintflag") == "Y" || ds_hidden_h_receipt_receipt.getColumn(0, "newprintflag") == "A") {
                print_name = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_12_nm",    "p")); // SLP-T400
                print_tray = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_12_tray",  "p"));
                
            // 구형 프린터 설정
            } else {
                print_name = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_8_nm",    "p")); // HC100
                print_tray = utlf_transNullToEmpty(sysf_getGlobalVariable("SPPAO00100_P0045_8_tray",  "p"));
            }
            
            ds_hidden_h_receipt_receipt.setColumn(0, "babyyn",   "N"); // 성인용
        }
//        }
		// 호출끝
		
		//trace("print_name = " + print_name );
        // 신형팔찌용 렉스퍼트
	    if (print_name == 'SLP-T400' || print_name == 'SLP-T401') {
			var objDOM = rptf_createDOM();																								// DOM 객체 설정
			rptf_setNodeListToDOM(objDOM, "/root/hidden/h_receipt/receipt", ds_hidden_h_receipt_receipt);	// 데이터셋 1	

			var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;																		// 최상의노드 XML 스트링 추출
			
			var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0;show=1";		
			var prnopt = "offsety=1;printername="+print_name;
			
			var rfidyn   = ds_hidden_h_receipt_receipt.getColumn(0, "rfidyn");
			
							//sysf_messageBox("222");
			rptf_exeReportPreview30(["RPPMI03202"],[objParam], option, prnopt);	
				
// 				if (rfidyn == "Y") {
// 
// 					ds_send_data60.setColumn(0, "pid",        pPid);
// 					ds_send_data60.setColumn(0, "usernm",     ds_hidden_h_receipt_receipt.getColumn(0, "patnm"));
// 					ds_send_data60.setColumn(0, "gubun",      "P");
// 					ds_send_data60.setColumn(0, "cardid1",    ds_hidden_h_receipt_receipt.getColumn(0, "rfidcardid1"));
// 					ds_send_data60.setColumn(0, "indd",       pIndd);
// 
// 					var oParam = {};
// 						oParam.id          = "TXPMC06606";
// 						oParam.service     = "pamcomnapp.RFID";
// 						oParam.method      = "reqInsPatRFIDInfo";
// 						oParam.inds        = "req=ds_send_data60";
// 						oParam.outds       = "";
// 						oParam.async       = false;
// 						//oParam.callback    = "cf_TRPMI00115";
// 
// 					tranf_submit(oParam);
// 				}			
			
	        //exeReportPreview("RPPMI03203", "XMLSTR" , ""  , "" , print_name , "", "", "", "", "true", "", "", print_tray);
	    
	    // 기존팔찌용 렉스퍼트
	    } else {
			var objDOM = rptf_createDOM();																								// DOM 객체 설정
			rptf_setNodeListToDOM(objDOM, "/root/hidden/h_receipt/receipt", ds_hidden_h_receipt_receipt);	// 데이터셋 1	

			var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;																		// 최상의노드 XML 스트링 추출
			
			var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0;show=1";		
			var prnopt = "offsety=1;printername="+print_name;
			
			rptf_exeReportPreview30(["RPPMI03201"],[objParam], option, prnopt);
			
	       // exeReportPreview("RPPMI03201", "XMLSTR" , ""  , "" , print_name , "", "", "", "", "true", "", "", print_tray);
	    }
}]]></Script>