YNU_JEUS/app_home/himed/webapps/lis/donmngtweb/xrw/SMLBD01300_공여자처방입력.xrw

<?xml version="1.0" encoding="EUC-KR"?>
<!--
	* 제    목		: SMLBD01300_공여자처방입력.xrw
	* 설    명		: 공여자처방입력
	* 설 계 자	: (주)에이씨케이 - 
	* 작 성 자	: (주)에이씨케이 -  박정은
	* 작 성 일	: 2007.11.09
	* 수정이력	: 2007.11.09 박정은   2008.01.13
	* 기    타	: 
-->
<?xml-stylesheet type="text/css" href="../../../com/commonweb/css/common.css" ?>
<xhtml:html xmlns:xhtml="http://www.w3.org/1999/xhtml" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns="http://www.w3.org/2002/01/xforms" xmlns:ev="http://www.w3.org/2001/xml-events">
	<xhtml:head>
		<xhtml:title>공여자처방입력</xhtml:title>
		<model id="model1">
			<instance id="instance1">
				<root xmlns="">
					<main>
						<patinfo>
							<tnsrnm/>
							<tnsrgstno/>
							<tnssexage/>
							<btype/>
							<ordtype/>
							<orddd/>
							<cretno/>
							<instcd/>
							<acptseqno/>
							<orgorddd/>
							<tnsrpid/>
							<ordtypenm/>
						</patinfo>
						<dnor>
							<dnorlist>
								<dnorno/>
								<dnornm/>
								<dnorrgstno/>
								<dnorseqno/>
								<dsexage/>
							</dnorlist>
							<dnorprcplist>
								<chk/>
								<prcpdd/>
								<tclscd/>
								<tclsnm/>
								<bcolldt/>
								<bcnoyn/>
								<execprcpuniqno/>
								<prcpseq/>
								<dnornm/>
								<dsexage/>
								<payyn/>
							</dnorprcplist>
						</dnor>
						<prcpcdlist>
							<chk/>
							<tclscd/>
							<tclsnm/>
							<spccd/>
						</prcpcdlist>
						<barcdprntsetup>
						</barcdprntsetup>
						<barcodeinfo/>
					</main>
					<send>
						<pid/>
						<tclscdlist/>
						<spccdlist/>
						<dnorno/>
						<dnorseqno/>
						<scrnid/>
						<prcpdd/>
						<prcpcd/>
						<execprcpuniqno/>
						<codeflag/>
						<basecdid/>
						<prcplist/>
						<data1/>
						<data2/>
						<natno/>
						<ordtype/>
						<prcpflaglist/>
					</send>
					<init/>
					<hidden>
						<pid/>
						<cancelinfo>
							<resndesc/>
							<resncd/>
							<resncdkind>01</resncdkind>
						</cancelinfo>
						<natno/>
						<patinfolist/>
						<ord>
							<orddrid/>
						</ord>
						<otpt>
							<otptyn/>
						</otpt>
					</hidden>
				</root>
			</instance>
			<script type="javascript" ev:event="xforms-ready">
				<![CDATA[
				
					// 처방코드목록 조회
					//fGetPrcpCdList();
					// 'LBD100', 'LBR001', 'LHR001', 'LCR118', 'LCR119'
					// 초기정보 조회
					model.setValue("/root/send/codeflag", "0118|");   // 0118= 
					model.setValue("/root/send/basecdid", "LB001"); // LB001 =  공여자처방이가능한목록
					submit("TRLZZ00101");
					//model.copyNode("/root/main/prcpcdlist", "/root/init/LB0118");
					var count  = getNodesetCount("/root/init/LB0118");
					
					for(i=1; i<= count ; i++){
						model.makeValue("/root/main/prcpcdlist["+i+"]/chk", "");
						model.makeValue("/root/main/prcpcdlist["+i+"]/tclscd", model.getValue("/root/init/LB0118["+i+"]/cd"));
						model.makeValue("/root/main/prcpcdlist["+i+"]/tclsnm", model.getValue("/root/init/LB0118["+i+"]/nm"));
						model.makeValue("/root/main/prcpcdlist["+i+"]/spccd", model.getValue("/root/init/LB0118["+i+"]/etc01"));
						model.makeValue("/root/main/prcpcdlist["+i+"]/prcpflag", model.getValue("/root/init/LB0118["+i+"]/etc04"));		//basecddesc 사전, 사후검사 구분용 1: 사전, 2: 사후검사
					
					}
					
					model.removeNodeset("/root/main/dnor/dnorprcplist");
					grd_dnorprcplist.rebuild();
					model.removeNodeset("/root/main/dnor/dnorlist");
					grd_dnorlist.rebuild();
					
					// 바코드정보조회
					fGetBarcdInfo();
					//lzzfMakeBrcdPrntObj("CommAX");  
					lzzfMakeBrcdPrntObjHanDo("CommAX");
					
					grd_prcpcdlist.fixedcellcheckbox(0,1)=true;
					grd_dnorprcplist.fixedcellcheckbox(0,1)=true;
					
					if(getPatientInfo("pid") != ""){
						model.setValue("/root/hidden/pid", getPatientInfo("pid"));	
						ipt_pid.refresh();
					}else{
						model.setFocus("ipt_pid");	
					}
					
					if(model.getValue("/root/hidden/pid") != ""){
						fGetPatinfo("N");	
					}
				]]>
			</script>
			<script type="javascript" src="../../../com/commonweb/js/common.js"/>
			<script type="javascript" src="../../../com/commonweb/js/tfHelper.js"/>
			<script type="javascript" src="../../../lis/commonweb/js/LLZ001.js"/>
			<script type="javascript" src="../../../lis/commonweb/js/LZZ001.js"/>
			<script type="javascript" src="../../../lis/commonweb/js/LPZ001.js"/>
			<script type="javascript" src="../../../com/commonweb/js/stringHelper.js"/>
			<script type="javascript" src="../../../com/commonweb/js/dateHelper.js"/>
			<submission id="TRLZZ00101" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/LB0118"/>
			<submission id="TRLBD01301" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/patinfo"/>
			<submission id="TRLBD01302" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/dnor"/>
			<submission id="TRLBD01303" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/prcpcdlist"/>
			<submission id="TXLBD01301" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/dnor"/>
			<submission id="TRLBD01304" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/dnor/dnorprcplist"/>
			<!-- 프린터 설정-->
			<submission id="TRLLC90101" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/barcdprntsetup"/>
			<submission id="TXLBD01302" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/dnor"/>
			<submission id="TXLBD01303" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance"/>
			<submission id="TRLBD01305" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/main/barcodeinfo"/>
			<submission id="TXLLC90401" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance"/>
			<submission id="TXLBD01304" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance"/>
			<submission id="TXLBD01305" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance"/>
			<submission id="TRLBD01306" mediatype="application/x-www-form-urlencoded" method="post" ref="/root/send" replace="instance" resultref="/root/hidden/ord"/>
		</model>
		<script type="javascript">
			<![CDATA[

				// 초기화
				function fSetInit(){
					
					model.removeNodeset("/root/main/patinfo");	
					model.removeNodeset("/root/main/dnor");
					model.resetInstanceNode("/root/main/patinfo");
					model.setValue("/root/hidden/pid","");
					model.resetInstanceNode("/root/send");
					grd_dnorlist.rebuild();
					grd_prcpcdlist.rebuild();
					grd_dnorprcplist.rebuild();
					model.refresh();
				}  // 사용
				
				// 바코드정보조회
				function fGetBarcdInfo(){
					model.setValue("/root/send/scrnid", getScreenID());
					submit("TRLLC90101");
					
				}
				// 엔터키 이벤트 
				function fKeyEvent(){
				
					if(event.keyCode == "13"){
						
						if(event.target=="ipt_pid"){
							model.setValue("/root/hidden/pid",  (ipt_pid.currentText).toUpperCase());	
							// 환자정보 조회 
							fGetPatinfo("Y");
							ipt_pid.selBegin = 0;
							ipt_pid.selEnd = ipt_pid.currentText.length;
						}
					}		
				}
				
				
				// 환자정보조회
				function fGetPatinfo(topyn){
					model.removeNodeset("/root/main/patinfo");
					model.removeNodeset("/root/main/dnor/dnorlist");
					
					model.setValue("/root/send/pid", model.getValue("/root/hidden/pid"));
					submit("TRLBD01301");
					
					/*if(model.getValue("/root/main/patinfo/ordtype")=="O"){
						if(model.getValue("/root/main/patinfo/orddd") != getCurrentDate()){
							delPatientInfos();
							alert("접수정보가 없습니다. 외래등록을 하십시오.");
							return;	
						}
					}*/
					
					if(topyn == "Y"){
						fSetTopInfo();
					}
					//if(model.getValue("/root/main/patinfo/tnsrnm")==""){
					//	messageBox("공여자 등록이 안되어있습니다. 공여자 처방 등록 " , "E001", "");  //할 수 없습니다.
					//	return;
					//}
					
					// 공여자목록 조회
					fGetDnorPrcpList();
					
				}
				
				// 공여자목록, 처방코드목록, 처방내역   조회
				function fGetDnorPrcpList(){
					//grd_dnorlist.rebuildStyle();
					
					model.setValue("/root/send/pid", model.getValue("/root/hidden/pid"));
					submit("TRLBD01302");
					
					if(grd_dnorlist.rows < 2){
						messageBox("공여자 등록이 안되어있습니다. 공여자 처방 등록 " , "E001", "");  //할 수 없습니다.
						return;	
					}else{
						grd_dnorlist.row = 1;
						fGetPrcpList();
					}	
				}
				
				
			
				// 처방코드목록조회
				function fGetPrcpCdList(){
					
					submit("TRLBD01303");	
					
				}
					
					
				// 환자정보검색 팝업 띄우기
				function fGetPatInfoPopUp(){
					modal("SPLBD91300", "", "", "","", "", "");
					model.setValue("/root/hidden/pid", model.getValue("/root/hidden/patinfolist/tnsrpid"));
					fGetPatinfo("Y");	
				}	
				
				// 처방코드 선택 
				function fSetPrcpcdSelect(ref){
					if(ref == "dd"){ // 더블클릭시 
						model.setValue("/root/main/prcpcdlist["+ grd_prcpcdlist.row +"]/chk", "Y");		
					}
					
					var pcnt = 1; 
					for(i=1; i<grd_prcpcdlist.rows; i++ ){
						if(model.getValue("/root/main/prcpcdlist["+i+"]/chk")=="Y"){
							model.makeValue("/root/main/dnor/dnorprcplist["+ pcnt +"]/tclscd", model.getValue("/root/main/prcpcdlist["+i+"]/tclscd"));	
							model.makeValue("/root/main/dnor/dnorprcplist["+ pcnt +"]/tclsnm", model.getValue("/root/main/prcpcdlist["+i+"]/tclsnm"));	
							
							pcnt ++; 
						}	
					}
					grd_dnorprcplist.rebuild();
						
				}
						
				// 처방저장(추가처방)		
				function fExeDnorPrcp(){
					
					if(model.getValue("/root/main/patinfo/ordtype")=="O"){
						if(model.getValue("/root/main/patinfo/orddd") != getCurrentDate()){
							//delPatientInfos();
							alert("접수정보가 없습니다. 외래등록을 하십시오.");
							return;	
						}
					}
					
					if(grd_dnorlist.row < 1){
						messageBox("공여자를 ", "C002"); // 선택하십시오.
						return;
					}
					var prcprow = grd_dnorlist.row;
					
					var tclscdlist = "";
					var spccdlist = "";
					var prcpflag = "";	//추가 20090609
					
					for(i=1; i<grd_prcpcdlist.rows; i++ ){
						if(model.getValue("/root/main/prcpcdlist["+i+"]/chk")=="Y"){
							tclscdlist = tclscdlist + model.getValue("/root/main/prcpcdlist["+i+"]/tclscd") + "▦";
							spccdlist = spccdlist + model.getValue("/root/main/prcpcdlist["+i+"]/spccd") + "▦";
							prcpflag = prcpflag + model.getValue("/root/main/prcpcdlist["+i+"]/prcpflag") + "▦";		//추가 20090609
							
							// NAT 처방낼때 nat번호 입력창 띄우기
							if(model.getValue("/root/main/prcpcdlist["+i+"]/tclscd")=="LBD101"){
								//alert("Nat입력");	
								model.makeNode("root/hidden/natno");
								modal("SPLBD91301", "", "", "","", "", "");
								if(model.getValue("/root/hidden/natno/btn") == "cancel"){	//Nat입력 팝업에서 취소버튼 눌렀을때 저장 중지!! _20090209추가
									return;
								}
							}
						}
					}
					
					if(tclscdlist == ""){
						messageBox("처방코드를 ", "C002"); // 선택하십시오.
						return;
					} 
					
					//alert("tclscdlist= " +tclscdlist);
					model.setValue("/root/send/pid", model.getValue("/root/hidden/pid"));
					model.setValue("/root/send/tclscdlist", tclscdlist);  // tclscd▦tclscd▦
					model.setValue("/root/send/spccdlist", spccdlist);  // spccd▦spccd▦
					model.setValue("/root/send/prcpflaglist", prcpflag);  // prcpflag▦prcpflag▦
					model.setValue("/root/send/dnorno",      model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorno"));
					model.setValue("/root/send/dnorseqno", model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorseqno"));
					model.setValue("/root/send/natno",      model.getValue("/root/hidden/natno/natno"));
					
					if(submit("TXLBD01301")){
							
						//fLisSpcBarcodePrint("/root/main/barcodeinfo");
						grd_prcpcdlist.fixedcellischeck(0,1) = false;
						grd_dnorprcplist.fixedcellischeck(0,1) = false;
						
						fGetPatinfo("Y");
						
						if(grd_dnorlist.rows > 1){
							//grd_dnorlist.row = 1;
							fGetPrcpList();	
						}
						
						
						grd_dnorlist.row = prcprow;
						fGetPrcpList();
					}
					
				}
				
				//NAT 번호입력
				function fSetNATNoRgst(){
					if(grd_dnorlist.row < 1){
						messageBox("공여자를 ", "C002"); // 선택하십시오.
						return;
					}
					
					
					if(grd_dnorprcplist.row < 1){
						messageBox("처방내역을 ", "C002"); // 선택하십시오.
						return;
					}
					
					
					model.makeNode("root/hidden/natno");
					modal("SPLBD91301", "", "", "","", "", "");
					
					if(model.getValue("root/hidden/natno/btn")=="cancel"){
						//alert("aa");
						return;	
					}
					
					model.setValue("/root/send/pid",                    model.getValue("/root/hidden/pid"));
					model.setValue("/root/send/dnorno",              model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorno"));
					model.setValue("/root/send/dnorseqno",         model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorseqno"));
					model.setValue("/root/send/prcpdd",              model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/prcpdd"));
					model.setValue("/root/send/execprcpuniqno", model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/execprcpuniqno"));
					model.setValue("/root/send/natno",                model.getValue("root/hidden/natno/natno"));
					
					submit("TXLBD01305");
					
				}
				
				// 처방내역 리스트 조회
				function fGetPrcpList(){
					model.setValue("/root/send/pid",            model.getValue("/root/hidden/pid"));
					model.setValue("/root/send/dnorno",      model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorno"));
					model.setValue("/root/send/dnorseqno", model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorseqno"));
					submit("TRLBD01304");
					
					grd_dnorprcplist.rebuildStyle();
					
					for(i= 1; i< grd_dnorprcplist.rows; i++){
						if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/bcnoyn")=="Y"){
							grd_dnorprcplist.cellStyle("color", i, 1, i, 6) = "red";
							
						}
					}
					
				}
				
				
				//프린터 설정
				function fSetPrint() {
					var count = getNodesetCount("/root/main/barcdprntsetup/prntsetupinfo/setupinfo");
					
					if(count == 0) {
						model.makeNode("/root/main/barcdprntsetup/prntsetupinfo/setupinfo");
					}
					
					open("SPLLC90100_바코드프린터설정.xrw", "", "", "", "", "/root/main/barcdprntsetup/prntsetupinfo/setupinfo", "/root/main/barcdprntsetup/prntsetupinfo/setupinfo");
				}
				
				
				
				//바코드발행
				function fExeBcoll(){
					
					if(grd_dnorlist.row < 1){
						messageBox("공여자를 " , "C002", ""); //공여자를 선택하십시오.
						return;
					}
					
					if(model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/bcnoyn") == "Y"){
						messageBox("이미 발행되었습니다. \n바코드 발행을 " , "E001", ""); // 할 수 없습니다.
						return;
					}
					var prcprow = grd_dnorlist.row;
					
					/*if(grd_dnorprcplist.row < 1){
						messageBox("처방내역을 " , "C002", ""); //처방코드를 선택하십시오.
						return;
					}
					*/
					
					model.setValue("/root/send/pid",                   model.getValue("/root/hidden/pid"));
					model.setValue("/root/send/prcpdd",              model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/prcpdd"));
					model.setValue("/root/send/prcpcd",              model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/tclscd"));
					model.setValue("/root/send/execprcpuniqno", model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/execprcpuniqno"));
					model.setValue("/root/send/dnorno",              model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorno"));
					model.setValue("/root/send/dnorseqno",         model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorseqno"));  
					var prcplist = "";
					var chkyn = ""; 
					var payyn = ""; 
					for(i=1; i< grd_dnorprcplist.rows; i++){
						if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/chk")=="Y"){
							prcplist +=  model.getValue("/root/main/dnor/dnorprcplist["+i+"]/prcpdd") + "▣" +  model.getValue("/root/main/dnor/dnorprcplist["+i+"]/tclscd") + "▣"
							             +  model.getValue("/root/main/dnor/dnorprcplist["+i+"]/execprcpuniqno") +  "▣" + model.getValue("/root/main/dnor/dnorprcplist["+i+"]/prcpseq") + "◈";
							chkyn += i; 
							
							if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/payyn")=="N"){ // 수납안했을때 
								payyn += i; 
							}
						}
						
						
					}
					
					if(chkyn==""){
						messageBox("바코드 발행할 처방을" , "C002", ""); // 선택하십시오.
						return;	
					}
					
					if(payyn != ""){ 
						messageBox("미수납내역이 존재합니다. 바코드 발행 " , "E001", ""); // 할 수 없습니다.
						return;
					}	
					
					model.setValue("/root/send/prcplist", prcplist);
					//submit("TXLBD01302");
					
					if(submit("TXLBD01302")){
						
						fGetPatinfo("N");
						
						
						grd_dnorlist.row = prcprow;
						
						if(grd_dnorlist.rows > 1){
							fGetPrcpList();	
						}
						
						if(grd_dnorprcplist.rows > 0){
							grd_dnorprcplist.row = 1; 
						}
						
						if(grd_dnorprcplist.row > 0){
							
							var count = getNodesetCount("/root/main/barcodeinfo") ;
						
							for(i=1; i<=count; i++){
								model.makeValue("/root/main/barcodeinfo["+i+"]/dnornm",       model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/dnornm"));
								model.makeValue("/root/main/barcodeinfo["+i+"]/dnorsexage", model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/dsexage"));
							}
						}
						
						fLisSpcBarcodePrint("/root/main/barcodeinfo");
						model.removeNodeset("/root/main/barcodeinfo");
					}
					
				}
				
				//바코드재발행
				function fExeBarcdRePrnt(){
					
					var bcollyn = "";
					var execuniqlist = "";
					var chkyn="";
					
					if(grd_dnorlist.row < 1){
						messageBox("공여자를 " , "C002", ""); //공여자를 선택하십시오.
						return;
					}
					
					if(grd_dnorprcplist.row < 1){
						messageBox("재발행할 처방을 " , "C002", ""); //공여자를 선택하십시오.
						return;
					}
					
					for(i=1; i<grd_dnorprcplist.rows; i++ ){
						if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/chk")=="Y"){
							if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/bcnoyn")=="N"){
								bcollyn += i;
							}else{
								execuniqlist += model.getValue("/root/main/dnor/dnorprcplist["+i+"]/prcpdd") + "▤" + 
								                      model.getValue("/root/main/dnor/dnorprcplist["+i+"]/execprcpuniqno") + "▤" + 
								                      model.getValue("/root/main/dnor/dnorprcplist["+i+"]/prcpseq") + "▥";
								
							}	
							chkyn += i; 
						}
					}
					
					if(bcollyn != ""){
						messageBox("바코드발행이 안된 처방입니다. 재발행 " , "E001", "");  //할 수 없습니다.
						return;		
					}
					
					if(chkyn == ""){
						messageBox("재발행할 처방을 " , "C002", ""); //재발행할 처방을 선택하십시오
						return;			
					}
					
					model.setValue("/root/send/prcplist",      execuniqlist);
					model.setValue("/root/send/pid",            model.getValue("/root/hidden/pid"));
					model.setValue("/root/send/dnorno",      model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorno"));
					model.setValue("/root/send/dnorseqno", model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorseqno"));
					
					if(submit("TRLBD01305")){
						
						
						if(grd_dnorprcplist.row > 0){
							var count = getNodesetCount("/root/main/barcodeinfo") ;
							
							for(i=1; i<=count; i++){
								model.makeValue("/root/main/barcodeinfo["+i+"]/dnornm",       "공여자 : " + model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/dnornm"));
								model.makeValue("/root/main/barcodeinfo["+i+"]/dnorsexage", model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/dsexage"));
							}
						}
						
						
						fLisSpcBarcodePrint("/root/main/barcodeinfo");
						model.removeNodeset("/root/main/barcodeinfo");	
					}
					
				}// 미완료
				
				
				// 처방취소
				function fExePrcpCancel(){
					if(grd_dnorlist.row < 1){
						messageBox("공여자를 ", "C002"); // 선택하십시오.
						return;
					}
					
					var prcpcdlist = "";
					var bcollyn = "";
					var prcprow = grd_dnorlist.row;
					
					
					for(i=1; i<grd_dnorprcplist.rows; i++ ){
						if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/chk")=="Y"){
							if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/bcnoyn")=="N"){
								prcpcdlist += model.getValue("/root/main/dnor/dnorprcplist["+i+"]/prcpdd") + "▤" + model.getValue("/root/main/dnor/dnorprcplist["+i+"]/tclscd")
								                   + "▤" + model.getValue("/root/main/dnor/dnorprcplist["+i+"]/execprcpuniqno") + "▥";
							}else{
								bcollyn += i;
							}
							
						}	
					}
					
					if(bcollyn != ""){
						messageBox("바코드발행된 상태 입니다. 처방 취소 " , "E001", "");  //할 수 없습니다.
						return;	
					}
					
					if(prcpcdlist ==""){
						messageBox("취소할 처방을 ", "C002"); // 선택하십시오.
						return;
					}
					
					//alert("tclscdlist= " +tclscdlist);
					model.setValue("/root/send/pid",            model.getValue("/root/hidden/pid"));
					model.setValue("/root/send/dnorno",      model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorno"));
					model.setValue("/root/send/dnorseqno", model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorseqno"));
					model.setValue("/root/send/prcplist",      prcpcdlist);
					
					//submit("TXLBD01303");
					
					if(submit("TXLBD01303")){
						grd_prcpcdlist.fixedcellischeck(0,1) = false;
						grd_dnorprcplist.fixedcellischeck(0,1) = false;
						
						fGetPatinfo("Y");
						
						grd_dnorlist.row = prcprow;
						
						if(grd_dnorlist.rows > 1){
							//grd_dnorlist.row = 1;
							fGetPrcpList();	
						}
					}
					
				}
				
				// 바코드발행취소
				function fExeBcollCancel(){
					
					if(grd_dnorlist.row < 1){
						messageBox("공여자를 ", "C002"); // 선택하십시오.
						return;
					}
					
					var prcpcdlist = "";
					var bcollyn = "";
					var prcprow = grd_dnorlist.row;
					//grd_dnorlist.row = prcprow;
					
					for(i=1; i< grd_dnorprcplist.rows; i++){
						if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/chk")=="Y"){
							if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/bcnoyn")=="Y"){
								
								prcpcdlist += model.getValue("/root/hidden/pid") + "▤" + 
								                   model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorno") + "▤" + 
								                   model.getValue("/root/main/dnor/dnorlist["+grd_dnorlist.row+"]/dnorseqno") + "▤" + 
								                   model.getValue("/root/main/dnor/dnorprcplist["+i+"]/prcpdd") + "▤" + 
								                   model.getValue("/root/main/dnor/dnorprcplist["+i+"]/execprcpuniqno") + "▥";
								                   
							}else{
								bcollyn += i; 	
								
							}	
						}
						
					}
					
					if(bcollyn != ""){
						messageBox("바코드발행이 안된 상태입니다.  발행 취소 " , "E001", "");  //할 수 없습니다.
						return;	
					}
					
					if(prcpcdlist ==""){
						messageBox("발행 취소할 처방을 ", "C002"); // 선택하십시오.
						return;
					}
					
					model.setValue("/root/send/prcplist",      prcpcdlist);
					//alert("prcpcdlist= " + prcpcdlist);
					if(submit("TXLBD01304")){
						fGetPatinfo("Y");
						
						grd_dnorlist.row = prcprow;
						
						if(grd_dnorlist.rows > 1){
							fGetPrcpList();	
						}
					}
					
					/*var bcollyn = "";
					var bcnoccdata = "";
					
					grd_dnorprcplist.clearStatus();
					
					for(i=1; i<grd_dnorprcplist.rows; i++ ){
						if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/chk")=="Y"){
							if(model.getValue("/root/main/dnor/dnorprcplist["+i+"]/bcnoyn")=="N"){
								bcollyn += i;
							}else{
								grd_dnorprcplist.rowStatus(i) = 1;
								bcnoccdata =  grd_dnorprcplist.getUpdateData();
								
							}
						}	
					}
					alert("bcnoccdata= " + bcnoccdata);
					if(bcollyn != ""){
						messageBox("바코드발행이 안된 처방입니다. 재발행 " , "E001", "");  //할 수 없습니다.
						return;		
					}
					
					model.setValue("/root/send/data1", bcnoccdata);
					model.setValue("/root/send/data2", "01");
					
					model.makeNode("/root/send/data3");
					model.copyNode("/root/send/data3" , "/root/hidden/cancelinfo");	
					
					//submit("TXLLC90401");	//채혈취소
					*/
					
					
				}
				
				//top 정보
				function fSetTopInfo(){
					//alert("qq");
					delPatientInfos(); //환자정보 전체 삭제
					//alert("ww");
					// O▦00301165▦20070516▦1▦012▦1▦20070516▦
					var today = getCurrentDate();
					
					if(model.getValue("/root/main/patinfo/ordtype")=="I"){
					//alert("ee");
						setParameter("condparam", model.getValue("/root/main/patinfo/ordtype") + "▦" + 
						                                        model.getValue("/root/main/patinfo/tnsrpid") + "▦" + 
						                                        model.getValue("/root/main/patinfo/orddd") + "▦" +
						                                        model.getValue("/root/main/patinfo/cretno") + "▦" +
						                                        model.getValue("/root/main/patinfo/acptseqno") + "▦" +   // seqno
						                                        today + "▦" + 
						                                        model.getValue("/root/main/patinfo/instcd"));
						                                       
					}else if(model.getValue("/root/main/patinfo/ordtype")=="O"){
						setParameter("condparam", model.getValue("/root/main/patinfo/ordtype") + "▦" + 
						                                        model.getValue("/root/main/patinfo/tnsrpid") + "▦" + 
						                                        model.getValue("/root/main/patinfo/orddd") + "▦" +
						                                        model.getValue("/root/main/patinfo/cretno") + "▦" +
						                                        model.getValue("/root/main/patinfo/instcd") + "▦" +
						                                        model.getValue("/root/main/patinfo/acptseqno") + "▦" +
						                                        model.getValue("/root/main/patinfo/orgorddd") + "▦");
					                                        
					}
					modal("SPMMO08900");		
					//modal("SPMMO08900", 1, "", "", "", "", "", "left:0; right:0; width:0; height:0; sysmenu:hidden; caption:hidden; min:hidden, max:hidden;");			
				}
				
				
				// 외래등록
				function fSetOuterRgst(){
					
					
					//model.makeValue("/root/hidden/ord/orddrid", "");
					model.setValue("/root/send/pid",       model.getValue("/root/main/patinfo/tnsrpid"));
					model.setValue("/root/send/ordtype",   model.getValue("/root/main/patinfo/ordtype"));
					//model.setValue("/root/send/ordtype", "I");
					
					//setParameter("pid", model.getValue("/root/main/patinfo/tnsrpid") );          //등록번호
					
					// 외래 환자 접수목록 조회  팝업 
					modal("SPLBD91400", "1", "", "", "SPLBD91400", "/root/hidden/pid", "/root/hidden/pid"); 
					
					if(model.getValue("/root/hidden/otpt/otptyn")=="Y"){
					
						fGetPatinfo("Y");
						ipt_pid.selBegin = 0;
						ipt_pid.selEnd = ipt_pid.currentText.length;
					}
					/* 2009-02-03 임시 막음 
					// 가장 최근에 진료받은 혈액내과 의사로 접수 
					submit("TRLBD01306");
					
					
					setParameter("pid", model.getValue("/root/main/patinfo/tnsrpid") );          //등록번호
					setParameter("pidflag", '20');	// 연속처방/기타구분
					setParameter("disccd", "");   //감면유형
					setParameter("orddeptcd", "2010800000");   //의뢰부서코드
					
					if(model.getValue("/root/hidden/ord/orddrid")==""){
						alert("최근 진료받은 혈액내과 의사가 없습니다. ");
						setParameter("orddrid", "");   //의뢰의 ID
					}else{
						setParameter("orddrid", model.getValue("/root/hidden/ord/orddrid"));   //의뢰의 ID	
					}
					
					modal("SMPMO00100", "1", "", "", "SMPMO00100", "", "");
					
					*/  //2009-02-03 임시 막음 
				}
				
				
				//처방내역 클릭시 체크
				function fSetPrcpListCheck(){
					if(grd_dnorprcplist.row > 0){
						if(model.getValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/chk")=="Y"){
							model.setValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/chk", "N");	
						}else{
							model.setValue("/root/main/dnor/dnorprcplist["+grd_dnorprcplist.row+"]/chk", "Y");		
						}	
						//grd_dnorprcplist.rebuild();
					}	
				}
				
				
				// 환자별 채혈 팝업
				function fExeBcollPid(){
					modal("SMLLC00300", "1", "", "", "SMLLC00300", "", "");
					//SMLLC00300_환자별채혈관리.xrw
				}
			]]>
		</script>
	</xhtml:head>
	<xhtml:body style="margin-left:8; margin-top:0; margin-right:8; margin-bottom:0; ">
		<group id="group3" style="left:0px; top:0px; width:1195px; height:13px; ">
			<caption id="caption7" class="tit_1" style="left:0px; top:0px; width:223px; height:14px; ">공여자처방입력</caption>
		</group>
		<group id="group2" style="left:0px; top:40px; width:1195px; height:744px; ">
			<button id="button5" class="icon_search" style="left:259px; top:32px; width:16px; height:16px; ">
				<caption/>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						// 환자정보검색 팝업 띄우기
						fGetPatInfoPopUp();
					]]>
				</script>
			</button>
			<caption id="caption26" class="tit_2" style="left:350px; top:87px; width:110px; height:13px; ">처방코드목록</caption>
			<caption id="caption36" class="tit_2" style="left:5px; top:10px; width:100px; height:14px; vertical-align:middle; background-image:../../../com/commonweb/images/tit_bullet2.gif; ">환자정보</caption>
			<line id="line17" class="line_1" style="x1:345px; y1:102px; x2:655px; y2:102px; "/>
			<line id="line1" class="line_1" style="x1:0px; y1:102px; x2:340px; y2:102px; "/>
			<line id="line8" class="line_2" style="x1:0px; y1:52px; x2:1194px; y2:52px; "/>
			<caption id="caption1" class="tit_2" style="left:5px; top:87px; width:111px; height:13px; ">공여자목록</caption>
			<line id="line6" class="line_1" style="x1:0px; y1:25px; x2:1194; y2:25px; "/>
			<caption id="caption43" class="cell_1" style="left:0px; top:54px; width:120px; height:23px; vertical-align:middle; ">환자명</caption>
			<caption id="caption46" class="cell_1" style="left:532px; top:54px; width:100px; height:23px; vertical-align:middle; ">성별/나이</caption>
			<caption id="caption47" class="cell_1" style="left:256px; top:54px; width:120px; height:23px; vertical-align:middle; ">주민등록번호</caption>
			<caption id="caption48" class="cell_1" style="left:738px; top:54px; width:100px; height:23px; vertical-align:middle; ">혈액형</caption>
			<line id="line2" class="line_1" style="x1:660px; y1:102px; x2:1194px; y2:102px; "/>
			<caption id="caption5" class="tit_2" style="left:665px; top:87px; width:100px; height:13px; ">처방내역</caption>
			<button id="btn_addrow" class="btn2_letter5" style="left:930px; top:81px; width:75px; height:19px; ">
				<caption>바코드발행</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeBcoll();
					]]>
				</script>
			</button>
			<caption id="caption39" class="cell_1" style="left:0px; top:30px; width:120px; height:23px; vertical-align:middle; ">등록번호</caption>
			<output id="output1" ref="/root/main/patinfo/tnsrnm" class="output_fix" style="left:123px; top:55px; width:130px; height:19px; "/>
			<output id="output2" ref="/root/main/patinfo/tnsrgstno" class="output_fix" format="999999-9999999" style="left:379px; top:55px; width:150px; height:19px; "/>
			<output id="output3" ref="/root/main/patinfo/tnssexage" class="output_fix" style="left:635px; top:55px; width:100px; height:19px; "/>
			<output id="output4" ref="/root/main/patinfo/btype" class="output_fix" style="left:841px; top:55px; width:120px; height:19px; "/>
			<button id="button2" class="btn2_letter6" style="left:1008px; top:81px; width:86px; height:19px; ">
				<caption>바코드재발행</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						//alert("개발중");
						fExeBarcdRePrnt();
					]]>
				</script>
			</button>
			<button id="button3" class="btn2_letter7" style="left:1097px; top:81px; width:97px; height:19px; ">
				<caption>바코드발행취소</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						//alert("개발중");
						fExeBcollCancel();
					]]>
				</script>
			</button>
			<input id="ipt_pid" ref="/root/hidden/pid" class="input_s_button" inputtype="button" maxlength="10" style="left:123px; top:31px; width:130px; height:19px; ">
				<script type="javascript" ev:event="onkeypress">
					<![CDATA[
						fKeyEvent();
					]]>
				</script>
			</input>
			<datagrid id="grd_dnorlist" nodeset="/root/main/dnor/dnorlist" caption="공여자번호^공여자명^주민등록번호^공여자sexage" colsep="^" colwidth="80, 80, 140, 0" dataheight="25" focuscolor="#9999ff" mergecellsfixedrows="bycolrec" rowheader="seq" rowheight="25" rowsep="|" style="left:0px; top:107px; width:340px; height:634px; ">
				<col ref="dnorno"/>
				<col ref="dnornm"/>
				<col ref="dnorrgstno"/>
				<col/>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						if(grd_dnorlist.isCell(event.target) && grd_dnorlist.row >= grd_dnorlist.fixedRows){
							fGetPrcpList();
						}
					]]>
				</script>
			</datagrid>
			<datagrid id="grd_prcpcdlist" nodeset="/root/main/prcpcdlist" caption="^처방코드^처방명^검체코드" colsep="^" colwidth="40, 80, 147, 0" dataheight="23" ellipsis="true" focuscolor="#ccecff" mergecellsfixedrows="bycolrec" rowheader="seq" rowheight="23" rowsep="|" style="left:345px; top:107px; width:310px; height:634px; ">
				<col checkvalue="Y,N" ref="chk" type="checkbox"/>
				<col ref="tclscd" style="left:20px; top:25px; width:90px; height:25px; "/>
				<col ref="tclsnm"/>
				<col ref="spccd"/>
				<script type="javascript" ev:event="ondblclick">
					<![CDATA[
						// 처방코드 선택 
						//fSetPrcpcdSelect("dd");
						
					]]>
				</script>
			</datagrid>
			<datagrid id="grd_dnorprcplist" nodeset="/root/main/dnor/dnorprcplist" caption="^처방일자^처방코드^처방명^바코드출력일시^출력여부^공여자성별나이^공여자명^caption1" colsep="^" colwidth="35, 70, 70, 140, 106, 70, 0, 0, 0, 0, 0, 0, 0" dataheight="23" ellipsis="true" focuscolor="#ccecff" mergecellsfixedrows="bycolrec" rowheader="seq" rowheight="23" rowsep="|" style="left:660px; top:107px; width:534px; height:634px; ">
				<col checkvalue="Y,N" ref="chk" type="checkbox"/>
				<col ref="prcpdd" format="yyyy-mm-dd" style="left:20px; top:25px; width:90px; height:25px; "/>
				<col ref="tclscd"/>
				<col ref="tclsnm"/>
				<col ref="bcolldt" format="yyyy-mm-dd hh:nn"/>
				<col ref="bcnoyn" style="text-align:center; "/>
				<col ref="dsexage"/>
				<col ref="dnornm"/>
				<col ref="bcno2"/>
				<col ref="spccd"/>
				<col ref="pid"/>
				<col ref="prcpgenrflag"/>
				<col ref="payyn"/>
				<script type="javascript" ev:event="onclick">
					<![CDATA[
						//처방내역 클릭시 체크
						if(grd_dnorprcplist.col != 1 ){
							fSetPrcpListCheck();
						}
					]]>
				</script>
			</datagrid>
			<!--<object id="CommAX" clsid="{35cc9cfa-e6f8-4b22-b6d2-fe7cd108f943}" visibility="hidden" style="left:220px; top:205px; width:45px; height:45px; "/>-->
			<output id="output5" ref="/root/main/patinfo/ordtypenm" class="output_fix" style="left:1040px; top:55px; width:154px; height:19px; "/>
			<caption id="caption2" class="cell_1" style="left:965px; top:54px; width:70px; height:23px; vertical-align:middle; ">입원/외래</caption>
			<line id="line9" class="line_3" style="x1:0px; y1:76px; x2:1194px; y2:76px; "/>
		</group>
		<group id="group5" scroll="auto" style="left:0px; top:13px; width:1195px; height:27px; ">
			<button id="btn_prt" class="btn4_letter4" style="left:961px; top:3px; width:80px; height:22px; ">
				<caption>처방저장</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fExeDnorPrcp();
					]]>
				</script>
			</button>
			<button id="btn_cle" class="btn4_letter3" style="left:1127px; top:3px; width:68px; height:22px; ">
				<caption>초기화</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fSetInit();
					]]>
				</script>
			</button>
			<line id="line35" class="line_6" style="x1:0px; y1:25px; x2:1195px; y2:25px; "/>
			<button id="button1" class="btn4_letter4" style="left:1044px; top:3px; width:80px; height:22px; ">
				<caption>처방취소</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
					//alert("개발중");
					fExePrcpCancel();
					]]>
				</script>
			</button>
			<button id="btn_prnt" class="btn3_letter5" navindex="18" style="left:0px; top:3px; width:92px; height:22px; ">
				<caption>프린터설정</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						// 프린터 설정 
						fSetPrint();
				]]>
				</script>
			</button>
			<button id="button4" class="btn4_letter4" style="left:878px; top:3px; width:80px; height:22px; ">
				<caption>외래등록</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						fSetOuterRgst();
					]]>
				</script>
			</button>
			<button id="button6" class="btn4_letter6" style="left:771px; top:3px; width:104px; height:22px; ">
				<caption>NAT번호입력</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						
						fSetNATNoRgst();
					]]>
				</script>
			</button>
			<button id="button8" class="btn4_letter9" style="left:628px; top:3px; width:140px; height:22px; ">
				<caption>바코드발행(환자별)</caption>
				<script type="javascript" ev:event="DOMActivate">
					<![CDATA[
						
						fExeBcollPid();
					]]>
				</script>
			</button>
		</group>
	</xhtml:body>
</xhtml:html>