YNU_JEUS/app_home/himed/webapps/lis/plgyacptmngtweb/xrw/SPLPJ01500_조직검사의뢰지.xrw

<?xml version="1.0" encoding="EUC-KR"?>
<!--
	* 제    목		: SPLPJ01500_조직검사의뢰지
	* 설    명		: 조직검사의뢰지
	* 설 계 자		: (주)에이씨케이 - 유동철
	* 작 성 자		: (주)에이씨케이 - 유동철 
	* 작 성 일		: 2007.04.02
	* 수정이력		: 2010.09.07 
	                : Character 및 Remark 추가 (경북대)
	* 기    타		: 
-->
<?xml-stylesheet href="../../../com/commonweb/css/common.css" type="text/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>
						<detlspc>
							<detlspclist>
								<choi/>
								<spccd/>
								<spcnm/>
								<instcd/>
							</detlspclist>
						</detlspc>
						<rtnval>
							<rtnvalinfo>
								<reqno/>
								<instcd/>
							</rtnvalinfo>
						</rtnval>
						<reqfrm>
							<reqfrmtbl>
								<reqfrminfo>
									<spcsite/>
									<reqcnts/>
									<choispc>
										<choispclist>
											<choi>true</choi>
											<spcseqno>001</spcseqno>
											<spccd/>
											<spcnm/>
										</choispclist>
									</choispc>
									<resncd>
										<resncdlist>
											<choi>false</choi>
											<resnnm>Non - neoplastic lesion</resnnm>
										</resncdlist>
										<resncdlist>
											<choi>false</choi>
											<resnnm>Benign neoplasm</resnnm>
										</resncdlist>
										<resncdlist>
											<choi>false</choi>
											<resnnm>Atypical neoplasm</resnnm>
										</resncdlist>
										<resncdlist>
											<choi>false</choi>
											<resnnm>Malignant neoplasm</resnnm>
										</resncdlist>
									</resncd>
									<endono/>
									<watery/>
									<viscous/>
									<colorless/>
									<white/>
									<yellow/>
									<red/>
									<others/>
									<othercont/>
									<clear/>
									<ground/>
									<turbid/>
									<slidecnt/>
								</reqfrminfo>
							</reqfrmtbl>
						</reqfrm>
						<reprspc>
							<reprspclist>
								<instcd/>
								<spccd/>
								<spcnm/>
								<spcabbr/>
							</reprspclist>
						</reprspc>
					</main>
					<send>
						<data1/>
						<data2/>
					</send>
					<init>
						<lpcmspcm>
							<lpcmspcmlist>
								<status/>
								<spccd/>
								<spcnm/>
								<orddeptcd/>
								<spckind/>
								<spckindno/>
							</lpcmspcmlist>
						</lpcmspcm>
						<testiteminfo>
							<instcd/>
							<testcd/>
							<testengnm/>
							<testengabbr/>
							<testhngnm/>
							<testhngabbr/>
							<basepartcd/>
							<basepartnm/>
							<detlpartcd/>
							<detlpartnm/>
							<delflagcd/>
							<frznflagcd>1</frznflagcd>
							<workflagcd>0</workflagcd>
							<statsworkflagcd>0</statsworkflagcd>
							<statsflagcd/>
							<spcflagcd>0</spcflagcd>
							<prcpflagcd>0</prcpflagcd>
							<ptnonewflagcd>Y</ptnonewflagcd>
							<ordkindflagcd>-</ordkindflagcd>
							<reqfrmflagcd>-</reqfrmflagcd>
							<edicd>123456789012345</edicd>
							<grupflagcd>0</grupflagcd>
							<trusttestflagcd/>
							<dispseqno/>
							<cfnm/>
							<ptnocd/>
							<ptnonm/>
							<stdyptnocd/>
							<stdyptnonm/>
							<trustptnocd/>
							<trustptnonm/>
							<refcnts/>
							<fstrgstdt/>
							<fstrgstrid/>
							<lastupdtdt/>
							<lastupdtrid/>
							<hideflagcd/>
							<popwndflagcd/>
							<trustexmpcnts/>
							<earncls1/>
							<earncls2/>
							<earncls3/>
							<delayonetime/>
							<delayaddtime/>
							<olcode/>
							<olno/>
							<pcidcd/>
						</testiteminfo>
					</init>
					<hidden>
						<userinfo>
							<instcd/>
						</userinfo>
						<reqfrminfo>
							<pid/>
							<prcpcd/>
							<prcpnm/>
							<opnm/>
							<spccd/>
							<spcnm/>
							<reqno/>
							<reqhistno/>
							<prcpstatcd/>
						</reqfrminfo>
						<popupmenu>
							<item>
								<nm>검체삭제</nm>
								<funt>fExeSpcDel</funt>
							</item>
							<item>
								<nm>검체추가</nm>
								<funt>fExeSpcAdd</funt>
							</item>
						</popupmenu>
						<seaspc>
							<spccd/>
							<spcnm/>
						</seaspc>
					</hidden>
					<temp>
						<SMMMR03600_modalif>
							<openmode>OneImge</openmode>
							<imgecd/>
							<base64/>
							<shape/>
						</SMMMR03600_modalif>
					</temp>
				</root>
			</instance>
			<submission id="TRLPJ01501" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/detlspc/detlspclist"/>
			<submission id="TXLPJ01501" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/rtnval/rtnvalinfo"/>
			<submission id="TRLPJ01502" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/reqfrm"/>
			<submission id="TRLPJ01503" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/reprspc/reprspclist"/>
			<submission id="TRMMB02302" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" resultref="/root/init/lpcmspcm"/>
			<submission id="TRLPC00701" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/testinfocnts/testinfolist"/>
			<submission id="TRLPC00402" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/testiteminfo"/>
			<script type="javascript" ev:event="xforms-ready">
				<![CDATA[
					fExeInitialize();
				]]>
			</script>
		</model>
		<script type="javascript" src="../../../com/commonweb/js/common.js"/>
		<script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
		<script type="javascript" src="../../../lis/commonweb/js/LPZ001.js"/>
		<script type="javascript">
			<![CDATA[
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 초기화 Function
				*/
			        function fExeInitialize() {

			        	var sReqFrmNo = "";
                        var strNode = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";

/* --------------------------------------
 * 2007-10-24 : 유동철
 * 내시경, 기관지경실의 경우 시행부서처방(추가처방)으로 처방을 등록한다.
 * 이 경우 바코드 출력 시점에서 검체의 수 를 조절할 경우가 발생하기에
 * 수정할 수 있는 기능에 제한을 두지 않는다.
			        	//--------------------------------------------------------------------
			        	// 처방등록 화면에서 호출되지 않는 경우는 "저장" 기능을 비 활성화 처리
			        	if (model.getValue("/root/hidden/reqfrminfo/scrnno") == "10") {
			        		btn_save.visible        = true;
			        		btn_sytsrsltref.visible = true;
			        	} else {
			        		btn_save.visible        = false;
			        		btn_sytsrsltref.visible = false;
			        	}
*/			        	


			        	//----------------------------------------------
			        	// 검체팝업 호출을 위한 노드(과별 검체목록 조회)
			        	model.removeNodeset("/root/init/lpcmspcm/lpcmspcmlist")
			        	model.makeValue("/root/hidden/userinfo/instcd", getUserInfo("dutplceinstcd"));
                        model.makeValue("/root/send/cond1",             getUserInfo("dutplcecd"));
                        model.makeValue("/root/send/cond2",             "1");
                        submit("TRMMB02302");

/*
			        	//-------------
			        	//  Test용 자료
			        	model.setValue("/root/hidden/reqfrminfo/pid",         "1385186");
			        	model.setValue("/root/hidden/reqfrminfo/prcpcd",      "PSU10001");
			        	model.setValue("/root/hidden/reqfrminfo/prcpnm",      "생검");
			        	model.setValue("/root/hidden/reqfrminfo/spccd",       "T00100");
//			        	model.setValue("/root/hidden/reqfrminfo/spcnm",       "Stomach");
			        	model.setValue("/root/hidden/reqfrminfo/reqno",       "8");  
			        	model.setValue("/root/hidden/reqfrminfo/prcpstatcd",  "000");  
*/
						


			        	//---------------------------------------------------------------------
			        	model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/spcsite", "2");
			        	model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/endono",  "0");
                        model.removeNodeset("/root/send");

			        	//-------------------
			        	// 대표검체 목록 조회
			        	model.makeValue("/root/send/instcd", getUserInfo("dutplceinstcd"));
			        	model.makeValue("/root/send/prcpcd", model.getValue("/root/hidden/reqfrminfo/prcpcd")); 
			        	model.makeValue("/root/send/spccd",  model.getValue("/root/hidden/reqfrminfo/spccd")); 
			        	model.makeValue("/root/send/spcflagcd",  "0"); 
			        	submit("TRLPJ01501", false);
			        	cmb_reprspccd.refresh();


			        	model.removeNodeset("/root/main/reprspc/reprspclist");
			        	model.makeNode("/root/main/reprspc/reprspclist");
			        	copyNodesetType("/root/main/reprspc/reprspclist", "/root/main/detlspc/detlspclist");
			        	
			        	//-------------------
			        	// 세부검체 목록 조회
			        	model.makeValue("/root/send/spcflagcd",  "1"); 
			        	submit("TRLPJ01501", true);


			        	//----------------------------------------------------------
			        	sReqFrmNo = model.getValue("/root/hidden/reqfrminfo/reqno");
			        	sReqFrmNo = sReqFrmNo.getLeftPad(1, "0");

			        	//------------------------------------------------
			        	// 의뢰지번호가 존재할 경우 의뢰지내용을 조회한다.
			        	if (sReqFrmNo != "0") {
				        	model.makeValue("/root/send/instcd", getUserInfo("dutplceinstcd"));
				        	model.makeValue("/root/send/pid",     model.getValue("/root/hidden/reqfrminfo/pid")); 
				        	model.makeValue("/root/send/reqno",  model.getValue("/root/hidden/reqfrminfo/reqno")); 
				        	submit("TRLPJ01502");
				        	
				        	copyNodesetType("/root/temp", "/root/main/reqfrm/reqimgtbl");
				        	
				        	
				        	//----------------------------------------------------------------------------------------------
				        	grd_choispc.row = getNodesetCount("/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist");
				        	fExeAddLastRow();
			        	} else {
			        		model.removeNodeset(strNode); 
			        	    // 이재오 2014.10.30일 추가 세부코드 하나일때 자동선택 	
					        if (getNodesetCount("/root/main/detlspc/detlspclist") <= 0) fExeSpcNodeAdd();							
							if (getNodesetCount("/root/main/detlspc/detlspclist") == 1)
							{		        		
		/*                       alert("test");*/
							   model.setValue("/root/main/detlspc/detlspclist/choi", "true");
							   fExeDetlSpcClick_copy(1);
							   fExeResnChoi_flt();   
							} 							
			        	    // 이재오 2014.10.30일 추가 세부코드 하나일때 자동선택 								
			        	}
/*			        	
			        	//---------------------------------------------
			        	// 대표검체코드가 처방화면에서 넘어온 경우 처리
			        	if (model.getValue("/root/hidden/reqfrminfo/spccd") != "" && model.getValue("/root/hidden/reqfrminfo/spccd") != "-") {
			        		if (sReqFrmNo != "0") {
			        			// Continue
			        		} else {
				        		model.makeValue(strNode + "[1]/choi",     "true");
				        		model.makeValue(strNode + "[1]/spcseqno", "001");
				        		model.makeValue(strNode + "[1]/spccd",    model.getValue("/root/hidden/reqfrminfo/spccd"));
				        		model.makeValue(strNode + "[1]/spcnm",    model.getValue("/root/hidden/reqfrminfo/spcnm"));
				        		model.makeValue(strNode + "[1]/existyn",  "N");
				        	}
			        	} else {
			        		cmb_reprspccd.disabled = false;
			        		cmb_reprspccd.refresh();
			        	}
*/			        	
			        	//-----------------------------------------------
			        	// 과별 지정된 검체가 존재할 경우 우선적으로 표시
			        	if (getNodesetCount("/root/init/lpcmspcm/lpcmspcmlist") > 0) {
						cmb_reprspccd.choices.itemset.attribute("nodeset") = "/root/init/lpcmspcm/lpcmspcmlist";
						cmb_reprspccd.choices.itemset.label.attribute("ref") = "spcnm";
						cmb_reprspccd.choices.itemset.value.attribute("ref") = "spccd";
			        	} else {
						cmb_reprspccd.choices.itemset.attribute("nodeset") = "/root/main/reprspc/reprspclist";
						cmb_reprspccd.choices.itemset.label.attribute("ref") = "spcnm";
						cmb_reprspccd.choices.itemset.value.attribute("ref") = "spccd";
			        	}
			        	
			        	//---------------------------------------
			        	// 대표검체를 세부검체 목록의 상단에 추가
			        	//fExeSpcNodeAdd();
					//-----------------------------------------------------------
					// 세부검체가 없을 경우 대표검체를 세부검체 목록 상단에 추가
					if (getNodesetCount("/root/main/detlspc/detlspclist") <= 0) fExeSpcNodeAdd();
			        	//-------------------------------------------------------------
			        	// 처방상태코드가 바코드출력(420)보다 적은 경우만 검체수정 가능
			        	if (Number(model.getValue("/root/hidden/reqfrminfo/prcpstatcd")) >= 400) {
							
							
							//바코드가 접수되었더라도 프로즌검체는 검체를 추가할 수 있도록 허용한다.
							if((model.getValue("/root/hidden/reqfrminfo/xrwGBN") == "inbcoll") 
							    && (model.getValue("/root/hidden/reqfrminfo/workflagcd") == "1002")
								&& (model.getValue("/root/hidden/reqfrminfo/bcgbn") == "true")) {
								cmb_reprspccd.disabled = false;
								btn_img.disabled    = false;
								btn_save.disabled   = false;
								btn_allspc.disabled = false;
								
							} else {
								cmb_reprspccd.disabled = true;
								btn_img.disabled    = true;
								btn_save.disabled   = true;
								btn_allspc.disabled = true;
								
								
							}
			        		
			        	} else {							
							if(Number(model.getValue("/root/main/reqfrm/prcpstatcd")) >= 400) {
								//바코드가 접수되었더라도 프로즌검체는 검체를 추가할 수 있도록 허용한다.
								if(Number(model.getValue("/root/main/reqfrm/workflagcd")) == 1002) {
									cmb_reprspccd.disabled = false;
									btn_img.disabled    = false;
									btn_save.disabled   = false;
									btn_allspc.disabled = false;
									
								} else {
									cmb_reprspccd.disabled = true;
									btn_img.disabled    = true;
									btn_save.disabled   = true;
									btn_allspc.disabled = true;
								}
							}else {
								cmb_reprspccd.disabled = false;
								btn_img.disabled    = false;
								btn_save.disabled   = false;
								btn_allspc.disabled = false;
							}
			        	}

					//-------------------------------------------------
					// 선택검체(검체명)은 기본적으로 50라인을 생성한다.
					//fExeInitChoiSpc(1);
					
					tar_prcpcnts.disabled = true;
					//---------------------------
					for (var iNo=1; iNo <= getNodesetCount("/root/main/reqfrm/reqfrmtbl/reqfrminfo/resncd/resncdlist"); iNo++) {
						if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/resncd/resncdlist["+iNo+"]/choi") == "true") {
							tar_prcpcnts.disabled = false;
						}
					}
					
					//--------------------------------------
					grd_spclist.fixedcellcheckbox(0,0)=true;
					
			        	//-------------
			        	model.refresh();
		        		cmb_reprspccd.refresh();
				}
			        
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 설정값 저장 Function
				*/
				function fExeSave() {
					
					var iFindNo = 0;
					var sSpcCd  = "";
					var sSpcNm  = "";
					var sSpcCdList = "";
					var sSpcNmList = "";
					var sReqFrmNo  = "";
					var sStrNo  = "";
					var sEndNo  = "";
					var sNode   = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
					var node    = instance1.selectSingleNode("/root/main/reqfrm/reqfrmtbl/reqfrminfo");
					var imgnode = instance1.selectSingleNode("/root/temp/SMMMR03600_modalif");


					//--------------------------------
					if (getNodesetCount(sNode) <= 0 || model.getValue(sNode + "/spcnm") == "") {
						messageBox("검체명은 ", "I003");
						return false;
					}
									
					//-------------------------------------------------------
					iFindNo = grd_resncd.findRow("true", 1, 0, false, false);
					if (Number(iFindNo) <= 0) {
						messageBox("임상소견은 ", "I003");
						return false;
					} 
					
					/* ************************************
					 * 2010-09-29 : YDC 
					 *            : 비부인과 처방은 Character가 필수, 세침흡인은 Remark가 필수로 입력되어야 함.
					*/ 
					model.makeNode("/root/init/testiteminfo");                                                 // Node생성
					model.removeNodeset("/root/send");
                    model.makeValue("/root/send/data1", "0");                                                  // 검사코드 사용여부구분
                    model.makeValue("/root/send/data2", model.getValue("/root/hidden/reqfrminfo/prcpcd"));     // 검사코드
                    model.makeValue("/root/send/data3", getUserInfo("dutplceinstcd"));                         // 기관코드
					
					//-------------------
                    submit("TRLPC00402");	// 처방의 상세정보 검색
					
		
//					//-------------------------------------------------------------------------
//					if (model.getValue("/root/init/testiteminfo/statsworkflagcd") == "1022") {                // 비부인과
//					
//						if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/watery") != "") {
//							// Continue
//						} 
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/viscous") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/colorless") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/white") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/yellow") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/red") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/others") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/clear") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/ground") != "") {
//							// Continue
//						}
//						else if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/turbid") != "") {
//							// Continue
//						}
//						else  {
//                            messageBox("Non-GY 처방은 Character가 ", "I003");
//                            return false;
//						}
//						
//					} else if (model.getValue("/root/init/testiteminfo/statsworkflagcd") == "1023") {			// 세침흡인(FNA)
//					
//						if (model.getValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/slidecnt") != "") {
//							// Continue
//						} 
//						else  {
//                            messageBox("FNA처방은 Remark(Slide)가 ", "I003");
//                            return false;
//						}
//					}
					
					
                    //---------------------------------
				 	model.removeNodeset("/root/send");
				 	model.removeNodeset(sNode+"[spccd='']");
					
					//-------------------------------------------------------------------------
					model.makeValue("/root/send/instcd",         getUserInfo("dutplceinstcd"));
					model.makeValue("/root/send/pid",            model.getValue("/root/hidden/reqfrminfo/pid"));
					model.makeValue("/root/send/prcpdd",         model.getValue("/root/hidden/reqfrminfo/prcpdd"));
					model.makeValue("/root/send/execprcpuniqno", model.getValue("/root/hidden/reqfrminfo/execprcpuniqno"));
					model.makeValue("/root/send/reqno",          (model.getValue("/root/hidden/reqfrminfo/reqno")).toString().getLeftPad(1, "0")); 
					model.makeValue("/root/send/reqcnts",        "");
					model.makeValue("/root/send/imgcnts",        "");
					model.makeValue("/root/send/scrno",          "10");
					model.setValue("/root/send/reqcnts",         node.xml,    true);
					model.setValue("/root/send/imgcnts",         imgnode.xml, true);
					
					//---------------------------
					if (!submit("TXLPJ01501")) {
				    		messageBox("의뢰지 저장을", "E009");
				    		return false;
					}
					
					//--------------
					sSpcCdList = "";
					sSpcNmList = "";
					sSpcCd = model.getValue("/root/hidden/reqfrminfo/spccd"); 
					sSpcNm = model.getValue("/root/main/reprspc/reprspclist[spccd='"+ sSpcCd +"']/spcnm");
					
					//-----------------------------------------------------
					for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
						sSpcCdList += model.getValue(sNode+"["+iNo+"]/spcseqno") + "▨";
						sSpcNmList += model.getValue(sNode+"["+iNo+"]/spcnm") + "▨";
					}

					//------------------
					// 의뢰지번호 Return
                    //----------------------------------------------------------
                    sReqFrmNo = model.getValue("/root/hidden/reqfrminfo/reqno");
                    sReqFrmNo = sReqFrmNo.getLeftPad(1, "0");

                    //------------------------------------------------
                    // 의뢰지번호가 존재할 경우 의뢰지내용을 조회한다.
                    if (sReqFrmNo != "0") {
						opener.model.makeValue("/root/hidden/reqfrminfo/reqno", sReqFrmNo);		// 의뢰지 수정
                    } else {
						opener.model.makeValue("/root/hidden/reqfrminfo/reqno", model.getValue("/root/main/rtnval/rtnvalinfo/reqno"));	// 의뢰지 신규
                    }
					
					opener.model.makeValue("/root/hidden/reqfrminfo/spccd",    sSpcCd);
					opener.model.makeValue("/root/hidden/reqfrminfo/spcnm",    sSpcNm);
					opener.model.makeValue("/root/hidden/reqfrminfo/spccnt",   getNodesetCount(sNode));
					opener.model.makeValue("/root/hidden/reqfrminfo/spcseqno", sSpcCdList);
					opener.model.makeValue("/root/hidden/reqfrminfo/spcseqnm", sSpcNmList);
					opener.model.makeValue("/root/hidden/reqfrminfo/spcstrno", model.getValue("/root/main/rtnval/rtnvalinfo/spcstrno"));
					opener.model.makeValue("/root/hidden/reqfrminfo/spcendno", model.getValue("/root/main/rtnval/rtnvalinfo/spcendno"));
					
					//------------
					model.close();
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 화면 닫기 Function
				*/
				function fExeClose() {
					opener.model.makeValue("/root/hidden/reqfrminfo/spcseqno", "");
					model.close();
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 세부검체목록 Row Click처리 Function
				*/
				function fExeDetlSpcClick(iRowNo) {
					
					var iBlankNo  = 0;
					var iFindRow  = -1;
					var iMaxSeqNo = -1;
					var strNodeDest = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
					var strNodeSrc = "/root/main/detlspc/detlspclist";
					
					
					//-----------------------
					// 선택 컬럼 체크유무 검사
					if (grd_spclist.col != 0) return false;
					
					//--------------------------------------------------------------------------------------
					// 대표검체의 존재유무 검사(대표검체가 처방에서 넘어오지 않은 경우 세부검체를 추가 금지)
					if (model.getValue("/root/hidden/reqfrminfo/spccd") == "") {
						messageBox("대표검체를 먼저 ", "C002");
						return false;
					}
					
					//------------------------------
					// 기존 선택된 검체인지 유무 검사
					iFindRow = grd_choispc.findRow(model.getValue(strNodeSrc + "[" + iRowNo + "]/spccd"), 1, 2, true, true);

					//-------------------------------------------------------------------
					if (model.getValue(strNodeSrc + "[" + iRowNo + "]/choi") == "true") {

						//-----------------------------
						// 검색되지 않은 검체는 추가처리
						//if (iFindRow == -1) {
							
							//-----------------------
							iBlankNo = fExeFindRow();
							if (iBlankNo <= -1) {
								grd_choispc.addRow();
								iBlankNo = grd_choispc.row;
							}
							
							//--------------------------------------------------------------
							model.setValue(strNodeDest + "["+iBlankNo+"]/choi",     "true");
							model.setValue(strNodeDest + "["+iBlankNo+"]/spcseqno", "");
							model.setValue(strNodeDest + "["+iBlankNo+"]/spccd",    model.getValue(strNodeSrc + "["+iRowNo+"]/spccd"));
							model.setValue(strNodeDest + "["+iBlankNo+"]/spcnm",    model.getValue(strNodeSrc + "["+iRowNo+"]/spcnm"), true);
							model.setValue(strNodeDest + "["+iBlankNo+"]/existyn",  "N");
							model.setValue(strNodeDest + "["+iBlankNo+"]/slidno",   "0");

							//--------------------
							// 세부검체번호 재 설정
							iMaxSeqNo = fExeSeqNoSet(0);
							fExeAddLastRow();
							//model.setValue(strNodeSrc + "["+iRowNo+"]/choi", "false");
							model.refresh();
						//} else {
						//	model.setValue(strNodeSrc + "[" + iRowNo + "]/choi", "false");
						//}
					} else {
						//grd_choispc.deleteRow(iFindRow);
						//fExeSeqNoSet(iFindRow);
					}
				}

				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 세부검체목록 Row Click처리 Function
				*/
				function fExeDetlSpcClick_copy(iRowNo) {
					
					var iBlankNo  = 0;
					var iFindRow  = -1;
					var iMaxSeqNo = -1;
					var strNodeDest = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
					var strNodeSrc = "/root/main/detlspc/detlspclist";
					
					
					//-----------------------
					// 선택 컬럼 체크유무 검사
//					if (grd_spclist.col != 0) return false;
					
					//--------------------------------------------------------------------------------------
					// 대표검체의 존재유무 검사(대표검체가 처방에서 넘어오지 않은 경우 세부검체를 추가 금지)
					if (model.getValue("/root/hidden/reqfrminfo/spccd") == "") {
						messageBox("대표검체를 먼저 ", "C002");
						return false;
					}
					
					//------------------------------
					// 기존 선택된 검체인지 유무 검사
					iFindRow = grd_choispc.findRow(model.getValue(strNodeSrc + "[" + iRowNo + "]/spccd"), 1, 2, true, true);
					//-------------------------------------------------------------------
					if (model.getValue(strNodeSrc + "[" + iRowNo + "]/choi") == "true") {
						//-----------------------------
						// 검색되지 않은 검체는 추가처리
						//if (iFindRow == -1) {
							
							//-----------------------
							iBlankNo = fExeFindRow();
//							alert(iBlankNo);
							if (iBlankNo <= -1) {
//								model.removeNodeset(strNodeDest);
								grd_choispc.refresh();
								grd_choispc.addRow();
								iBlankNo = grd_choispc.row;
//							    alert(iBlankNo);								
							}
//							    alert(model.getValue(strNodeSrc + "["+iRowNo+"]/spccd"));															
//							    alert(model.getValue(strNodeSrc + "["+iRowNo+"]/spcnm"));																							
							//--------------------------------------------------------------
							model.setValue(strNodeDest + "["+iBlankNo+"]/choi",     "true");
							model.setValue(strNodeDest + "["+iBlankNo+"]/spcseqno", "");
							model.setValue(strNodeDest + "["+iBlankNo+"]/spccd",    model.getValue(strNodeSrc + "["+iRowNo+"]/spccd"));
							model.setValue(strNodeDest + "["+iBlankNo+"]/spcnm",    model.getValue(strNodeSrc + "["+iRowNo+"]/spcnm"), true);
							model.setValue(strNodeDest + "["+iBlankNo+"]/existyn",  "N");
							model.setValue(strNodeDest + "["+iBlankNo+"]/slidno",   "0");

							//--------------------
							// 세부검체번호 재 설정
							iMaxSeqNo = fExeSeqNoSet(0);
							fExeAddLastRow();
							//model.setValue(strNodeSrc + "["+iRowNo+"]/choi", "false");
							model.refresh();
						//} else {
						//	model.setValue(strNodeSrc + "[" + iRowNo + "]/choi", "false");
						//}
					} else {
						//grd_choispc.deleteRow(iFindRow);
						//fExeSeqNoSet(iFindRow);
					}
				}
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.13 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 선택검체 그리드의 빈 Row을 검색 Function
				*/
				function fExeFindRow() {

					var iFindNo = -1;
					var strNode = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
					
					//----------------------------------------------------------------
					for (var iRowNo=1; iRowNo <= getNodesetCount(strNode); iRowNo++) {
						
						if (model.getValue(strNode+"["+iRowNo+"]/spccd") == "") {
							return iRowNo;
						}
					}
					
					//-------------
					return iFindNo;
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 세부검체 일련번호 재 설정 처리 Function
				*/
				function fExeSeqNoSet(iStartNo) {
					
					var iSeqNo  = 1;
					var iLoopNo = 0;
					var strNode = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
					
					if (iStartNo == 0) iLoopNo = iStartNo+1;
					else iLoopNo = iStartNo;
					
					//----------------------------------------------------------------
					for (var iRowNo=1; iRowNo <= getNodesetCount(strNode); iRowNo++) {
						
						if (model.getValue(strNode+"["+iRowNo+"]/spccd") != "") {
							model.setValue(strNode+"[" + iRowNo + "]/spcseqno", (iSeqNo).toString().getLeftPad(3, "0"));
							iSeqNo++;
						}
						
//						//---------------------------------------------------------------------------
//						if (iSeqNo < parseInt(model.getValue(strNode+"[" + iRowNo + "]/spcseqno"))) {
//							
//							if (iStartNo > 0) {
//								iSeqNo = Number(model.getValue(strNode+"[" + iRowNo + "]/spcseqno")) - 1;
//								model.setValue(strNode+"[" + iRowNo + "]/spcseqno", (iSeqNo).toString().getLeftPad(3, "0"));
//							} else {
//								iSeqNo = Number(model.getValue(strNode+"[" + iRowNo + "]/spcseqno"));
//							}
//						}
					}
					
					//-----------
					return iSeqNo;
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 선택 검체 삭제 처리 Function
				*/
				function fExeSpcDel() {
					
					var iMaxRows = grd_choispc.selectedRows;
					
/* ******************************************************************************
 * 2007-08-06 : 대표검체가 "검체명 목록"에 표시되기에 모든 검체를 삭제할 수 있다.
 ******************************************************************************** 					
					if (grd_choispc.row == 1) {
						messageBox("대표검체는 삭제", "E001");
					} else {
						grd_choispc.deleteRow(grd_choispc.row);
						fExeSeqNoSet(grd_choispc.row);
					}
*/					


					//--------------------------------------
					for (var iNo=0; iNo < iMaxRows;iNo++) {
						grd_choispc.deleteRow(grd_choispc.selectedRow(0));
					}
					
					fExeSeqNoSet(grd_choispc.row);
/* ********************************************************** */
				}				
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.02 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 선택 검체 추가 처리 Function
				*/
				function fExeSpcAdd() {
					//grd_choispc.addrow();
					grd_choispc.insertRow(grd_choispc.row, "after");
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.04 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 통합결과조회 처리 Function
				*/
				function fSytsRsltRef() {
					modal("SMAER00800", "", "", "", "SMAER00800", "/root/hidden/reqfrminfo/pid", "/root/send/data/singdata/srchpid");
				}
				
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.04.04 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 검체팝업 처리 Function
				*/
				function fExeSpcPopup() {
					lpzfExeComnOpenScrn("spccd", "/root/hidden/reqfrminfo");
					model.refresh();
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.05.23 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 대표검체 선택 처리 Function
				*/
				function fExeChangeReprSpcCd() {

					var strNode = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
					
/* **********************************************************************************
 * 2007-08-06 : 의뢰지 처리방법에 따른 수정					
 *              대표검체를 "검체명" 그리드가 아닌 "검체명 목록" 그리드의 첫줄에 표현
 *
 * ********************************************************************************* */
 
/* 					
					//------------------------------------------------------
					if (getNodesetCount(strNode) <= 0) grd_choispc.addrow();
					
					//---------------------------
					model.removeNodeset(strNode);
					
					//------------------------------------------------
		        		model.makeValue(strNode + "[1]/choi",     "true");
		        		model.makeValue(strNode + "[1]/spcseqno", "001");
		        		model.makeValue(strNode + "[1]/existyn",  "N");
		        		
		        		//------------------------------------------------------------
					if (getNodesetCount("/root/init/lpcmspcm/lpcmspcmlist") > 0) {		        		
			        		model.makeValue(strNode + "[1]/spccd", model.getValue("/root/hidden/reqfrminfo/spccd"));
			        		model.makeValue(strNode + "[1]/spcnm", model.getValue("/root/init/lpcmspcm/lpcmspcmlist[spccd='" + model.getValue("/root/hidden/reqfrminfo/spccd") + "']/spcnm"));
					} else {
			        		model.makeValue(strNode + "[1]/spccd", model.getValue("/root/hidden/reqfrminfo/spccd"));
			        		model.makeValue(strNode + "[1]/spcnm", model.getValue("/root/main/reprspc/reprspclist[spccd='" + model.getValue("/root/hidden/reqfrminfo/spccd") + "']/spcnm"));
					}
*/					
		        		//----------------------------------------------------
		        		model.removeNodeset("/root/main/detlspc/detlspclist");
		        		model.removeNodeset(strNode);

			        	//--------------------------------------------------------------------
			        	model.makeValue("/root/send/instcd",    getUserInfo("dutplceinstcd"));
			        	model.makeValue("/root/send/prcpcd",    model.getValue("/root/hidden/reqfrminfo/prcpcd")); 
			        	model.makeValue("/root/send/spccd",     model.getValue("/root/hidden/reqfrminfo/spccd")); 
			        	model.makeValue("/root/send/spcflagcd", "1"); 
					submit("TRLPJ01501", false);
					
					//-----------------------------------------------------------
					// 세부검체가 없을 경우 대표검체를 세부검체 목록 상단에 추가
					if (getNodesetCount("/root/main/detlspc/detlspclist") <= 0) fExeSpcNodeAdd();
                    if (getNodesetCount("/root/main/detlspc/detlspclist") == 1)
					{		        		
/*                       alert("test");*/
                        model.setValue("/root/main/detlspc/detlspclist/choi", "true");
					   fExeDetlSpcClick_copy(1)   
					} 
					 					
 					//--------------------
 					grd_spclist.refresh();
 					grd_choispc.refresh(); 
					//-----------------------------------------------------------
					// 이재오 2014년 5월 7일 대표검체 1대 세부검체 1일때 우측 자동지정
					//-----------------------------------------------------------
//					if (getNodesetCount("/root/main/detlspc/detlspclist") = 1) fExeSpcGridClick(1);
//					if (getNodesetCount("/root/main/detlspc/detlspclist") = 1) alert("test");
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.06.27 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 임상소견 팝업창 호출 처리 Function
				*/
				function fExePopupCall(pFlag) {
					
					var xpt = window.screenleft +  50;
					var ypt = window.screenTop + 50;		
                         var coord = getRelativeCoordinate ( xpt, ypt );
                         var mon = coord[0];
                         xpt = coord[1];
                         ypt = coord[2];
					
					//-----------------
					if (pFlag == "P") {
						setParameter("SPMMB02200_cond2", "1");		// 임상소견
						
						//---------------------------------	
						//modal ("SPMMB02200", 1,  xpt, ypt);			
						modal("SPMMB02200", mon,  xpt, ypt, "SPMMB02200", "", "", "", false);		   
						
						//----------------------------------------------
						if (getParameter("SPMMB02200_clinccmt") == "") {
							// Continue
						} else {
							model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/reqcnts", getParameter("SPMMB02200_clinccmt"));
						}
						
						//---------------------
						tar_prcpcnts.refresh();
					} else {
						//modal("SPMMB02300", 1,  xpt, ypt, );		// 검체등록	
						modal("SPMMB02300", mon,  xpt, ypt, "SPMMB02300", "", "", "", false);		// 검체등록	
						//modal (screenId, mon,  xpt, ypt, screenId, "", "", "", false);
	        
							
						model.makeValue("/root/send/cond1", getUserInfo("dutplcecd"));
						model.makeValue("/root/send/cond2", "1");
						submit("TRMMB02302");
/*
				        	//-----------------------------------------------
				        	// 과별 지정된 검체가 존재할 경우 우선적으로 표시
				        	if (getNodesetCount("/root/init/lpcmspcm/lpcmspcmlist") > 0) {
							cmb_reprspccd.choices.itemset.attribute("nodeset") = "/root/init/lpcmspcm/lpcmspcmlist";
							cmb_reprspccd.choices.itemset.label.attribute("ref") = "spcnm";
							cmb_reprspccd.choices.itemset.value.attribute("ref") = "spccd";
				        	} else {
							cmb_reprspccd.choices.itemset.attribute("nodeset") = "/root/main/reprspc/reprspclist";
							cmb_reprspccd.choices.itemset.label.attribute("ref") = "spcnm";
							cmb_reprspccd.choices.itemset.value.attribute("ref") = "spccd";
				        	}
*/
					}
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.08.06 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 선택된 대표검체를 세부검체 목록에 추가 처리 Function
				*/
				function fExeSpcNodeAdd() {
					
					var sSpcCd  = "";
					var sSpcNm  = "";
					var sMsg    = "";
					var iRowCnt = getNodesetCount("/root/main/detlspc/detlspclist");
					
					//-------------------------------------------------------
					sSpcCd = model.getValue("/root/hidden/reqfrminfo/spccd"); 
					sSpcNm = model.getValue("/root/main/reprspc/reprspclist[spccd='"+ sSpcCd +"']/spcnm");

					//----------------------------------------------
					if (sSpcCd == "-" || sSpcCd == "") return false;
					
					//-------------------------------------------------------
					// 검사별 대표검체 정보의 부재시 검체명이 존재할 수 없음. 
					// 검체명이 없을 경우 경고 메시지 처리
					if (sSpcNm == "-" || sSpcNm == "") {
						sMsg = model.getValue("/root/hidden/reqfrminfo/prcpnm") + " 처방에 해당하는 검체가 아닙니다. 검체를 지정 ";
						model.removeNodeset("/root/main/detlspc/detlspclist");
						messageBox(sMsg, "E001");
						return false;
					}
					
					//--------------------------------------------
 					model.removeNodeset("/root/temp/choireprspc");
 					model.makeNode("/root/temp/choireprspc");
 					model.makeNode("/root/main/detlspc/detlspclist");
 					model.makeValue("/root/temp/choireprspc/choi",   "false");
 					model.makeValue("/root/temp/choireprspc/spccd",  sSpcCd);
 					model.makeValue("/root/temp/choireprspc/spcnm",  sSpcNm);
 					model.makeValue("/root/temp/choireprspc/instcd", getUserInfo("dutplceinstcd"));

					//-------------------------------------
					// 대표검체를 세부검체 목록 상단에 추가
 					copyNodesetType("/root/main/detlspc/detlspclist", "/root/temp/choireprspc", "before");
 					
 					//----------------------------------------------------------------------
 					if (iRowCnt == 0) model.removeNode("/root/main/detlspc/detlspclist[2]");
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.12 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 검체에 대한 이미지정보 호출 처리 Function
				*/
				function fExeSpcImgPopupCall() {
				    modal("SMMMR03600", "", "", "", "", "/root/temp/SMMMR03600_modalif", "/root/temp/SMMMR03600_modalif");
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.13 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 선택 검체추가 처리 Function
				*/
				function fExeAddSpc() {
					grd_choispc.addRow();
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.13 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 선택 검체 기본 노드 생성 처리 Function
				*/
				function fExeInitChoiSpc(pRowNo) {
					
					for (var iNo=pRowNo; iNo <= 30; iNo++) {
						grd_choispc.addRow();
					}
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.13 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 검체명 병경 처리 Function
				*/
				function fExeSpcNmChange() {
					
					var sSpcCd    = "";
					var sOrgName  = "";
					var sDescName = "";
					
					var sSrcNode  = "/root/main/detlspc/detlspclist";
					var sDescNode = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist";
					
					
					//------------------------------------------------------------------
					if (model.getValue(sDescNode+"["+grd_choispc.row+"]/spccd") == "" ||
					    model.getValue(sDescNode+"["+grd_choispc.row+"]/spccd") == "-") {
					    	// Continue
					} else {
						fExeAddLastRow();
						return true;
					}
					
					//------------------------------------------------------------------
					if (model.getValue(sDescNode+"["+grd_choispc.row+"]/spcnm") == "") {
						return true;
					}
					
					//----------------------------------------
					// 대표검체가 선택되지 않은 경우 처리 불가
					if (model.getValue("/root/hidden/reqfrminfo/spccd") == "") {
						messageBox("대표검체를 선택하여 주십시오! 검체를 추가", "E001");
						model.setValue(sDescNode+"["+grd_choispc.row+"]/spccd", "");
						model.setValue(sDescNode+"["+grd_choispc.row+"]/spcnm", "");
						model.refresh();
						return false;
					}
					
					//------------------------------------------------------------------
					sDescName = model.getValue(sDescNode+"["+grd_choispc.row+"]/spcnm");
					sDescName = sDescName.toUpperCase();
					
					//----------------------------------------------------------
					// 대표검체의 세부검체 Other,와 비교하여 Other가 존재할 경우
					// 입력된 검체명에 세부 Other 검체코드를 할당한다.
					for (var iNo=1; iNo <= getNodesetCount(sSrcNode); iNo++) {
						
						//----------------------------------------------------
						sOrgName = model.getValue(sSrcNode+"["+iNo+"]/spcnm");
						
						//---------------------------------------------------
						if (sOrgName.toUpperCase().indexOf("OTHER", 0) > -1) {
							model.setValue(sDescNode+"["+grd_choispc.row+"]/choi",     "true");
							model.setValue(sDescNode+"["+grd_choispc.row+"]/spccd",    model.getValue(sSrcNode+"["+iNo+"]/spccd"));
							fExeSeqNoSet(0);
							
							//-----------------------
							// 마지막 1라인 공백 유지
							fExeAddLastRow();
							
							//----------
							return true;
						}
					}
					
					//--------------------------------------------------------------------------------------------------------
					messageBox("Others에 대한 세부검체가 존재하지 않습니다! 병리과에 문의하여 주십시오. 검체를 추가", "E001");
					model.setValue(sDescNode+"["+grd_choispc.row+"]/spccd", "");
					model.setValue(sDescNode+"["+grd_choispc.row+"]/spcnm", "");
					model.refresh();
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.22 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 임상소견 선택 처리 Function
				*/
				function fExeResnChoi() {
					
					var iFindNo = 0;
					var sNode   = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/resncd/resncdlist";
					
					//------------------------------------
					if (grd_resncd.row <= 0)  return false;
					if (grd_resncd.col <= -1) return false;
					if (grd_resncd.col != 0)  return false;
					
					//-----------------------------------------------------
					for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
						model.setValue(sNode+"["+iNo+"]/choi", "false");
					}
					
					//---------------------------------------------------------
					model.setValue(sNode+"["+grd_resncd.row+"]/choi", "true");
					
					//-------------------
					grd_resncd.refresh();
					tar_prcpcnts.disabled = false;
				}

				/* @group  : 조직검사의뢰지
				 * @ver    : 2014.11.05 (CMCDEV-0001)
				 * @by     : 이재오
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 임상소견 선택 처리 Function
				*/
				function fExeResnChoi_flt() {
					
					var iFindNo = 0;
					var sNode   = "/root/main/reqfrm/reqfrmtbl/reqfrminfo/resncd/resncdlist";
					//------------------------------------
//					if (grd_resncd.row <= 0)  return false;
//					if (grd_resncd.col <= -1) return false;
//					if (grd_resncd.col != 0)  return false;
					
					//-----------------------------------------------------
					for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
						model.setValue(sNode+"["+iNo+"]/choi", "false");
					}
					
					//---------------------------------------------------------
					model.setValue(sNode+"["+1+"]/choi", "true");
					
					//-------------------
					grd_resncd.refresh();
					tar_prcpcnts.disabled = false;
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.22 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 검체명 목록 전체 선택 처리 Function
				*/
				function fExeSpcAllChoi() {
					
					//-------------------------
					if (grd_spclist.row <= 0) {
						
						//-------------------------
						if (grd_spclist.col <= 0) {
							
							for (var iNo=1; iNo <= getNodesetCount("/root/main/detlspc/detlspclist"); iNo++) {
								fExeDetlSpcClick(iNo);
							}
						}
					}
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.22 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 마지막 라인 추가 처리 Function
				*/
				function fExeAddLastRow() {
					if (grd_choispc.row == getNodesetCount("/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist")) {
						grd_choispc.addRow();
					}
				}
				
				/* @group  : 조직검사의뢰지
				 * @ver    : 2007.10.22 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 전체검체목록 팝업창 호출 처리 Function
				*/
				function fExeAllSpcCall() {

					var bState = false;
					var iRowNo = 0;
					var sNode  = "/root/init/lpcmspcm/lpcmspcmlist";
					
					//-----------------------------------
					setParameter("SPLPJ02400_spccd", "");
					setParameter("SPLPJ02400_spcnm", "");
					modal("SPLPJ02400", "", "", "", "SPLPJ02400", "/root/hidden/reqfrminfo/prcpcd", "/root/init/testcd");
					
			
					//-------------------------------------------
					if (getParameter("SPLPJ02400_spccd") != "") {
						
						//----------------------------------------------------------------------------------------
						if (model.getValue("/root/hidden/reqfrminfo/spccd") != getParameter("SPLPJ02400_spccd")) {
							model.makeValue("/root/hidden/reqfrminfo/spccd", getParameter("SPLPJ02400_spccd"));
							model.makeValue("/root/hidden/reqfrminfo/spcnm", getParameter("SPLPJ02400_spcnm"));
							
							//----------------------------------------
							// 즐겨찾기(검체등록)의 검체가 존재할 경우 
							// 전체 팝업창에서 선택한 검체가 없으면 임시로 추가하여 화면에 표시
							if (getNodesetCount(sNode) > 0) {
								for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
									if (getParameter("SPLPJ02400_spccd") == model.getValue(sNode+"["+iNo+"]/spccd")) {
										bState = true;
										break;
									}
								}
								
								//---------------------------
								// 검체를 찾지 못한 경우 처리
								if (!bState) {
									iRowNo = Number(getNodesetCount(sNode))+1;
									model.makeNode(sNode+"["+iRowNo+"]");
									model.makeValue(sNode+"["+iRowNo+"]/status",     "1");
									model.makeValue(sNode+"["+iRowNo+"]/spccd",      getParameter("SPLPJ02400_spccd"));
									model.makeValue(sNode+"["+iRowNo+"]/spcnm",      getParameter("SPLPJ02400_spcnm"));
									model.makeValue(sNode+"["+iRowNo+"]/orddeptcd",  model.getValue(sNode+"["+(Number(iRowNo)-1)+"]/orddeptcd"));
									model.makeValue(sNode+"["+iRowNo+"]/spckind",    model.getValue(sNode+"["+(Number(iRowNo)-1)+"]/spckind"));
									model.makeValue(sNode+"["+iRowNo+"]/spckindno",  model.getValue(sNode+"["+(Number(iRowNo)-1)+"]/spckindno"));
								}
							}
							
							//--------------------
							fExeChangeReprSpcCd();
						}
					}
					
					//--------------
					model.refresh();
				}
				
				function fExeSpcGridClick(pRow) {
					if (grd_spclist.row > 0 && grd_spclist.isCell(event.target) && grd_spclist.row >= grd_spclist.fixedRows) {
						fExeDetlSpcClick(pRow);	
					}	
				}
			]]>
		</script>
	</xhtml:head>
	<xhtml:body pagewidth="769" pageheight="731" guideline="1,1063;" style="margin-left:8; margin-top:0; margin-right:8; margin-bottom:0; ">
		<group id="grp_btn" style="left:0px; top:688px; width:753px; height:27px; ">
			<button id="btn_cls" class="btn4_letter2" navindex="14" style="left:697px; top:3px; width:56px; height:22px; ">
				<caption>닫기</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeClose();
					]]>
				</script>
			</button>
			<button id="btn_save" class="btn4_letter2" navindex="13" style="left:637px; top:3px; width:56px; height:22px; ">
				<caption>확인</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeSave();
					]]>
				</script>
			</button>
		</group>
		<group id="grp_biz" style="left:0px; top:0px; width:753px; height:686px; margin-left:0; margin-top:0; margin-right:0; margin-bottom:0; ">
			<caption id="caption2" class="tit_2" style="left:5px; top:10px; width:111px; height:13; ">처방정보</caption>
			<line id="line1" class="line_1" style="x1:0; y1:25; x2:375; y2:25; "/>
			<caption id="caption3" class="cell_1" visibility="hidden" style="left:160px; top:0px; width:100px; height:23px; text-align:center; vertical-align:middle; ">수술명</caption>
			<caption id="caption25" class="cell_1" style="left:0px; top:29px; width:100px; height:23px; text-align:center; vertical-align:middle; ">처방명</caption>
			<caption id="caption6" class="cell_1" style="left:0px; top:53px; width:100px; height:23px; text-align:center; vertical-align:middle; ">대표검체</caption>
			<line id="line2" class="line_2" style="x1:0px; y1:51px; x2:375px; y2:51px; "/>
			<output id="output2" ref="/root/hidden/reqfrminfo/prcpnm" class="output_fix" style="left:103px; top:30px; width:272px; height:19px; "/>
			<caption id="caption1" class="tit_2" style="left:5px; top:109px; width:205px; height:13px; ">검체명 목록(예문)</caption>
			<line id="line4" class="line_1" style="x1:0px; y1:124px; x2:375px; y2:124px; "/>
			<datagrid id="grd_choispc" nodeset="/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist" class="datagrid2" caption="선택^번호^검체코드^검체명^존재여부^슬라이드갯수" colsep="^" colwidth="0, 60, 0, 225, 0, 60" dataheight="23" mergecellsfixedrows="bycolrec" rowheight="23" rowsep="|" navindex="6" style="left:378px; top:30px; width:375px; height:403px; ">
				<col ref="choi" type="checkbox" visibility="hidden"/>
				<col class="text_center" ref="spcseqno"/>
				<col ref="spccd" visibility="hidden"/>
				<col ref="spcnm" type="inputbutton"/>
				<col ref="existyn" visibility="hidden"/>
				<col ref="slidno" type="input" format="#,###" style="text-align:center; vertical-align:middle; "/>
				<script type="javascript" ev:event="onmousedown">
					<![CDATA[
						setPopupMenu("grd_choispc", false, "/root/hidden/popupmenu/item", "nm", "funt");
					]]>
				</script>
				<script type="javascript" ev:event="DOMFocusOut">
					<![CDATA[
						initPopupMenu();
					]]>
				</script>
				<script type="javascript" ev:event="xforms-value-changed">
					<![CDATA[
						fExeSpcNmChange();
					]]>
				</script>
				<script type="javascript" ev:event="onbuttonclick">
					<![CDATA[
						model.removeNodeset("/root/hidden/seaspc");
						
						if((model.getValue("/root/hidden/reqfrminfo/xrwGBN") == "inbcoll") 
							    && (model.getValue("/root/hidden/reqfrminfo/workflagcd") == "1002")
								&& (model.getValue("/root/hidden/reqfrminfo/bcgbn") == "true")) {
									
							model.makeValue("/root/hidden/scrndata/reprspccd",  "");		              //프로즌은 전체 세부검체 조회
							lpzfExeComnOpenScrn("spccd_sub", "/root/hidden/seaspc");	
							
						} else {
							
							model.makeValue("/root/hidden/scrndata/reprspccd",  model.getValue("/root/hidden/reqfrminfo/spccd"));  //프로즌을 제외한 나머지는 해당 대표검체의 세부검체만.
							lpzfExeComnOpenScrn("spccd_sub", "/root/hidden/seaspc");
							
						}
						
						if(model.getValue("/root/hidden/seaspc/spccd") != "") {
							model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist["+ grd_choispc.row +"]/choi", "true");
							model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist["+ grd_choispc.row +"]/spcseqno", "");
							model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist["+ grd_choispc.row +"]/spccd", model.getValue("/root/hidden/seaspc/spccd"));
							model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist["+ grd_choispc.row +"]/spcnm", model.getValue("/root/hidden/seaspc/spcnm"));
							model.makeValue("/root/main/reqfrm/reqfrmtbl/reqfrminfo/choispc/choispclist["+ grd_choispc.row +"]/existyn", "N");
							
							//--------------------
							// 세부검체번호 재 설정
							iMaxSeqNo = fExeSeqNoSet(0);
							fExeAddLastRow();
							
							model.refresh();
						}
					]]>
				</script>
			</datagrid>
			<caption id="caption5" class="tit_2" style="left:383px; top:10px; width:111px; height:14px; ">검체명</caption>
			<line id="line6" class="line_1" style="x1:378px; y1:25px; x2:753px; y2:25px; "/>
			<datagrid id="grd_spclist" nodeset="/root/main/detlspc/detlspclist" autoresize="true" caption="선택^검체코드^검체명(예문)" colsep="^" colwidth="60, 0, 296" mergecellsfixedrows="bycolrec" rowheight="23" rowsep="|" navindex="5" style="left:0px; top:129px; width:375px; height:304; ">
				<col ref="choi" type="checkbox"/>
				<col ref="spccd"/>
				<col ref="spcnm"/>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						fExeSpcGridClick(grd_spclist.row);
					]]>
				</script>
				<script type="javascript" ev:event="xforms-select">
					<![CDATA[
						fExeSpcAllChoi();		
					]]>
				</script>
			</datagrid>
			<output id="opt_" ref="/root/hidden/reqfrminfo/opnm" class="output_fix" visibility="hidden" style="left:263px; top:1px; width:27px; height:19px; "/>
			<select1 id="cmb_reprspccd" ref="/root/hidden/reqfrminfo/spccd" disabled="true" navindex="1" appearance="minimal" editmode="inputsearch" itemcount="25" style="left:103px; top:54px; width:205px; height:19px; ">
				<choices>
					<itemset nodeset="/root/main/reprspc/reprspclist">
						<label ref="spcnm"/>
						<value ref="spccd"/>
					</itemset>
				</choices>
				<script type="javascript" ev:event="xforms-value-changed">
					<![CDATA[
						fExeChangeReprSpcCd();
					]]>
				</script>
			</select1>
			<button id="btn_spcsave" class="btn2_letter4" navindex="2" style="left:311px; top:54px; width:64px; height:19px; ">
				<caption>검체등록</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExePopupCall("S");
					]]>
				</script>
			</button>
			<caption id="caption7" class="tit_2" style="left:5px; top:440px; width:111px; height:13px; ">임상소견</caption>
			<line id="line7" class="line_1" style="x1:0px; y1:455px; x2:753px; y2:455px; "/>
			<button id="btn_sytsrsltref" class="btn2_letter6" navindex="12" style="left:667px; top:435px; width:86px; height:19px; ">
				<caption>통합결과조회</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fSytsRsltRef();
					]]>
				</script>
			</button>
			<button id="btn_exmp" navindex="9" style="left:77px; top:437px; width:14px; height:16px; background-image:../../../com/commonweb/images/icon_list.gif; ">
				<caption/>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExePopupCall("P");		
					]]>
				</script>
			</button>
			<button id="btn_spcadd" class="btn2_letter4" navindex="7" visibility="hidden" style="left:689px; top:5px; width:64px; height:19px; ">
				<caption>검체추가</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeAddSpc();
					]]>
				</script>
			</button>
			<textarea id="tar_prcpcnts" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/reqcnts" navindex="11" style="left:378px; top:481px; width:375px; height:102px; "/>
			<caption id="caption4" class="cell_1" style="left:378px; top:460px; width:374px; height:20px; text-align:center; vertical-align:middle; ">기타 임상소견</caption>
			<datagrid id="grd_resncd" nodeset="/root/main/reqfrm/reqfrmtbl/reqfrminfo/resncd/resncdlist" caption="^임  상  소  견" colsep="^" colwidth="38, 333" mergecellsfixedrows="bycolrec" rowsep="|" navindex="8" style="left:0px; top:460px; width:375px; height:123px; ">
				<col ref="choi" type="checkbox"/>
				<col ref="resnnm"/>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						fExeResnChoi();		
					]]>
				</script>
			</datagrid>
			<button id="btn_allspc" class="btn2_letter4" navindex="4" style="left:311px; top:104px; width:64px; height:19px; ">
				<caption>전체검체</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeAllSpcCall();
					]]>
				</script>
			</button>
			<button id="btn_img" navindex="10" style="left:95px; top:437px; width:18px; height:16px; background-image:../../../com/commonweb/images/icon_picture.gif; ">
				<caption/>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeSpcImgPopupCall();
					]]>
				</script>
			</button>
			<line id="line5" class="line_2" style="x1:0px; y1:60px; x2:375px; y2:60px; "/>
			<caption id="caption8" class="cell_1" style="left:0px; top:77px; width:100px; height:23px; text-align:center; vertical-align:middle; "/>
			<line id="line3" class="line_3" style="x1:0px; y1:99px; x2:375px; y2:99px; "/>
			<select1 id="rdo_ltrt" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/spcsite" navindex="3" appearance="full" cellspacing="70" cols="3" overflow="visible" style="left:103px; top:80px; width:272px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>RT</label>
						<value>0</value>
					</item>
					<item>
						<label>LT</label>
						<value>1</value>
					</item>
					<item>
						<label>Other</label>
						<value>2</value>
					</item>
				</choices>
			</select1>
			<caption id="caption9" class="tit_2" style="left:5px; top:590px; width:95px; height:13px; ">Character</caption>
			<line id="line8" class="line_1" style="x1:0px; y1:605px; x2:640; y2:605px; "/>
			<caption id="caption10" class="cell_1" style="left:0px; top:610px; width:100px; height:23px; text-align:center; vertical-align:middle; ">Viscosity :</caption>
			<select id="chk_viscosity1" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/watery" visibility="hidden" overflow="visible" appearance="full" style="left:103px; top:612px; width:77px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Watery</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<select id="chk_viscosity2" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/viscous" visibility="hidden" overflow="visible" appearance="full" style="left:183px; top:612px; width:100px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Viscous</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<caption id="caption11" class="cell_1" style="left:0px; top:635px; width:100px; height:23px; text-align:center; vertical-align:middle; ">Color :</caption>
			<select id="checkbox2" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/white" visibility="hidden" overflow="visible" appearance="full" style="left:183px; top:637px; width:100px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>White</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<select id="chk_color1" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/colorless" visibility="hidden" overflow="visible" appearance="full" style="left:103px; top:637px; width:77px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Colorless</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<select id="checkbox1" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/yellow" visibility="hidden" overflow="visible" appearance="full" style="left:285px; top:637px; width:65px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Yellow</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<select id="checkbox3" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/red" visibility="hidden" overflow="visible" appearance="full" style="left:352px; top:637px; width:65px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Red</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<select id="checkbox4" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/others" visibility="hidden" overflow="visible" appearance="full" style="left:419px; top:637px; width:65px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Others</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<input id="input1" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/othercont" visibility="hidden" style="left:485px; top:637px; width:155px; height:19px; "/>
			<select id="checkbox5" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/clear" visibility="hidden" overflow="visible" appearance="full" style="left:103px; top:662px; width:77px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Clear</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<select id="checkbox6" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/turbid" visibility="hidden" overflow="visible" appearance="full" style="left:285px; top:662px; width:65px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Turbid</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<select id="checkbox7" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/ground" visibility="hidden" overflow="visible" appearance="full" style="left:183px; top:662px; width:100px; height:20px; border-style:none; ">
				<choices>
					<item>
						<label>Ground glass</label>
						<value>0</value>
					</item>
				</choices>
			</select>
			<caption id="caption12" class="cell_1" style="left:0px; top:660px; width:100px; height:23px; text-align:center; vertical-align:middle; ">Turbidity :</caption>
			<line id="line10" class="line_2" style="x1:0px; y1:658px; x2:640px; y2:658px; "/>
			<line id="line9" class="line_2" style="x1:0px; y1:633px; x2:640px; y2:633px; "/>
			<line id="line11" class="line_3" style="x1:0px; y1:683px; x2:640px; y2:683px; "/>
			<line id="line12" class="line_1" visibility="hidden" style="x1:650px; y1:605px; x2:745px; y2:605px; "/>
			<caption id="caption13" class="tit_2" visibility="hidden" style="left:655px; top:590px; width:80px; height:13px; ">REMARK</caption>
			<caption id="caption14" visibility="hidden" style="left:650px; top:613px; width:35px; height:20px; ">Slide</caption>
			<input id="input2" ref="/root/main/reqfrm/reqfrmtbl/reqfrminfo/slidecnt" visibility="hidden" format="#,###" style="left:685px; top:612px; width:40px; height:19px; "/>
			<caption id="caption15" visibility="hidden" style="left:730px; top:613px; width:20px; height:20px; ">장</caption>
			<line id="line13" class="line_3" visibility="hidden" style="x1:650px; y1:633px; x2:745px; y2:633px; "/>
			<caption id="caption16" style="left:165px; top:588px; width:465px; height:20px; font-family:굴림체; font-size:9pt; font-weight:bold; color:#ff0000; text-align:center; ">
				<![CDATA[>> Character 및 Remark는 선택적으로 입력하십시오. <<]]>
			</caption>
		</group>
	</xhtml:body>
</xhtml:html>