YNU_JEUS/app_home/himed/webapps/lis/plgycsteslidmngtweb/xrw/SMLPB00900_Cassette발행.xrw

<?xml version="1.0" encoding="EUC-KR"?>
<!--
	* 제    목		: SMLPB00900_Cassette발행.xrw
	* 설    명		: Cassette발행 화면
	* 설 계 자		: (주)에이씨케이 - 유동철
	* 작 성 자		: (주)에이씨케이 - 유동철
	* 작 성 일		: 2010.12.06
	* 수정이력		: 
	* 기    타		: 
-->
<?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>Cassette발행</xhtml:title>
		<model id="model1">
			<instance id="instance1">
				<root xmlns="">
					<main>
						<acptptno>
							<acptptnolist>
								<choi/>
								<instcd/>
								<ptno/>
								<dispptno/>
								<acptdd/>
								<acptno/>
								<spcacptdd/>
								<spcacptno/>
								<spcacptseqno/>
								<spccd/>
								<spcnm/>
								<from11/>
								<from12/>
								<fixchar/>
								<from21/>
								<from22/>
								<hopper/>
								<spchistno/>
								<maxcsteno/>
								<curcsteno/>
							</acptptnolist>
						</acptptno>
						<isscste>
							<isscstelist>
								<choi/>
								<instcd/>
								<ptno/>
								<dispptno/>
								<spcacptdd/>
								<spcacptno/>
								<spcacptseqno/>
								<csteno/>
								<cstekindcd/>
								<cstecnts/>
								<tisscnt/>
								<hoppno/>
								<maxcsteno/>
								<bizflagcd/>
								<scrno/>
								<acptdd/>
								<acptno/>
								<testcd/>
								<acptitemno/>
								<slidno/>
								<spccd/>
								<spchistno/>
								<statsinclflagcd/>
							</isscstelist>
						</isscste>
						<cstestats>
							<cstestatslist>
								<instcd/>
								<cstekind/>
								<cstecnt/>
								<slidcnt/>
							</cstestatslist>
						</cstestats>
						<eqinfo>
							<caeqlist>
								<eqnm/>
								<eqip/>
								<eqport/>
								<eqflag/>
								<eqseqno/>
								<resncd/>
								<baseflagcd/>
							</caeqlist>
							<slideqlist>
								<eqnm/>
								<eqip/>
								<eqport/>
								<eqflag/>
								<eqseqno/>
								<resncd/>
								<baseflagcd/>
							</slideqlist>
						</eqinfo>
						<slideinfo>
							<slidelist>
								<instcd/>
								<ptno/>
								<spcacptdd/>
								<spcacptno/>
								<spcacptseqno/>
								<csteno/>
								<bloccnts/>
								<prntcsscnts/>
								<slidno/>
								<cstekindcd/>
								<cstecnts/>
								<workattr/>
								<prntcsscnts/>
								<cstecnts/>
								<ipttype/>
								<maxcsteno/>
								<bizflagcd/>
								<acptdd/>
								<acptno/>
								<testcd/>
								<acptitemno/>
								<scrno/>
								<spccd/>
								<spchistno/>
								<statsinclflagcd/>
								<relaptno/>
								<bloccnts/>
								<reladispptno/>
								<workflagcd/>
								<dispptno/>
								<prtnblocnm/>
							</slidelist>
						</slideinfo>
					</main>
					<send>
						<slideflag/>
					</send>
					<init>
						<ptnocode/>
						<fromyear/>
						<fromptno/>
						<toyear/>
						<toptno/>
						<acptfromdd/>
						<acpttodd/>
						<seameth/>
						<seaval/>
						<ptnofrom/>
						<ptnoto/>
						<sysdt>
							<sysdtinfo>
								<sysdd/>
								<systm/>
							</sysdtinfo>
						</sysdt>
						<userinfo>
							<userinfolist>
								<userid/>
								<usernm/>
								<jobkindcd/>
							</userinfolist>
						</userinfo>
						<hospenv>
							<hospenvinfo>
								<instcd/>
								<lendrtnterm/>
								<recvqualmthdcd/>
								<plgydeptcd/>
								<plgyteamcd/>
								<doctjobgradcd/>
								<teamjobgradcd/>
								<csteeqmtip/>
								<csteeqmtport/>
								<slideqmtip/>
								<slideqmtport/>
							</hospenvinfo>
						</hospenv>
						<resncd>
							<resncdlist>
								<instcd/>
								<baseflagcd/>
								<resncd/>
								<resncnts/>
							</resncdlist>
						</resncd>
						<ptnocd>
							<ptnocdlist>
								<instcd/>
								<ptnocd/>
								<ptnonm/>
							</ptnocdlist>
						</ptnocd>
						<cstechar>
							<cstecharlist>
								<no>1</no>
								<cnts>C</cnts>
							</cstecharlist>
						</cstechar>
						<cstecharno>
							<cstecharnolist>
								<no>1</no>
								<cnts>이중번호</cnts>
							</cstecharnolist>
						</cstecharno>
						<choicstechar/>
						<choicstekindcd/>
						<choichopperval/>
						<eqseqno/>
						<slideflag/>
						<slideeqseqno/>
						<ptno/>
					</init>
					<hidden>
						<userdeptcd/>
					</hidden>
				</root>
			</instance>
			<script type="javascript" ev:event="xforms-ready">
				<![CDATA[
					fExeInitialize();
				]]>
			</script>
			<submission id="TRLPZ00101" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/hospenv/hospenvinfo"/>
			<submission id="TRLPZ00102" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/sysdt/sysdtinfo"/>
			<submission id="TRLPZ00103" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/resncd/resncdlist"/>
			<submission id="TRLPZ00105" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/userinfo/userinfolist"/>
			<submission id="TRLPB00901" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/acptptno/acptptnolist"/>
			<submission id="TRLPB00202" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/cstestats/cstestatslist"/>
			<submission id="TXLPB00201" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/slideinfo/slidelist"/>
			<submission id="TRLPZ00109" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/init/ptnocd/ptnocdlist"/>
			<submission id="TRLPC01802" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/eqinfo"/>
		</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/dateHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/numericHelper.js"/>
		<script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
		<script type="javascript" src="../../../lis/commonweb/js/LPZ001.js"/>
		<script type="javascript">
			<![CDATA[
			
				//---------------
				// Socket연결상태 
				var isConnected = false;
				
				//카세트, 슬라이드 출력 여부
				var sCasteSlideflag = "C";
				
				//장비 인터페이스출력완료 여부 표시
				var sEqFinish = "N";
				
				var interval_id = "";
				
				var bParentWindow = false;
				
				/* @group  : Cassette발행
				 * @ver    : 2010.12.07 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 초기화 Function
				*/
				function fExeInitialize() {
					
					var iMaxNo   = 0;
					var sCurDate = "";
					
					//---------------------
					// Instance Node 초기화
					model.removeNodeset("/root/main/acptptno/acptptnolist"); 		// 병리번호리스트 초기화
					model.removeNodeset("/root/main/isscste/isscstelist"); 		// 발행 및 삭제Cassette리스트 초기화
					model.removeNodeset("/root/init/ptnocd/ptnocdlist");
					
					//--------------------------------
					model.removeNodeset("/root/send");
					model.makeValue("/root/send/instcd", getUserInfo("dutplceinstcd"));
					submit("TRLPZ00101", false);
					submit("TRLPZ00109", false);
					
				 	//---------------------------------------------------------
				 	// 병원환경정보를 취득하여 병리과와 병리팀 코드를 편집한다.
				 	lpzfUserDeptCd("/root/init/hospenv/hospenvinfo", "/root/hidden");

					//-------------------------------------------------------------------------------------
					model.makeValue("/root/send/userdeptcd",    model.getValue("/root/hidden/userdeptcd"));
					model.makeValue("/root/send/doctjobgradcd", model.getValue("/root/init/hospenv/hospenvinfo/doctjobgradcd"));
					model.makeValue("/root/send/teamjobgradcd", model.getValue("/root/init/hospenv/hospenvinfo/teamjobgradcd"));
					submit("TRLPZ00105", false);
					
					//------------------------------------------
					//  Cassette(블록) 및 Slide(슬라이드) 목록 조회
					model.makeValue("/root/send/baseflagcd", "'81'");
					submit("TRLPZ00103");
					model.removeNodeset("/root/init/resncd/resncdlist[resncd='ZZZZ']");
										
					//------------------
					// Cassette내용 분리
					lpzfExeCsteCntsSplit("/root/init/resncd/resncdlist");
					
					iMaxNo = getNodesetCount("/root/init/cstechar/cstecharlist");
					model.makeValue("/root/init/cstechar/cstecharlist["+(Number(iMaxNo)+1)+"]/no",   "Z");
					model.makeValue("/root/init/cstechar/cstecharlist["+(Number(iMaxNo)+1)+"]/cnts", "");
					
					//블록 장비 조회
					model.makeValue("/root/send/instcd",	           getUserInfo("dutplceinstcd"));	//instcd
					model.makeValue("/root/send/seaflagcd", "0");   //"0:전체, 1:카세트, 2:슬라이드"
					submit("TRLPC01802");
					cmb_slideqlist.select(0);
					cmb_slid.select(0);
										
					//---------------------
					// 시스템 현재일시를 조회
					fExeSysDtSet();
					
					//------------------------------------------------------------
					sCurDate = model.getValue("/root/init/sysdt/sysdtinfo/sysdd");
					model.makeValue("/root/init/ptnocode",    "");
					model.makeValue("/root/init/fromyear",    sCurDate.substr(2,2));
					model.makeValue("/root/init/toyear",      sCurDate.substr(2,2));
					model.makeValue("/root/init/fromptno",    "");
					model.makeValue("/root/init/toptno",      "");
					
					//----------------------------------------
					model.setValue("/root/init/seameth",  "1");					// 검색방법 초기화(0:병리번호, 1:등록번호)
					model.setValue("/root/init/seaval",   "");					// 검색값 초기화
					model.setValue("/root/init/ptnocode", "-");

					cbo_ptnocd.visible = true;
					
					//-----------------------------------------
					grd_ptnolist.fixedcellcheckbox(0,0) = true;
					
					//-------------
					model.refresh();
					
					
					//---------------------------------------------
					// 일반검사결과등록 화면에서 호출했을 경우 처리
					// 2010-11-13 : YDC
					if (window.parent == null) {
						// Continue
					} else {
						if ( opener.javascript.getParameter("SMLPB00900_ptno") != "") {
							
							//--------------------
							bParentWindow = true;
							
							//------------------------------------------------------------
							var sPtNo = opener.javascript.getParameter("SMLPB00900_ptno");
							model.makeValue("/root/init/acptfromdd", opener.javascript.getParameter("SMLPB00900_acptdd"));
							model.makeValue("/root/init/acpttodd",   opener.javascript.getParameter("SMLPB00900_acptdd"));
							model.makeValue("/root/init/pid",        opener.javascript.getParameter("SMLPB00900_pid"));
							model.makeValue("/root/init/ptnocode",   sPtNo.substr(0, sPtNo.length-8) ); 
							model.makeValue("/root/init/fromyear",   sPtNo.substr(sPtNo.length-8, 2) );
							model.makeValue("/root/init/fromptno",   sPtNo.substr(sPtNo.length-6, 6) );
							model.makeValue("/root/init/toyear",     sPtNo.substr(sPtNo.length-8, 2) );
							model.makeValue("/root/init/toptno",     sPtNo.substr(sPtNo.length-6, 6) );
							
							//----------------
							fGetAcptSpcList();
						}
					}
				}
				
				function fGetAcptList() {
					
					if (window.parent == null) {
						// Continue
					} else {
						if ( opener.javascript.getParameter("SMLPB00900_ptno") != "") {
							
							//--------------------
							bParentWindow = true;
							
							//------------------------------------------------------------
							var sPtNo = opener.javascript.getParameter("SMLPB00900_ptno");
							model.makeValue("/root/init/acptfromdd", opener.javascript.getParameter("SMLPB00900_acptdd"));
							model.makeValue("/root/init/acpttodd",   opener.javascript.getParameter("SMLPB00900_acptdd"));
							model.makeValue("/root/init/pid",        opener.javascript.getParameter("SMLPB00900_pid"));
							model.makeValue("/root/init/ptnocode",   sPtNo.substr(0, sPtNo.length-8) ); 
							model.makeValue("/root/init/fromyear",   sPtNo.substr(sPtNo.length-8, 2) );
							model.makeValue("/root/init/fromptno",   sPtNo.substr(sPtNo.length-6, 6) );
							model.makeValue("/root/init/toyear",     sPtNo.substr(sPtNo.length-8, 2) );
							model.makeValue("/root/init/toptno",     sPtNo.substr(sPtNo.length-6, 6) );
							model.makeValue("/root/init/ptno",       sPtNo);
							
							//----------------
							fGetAcptSpcList();
						}
					}
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2010.12.07 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 시스템일시 설정 처리 Function
				*/
				function fExeSysDtSet() {

					//-------------------
					submit("TRLPZ00102");		// 시스템 현재일시를 조회
					
					model.makeValue("/root/init/acptfromdd", model.getValue("/root/init/sysdt/sysdtinfo/sysdd")); 
					model.makeValue("/root/init/acpttodd",   model.getValue("/root/init/sysdt/sysdtinfo/sysdd")); 
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2010.12.07 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 접수검체 목록 조회 처리 Function
				*/
				function fGetAcptSpcList() {
					
					var sTemp  = "";
					var sSysDD = model.getValue("/root/init/sysdt/sysdtinfo/sysdd");
					var sFromDD = model.getValue("/root/init/acptfromdd");
					var sToDD   = model.getValue("/root/init/acpttodd");
					
					
					//--------------------------------
					model.removeNodeset("/root/send");
					model.removeNodeset("/root/main/acptptno/acptptnolist");
					
					//------------------------------------------------
					if (model.getValue("/root/init/ptnocode") != "") {
						
						//------------------------------------------------
						if (model.getValue("/root/init/fromyear") == "") {
							model.makeValue("/root/init/fromyear", sFromDD.substr(2,2));
						} else {
							sTemp = model.getValue("/root/init/fromyear");
							model.makeValue("/root/init/fromyear", sTemp.getLeftPad(2, "0"));
						}
						
						//----------------------------------------------
						if (model.getValue("/root/init/toyear") == "") {
							model.makeValue("/root/init/toyear", sToDD.substr(2,2));
						} else {
							sTemp = model.getValue("/root/init/toyear");
							model.makeValue("/root/init/toyear", sTemp.getLeftPad(2, "0"));
						}
						
						//------------------------------------------------
						if (model.getValue("/root/init/fromptno") == "") {
							model.makeValue("/root/init/fromptno", "000000");
						} else {
							sTemp = model.getValue("/root/init/fromptno");
							model.makeValue("/root/init/fromptno", sTemp.getLeftPad(6, "0"));
						}
						
						//----------------------------------------------
						if (model.getValue("/root/init/toptno") == "") {
							model.makeValue("/root/init/toptno", "999999");
						} else {
							sTemp = model.getValue("/root/init/toptno");
							model.makeValue("/root/init/toptno", sTemp.getLeftPad(6, "0"));
						}
					}
					
					//--------------------------------------------
					sTemp = model.getValue("/root/init/ptnocode");
					
					//---------------------------------------------------------------------
					model.makeValue("/root/send/instcd",     getUserInfo("dutplceinstcd"));
					model.makeValue("/root/send/acptfromdd", model.getValue("/root/init/acptfromdd"));
					model.makeValue("/root/send/acpttodd",   model.getValue("/root/init/acpttodd"));
					model.makeValue("/root/send/seamthd",    model.getValue("/root/init/seameth"));
					model.makeValue("/root/send/seaval",     model.getValue("/root/init/seaval"));
					model.makeValue("/root/send/ptnocode",   sTemp.replace("-", ""));	
					model.makeValue("/root/send/fromyear",   model.getValue("/root/init/fromyear"));	
					model.makeValue("/root/send/fromptno",   model.getValue("/root/init/fromptno"));	
					model.makeValue("/root/send/toyear",     model.getValue("/root/init/toyear"));	
					model.makeValue("/root/send/toptno",     model.getValue("/root/init/toptno"));	
					model.makeValue("/root/send/ptno",       model.getValue("/root/init/ptno"));	
					
					//---------------------------
					submit("TRLPB00901", false);
					
					//-------------------
					if (bParentWindow) {
						
						var sNode  = "/root/main/acptptno/acptptnolist";
						
						//-----------------------------------------------------------------
						for (var iRowNo = 1; iRowNo <= getNodesetCount(sNode); iRowNo++) {
							model.makeValue(sNode+"["+iRowNo+"]/choi",       "true");
							model.makeValue(sNode+"["+iRowNo+"]/cstekindcd", "9999");
						}
					}
					
					//--------------
					model.refresh();
				}
				
				
				/* @group  : Cassette발행
				 * @ver    : 2010.12.07 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 블럭 생성정보 계산 처리 Function
				*/
				function fExeCalcCste(pFixChar, pFrom, pTo, pRowNo) {
					
					var iCsteNo    = 0;
					var iFrom      = 0;
					var iTo        = 0;
					var iStartNo   = 0;
					var iMaxCsteNo = 0;
					var bCharState = false;
					
					//-------------------------------------------------
					var sSrcNode  = "/root/main/acptptno/acptptnolist";
					var sDescNode = "/root/main/isscste/isscstelist";
					
					
					//-----------------------------------------------------------------
					if ( pFrom.getTrim() == "" && pTo.getTrim() == "" ) return false;
					
					//--------------------------
					pFrom = pFrom.toUpperCase();
					pTo   = pTo.toUpperCase();
					
					//---------------------------
					if (pFrom.getTrim() == "") {
						
						//---------------------
						if (pTo.isNumber()) {
							iFrom = 1;
							iStartNo = 1;
							
						} else {
							iFrom = 1;
							iStartNo = 65;		// A로 고정
							bCharState = true;
						}
						
					} else if (pFrom.isNumber()) {
						iFrom = Number(pFrom);
						iStartNo = iFrom;
						
					} else {
						iFrom      = Number(pFrom.charCodeAt(0)) - 64;
						iStartNo   = Number(pFrom.charCodeAt(0));
						bCharState = true;
					}
					
					//------------------------
					if (pTo.getTrim() == "") {
						iTo = 0;
						
					} else if (pTo.isNumber()) {
						iTo = Number(pTo);
						
					} else {
						iTo = Number(pTo.charCodeAt(0)) - 64;
					}
					
					//--------------------------
					iCsteNo = (iTo - iFrom) + 1;
					
					//--------------------------------------------------
					for (var iRowNo = 0; iRowNo < iCsteNo; iRowNo++) {
						
						//-----------------------
						grd_isscstelist.addRow();
						iCurCnt = getNodesetCount(sDescNode);
						
						//-------------------------------------------------------------------------
						iMaxCsteNo = Number(model.getValue(sSrcNode+"[" + pRowNo + "]/curcsteno"));
						
						//---------------------------------------------------------------------
						model.makeValue(sDescNode+"[" + iCurCnt + "]/choi",            "true");
						model.makeValue(sDescNode+"[" + iCurCnt + "]/instcd",          model.getValue(sSrcNode+"[" + pRowNo + "]/instcd"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/ptno",            model.getValue(sSrcNode+"[" + pRowNo + "]/ptno"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/dispptno",        model.getValue(sSrcNode+"[" + pRowNo + "]/dispptno"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/spcacptdd",       model.getValue(sSrcNode+"[" + pRowNo + "]/spcacptdd"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/spcacptno",       model.getValue(sSrcNode+"[" + pRowNo + "]/spcacptno"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/spcacptseqno",    model.getValue(sSrcNode+"[" + pRowNo + "]/spcacptseqno"));
						
						if ( bCharState ) {
							model.makeValue(sDescNode+"[" + iCurCnt + "]/cstecnts",    pFixChar + String.fromCharCode(iStartNo + iRowNo) );
						} else {
							model.makeValue(sDescNode+"[" + iCurCnt + "]/cstecnts",    pFixChar + (iStartNo + iRowNo).toString() );
						}
						
						model.makeValue(sSrcNode+"[" + pRowNo + "]/curcsteno",         (iMaxCsteNo + 1).toString().getLeftPad(3, "0") );
						model.makeValue(sDescNode+"[" + iCurCnt + "]/csteno",          (iMaxCsteNo + 1).toString().getLeftPad(3, "0") );
						
						model.makeValue(sDescNode+"[" + iCurCnt + "]/cstekindcd",      "1001");
						model.makeValue(sDescNode+"[" + iCurCnt + "]/tisscnt",         "1");
						model.makeValue(sDescNode+"[" + iCurCnt + "]/hoppno",          model.getValue(sSrcNode+"[" + pRowNo + "]/hopper"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/maxcsteno",       model.getValue(sSrcNode+"[" + pRowNo + "]/maxcsteno"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/scrno",           "10");
						model.makeValue(sDescNode+"[" + iCurCnt + "]/acptdd",          model.getValue(sSrcNode+"[" + pRowNo + "]/acptdd"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/acptno",          model.getValue(sSrcNode+"[" + pRowNo + "]/acptno"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/testcd",          "-");
						model.makeValue(sDescNode+"[" + iCurCnt + "]/acptitemno",      "0");
						model.makeValue(sDescNode+"[" + iCurCnt + "]/slidno",          "000");
						model.makeValue(sDescNode+"[" + iCurCnt + "]/spccd",           model.getValue(sSrcNode+"[" + pRowNo + "]/spccd"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/spchistno",       model.getValue(sSrcNode+"[" + pRowNo + "]/spchistno"));
						model.makeValue(sDescNode+"[" + iCurCnt + "]/statsinclflagcd", "0");
					}
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2010.12.07 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 블럭 생성정보 전달 처리 Function
				*/
				function fExeInfoSend() {
					
					var sFixChar = "";
					var sTemp1 = "";
					var sTemp2 = "";
					
					//-------------------------------------------------
					var sSrcNode  = "/root/main/acptptno/acptptnolist";
					var sDescNode = "/root/main/isscste/isscstelist";
					
					
					//------------------------------------------------------------------
					for (var iRowNo=1; iRowNo <= getNodesetCount(sSrcNode); iRowNo++) {

						//-------------------------------------------------------------
						if (model.getValue(sSrcNode+"["+iRowNo+"]/choi") == "true") {
							
							//---------------------------------------------------------
							sFixChar = model.getValue(sSrcNode+"["+iRowNo+"]/fixchar");
							sFixChar = sFixChar.getTrim().toUpperCase();

							//------------------------------------------------------
							sTemp1 = model.getValue(sSrcNode+"["+iRowNo+"]/from11");			// Case1 처리
							sTemp2 = model.getValue(sSrcNode+"["+iRowNo+"]/from12");

							//---------------------------------------
							fExeCalcCste("", sTemp1, sTemp2, iRowNo);


							//------------------------------------------------------
							sTemp1 = model.getValue(sSrcNode+"["+iRowNo+"]/from21");			// Case2 처리
							sTemp2 = model.getValue(sSrcNode+"["+iRowNo+"]/from22");

							//---------------------------------------------
							fExeCalcCste(sFixChar, sTemp1, sTemp2, iRowNo);
						}
					}
					
					//--------------
					model.refresh();
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2010.12.07 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 발행 Cassette목록을 장비로 전송 Function
				*/
				function fExeSocketSend() {
					
					var sSendMsg = "";
					
					//-----------------------------------------------
					var sInfoNode = "/root/init/hospenv/hospenvinfo";
					var sCsteNode = "/root/main/isscste/isscstelist";
					//var sCsteIP   = model.getValue(sInfoNode+"/csteeqmtip");
					//var sCstePort = model.getValue(sInfoNode+"/csteeqmtport");
					var sCsteIP   = "";
					var sCstePort = "";
					
					//장비IP set
					if(sCasteSlideflag == "C") { //카세트
						for(var iRowNo = 1 ; iRowNo <= getNodesetCount("/root/main/eqinfo/caeqlist") ; iRowNo++){
							if(model.getValue("/root/init/eqseqno") == model.getValue("/root/main/eqinfo/caeqlist["+ iRowNo +"]/eqseqno")) {
								sCsteIP   = model.getValue("/root/main/eqinfo/caeqlist["+ iRowNo +"]/eqip");
								sCstePort = model.getValue("/root/main/eqinfo/caeqlist["+ iRowNo +"]/eqport");
							}
						}
					} else {            //슬라이드
						for(var iRowNo = 1 ; iRowNo <= getNodesetCount("/root/main/eqinfo/slideqlist") ; iRowNo++){
							if(model.getValue("/root/init/slideeqseqno") == model.getValue("/root/main/eqinfo/slideqlist["+ iRowNo +"]/eqseqno")) {
								sCsteIP   = model.getValue("/root/main/eqinfo/slideqlist["+ iRowNo +"]/eqip");
								sCstePort = model.getValue("/root/main/eqinfo/slideqlist["+ iRowNo +"]/eqport");
							}
						}
					}
					
					//---------------------------
					// 칠곡경북대에만 장비가 존재
					if ( getUserInfo("dutplceinstcd") == "032" ) {
						
						//------------------------------------
						if (sCsteIP == "" || sCsteIP == "-") {
							messageBox("Cassette(블럭)장비의 IP주소가 없습니다. 병원별 환경설정에서 ", "C001");
							return false;
						}
						//----------------------------------------
						if (sCstePort == "" || sCstePort == "-") {
							messageBox("Cassette(블럭)장비의 Port번호가 없습니다. 병원별 환경설정에서 ", "C001");
							return false;
						}
						
						//---------------------------------
						socket.connect(sCsteIP, sCstePort);
					}
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2010.12.07 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   :검색방법 선택 처리 Function
				*/
				function fExeRefMthdChange() {
					
					switch (model.getValue("/root/init/seameth")) {
						case "0" : model.toggle("caseptno");
						           cbo_ptnocd.visible = true;
						           break;
						case "1" : model.toggle("casepid");
						           cbo_ptnocd.visible = false;
						           break;
					}
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2008.01.03 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : Cassette 변경 처리 Function
				*/
				function fExeCsteChange() {
					
					var iNo = grd_ptnolist.row;
					var sCsteCnts = "";
					var sResnCnts = "";
					var sCsteChar = "";
					var sCsteCharNo = "";
					
					var sNode     = "/root/main/acptptno/acptptnolist";
					var sCharList = "/root/init/cstechar/cstecharlist";
					var sNoList   = "/root/init/cstecharno/cstecharnolist";
					
					var re = /([!-~]*)*/g;
				     var matchMatrix = "";
				     var bState = false;

					//-------------------------
					switch (grd_ptnolist.col) {
						case grd_ptnolist.colRef("cstecharinpt") :
						case grd_ptnolist.colRef("cstecharchoi") :
						     sCsteChar   = model.getValue(sCharList+"[no='"+model.getValue(sNode+"["+iNo+"]/cstecharchoi")+"']/cnts");
						     sCsteCharNo = model.getValue(sNoList+"[no='"+model.getValue(sNode+"["+iNo+"]/cstecharno")+"']/cnts");
						     
						     //----------------------------------
				     		matchMatrix = sCsteCharNo.match(re);

							//-------------
							bState = false;
							for(j = 0; j < (matchMatrix.length-1); j++) {
							   tmpStr = matchMatrix[j] + "";
							   tmpLen = tmpStr.length;

							   //---------------------------
							   if (tmpStr.getTrim() == "") {
								   bState = true;
								   break;
							   }
							}
								     
						     //----------------------------------------------------------
							if (model.getValue(sNode+"["+iNo+"]/cstecharchoi") == "Z") {
								if (model.getValue(sNode+"["+iNo+"]/cstecharno") == "-") {
									model.setValue(sNode+"["+iNo+"]/cstekindcd", "-");  // 수정 2008.08.26
									return false;
								} else {
									sCsteCnts = sCsteCharNo;
								}
							} else {
								if (bState) {
									sCsteCnts = sCsteCharNo;
								} else {
									sCsteCnts = sCsteChar + "." + sCsteCharNo;
								}
							}
					
							//--------------------------------------------------------------------------------------
							for (var iRowNo=1; iRowNo < getNodesetCount("/root/init/resncd/resncdlist"); iRowNo++) {
								
								sResnCnts = model.getValue("/root/init/resncd/resncdlist["+iRowNo+"]/resncnts");
								sResnCnts = sResnCnts.getTrim().replace("\n", "");
								
								if (sCsteCnts == sResnCnts) {
									model.setValue(sNode+"["+iNo+"]/cstekindcd", model.getValue("/root/init/resncd/resncdlist["+iRowNo+"]/resncd"));
									break;
								}
								//--------  수정 2008.08.26   ---------------
								//root/init/resncd/resncdlist에 일치하는 경우가 없는 경우 sNode+"["+iNo+"]/cstekindcd 초기값 set
								if((iRowNo+1) == getNodesetCount("/root/init/resncd/resncdlist")) {
									model.setValue(sNode+"["+iNo+"]/cstekindcd", "-");
								}
								//-----------------------------------------
							}
							
							break;
					}
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2008.01.11 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 등록번호 입력 처리 Function
				*/
				function fExeRefValKeyPress() {
					
					//-----------------------
					if(event.keyCode == 13) {
						model.makeValue("/root/init/refval", ipt_seaval.currentText);
						ipt_seaval.refresh();
						
						//----------------
						fGetAcptSpcList();	
					}
				}
				
				/* @group  : Cassette발행
				 * @ver    : 2008.10.22 (CMCDEV-0001)
				 * @by     : 하만석(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : Hopper 변경 일괄 처리 Function
				*/
				function fExeHopperKind() {
					
					var sNode = "/root/main/acptptno/acptptnolist"; // datagrid 설정
					
					//-----------------------------------------------------
					for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
						
						if (model.getValue(sNode+"["+iNo+"]/choi") == "true") {  // grid 에서 선택된 항목만 hopper 값 변경
							model.setValue(sNode+"["+iNo+"]/hoppno", model.getValue("/root/init/choichopperval"));
						}
					}
					
					//---------------------
					grd_ptnolist.refresh();
					
				}
				
				function fExeCsteCharChoi() {
					
					var sNode = "/root/main/acptptno/acptptnolist";
					
					//-----------------------------------------------------
					for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
						
						if (model.getValue(sNode+"["+iNo+"]/choi") == "true") {
							model.setValue(sNode+"["+iNo+"]/cstecharchoi", model.getValue("/root/init/choicstechar"));
						}
					}
					
					//---------------------
					grd_ptnolist.refresh();
				}
				
				function fExeCsteCharKind() {
					
					var sNode = "/root/main/acptptno/acptptnolist";
					
					//-----------------------------------------------------
					for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
						
						if (model.getValue(sNode+"["+iNo+"]/choi") == "true") {
							model.setValue(sNode+"["+iNo+"]/cstekindcd", model.getValue("/root/init/choicstekindcd"));
						}
					}
					
					//---------------------
					grd_ptnolist.refresh();
				}
				
				function fExeToPtNoKeyPress() {
					
					//-----------------------
					if(event.keyCode == 13) {
						model.makeValue("/root/init/toptno", ipt_toptno.currentText);
						ipt_toptno.refresh();
						
						//----------------
						fGetAcptSpcList();	
					}
				}
				
				function fExeHeaderChoi(pBizFlagCd) {
					
					var sNode = "/root/main/acptptno/acptptnolist";

					//--------------
					// 전체선택 처리
					if (grd_ptnolist.row == 0 && grd_ptnolist.col == 0) {

						//-----------------------------------------------------
						for (var iNo=1; iNo <= getNodesetCount(sNode); iNo++) {
							
							if (pBizFlagCd == "S") {
								model.setValue(sNode+"["+iNo+"]/choi", "true");
							} else {
								model.setValue(sNode+"["+iNo+"]/choi", "false");
							}
						}
					}
					
					//---------------------
					grd_ptnolist.refresh();
				}
				
				function fPrtnSlide() {
					
					//카세트 출력이 완료 되었는지 확인 후 슬라이드 출력.
					if(sEqFinish == "Y") {
						sCasteSlideflag = "S";
						fExeSocketSend();
						sEqFinish = "N";
						window.clearinterval(interval_id);
					}
				}

				function fExeIssInitialize() {
					
					//-------------------------------------------------
					var sSrcNode  = "/root/main/acptptno/acptptnolist";
					var sCsteNode = "/root/main/isscste/isscstelist";
					
					//-----------------------------
					model.removeNodeset(sCsteNode);
					
					//------------------------------------------------------------------
					for (var iRowNo=1; iRowNo <= getNodesetCount(sSrcNode); iRowNo++) {
						model.makeValue(sSrcNode+"["+iRowNo+"]/curcsteno", model.getValue(sSrcNode+"["+iRowNo+"]/maxcsteno"));
					}
					
					//--------------
					model.refresh();
				}
				
				/* @group  : Cassette일괄출력
				 * @ver    : 2007.05.24 (CMCDEV-0001)
				 * @by     : 유동철(ACK)
				 * @-----------------------------------
				 * @type   : function
				 * @access : public
				 * @desc   : 블럭 생성정보 전달 처리 Function
				*/
				function fExeCsteIssDel(pBizFlagCd) {
					
					//--------------------------------
					model.removeNodeset("/root/send");
					
					//--------------------------------
					//카세트 삭제
					if(pBizFlagCd == "DELETE") {
						// Continue
						
					} else {
						
						if(getNodesetCount("/root/main/isscste/isscstelist") < 1) {
							messageBox("Cassette 발행 목록을 입력", "I008");
							return;
						}
						
						//----------------------------
						grd_isscstelist.clearStatus();
						
						//----------------------------------------------------------------------------------------
						for (var iRowNo=1; iRowNo <= getNodesetCount("/root/main/isscste/isscstelist"); iRowNo++) {
							if (model.getValue("/root/main/isscste/isscstelist[" + iRowNo + "]/choi") == "true") {
								model.makeValue("/root/main/isscste/isscstelist[" + iRowNo + "]/bizflagcd",       pBizFlagCd);
								model.makeValue("/root/main/isscste/isscstelist[" + iRowNo + "]/scrno",           "10");
								model.makeValue("/root/main/isscste/isscstelist[" + iRowNo + "]/statsinclflagcd", "0");
								model.makeValue("/root/main/isscste/isscstelist[" + iRowNo + "]/slideflag",       model.getValue("/root/init/slideflag")); //슬라이드 출력여부
								grd_isscstelist.addStatus(iRowNo, "insert");
							}
						}
						
						//-------------------------------------------------------------------------
						model.makeValue("/root/send/isscstelist", grd_isscstelist.getUpdateData());
						if (submit("TXLPB00201")) {
							//messageBox("Cassette(블럭) 발행이 ", "I002");
							
							//--------------------------------
							// Cassette Labeler 장비 Interface
							if (pBizFlagCd == "C") {
								
								sEqFinish = "N";
								
								sCasteSlideflag = "C";
								fExeSocketSend();
								
								//슬라이드도 동시에 출력
								if(model.getValue("/root/init/slideflag") == "Y") {
									interval_id = window.setinterval("fPrtnSlide()", 1000);
								}
								
							}
							
							//------------------------------------
							//  Cassette(블럭) 생성 후 자료 초기화
							model.removeNodeset("/root/main/isscste/isscstelist");
							fGetAcptSpcList();
						}
					}
				}
			]]>
		</script>
	</xhtml:head>
	<xhtml:body guideline="1,1195;" style="margin-left:8; margin-top:0; margin-right:8; margin-bottom:0; ">
		<group id="grp_tle" style="left:0px; top:0px; width:1195px; height:13px; ">
			<caption id="caption6" class="tit_1" style="left:0px; top:0px; width:150px; height:14px; ">Cassette발행</caption>
		</group>
		<group id="grp_biz" scroll="auto" style="left:0px; top:40; width:1195px; height:744px; ">
			<group id="grp_sea" style="left:0px; top:10px; width:1194px; height:35px; vertical-align:top; ">
				<shape id="roundrect1" class="roundrect_search" appearance="roundrect" ellipsewidth="10" ellipseheight="10" style="left:0px; top:0px; width:1194px; height:35px; background-color:#fffbf2; border-color:#ffd799; "/>
				<caption id="caption2" class="search_name" style="left:797; top:9px; width:86px; height:17px; ">접수일자 :</caption>
				<caption id="caption5" class="search_no_b" style="left:983; top:10px; width:12px; height:17px; ">~</caption>
				<line id="line13" class="line_4" style="x1:1107px; y1:7px; x2:1107px; y2:29px; "/>
				<input id="ipt_acptddfrom" ref="/root/init/acptfromdd" class="input_s_essential" navindex="7" inputtype="date" format="yyyy-mm-dd" mask="exclude" showmask="true" style="left:886; top:8px; width:94px; height:19px; ">
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
							lpzfExeDateChange(ipt_fromyear, "/root/init/acptfromdd", "/root/init/fromyear");
						]]>
					</script>
				</input>
				<input id="ipt_acptddto" ref="/root/init/acpttodd" class="input_s_essential" navindex="8" inputtype="date" format="yyyy-mm-dd" mask="exclude" showmask="true" style="left:998; top:8px; width:94px; height:19px; ">
					<script type="javascript" ev:event="xforms-value-changed">
						<![CDATA[
							lpzfExeDateChange(ipt_toyear, "/root/init/acpttodd", "/root/init/toyear");
						]]>
					</script>
				</input>
				<caption id="caption1" class="search_name" style="left:535px; top:9px; width:86px; height:17px; ">등록번호 :</caption>
				<button id="btn_sea" accesskey="f4" class="btn1_letter2" navindex="9" style="left:1123px; top:7px; width:56px; height:22px; ">
					<caption>조회</caption>
					<script type="javascript" ev:event="DOMActivate">
						<![CDATA[
							fGetAcptSpcList();				
						]]>
					</script>
				</button>
				<select1 id="cbo_ptnocd" ref="/root/init/ptnocode" navindex="1" appearance="minimal" editmode="search" style="left:109px; top:8px; width:151px; height:19px; ">
					<choices>
						<itemset nodeset="/root/init/ptnocd/ptnocdlist">
							<label ref="ptnonm"/>
							<value ref="ptnocd"/>
						</itemset>
					</choices>
				</select1>
				<input id="ipt_fromptno" ref="/root/init/fromptno" class="text_center" navindex="3" maxlength="6" style="left:293px; top:8px; width:50px; height:19px; "/>
				<caption id="caption9" class="search_name" style="left:15px; top:9px; width:90px; height:17px; ">병리번호 :</caption>
				<caption id="caption10" class="search_no_b" style="left:346px; top:8px; width:12px; height:17px; ">~</caption>
				<input id="ipt_fromyear" ref="/root/init/fromyear" class="text_center" navindex="2" maxlength="2" style="left:263px; top:8px; width:27px; height:19px; "/>
				<input id="ipt_seaval" ref="/root/init/seaval" class="input_search" navindex="6" style="left:624px; top:8px; width:93px; height:19px; ">
					<script type="javascript" ev:event="onkeypress">
						<![CDATA[
							fExeRefValKeyPress();				
						]]>
					</script>
				</input>
				<input id="ipt_toyear" ref="/root/init/toyear" class="text_center" navindex="4" maxlength="2" style="left:361px; top:8px; width:27px; height:19px; "/>
				<input id="ipt_toptno" ref="/root/init/toptno" class="text_center" navindex="5" maxlength="6" style="left:391px; top:8px; width:50px; height:19px; ">
					<script type="javascript" ev:event="onkeypress">
						<![CDATA[
							fExeToPtNoKeyPress();					
						]]>
					</script>
				</input>
			</group>
			<line id="line1" class="line_1" style="x1:0px; y1:69px; x2:715px; y2:69px; "/>
			<caption id="caption3" class="tit_2" style="left:5px; top:54px; width:139px; height:14px; ">병리번호 목록</caption>
			<datagrid id="grd_ptnolist" nodeset="/root/main/acptptno/acptptnolist" class="datagrid2" caption="선&#xA;택^기관코드^ptno^병리번호^acptdd^acptno^spcacptdd^spcacptno^검체번호^spccd^검체명^Case1^Case1^Case2^Case2^Case2^Hopper^spchistno^maxcsteno" colsep="^" colwidth="40, 0, 0, 90, 0, 0, 0, 0, 60, 0, 136, 60, 60, 60, 60, 60, 60, 0, 0" explorerbar="sortshow" mergecellsfixedrows="bycolrec" rowheight="32" rowsep="|" selectionmode="free" navindex="10" style="left:0px; top:74px; width:715px; height:653; ">
				<col ref="choi" type="checkbox"/>
				<col ref="instcd"/>
				<col ref="ptno"/>
				<col ref="dispptno" style="text-align:center; "/>
				<col ref="acptdd"/>
				<col ref="acptno"/>
				<col ref="spcacptdd"/>
				<col ref="spcacptno"/>
				<col ref="spcacptseqno" style="text-align:center; "/>
				<col ref="spccd"/>
				<col ref="spcnm"/>
				<col ref="from11" type="input" style="text-align:center; "/>
				<col ref="from12" type="input" style="text-align:center; "/>
				<col ref="fixchar" type="input" style="text-align:center; "/>
				<col ref="from21" type="input" style="text-align:center; "/>
				<col ref="from22" type="input" style="text-align:center; "/>
				<col ref="hopper" type="combo">
					<choices>
						<item>
							<label>1</label>
							<value>1</value>
						</item>
						<item>
							<label>2</label>
							<value>2</value>
						</item>
						<item>
							<label>3</label>
							<value>3</value>
						</item>
						<item>
							<label>4</label>
							<value>4</value>
						</item>
						<item>
							<label>5</label>
							<value>5</value>
						</item>
						<item>
							<label>6</label>
							<value>6</value>
						</item>
					</choices>
				</col>
				<col ref="spchistno"/>
				<col ref="maxcsteno"/>
				<script type="javascript" ev:event="onaftersort">
					<![CDATA[
						grd_ptnolist.gridToInstance();		
					]]>
				</script>
			</datagrid>
			<caption id="caption7" class="tit_2" style="left:724px; top:54px; width:194px; height:14px; ">Cassette 발행 목록</caption>
			<line id="line2" class="line_1" style="x1:719px; y1:69px; x2:1194px; y2:69px; "/>
			<button id="btn_addcste" class="btn2_letter4" navindex="12" style="left:651px; top:49px; width:64px; height:19px; ">
				<caption>정보전달</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeInfoSend();		
					]]>
				</script>
			</button>
			<datagrid id="grd_isscstelist" nodeset="/root/main/isscste/isscstelist" class="datagrid2" caption="선&#xA;택^기관코드^병리번호^병리번호^검체접수일자^검체접수번호'^검체&#xA;번호^블럭&#xA;번호^블럭&#xA;종류^Cassette내용^조직&#xA;갯수^Hopper^maxcsteno^bizflagcd^scrno^acptdd^acptno^testcd^acptitemno^slidno^spccd^spchistno^statsinclflagcd^slideflag" colsep="^" colwidth="30, 0, 0, 100, 0, 0, 0, 0, 0, 242, 0, 80, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 100" dataheight="23" explorerbar="sortshow" mergecellsfixedrows="bycolrec" rowheight="32" rowsep="|" navindex="13" style="left:719px; top:74px; width:475px; height:653px; ">
				<col ref="choi" type="checkbox"/>
				<col ref="instcd"/>
				<col ref="ptno"/>
				<col class="text_center" ref="dispptno"/>
				<col ref="spcacptdd"/>
				<col ref="spcacptno"/>
				<col class="text_center" ref="spcacptseqno"/>
				<col class="text_center" ref="csteno"/>
				<col ref="cstekindcd" type="combo">
					<choices>
						<itemset nodeset="/root/init/resncd/resncdlist">
							<label ref="resncnts"/>
							<value ref="resncd"/>
						</itemset>
					</choices>
				</col>
				<col ref="cstecnts" type="input"/>
				<col class="text_center" ref="tisscnt" type="input"/>
				<col ref="hoppno" type="combo">
					<choices>
						<item>
							<label>1</label>
							<value>1</value>
						</item>
						<item>
							<label>2</label>
							<value>2</value>
						</item>
						<item>
							<label>3</label>
							<value>3</value>
						</item>
						<item>
							<label>4</label>
							<value>4</value>
						</item>
						<item>
							<label>5</label>
							<value>5</value>
						</item>
						<item>
							<label>6</label>
							<value>6</value>
						</item>
					</choices>
				</col>
				<col ref="maxcsteno"/>
				<col ref="bizflagcd"/>
				<col ref="scrno"/>
				<col ref="acptdd"/>
				<col ref="acptno"/>
				<col ref="testcd"/>
				<col ref="acptitemno"/>
				<col ref="slidno"/>
				<col ref="spccd"/>
				<col ref="spchistno"/>
				<col ref="statsinclflagcd"/>
				<col ref="slideflag" visibility="hidden"/>
				<script type="javascript" ev:event="onaftersort">
					<![CDATA[
						grd_isscstelist.gridToInstance();		
					]]>
				</script>
				<script type="javascript" ev:event="onkeyup">
					<![CDATA[
						//엔터 입력시 한줄아래 Cassette내용으로 포커스를 이동시켜준다.
						if ( (grd_isscstelist.row >= grd_isscstelist.fixedRows) && (grd_isscstelist.isCell(event.target)) && (grd_isscstelist.col == grd_isscstelist.colRef("cstecnts"))) {
							if(event.keyCode == 13) {								
								if(grd_isscstelist.row < (Number(grd_isscstelist.rows) - 1)){
									grd_isscstelist.row = Number(grd_isscstelist.row) + 1;
									grd_isscstelist.editCell();
								}
							}
						}
					]]>
				</script>
			</datagrid>
			<button id="btn_clear" class="btn2_letter3" navindex="14" style="left:1141px; top:49px; width:53px; height:19px; ">
				<caption>초기화</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeIssInitialize();
					]]>
				</script>
			</button>
			<object id="socket" clsid="{81e9de7e-90be-4958-bbda-ac731c05aba8}" visibility="hidden" style="left:600px; top:40px; width:35px; height:30px; ">
				<!-- 소켓 받은 메시지 이벤트 -->
				<script type="javascript" ev:event="OnReceive(nDataLength, szID)">
					<![CDATA[
					]]>
				</script>
				<!-- 소켓 에러 이벤트 -->
				<script type="javascript" ev:event="OnError(lError, szMsg)">
					<![CDATA[
						alert("Error code = " + lError+"\nError Message : "+szMsg);
						socket.close();					// 소켓 닫기
						isConnected = false; 			// 접속 여부 false
						sEqFinish = "Y";
					]]>
				</script>
				<!-- 소켓 연결 이벤트 -->
				<script type="javascript" ev:event="OnConnect(szID)">
					<![CDATA[
						isConnected = true; 	// 접속 여부 false
						
						if(sCasteSlideflag == "C") {
							
							//카세트 출력
							
							var sCsteNode = "/root/main/isscste/isscstelist";
						
							//------------------------------------------------------------------
							for (var iRowNo=1; iRowNo <= getNodesetCount(sCsteNode); iRowNo++) {
								
								if (model.getValue(sCsteNode+"["+iRowNo+"]/choi") == "true") {
									sSendMsg  = "";
									sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/ptno") + "▦";			// 병리번호
									sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/dispptno") + "▦";			// 표시병리번호
									sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/spcacptseqno") + "▦";		// 검체일련번호
									sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/csteno") + "▦";			// 블럭번호
									sSendMsg += "000" + "▦";											// 슬라이드번호
									sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/cstecnts") + "▦";			// 블럭내용
									sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/hoppno") + "▦";			// Hopper번호
									sSendMsg += "C" + "▩";
									
									socket.sendString(sSendMsg);											// 전송한다.
								}
							}
							
							//----------------------------------------------------
							model.removeNodeset(sCsteNode);
							grd_isscstelist.refresh();
							
						} else {
							
							var sCsteNode = "/root/main/slideinfo/slidelist";
							var iMaxRowCnt = getNodesetCount(sCsteNode);
						
							//------------------------------------------------------------------
							for (var iRowNo=1 ; iRowNo <= iMaxRowCnt ; iRowNo++) {
								sSendMsg  = "";
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/ptno") + "▦";				// 병리번호
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/dispptno") + "▦";			// 표시병리번호
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/spcacptseqno") + "▦";		// 검체일련번호
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/csteno") + "▦";		   		// 블럭
								sSendMsg += "001" + "▦";														// 슬라이드번호
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/prtnblocnm") + "▦";	        // 블럭내용
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/cstecnts") + "▦";	  	
								
								//------------------
								// 전송종료여부 설정
								if (iRowNo == iMaxRowCnt) {
									sSendMsg += "Y" + "▦";
								} else {
									sSendMsg += "N" + "▦";
								}
						
								//--------------------------------------------------------------
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/pid") + "▦";				// 환자번호
								sSendMsg += model.getValue(sCsteNode+"["+iRowNo+"]/hngnm") + "▦";				// 환자명
								
								sSendMsg += "-" + "▩";
								
								socket.sendString(sSendMsg);											// 전송한다.
							}
							
							//----------------------------------------------------
							model.removeNodeset(sCsteNode);
							
						}
						
						//----------
						// 소켓 닫기
						socket.close();	
						isConnected = false; 	// 접속 여부 false
						sEqFinish = "Y";
					]]>
				</script>
				<!-- 소켓 close 이벤트 -->
				<script type="javascript" ev:event="OnClose(szID)">
					<![CDATA[
						isConnected = false;	// 접속 여부 false
						sEqFinish = "Y";
					]]>
				</script>
			</object>
			<select1 id="cmb_cstechar" ref="/root/init/choicstechar" navindex="11" visibility="hidden" appearance="minimal" style="left:310px; top:49px; width:70px; height:19px; ">
				<choices>
					<itemset nodeset="/root/init/cstechar/cstecharlist">
						<label ref="cnts"/>
						<value ref="no"/>
					</itemset>
				</choices>
				<script type="javascript" ev:event="xforms-value-changed">
					<![CDATA[
						fExeCsteCharChoi();		
					]]>
				</script>
			</select1>
			<select1 id="cmb_hopkind" ref="/root/init/choichopperval" appearance="minimal" style="left:452px; top:49px; width:60px; height:19px; ">
				<choices>
					<item>
						<label>1</label>
						<value>1</value>
					</item>
					<item>
						<label>2</label>
						<value>2</value>
					</item>
					<item>
						<label>3</label>
						<value>3</value>
					</item>
					<item>
						<label>4</label>
						<value>4</value>
					</item>
					<item>
						<label>5</label>
						<value>5</value>
					</item>
					<item>
						<label>6</label>
						<value>6</value>
					</item>
				</choices>
				<script type="javascript" ev:event="xforms-value-changed">
					<![CDATA[
						fExeHopperKind();
					]]>
				</script>
			</select1>
			<select1 id="cmb_cstekind" ref="/root/init/choicstekindcd" appearance="minimal" style="left:381px; top:49px; width:70px; height:19px; ">
				<choices>
					<itemset nodeset="/root/init/resncd/resncdlist">
						<label ref="resncnts"/>
						<value ref="resncd"/>
					</itemset>
				</choices>
				<script type="javascript" ev:event="xforms-value-changed">
					<![CDATA[
						fExeCsteCharKind();		
					]]>
				</script>
			</select1>
			<caption id="caption4" class="cell_1" style="left:937px; top:49px; width:65px; height:19px; text-align:left; vertical-align:middle; padding-left:10px; ">출력장비</caption>
			<select1 id="cmb_slideqlist" ref="/root/init/eqseqno" appearance="minimal" style="left:1004px; top:49px; width:134px; height:19px; ">
				<choices>
					<itemset nodeset="/root/main/eqinfo/caeqlist">
						<label ref="eqnm"/>
						<value ref="eqseqno"/>
					</itemset>
				</choices>
			</select1>
			<datagrid id="datagrid1" nodeset="/root/main/slideinfo/slidelist" visibility="hidden" caption="instcd^ptno^spcacptdd^spcacptno^spcacptseqno^csteno^bloccnts^prntcsscnts^slidno^cstekindcd^cstecnts^workattr^prntcsscnts^cstecnts^ipttype^maxcsteno^bizflagcd^acptdd^acptno^testcd^acptitemno^scrno^spccd^spchistno^statsinclflagcd^relaptno^bloccnts^reladispptno^workflagcd^dispptno^prtnblocnm" colsep="^" colwidth="100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100, 100" mergecellsfixedrows="bycolrec" rowsep="|" style="left:200px; top:375px; width:890px; height:240px; ">
				<col ref="instcd"/>
				<col ref="ptno"/>
				<col ref="spcacptdd"/>
				<col ref="spcacptno"/>
				<col ref="spcacptseqno"/>
				<col ref="csteno"/>
				<col ref="bloccnts"/>
				<col ref="prntcsscnts"/>
				<col ref="slidno"/>
				<col ref="cstekindcd"/>
				<col ref="cstecnts"/>
				<col ref="workattr"/>
				<col ref="prntcsscnts"/>
				<col ref="cstecnts"/>
				<col ref="ipttype"/>
				<col ref="maxcsteno"/>
				<col ref="bizflagcd"/>
				<col ref="acptdd"/>
				<col ref="acptno"/>
				<col ref="testcd"/>
				<col ref="acptitemno"/>
				<col ref="scrno"/>
				<col ref="spccd"/>
				<col ref="spchistno"/>
				<col ref="statsinclflagcd"/>
				<col ref="relaptno"/>
				<col ref="bloccnts"/>
				<col ref="reladispptno"/>
				<col ref="workflagcd"/>
				<col ref="dispptno"/>
				<col ref="prtnblocnm"/>
			</datagrid>
		</group>
		<group id="grp_btn" style="left:0px; top:13; width:1195px; height:27px; ">
			<line id="line17" class="line_6" style="x1:0px; y1:25; x2:1194px; y2:25; "/>
			<button id="btn_create" accesskey="f2" class="btn4_letter2" navindex="16" style="left:1137px; top:3px; width:56px; height:22px; ">
				<caption>발행</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeCsteIssDel("C");		
					]]>
				</script>
			</button>
			<caption id="cap_slide" style="left:951px; top:6px; width:124px; height:15px; ">슬라이드동시발행여부</caption>
			<bool id="bol_slideflag" checkvalue="Y,N" ref="/root/init/slideflag" style="left:930px; top:4px; width:30px; height:20px; ">
				<script type="javascript" ev:event="xforms-value-changed">
					<![CDATA[
						if(model.getValue("/root/init/slideflag") == "Y") {
							cap_slid.visible = true;
							cmb_slid.visible = true;
						} else {
							cap_slid.visible = false;
							cmb_slid.visible = false;
						}
						
						cap_slid.refresh();
						cmb_slid.refresh();
					]]>
				</script>
			</bool>
			<caption id="cap_slid" class="cell_1" visibility="hidden" style="left:723px; top:4px; width:65px; height:19px; text-align:left; vertical-align:middle; padding-left:10px; ">출력장비</caption>
			<select1 id="cmb_slid" ref="/root/init/slideeqseqno" visibility="hidden" appearance="minimal" style="left:790px; top:4px; width:134px; height:19px; ">
				<choices>
					<itemset nodeset="/root/main/eqinfo/slideqlist">
						<label ref="eqnm"/>
						<value ref="eqseqno"/>
					</itemset>
				</choices>
			</select1>
		</group>
	</xhtml:body>
</xhtml:html>