YNU_JEUS/app_home/himed/webapps/emr/dialroomweb/xrw/SMMND05000_혈액투석적정성평가.xrw

<?xml version="1.0" encoding="EUC-KR"?>
<?xml-stylesheet type="text/css" href="../../../com/commonweb/css/common.css" ?>
<xhtml:html xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.w3.org/2002/01/xforms" xmlns:ev="http://www.w3.org/2001/xml-events">
	<xhtml:head>
		<xhtml:title>혈액투석 적성성평가</xhtml:title>
		<model id="model1">
			<instance id="instance1">
				<root xmlns="">
					<main>
						<condition>
							<pid/>
							<statusflag>Access Flow(ml/min) :</statusflag>
							<mypid/>
							<bvipvalue>Access Flow(ml/min) :</bvipvalue>
							<mons/>
							<wardcd>2010702020</wardcd>
						</condition>
						<condition2>
							<pid/>
							<srchdate/>
							<hngnm/>
							<diagnm/>
							<srchmon/>
							<startdd/>
							<enddd/>
							<dmyn/>
							<fstdialdd/>
						</condition2>
						<hdmatnpatlist>
							<hdmatnpatinfo>
								<pid/>
								<hngnm/>
								<sexage/>
								<maintepatrgstdd/>
								<histstat/>
								<orddd/>
								<cretno/>
								<histstat/>
								<orddeptcd/>
								<orddrid/>
							</hdmatnpatinfo>
						</hdmatnpatlist>
						<coduitreclist>
							<coduitrecinfo>
								<recdd/>
								<rectm/>
								<recnm/>
								<pid/>
								<maintepatrgstdd/>
							</coduitrecinfo>
						</coduitreclist>
						<list>
							<item>
								<pid/>
								<yyyy/>
								<diagnm/>
								<dmyn/>
								<itemid/>
								<itemnm/>
								<methodid/>
								<methodnm/>
								<month01/>
								<month02/>
								<month03/>
								<month04/>
								<month05/>
								<month06/>
								<month07/>
								<month08/>
								<month09/>
								<month10/>
								<month11/>
								<month12/>
								<rsltbtn/>
								<fstdialdd/>
							</item>
						</list>
						<chklist>
							<chkinfo>
								<pid/>
								<cretfalg/>
							</chkinfo>
						</chklist>
						<rsltlist>
							<row/>
							<hearder/>
						</rsltlist>
					</main>
					<init>
						<M0133list>
							<cdnm/>
							<cdid/>
						</M0133list>
						<M0134list>
							<cdnm/>
							<cdid/>
						</M0134list>
						<M0135list>
							<cdnm/>
							<cdid/>
						</M0135list>
						<M0136list>
							<cdnm/>
							<cdid/>
						</M0136list>
						<M0137list>
							<cdnm/>
							<cdid/>
						</M0137list>
						<M0138list>
							<cdnm/>
							<cdid/>
						</M0138list>
						<M0139list>
							<cdnm/>
							<cdid/>
						</M0139list>
						<M0140list>
							<cdnm/>
							<cdid/>
						</M0140list>
						<M0141list>
							<cdnm/>
							<cdid/>
						</M0141list>
						<settingrn>
							<settingrnnm/>
							<settingrnid/>
						</settingrn>
						<M0999list>
							<cdnm/>
							<cdid/>
						</M0999list>
						<M0628list>
							<cdnm/>
							<cdid/>
						</M0628list>
						<M0629list>
							<cdnm/>
							<cdid/>
						</M0629list>
						<M0630list>
							<cdnm/>
							<cdid/>
						</M0630list>
						<mlist>
							<M0079>
								<cdid/>
								<cdnm/>
							</M0079>
						</mlist>
						<cmb_info>
							<calendar>
								<calnm/>
								<calid/>
							</calendar>
						</cmb_info>
					</init>
					<send>
						<reqdata>
							<pid/>
							<srchdate/>
							<diagnm/>
							<yyyymm/>
							<wardcd/>
						</reqdata>
						<data1/>
						<setdata>
							<setkindcd>D</setkindcd>
							<deptsetcd/>
							<deptcd/>
							<deptnm/>
							<foldernm/>
							<setno/>
							<startdd/>
							<enddd/>
							<pid/>
							<tclscdlist/>
							<workflag/>
						</setdata>
					</send>
					<temp>
						<paminfo/>
					</temp>
					<hidden>
						<count/>
						<gRow/>
						<temp>
							<rsltlist/>
						</temp>
						<ref>
							<testgrupseqno/>
							<startdd/>
							<enddd/>
							<pid/>
							<refgbn>1</refgbn>
							<acptdd/>
							<acptdde/>
							<testmdllist/>
							<tclscdlist/>
						</ref>
					</hidden>
					<receive>
						<item>
							<rslt1/>
							<rslt2/>
							<rslt3/>
							<rslt4/>
							<rslt5/>
						</item>
					</receive>
				</root>
			</instance>
			<script type="javascript" ev:event="xforms-ready">
				<![CDATA[
				     fInitialize()
				]]>
			</script>
			<submission id="TRZBC00101" mediatype="application/x-www-form-urlencoded" method="post"/>
			<submission id="TRZBC00102" mediatype="application/x-www-form-urlencoded" method="post"/>
			<submission id="TRMND01301" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/reqdata" resultref="/root/main/hdmatnpatinfo"/>
			<submission id="TXMND01301" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/savedata" resultref="/root"/>
			<submission id="TRMND01302" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/reqdata" resultref="/root/main/coduitrecinfo"/>
			<submission id="TRMND01303" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/reqdata" resultref="/root/main/reclist/recinfo"/>
			<submission id="TRMND01304" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/main/reclist/recinfo/hmdlspipeinfolist"/>
			<submission id="TXMND01302" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/savedata"/>
			<submission id="TRMND01404" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/reqdata" resultref="/root/main/chkinfo"/>
			<!-- 20090120 dhkim 내환자세팅-->
			<submission id="TRMND03402" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/init/settingrn"/>
			<!-- 20130311 적정성평가 -->
			<submission id="TRMND05001" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/reqdata" resultref="/root/main/list"/>
			<submission id="TRMND05002" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/reqdata" resultref="/root/receive"/>
			<submission id="TXMND05001" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/hidden/count"/>
			<!-- 20130401 LIS 상세결과 -->
			<submission id="TRLLP01201" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send/setdata" replace="instance" resultref="/root/hidden/temp/rsltlist"/>
		</model>
		<script type="javascript" src="../../../com/commonweb/js/common.js"/>
		<script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
		<script type="javascript" src="../../../emr/dialroomweb/js/SMMND01300.js"/>
		<script type="javascript" src="../../../emr/carecomweb/js/CareCom.js"/>
		<script type="javascript" src="../../../com/basiccodeweb/js/ZBC001.js"/>
		<script type="javascript" src="../../../emr/carecomweb/js/ENRSignEngine.js"/>
		<script type="javascript">
			<![CDATA[
			
				//=====================================================================================================================================================================================
				// @ 화면 초기화
				//=====================================================================================================================================================================================
				function fInitialize() {					
					//20090120 dhkim
					//내환자 setting 간호사 load
					model.removenode('/root/send');
                  	model.makeValue('/root/send/wardcd', '2010702020');  // 20130520 강제세팅, 혈액투석적성성평가는 
 	               // alert("wardcd = " + model.getValue("/root/send/wardcd"));
					
					//submit 호출
					if(!submit('TRMND03402')){
						messageBox('조회를 실패하였습니다.', 'E999');
						return;
					}  
					
                    setHelp();  // 온라인 도움말 화면이 있는 경우 ready 에서 실행.
					
					zbcfGetCodeList( new Array ( "M0079" //원인질환						  						
				                                 )                                                     
				                     , new Array ("/root/init/mlist"   //원인질환				                     			
				                     	)
				                     	);
					
					//당뇨유무
					model.setValue("/root/main/condition2/dmyn", "");
					//기준월
					model.setValue("/root/main/condition/mons", "");					
					//** 상단환자 화면설정 **//  
					  var node = getGlobalVariable("paminfo");
					   setCSVToNode("/root/temp/paminfo", node);
								  
					  if(getNodesetCount("/root/temp/paminfo/list") > 0) {
						  var sSelPid = model.getValue("/root/temp/paminfo/list/pid");                       // 등록번호
						  var sMaintePatRgstDD = model.getValue("/root/temp/paminfo/list/maintepatrgstdd");  // 유지환자등록일자
						  hdmatnpatRow = 1;
						  model.setValue("/root/main/condition/pid", sSelPid);
							
						  fSrchHDMatnPatList(); // 혈액투석 유지환자 리스트 조회 
						  // 선택 행 셀 색상 지정    
						  var iRow = 1;
						  grd_hdmatnpatinfo.cellstyle("background-color", iRow, 1, iRow, 4) = "#ffd9ff";
						  
					  }else{ 
						  fSrchHDMatnPatList(); // 혈액투석 유지환자 리스트 조회       
					  }
					if (iRow > 0) { 
					   fSrchHDSAQNInfo(iRow);
					}   
					
					//조회조건 default 세팅					
					model.setValue("/root/main/condition2/srchdate", getCurrentDate().substr(0,4));	
					//model.setValue("/root/main/condition2/srchmon", getCurrentDate().substr(4,2));
					
					ipt_date1.value = getCurrentDate().toDate().getAddDate(-2,"Y").getDateFormat("YYYYMMDD") ;
					ipt_date2.value = getCurrentDate();
					
					
					model.refresh()
				}
				
				//=====================================================================================================================================================================================
				// @ 혈액투석 적정성 평가 조사표가져오기
				//=====================================================================================================================================================================================
				function fSrchHDSAQNInfo(curRow) {					
					        
					        model.setValue("/root/main/condition2/pid", model.getValue( "/root/main/hdmatnpatlist/hdmatnpatinfo[" + curRow + "]/pid") );	       
							model.setValue("/root/main/condition2/hngnm",  model.getValue( "/root/main/hdmatnpatlist/hdmatnpatinfo[" + curRow + "]/hngnm") );	
							
							fsetcolortext(grd_hdmatnpatinfo, curRow);
							
							model.removenode("/root/main/list");
							
							if  (  model.getValue("/root/main/condition2/pid") == "" ){
								messageBox("유지환자를 선택 후 작업하십시오.", "E", "");								
								return;
							}
							var pid          = model.getValue("/root/main/condition2/pid");
							var srchdate  = model.getValue("/root/main/condition2/srchdate");
							
							model.makeValue("root/send/reqdata/pid", pid );
							model.makeValue("root/send/reqdata/srchdate", srchdate );
										  
							if( submit("TRMND05001") ) {		   //혈액투석 적정성평가 조회
								grd_monthlist.clearStatus();
							}												
						    
							//기저질환 셋팅
							var diagnm =  model.getValue("/root/main/list/item[1]/diagnm");							
							model.setValue("/root/main/condition2/diagnm", diagnm);
							
							//당뇨유무
							var dmyn =  model.getValue("/root/main/list/item[1]/dmyn");							
							model.setValue("/root/main/condition2/dmyn", dmyn);
							
							//최초투석일자 20130528
							var fstdialdd =  model.getValue("/root/main/list/item[1]/fstdialdd");							
							model.setValue("/root/main/condition2/fstdialdd", fstdialdd);
							
//							if(grd_monthlist.row < 1) {
//								btn_new.dispatch("DOMActivate");
//							}
							
							//색깔부여... 20130426 권영애
							fsetColorHLValue();
							
							
							model.refresh();				  
				}
				
				//=====================================================================================================================================================================================
				// @ 혈액투석 적정성 평가 조사표 저장하기
				//=====================================================================================================================================================================================
				function fSaveHDSAQNInfo() {					
							
							model.resetInstanceNode("/root/send/data1");
							
							var pid         = model.getValue("/root/main/condition2/pid")
							var srchdate = model.getValue("/root/main/condition2/srchdate") 
							var diagnm   =  model.getValue("/root/main/condition2/diagnm")
							var dmyn     =  model.getValue("/root/main/condition2/dmyn")
							
							if (diagnm ==""){
									messageBox("기저질환을 입력 후 작업하십시오.", "E", "");	
									return;
							}
							
							model.makeValue("root/send/reqdata/pid", pid );
							model.makeValue("root/send/reqdata/srchdate",srchdate );
							model.makeValue("root/send/reqdata/diagnm", diagnm );
							
							
							var lstcnt = getNodesetCount("/root/main/list/item");
						    							
						    for(var i = 1; i <= lstcnt; i++ ){
								model.setValue("/root/main/list/item[" + i + "]/pid",      pid );
								model.setValue("/root/main/list/item[" + i + "]/yyyy",     srchdate );
								model.setValue("/root/main/list/item[" + i + "]/diagnm",   diagnm  );								
								model.setValue("/root/main/list/item[" + i + "]/dmyn",     dmyn  );								
							    grd_monthlist.addStatus( i ,"update");								
						    }
							
							model.makeValue("/root/send/data1", grd_monthlist.getUpdateData());
											 						
		                    if( submit("TXMND05001") ){  //혈액투석 적정성평가 		
						      	messageBox("저장","I002");		
								var iRow = model.getValue("/root/hidden/gRow");
								fSrchHDSAQNInfo(iRow);								
					    	}						
						    model.refresh();	
							
				}
				//=====================================================================================================================================================================================
				// @ 혈액투석 적정성 평가 자료수집
				//=====================================================================================================================================================================================
			
				function fGetData(srchdate){
					
					submit("TRMND05002") ; 		   //혈액투석 적정성평가 월별 자료수집
                    
					var srchmon = srchdate.substring(4,6); 	
					
					model.makeValue("/root/main/list/item[1]/month" + srchmon ,model.getValue("/root/receive/item/rslt1" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[2]/month" + srchmon ,model.getValue("/root/receive/item/rslt2" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[3]/month" + srchmon ,model.getValue("/root/receive/item/rslt3" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[4]/month" + srchmon ,model.getValue("/root/receive/item/rslt4" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[5]/month" + srchmon ,model.getValue("/root/receive/item/rslt5" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[6]/month" + srchmon ,model.getValue("/root/receive/item/rslt6" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[7]/month" + srchmon ,model.getValue("/root/receive/item/rslt7" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[8]/month" + srchmon ,model.getValue("/root/receive/item/rslt8" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[9]/month" + srchmon ,model.getValue("/root/receive/item/rslt9" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[10]/month" + srchmon ,model.getValue("/root/receive/item/rslt10" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[11]/month" + srchmon ,model.getValue("/root/receive/item/rslt19" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[12]/month" + srchmon ,model.getValue("/root/receive/item/rslt11" )); // 상태값 지정 (i)											
					model.makeValue("/root/main/list/item[13]/month" + srchmon ,model.getValue("/root/receive/item/rslt12" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[14]/month" + srchmon ,model.getValue("/root/receive/item/rslt13" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[15]/month" + srchmon ,model.getValue("/root/receive/item/rslt14" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[16]/month" + srchmon ,model.getValue("/root/receive/item/rslt15" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[17]/month" + srchmon ,model.getValue("/root/receive/item/rslt16" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[18]/month" + srchmon ,model.getValue("/root/receive/item/rslt17" )); // 상태값 지정 (i)						
					model.makeValue("/root/main/list/item[19]/month" + srchmon ,model.getValue("/root/receive/item/rslt18" )); // 상태값 지정 (i)						
					
					
					//for(var i = grd_monthlist.fixedRows; i < grd_monthlist.rows; i++) {					 	                						
						//alert("rslt=" + model.getValue("/root/receive/item/rslt" + i  ));
						//model.makeValue("/root/main/list/item[" + i + "]/month" + srchmon ,model.getValue("/root/receive/item/rslt" + i  )); // 상태값 지정 (i)						
					//}	
								
					grd_monthlist.refresh();											
				}
				
				//=====================================================================================================================================================================================
				// @ 혈액투석 적정성 평가 색깔
				//=====================================================================================================================================================================================
			
				function fsetcolortext(maingridlist, idx) {
					
					for (var i = 0; i < maingridlist.rows; i++) {						
						maingridlist.rowStyle(i, "data", "background-color") =  "#ffffff";		//흰색깔					
						if ( i == idx) {
						      maingridlist.rowStyle(i, "data", "background-color") =  "#ffd9ff";											
						}
					}
				}
				
				//=====================================================================================================================================================================================
				// @ 혈액투석 적정성 Hi, Low 표시
				//=====================================================================================================================================================================================
			
				function fsetColorHLValue(){				    
					var xx, yy;									
                   
					
					for(i=1;i<grd_monthlist.rows;i++){
						var vItem = model.getvalue("/root/main/list/item["+i+"]/itemid");
						 xx = 0;
						for(j=4;j<grd_monthlist.cols;j++){																				
							xx++;
							yy = String(xx,"#") ;
							if ( yy.length == 1 ) {
								 yy = "0" + yy;
							}							 
							var vJudg = model.getvalue("/root/main/list/item["+i+"]/month" + yy);
							
							if ( vItem == "06") {  //Ca*P
								if ( vJudg > 55 ){
									grd_monthlist.cellStyle("color",i,j,i,j) = "red";
								}else{
									grd_monthlist.cellStyle("color",i,j,i,j) = "black";
								}
							}else if ( vItem == "11") {  //kt/V							    
								if ( vJudg < 1.2 ){
									grd_monthlist.cellStyle("color",i,j,i,j) = "red";
								}else{
									grd_monthlist.cellStyle("color",i,j,i,j) = "black";
								}
							}else if ( vItem == "12") {  //URR							    
							    //alert("URR = " + vJudg);
								if ( vJudg < 65 ){
									grd_monthlist.cellStyle("color",i,j,i,j) = "red";
								}else{
									grd_monthlist.cellStyle("color",i,j,i,j) = "black";
								}
							}
							
						}	
					}					
				}
				
				//=====================================================================================================================================================================================
				// @ LIS 상세정보가져오기
				//=====================================================================================================================================================================================
				function fGetPDResultRef(pSetno){
				
					if(model.getValue("/root/main/condition2/pid") == "" ){
						
						messageBox("등록번호를","C001","")	;
			       			return;	
					}
					
					fInitDatagrid2();

					var vSelSlipcd =  model.getvalue("/root/hidden/testmdllist");
										
					if(vSelSlipcd != "") model.setvalue("/root/hidden/ref/testmdllist" , vSelSlipcd.substring(0,vSelSlipcd.length -1));
					else model.setvalue("/root/hidden/ref/testmdllist","");
					
					model.copyNode("/root/send/data1" , "/root/hidden/ref");
					
					
					model.makeValue("/root/send/setdata/setno", pSetno);
					model.makeValue("/root/send/setdata/workflag", "");
					model.makeValue("/root/send/setdata/tclscdlist", "");
					// LIS Map File을 적용하기 위해 세팅한다.
										
					var startdd = ipt_date1.value ;
					var enddd = ipt_date2.value ;
					
					//alert("startdd = " + startdd);
					
					model.makeValue("/root/send/setdata/startdd", startdd);
					model.makeValue("/root/send/setdata/enddd", enddd);					
					
					model.makeValue("/root/send/setdata/pid", model.getValue("/root/main/condition2/pid"));
					
					submit("TRLLP01201" , false);
									
					var gridCaption = model.getValue("/root/hidden/temp/rsltlist/header/caption");		
					
					if(gridCaption == "") return;
					//ref 정보
					var gridColRef = model.getValue("/root/hidden/temp/rsltlist/header/colref");
					var gridColRefArray = gridColRef.split("^");
					
					var gridColType = model.getValue("/root/hidden/temp/rsltlist/header/type");
					
					
					var gridColTypeArray = gridColType.split("^");
					
					for (var i = 0; i < gridColRefArray.length; i++ ) {
						if (gridColRefArray[i].substr(0, 4) == "rslt") {
							var tmpstr = "rsltORD".concat(gridColRefArray[i].substr(4));
							gridColRefArray[i] = tmpstr
						}
					}					
					
					for( var i = 0; i < gridColRefArray.length; i++ ) {	
							
						datagrid2.addColumn("ref:" + gridColRefArray[i] + "; type:"+gridColTypeArray[i]+"; ", false);
					}	
					datagrid2.colWidth(1) = 22;
					datagrid2.colWidth(2) = 100;
					datagrid2.colWidth(3) = 100;
					datagrid2.colWidth(4) = 100;	
					datagrid2.rowHeight(0) = 35;
					
					for(  i = 6; i < datagrid2.cols; i++ ) {
						datagrid2.colWidth(i) = 80;		
						datagrid2.colAttribute(i, "text-align") = "right";						
						
					}
					datagrid2.caption = gridCaption;
					
					var node = instance1.selectSingleNode("/root/main");
					node.replaceChild(instance1.root.hidden.temp.rsltlist, instance1.root.main.rsltlist);
					datagrid2.fixedcellcheckbox(0,1)=true;
					model.refresh();
					
					fReMake();			
					
					datagrid2.colWidth(1) = 22;
					datagrid2.colWidth(2) = 100;
					datagrid2.colWidth(3) = 80;
					datagrid2.colWidth(4) = 80;	
					datagrid2.rowHeight(0) = 35;
					model.refresh();					

				}
				
				function fInitDatagrid2() {
					
					var cols = datagrid2.cols-datagrid2.fixedCols;
					var rows = datagrid2.rows-datagrid2.fixedRows;
					for( var i = 0; i < cols; i++ ) {
						datagrid2.removeColumn(false);
					}
					
					for( var i = 0; i < rows; i++ ) {
						datagrid2.removeRow(false);	
					}
					model.removeNodeset("/root/main/rsltlist");
					
					model.makeNode("/root/main/rsltlist/row");
					model.refresh();
				}
				
				function astgrid_oncopy() {

					var trgObj = document.all.item(event.target);
					//alert(trgObj.elementName);
				
					if( trgObj.elementName == "xforms:datagrid" ) {	// event.target이 datagrid > input일 경우 return
						gridObj = trgObj;
					} else {
						return;
					}
				
					var cellValue = "";
					var rClipBoardValue = "";
				
					//선택된 셀의 스타일을 바꾼다
					var cells = gridObj.selectedCells;
					
					var row = -1;
					var col = 0;
					
					var selrow = 0;
					var cnt =1;
					
					for (var i=0;i<cells.length;i++) {
						row 	= cells.item(i).row;
						col 		= cells.item(i).col;
						cellValue = gridObj.valueMatrix(row, col);
						
						model.makeNode("/root/hidden/tmp");
						model.makeValue("/root/hidden/tmp[" + cnt + "]/row", row);
						model.makeValue("/root/hidden/tmp[" + cnt + "]/col", col);
						model.makeValue("/root/hidden/tmp[" + cnt + "]/value", cellValue);
						cnt++;
					}
					
					datagrid5.rebuild();
					var setcol = datagrid5.colRef("row");
					datagrid5.colSort(datagrid5.colRef("row")) = "asc";
					datagrid5.colSort(datagrid5.colRef("col")) = "asc";
					datagrid5.sort(1, setcol, datagrid5.rows-1, datagrid5.cols-1) = "usersort";
					datagrid5.gridToInstance();
					
					row = -1;
					
					for (var i=1;i<datagrid5.rows;i++) {
						
						selrow = datagrid5.valueMatrix(i, datagrid5.colRef("row"));
						cellValue = datagrid5.valueMatrix(i, datagrid5.colRef("value"));

						if (row != selrow) {
							rClipBoardValue += "\r\n";
							rClipBoardValue += cellValue;
							row = selrow;
						} else {
							rClipBoardValue += "\t";
							rClipBoardValue += cellValue;
						}
					}
					
					if( rClipBoardValue != "" ) {
						window.clipBoardData = rClipBoardValue;
					}
					model.removeNodeset("/root/hidden/tmp");	
				}
				
				function fReMake(){
					xx = 0;

					for(i=1;i<datagrid2.rows;i++){
						for(j=5;j<datagrid2.cols;j++){
							
							var vJudg = model.getvalue("/root/main/rsltlist/row["+i+"]/judg" + xx);
							if(vJudg == "H"){
								datagrid2.cellStyle("color",i,j,i,j) = "red";
							} else if(vJudg == "L"){
								datagrid2.cellStyle("color",i,j,i,j) = "blue";
							}				

							xx ++;
								
						}
						
						xx = 0	
					}	
				}
				
				
				function fInitDatagrid2() {
					
					var cols = datagrid2.cols-datagrid2.fixedCols;
					var rows = datagrid2.rows-datagrid2.fixedRows;
					for( var i = 0; i < cols; i++ ) {
						datagrid2.removeColumn(false);
					}
					
					for( var i = 0; i < rows; i++ ) {
						datagrid2.removeRow(false);	
					}
					model.removeNodeset("/root/main/rsltlist");
					
					model.makeNode("/root/main/rsltlist/row");
					model.refresh();
				}
				
/**                                                
 * @group  : 
 * @ver    : 20130401
 * @by     : 권영애
 * @---------------------------------------------------------------------------------
 * @type   : function
 * @access : public
 * @desc   : 적절성평가조사표 엑셀저장
 * @param  :
 * @return :
 * @---------------------------------------------------------------------------------
 */
function fSaveExcel() {
     var fileName = window.fileDialog("save", ",", false, "excel", "xls", "All Files (*.*)|*.*|Excel Files(*.xls)|*.xls");
     if (fileName != ""){
					grd_monthlist.saveExcel(fileName, "SheetName", true, true, "", "", false);
			}
}
				]]>
		</script>
	</xhtml:head>
	<xhtml:body guideline="1,1200;2,785;2,376;2,291;" style="margin-left:0; margin-top:0; margin-right:8; margin-bottom:0; ">
		<datagrid id="datagrid5" nodeset="/root/hidden/tmp" visibility="hidden" caption="caption1^caption3^caption2" colsep="^" colwidth="100, 100, 100" mergecellsfixedrows="bycolrec" rowsep="|" style="left:510px; top:480px; width:350px; height:150px; ">
			<col ref="row"/>
			<col ref="col"/>
			<col ref="value"/>
		</datagrid>
		<group id="group1" style="left:0px; top:0px; width:1200px; height:13px; ">
			<caption id="caption6" class="tit_1" style="left:0px; top:0px; width:189px; height:14px; ">혈액투석 적정성평가 조사표</caption>
			<caption id="caption4" class="patient_text_black" style="left:px; top:0px; width:272px; "/>
		</group>
		<group id="group3" scroll="auto" style="left:0px; top:0px; width:1200px; height:775px; ">
			<group id="grp_hdpipeinfo" disabled="false" style="left:280px; top:95px; width:920px; height:670px; ">
				<datagrid id="grd_monthlist" nodeset="/root/main/list/item" backcoloralternate="transparent" caption="평가항목^평가항목^방법^1월^2월^3월^4월^5월^6월^7월^8월^9월^10월^11월^12월^pid^yyyy^diagnm^dmyn^itemid^methodid^status^methodid" colsep="^" colwidth="211, 16, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70, 43, 52, 100, 100, 100, 100" ellipsis="true" frozencols="3" mergecells="byrestriccol" mergecellsfixedrows="bycolrec" multitotal="false" rowheader="update" rowsep="|" subtotalposition="below" tooltip="true" style="left:0px; top:5px; width:920px; height:480px; ">
					<col ref="itemnm" style="text-align:left; "/>
					<col ref="rsltbtn" type="inputbutton" style="text-align:center; "/>
					<col ref="methodnm" style="text-align:center; "/>
					<col ref="month01" type="input" style="text-align:center; "/>
					<col ref="month02" type="input" style="text-align:center; "/>
					<col ref="month03" type="input" style="text-align:center; "/>
					<col ref="month04" type="input" style="text-align:center; "/>
					<col ref="month05" type="input" style="text-align:center; "/>
					<col ref="month06" type="input" style="text-align:center; "/>
					<col ref="month07" type="input" style="text-align:center; "/>
					<col ref="month08" type="input" style="text-align:center; "/>
					<col ref="month09" type="input" style="text-align:center; "/>
					<col ref="month10" type="input" style="text-align:center; "/>
					<col ref="month11" type="input" style="text-align:center; "/>
					<col ref="month12" type="input" style="text-align:center; "/>
					<col ref="pid" visibility="hidden" style="text-align:left; "/>
					<col ref="yyyy" visibility="hidden" style="text-align:center; "/>
					<col ref="diagnm" visibility="hidden" style="text-align:center; "/>
					<col ref="dmyn" visibility="hidden" style="text-align:center; "/>
					<col ref="itemid" visibility="hidden" style="text-align:center; "/>
					<col ref="methodid" visibility="hidden" style="text-align:center; "/>
					<script type="javascript" ev:event="onbuttonclick">
						<![CDATA[
						     colidx = grd_monthlist.col;
					 	     rowidx = grd_monthlist.row;
                             var setno;
							 
						     if( grd_monthlist.colAttribute(colidx, "ref") == "rsltbtn" ) {
								//alert("rowidx = " + rowidx); 
								if (rowidx == 4 ){  //M-Lab
									setno = 582;
									fGetPDResultRef(setno);
								} else if(rowidx == 9 ){  //3M-Lab
									setno = 581;
									fGetPDResultRef(setno);
								} else if(rowidx == 17 ){  //A-Lab
									setno = 580;
									fGetPDResultRef(setno);
								} else if(rowidx == 19 ){  //A-Lab
									setno = 583;
									fGetPDResultRef(setno);
								} 
					     	}						
						]]>
					</script>
				</datagrid>
				<datagrid id="datagrid2" nodeset="/root/main/rsltlist/row" class="datagrid2" visibility="visible" backcoloralternate="transparent" caption="검사항목" colsep="^" colwidth="80" dataheight="25" ellipsis="true" frozencols="4" mergecellsfixedrows="bycolrec" rowheader="seq" rowheight="25" rowsep="|" selectionmode="free" style="left:0px; top:495px; width:920px; height:175px; font-family:Arial; ">
					<script type="javascript" ev:event="oncopy">
						<![CDATA[
						astgrid_oncopy();
					]]>
					</script>
				</datagrid>
				<line id="line2" class="line_1" style="x1:0px; y1:490px; x2:920px; y2:490px; "/>
			</group>
			<line id="line1" class="line_1" style="x1:5px; y1:107px; x2:274px; y2:107px; "/>
			<caption id="caption1" class="tit_2" style="left:5px; top:91px; width:170px; height:13px; vertical-align:middle; ">혈액투석 유지환자리스트</caption>
			<group id="group2" style="left:5px; top:15px; width:265px; height:70px; vertical-align:top; ">
				<shape id="roundrect2" class="roundrect_search" appearance="roundrect" style="left:5px; top:5px; width:260px; height:60px; "/>
				<caption id="caption5" class="search_name" style="left:16px; top:14px; width:84px; height:17px; ">등록번호:</caption>
				<button id="btn_srchhdmatnpat" class="btn1_letter2" style="left:205px; top:22px; width:56px; height:22px; ">
					<caption>조회</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
							fSrchHDMatnPatList();	// 혈액투석 유지환자 리스트 조회
						]]>
					</script>
				</button>
				<line id="line5" class="line_4" style="x1:194px; y1:9px; x2:194px; y2:61px; "/>
				<input id="input2" ref="/root/main/condition/pid" class="input_default" inputtype="9999999999" style="left:100px; top:13px; width:85px; height:19px; ">
					<script type="javascript" ev:event="onkeyup">
						<![CDATA[
							inputEnterKey("btn_srchhdmatnpat", "DOMActivate");
						]]>
					</script>
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
						    model.setValue("/root/main/condition2/pid", "" );	       
							model.setValue("/root/main/condition2/hngnm", "" );	
							
						]]>
					</script>
				</input>
				<select1 id="combo2" ref="/root/main/condition/mypid" class="combo_search" appearance="minimal" nodeset="/root/main/condition/ioflag" style="left:100px; top:38px; width:60px; height:19px; ">
					<choices>
						<itemset nodeset="/root/init/settingrn/settingrnlist">
							<label ref="settingrnnm"/>
							<value ref="settingrnid"/>
						</itemset>
					</choices>
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
							fSrchHDMatnPatList();	// 혈액투석 유지환자 리스트 조회
						]]>
					</script>
				</select1>
				<caption id="caption37" class="search_name" style="left:16px; top:40px; width:77px; height:17px; ">내환자 :</caption>
			</group>
			<caption id="caption8" class="tit_2" style="left:5px; top:422px; width:125px; height:13px; vertical-align:middle; ">도관기록 리스트</caption>
			<line id="line6" class="line_1" style="x1:5px; y1:437px; x2:270px; y2:437px; "/>
			<button id="button9" class="btn2_letter4" style="left:205px; top:415px; width:64px; height:19px; ">
				<caption>신규등록</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
							fSetNewRecInfo();		// 신규등록버튼 클릭 시
						]]>
				</script>
			</button>
			<datagrid id="grd_hdmatnpatinfo" nodeset="/root/main/hdmatnpatlist/hdmatnpatinfo" backcoloralternate="transparent" caption="등록번호^환자명^S/A^유지환자등록일자" colsep="^" colwidth="80, 85, 59, 0" focuscolor="transparent" mergecellsfixedrows="bycolrec" rowheader="seq" rowsep="|" style="left:5px; top:110px; width:269px; height:655px; ">
				<col ref="pid"/>
				<col ref="hngnm"/>
				<col ref="sexage"/>
				<col ref="maintepatrgstdd"/>
				<script type="javascript" ev:event="ondblclick">
					<![CDATA[
					    var  iRow = grd_hdmatnpatinfo.row;
						model.setValue("/root/hidden/gRow",iRow);
						
					    if (iRow > 0) {						  												
					        fSrchHDSAQNInfo(iRow);  //조사지 조회	
							model.resetInstanceNode("/root/main/rsltlist/row");
						}	
						
					]]>
				</script>
				<script type="javascript" ev:event="onaftersort">
					<![CDATA[
					   grd_hdmatnpatinfo.gridToInstance();
					]]>
				</script>
			</datagrid>
			<datagrid id="grd_coduitrecinfo" nodeset="/root/main/coduitreclist/coduitrecinfo" visibility="hidden" caption="기록일자^기록시간^기록자^pid^유지환자등록일자" colsep="^" colwidth="103, 58, 73, 0, 0" focuscolor="transparent" mergecellsfixedrows="bycolrec" rowheader="seq" rowsep="|" style="left:30px; top:215px; width:100px; height:100px; ">
				<col ref="recdd" format="yyyy-mm-dd"/>
				<col ref="rectm" format="hh:nn"/>
				<col ref="recnm"/>
				<col ref="pid"/>
				<col ref="maintepatrgstdd"/>
			</datagrid>
			<group id="group4" style="left:285px; top:10px; width:910px; height:80px; vertical-align:top; ">
				<shape id="roundrect1" class="roundrect_search" appearance="roundrect" style="left:0px; top:5px; width:910px; height:75px; "/>
				<caption id="caption2" class="search_name" style="left:420px; top:10px; width:75px; height:17px; ">기준년:</caption>
				<input id="ipt_srchdate" ref="/root/main/condition2/srchdate" class="input_default" inputtype="date" format="yyyy" style="left:490px; top:10px; width:65px; height:19px; font-weight:bold; ">
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
							//model.resetInstanceNode("/root/main/list/item");
							fSrchHDSAQNInfo(grd_hdmatnpatinfo.row); 
							model.resetInstanceNode("/root/main/rsltlist/row");
						]]>
					</script>
				</input>
				<button id="btn_save" class="btn1_letter2" style="left:840px; top:10px; width:56px; height:22px; ">
					<caption>저장</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
							fSaveHDSAQNInfo();	// 혈액투석 적정성평가 저장								
						]]>
					</script>
				</button>
				<line id="line4" class="line_4" style="x1:830px; y1:5px; x2:830px; y2:77px; "/>
				<select id="chk_mons" ref="/root/main/condition/mons" overflow="visible" appearance="full" cols="6" sep="|" style="left:640px; top:10px; width:180px; height:35px; border-style:none; ">
					<choices>
						<item>
							<label>1</label>
							<value>01</value>
						</item>
						<item>
							<label>2</label>
							<value>02</value>
						</item>
						<item>
							<label>3</label>
							<value>03</value>
						</item>
						<item>
							<label>4</label>
							<value>04</value>
						</item>
						<item>
							<label>5</label>
							<value>05</value>
						</item>
						<item>
							<label>6</label>
							<value>06</value>
						</item>
						<item>
							<label>7</label>
							<value>07</value>
						</item>
						<item>
							<label>8</label>
							<value>08</value>
						</item>
						<item>
							<label>9</label>
							<value>09</value>
						</item>
						<item>
							<label>10</label>
							<value>10</value>
						</item>
						<item>
							<label>11</label>
							<value>11</value>
						</item>
						<item>
							<label>12</label>
							<value>12</value>
						</item>
					</choices>
				</select>
				<caption id="caption11" class="search_name" style="left:10px; top:60px; width:105px; height:17px; ">최초투석일자:</caption>
				<input id="input1" ref="/root/main/condition2/fstdialdd" class="input_default" editable="false" format="yyyy-mm-dd" style="left:120px; top:58px; width:100px; height:19px; "/>
				<caption id="caption15" class="search_name" style="left:245px; top:60px; width:107px; height:17px; ">LAB 조회기간:</caption>
			</group>
			<button id="button2" class="btn2_letter4" style="left:1125px; top:45px; width:64px; height:19px; ">
				<caption>엑셀저장</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
							fSaveExcel();  //  엑셀저장
						]]>
				</script>
			</button>
			<line id="line3" class="line_1" style="x1:280px; y1:95px; x2:1200px; y2:95px; "/>
			<caption id="caption3" class="search_name" style="left:295px; top:20px; width:85px; height:17px; ">등록번호:</caption>
			<caption id="caption7" class="search_name" style="left:530px; top:20px; width:70px; height:17px; ">환자명:</caption>
			<caption id="caption9" class="search_name" style="left:295px; top:45px; width:81px; height:17px; ">기저질환:</caption>
			<input id="input3" ref="/root/main/condition2/pid" class="input_default" editable="false" inputtype="9999999999" style="left:380px; top:20px; width:80px; height:19px; "/>
			<input id="input5" ref="/root/main/condition2/hngnm" class="input_default" editable="false" inputtype="9999999999" style="left:600px; top:20px; width:85px; height:19px; ">
				<script type="javascript" ev:event="onkeyup">
					<![CDATA[
							inputEnterKey("btn_srchhdmatnpat", "DOMActivate");
						]]>
				</script>
			</input>
			<button id="btn_getdata" class="btn2_letter4" style="left:925px; top:60px; width:64px; height:19px; ">
				<caption>자료수집</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[		
					        var mitem, yyyymm;
							
							 mitem = model.getValue("/root/main/condition/mons").split("|");
														
							for (var i=0; i < mitem.length; i++) {
							    yyyymm = model.getValue("/root/main/condition2/srchdate") + mitem[i] ;
													
			                    model.makeValue("/root/send/reqdata/yyyymm",yyyymm);							
							    
								//alert(" yyyymm = " + yyyymm);
							
								if (yyyymm ==""){
									messageBox("자료수집하기 위해 기준월을 선택 후 작업하십시오.", "E", "");		
									return;
								}
								
								fGetData(yyyymm);	// 혈액투석 유지환자 리스트 자료수집
							}
							
							
							//색깔부여
							//alert(" call fsetColorHLValue ");							
							
							fsetColorHLValue();
						]]>
				</script>
			</button>
			<caption id="caption10" class="search_name" style="left:850px; top:20px; width:75px; height:17px; ">기준월:</caption>
			<input id="ipt_date2" ref="/root/main/condition2/enddd" class="input_s_essential" inputtype="date" style="left:755px; top:68px; width:95px; height:19px; ">
				<script type="javascript" ev:event="xforms-value-changed">
					<![CDATA[
									//	fSrchHDList();  //혈책투석 스케줄 조회
								]]>
				</script>
			</input>
			<input id="ipt_date1" ref="/root/main/condition2/startdd" class="input_s_essential" inputtype="date" style="left:640px; top:68px; width:95px; height:19px; "/>
			<caption id="caption12" style="left:740px; top:68px; width:15px; height:17px; ">~</caption>
			<caption id="caption13" class="tit_1" style="left:0px; top:0px; width:210px; height:15px; ">혈액투석적정성평가</caption>
			<select1 id="cmb_diagnm" ref="/root/main/condition2/diagnm" appearance="minimal" style="left:380px; top:45px; width:125px; height:19px; ">
				<choices>
					<itemset nodeset="/root/init/mlist/M0079">
						<label ref="cdnm"/>
						<value ref="cdid"/>
					</itemset>
				</choices>
			</select1>
			<caption id="caption14" class="search_name" style="left:530px; top:45px; width:81px; height:17px; ">당뇨유무:</caption>
			<select1 id="cmb_dmyn" ref="/root/main/condition2/dmyn" appearance="minimal" style="left:615px; top:45px; width:50px; height:19px; ">
				<choices>
					<item>
						<label>유</label>
						<value>유</value>
					</item>
					<item>
						<label>무</label>
						<value>무</value>
					</item>
				</choices>
			</select1>
			<button id="button1" class="btn2_letter5" style="left:195px; top:85px; width:75px; height:19px; ">
				<caption>내환자세팅</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[		
					        modal('SMMND05100');
							//fLoadMyPatSetting();
							//fSrchHDList();
						]]>
				</script>
			</button>
		</group>
	</xhtml:body>
</xhtml:html>