YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADT61100_원외처방전출력팝업.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADT61100" position="absolute 0 0 250 100" titletext="원외처방전출력" oninit="SPADT61100_oninit" onload="SPADT61100_onload">
    <Layouts>
      <Layout>
        <Static text="원외 처방전 출력 중" position="absolute 27 20 224 76" id="caption1" style="align:center middle;font:Dotum,14,bold;"/>
        <Div position="absolute 40 15 145 91" id="grp_pharmacy" visible="false"/>
        <Div position="absolute 35 10 225 70" id="grp_pat" visible="false"/>
        <Div position="absolute 40 15 145 91" id="grp_pharmacy2" visible="false"/>
        <Div position="absolute 35 10 225 70" id="grp_pat2" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_prcpdata_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_prcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_prcpdata_diaginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_prcpdata_sumlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_prcpdata_resn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_P0322list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-09-16
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-09-16      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------

//=========================================XJS===========================================
//=======================================================================================
//=======================================================================================
//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 프린터 설정
 ****************************************************************************************/
 
//=======================================================================================
//=======================================================================================
//=========================================XJS===========================================
/****************************************************************************************
 * Argument			: N/A
 * Description		: 초기화
 ****************************************************************************************/
function fInit() {
	var opener_ID = opener.frmf_getParameter("opener_ID");
	//var sParam = model.getAttribute("params");
	var sParam = opener.frmf_getParameter("params");
	
	dsf_setCSVToDs("ds_send_prcpinfo",sParam);
//sysf_trace(ds_send_prcpinfo.saveXML());
	dsf_makeValue(ds_send_prcpinfo,"ioflag"		,"string","O");
	dsf_makeValue(ds_send_prcpinfo,"prntflag"	,"string","Y");
	dsf_makeValue(ds_send_prcpinfo,"stocdeptcd"	,"string","Y");
	
	var arrParam = [{dsNm: "ds_init_P0322list", cdGrpId: "P0322"}]   //처방전 QR바코드용으로 추가 과코드 EDI코드 변환용 
				   
	appf_getCodeList(arrParam);

	
// 	model.makeValue("/root/send/prcpinfo/drugdd", astfMatrixData(sParam, 1, 0));
// 	model.makeValue("/root/send/prcpinfo/drugno", astfMatrixData(sParam, 1, 1));
// 	model.makeValue("/root/send/prcpinfo/ioflag", "O");
// 	model.makeValue("/root/send/prcpinfo/pid", astfMatrixData(sParam, 1, 2));
// 	model.makeValue("/root/send/prcpinfo/orddd", astfMatrixData(sParam, 1, 3));
// 	model.makeValue("/root/send/prcpinfo/cretno", astfMatrixData(sParam, 1, 4));
// 	model.makeValue("/root/send/prcpinfo/orddeptcd", astfMatrixData(sParam, 1, 5));
// 	model.makeValue("/root/send/prcpinfo/prcpgenrflag", astfMatrixData(sParam, 1, 6));
// 	model.makeValue("/root/send/prcpinfo/hosoutmpsflag", astfMatrixData(sParam, 1, 7));
// 	model.makeValue("/root/send/prcpinfo/reprintyn", astfMatrixData(sParam, 1, 8));
// 	model.makeValue("/root/send/prcpinfo/prntflag", "Y");
// 	//model.makeValue("/root/send/prcpinfo/printer", astfMatrixData(sParam, 1, 10));	//2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가
// 	model.makeValue("/root/send/prcpinfo/eprntype", astfMatrixData(sParam, 1, 10));  // 2009.09.09 pymi
// 	model.makeValue("/root/send/prcpinfo/stocdeptcd", "Y"); // 20100310_laboru_실출고부서 원외 일때는 업데이트 안함. 실출고부서가 필요하면 astfMatrixData(sParam, 1, 10)
// 	model.makeValue("/root/send/prcpinfo/engprntflag", astfMatrixData(sParam, 1, 13));  // 20130429
  
	var engprntflag = ds_send_prcpinfo.getColumn(0,"engprntflag");
	var printerno 	= astfMatrixData(sParam, 1, 13) ;
	var mdrugflag 	= astfMatrixData(sParam, 1, 12) ;	// 20101124_laboru_경북대병원_마약/향정 외래 환자 원외 처방전 출력 여부 조회(R002)
	
	// 20101103_laboru_경북대병원_세종병원에서 수정한 내용 추가
	var printer_name = "true";
	if(opener_ID == "SMADT01101_원외처방전출력(원무)"){ // 원무 프로그램 개발 후 프린터 선택 확인 필요.
		printer_name = opener.frmf_getParameter("opener_printer_name");
		printerno    = opener.frmf_getParameter("opener_printer_tray");
	}

	var oParam = {};
		oParam.id          = "TRADT61101";
		oParam.service     = "pharmacyprescriptionapp.DrugPrint";
		oParam.method      = "reqGetOutPrintData";
		oParam.inds        = "req=ds_send_prcpinfo";
		oParam.outds       = "ds_main_prcpdata_patinfo=patinfo ds_main_prcpdata_diaginfo=diaginfo ds_main_prcpdata_sumlist=sumlist ds_main_prcpdata_resn=resn";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADT61101";

	tranf_submit(oParam);

	if(!utlf_isNull(ds_main_prcpdata_patinfo.getColumn(0,"pid"))) {
		var cnt = ds_main_prcpdata_sumlist.rowcount;
	
		if(cnt > 0){
			for(var a = 0; a < cnt; a++){  
				ds_main_prcpdata_sumlist.setColumn(a,"totdrugqty",fChkFloat(ds_main_prcpdata_sumlist.getColumn(a,"totdrugqty")));
			}
		}
				
		//이선경 수정 2008-08-26 start (사용기간 메시지창)
		var usedate = ds_main_prcpdata_patinfo.getColumn(0,"usedate");
 		var drugdd = ds_main_prcpdata_patinfo.getColumn(0,"drugdd");
 		///2018년 11월 9일 김치국 처방전 출력일자 관리 부분
 		if (usedate == "" || usedate == null ){
            usedate =  drugdd.toDate().getAddDate(7, "D").getDateFormat();
 		}
		var curdate = utlf_getCurrentDate();
		var rtn 	= "";
		var date 	= usedate.substr(0,4) + "년 " + usedate.substr(4,2) + "월 " + usedate.substr(6,2) + "일";
		
		if(usedate < curdate) {
			rtn = sysf_messageBox("처방전 사용기간은 " + date + " 입니다. 출력을 ", "Q004");

			if(rtn != 6){
			//	this.close();
				return;
			}
		}
				
				
		//QR바코드 생성 추가 (2017.10.11) pkc
		var barcodeyn = "";
		barcodeyn = lf_spacebarcode_create();
		
		if (barcodeyn == 'N') {
		   sysf_message('원외처방전 바코드 생성 오류... 전산실로 연락바랍니다.!!!');
		   return;
		}else{
			sleep(1000);
		}
		//이선경 수정 2008-08-26 end (사용기간 메시지창)
		
// 		makeReportPreview(0,0,1195, 784, "grp_pharmacy");			
// 		makeReportPreview(0,0,1195, 784, "grp_pat");			
// 		 // 20101124_laboru_경북대병원_원외 마약 처방전 위해 추가
// 		makeReportPreview(0,0,1195, 784, "grp_pharmacy2");			
// 		makeReportPreview(0,0,1195, 784, "grp_pat2");		
	
		//처방전에 DUR이 존재하면 RFADT61203 존재하지 않으면 RFADT61200 출력
		var resn = ds_main_prcpdata_resn.getColumn(0,"resnnm");	
		
		//영문처방전의경우 DUR 사유를 출력하지 않음
		if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
			resn = "";
		}
		
		// 20101123_laboru_경북대병원_외래 원외 일반약 처방과 마약/향정 처방을 분리
		var list2cnt = 0;	//	일반약 처방
		var list3cnt = 0;	//	마약, 향정 처방
		var list4cnt = 0;	//	이하 여백
		
		if(mdrugflag == "Y") {
			if(cnt > 0){
				if(utlf_isNull(this.objects["ds_main_prcpdata_sumlist3"])) {
					dsf_createDs("ds_main_prcpdata_sumlist3");
					dsf_copyColInfo(ds_main_prcpdata_sumlist3,ds_main_prcpdata_sumlist);
				}
				if(utlf_isNull(this.objects["ds_main_prcpdata_sumlist2"])) {
					dsf_createDs("ds_main_prcpdata_sumlist2");
					dsf_copyColInfo(ds_main_prcpdata_sumlist2,ds_main_prcpdata_sumlist);
				}
				if(utlf_isNull(this.objects["ds_main_prcpdata_sumlist4"])) {
					dsf_createDs("ds_main_prcpdata_sumlist4");
					dsf_copyColInfo(ds_main_prcpdata_sumlist4,ds_main_prcpdata_sumlist);
				}
				for(var a = 0; a < cnt; a++){
					if(!utlf_isNull(ds_main_prcpdata_sumlist.getColumn(a,"prcpcd"))) {
						if(ds_main_prcpdata_sumlist.getColumn(a,"spcldrug") == "M" ) {	// 마약일때(조회는 내복, 외용만)
							ds_main_prcpdata_sumlist3.copyRow(ds_main_prcpdata_sumlist3.addRow(),ds_main_prcpdata_sumlist,a);
							list3cnt++;
						} else {
							ds_main_prcpdata_sumlist2.copyRow(ds_main_prcpdata_sumlist2.addRow(),ds_main_prcpdata_sumlist,a);
							list2cnt++;
						}
					} else {
						ds_main_prcpdata_sumlist4.copyRow(ds_main_prcpdata_sumlist4.addRow(),ds_main_prcpdata_sumlist,a);
						list4cnt++;
					}						
				}
			}
			
			if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
				//ds_main_prcpdata_sumlist.copyRow(ds_main_prcpdata_sumlist2);
				dsf_copyDs(ds_main_prcpdata_sumlist,ds_main_prcpdata_sumlist2,"replace");
				dsf_copyDs(ds_main_prcpdata_sumlist,ds_main_prcpdata_sumlist4,"after");
			    
			    var cntmdrug = ds_main_prcpdata_sumlist.rowcount - 1;
			    ds_main_prcpdata_sumlist.setColumn(cntmdrug,"hngnm", "- 마약처방이 있습니다 -");
			    
				////마약처방전 약국1곳에 사영 메세지 나타내기 //2015.7.7  김치국/
				ds_main_prcpdata_sumlist.setColumn(cntmdrug,"mthdnm", "마약처방전과 반드시 한곳(약국)");
			    dsf_makeValue(ds_main_prcpdata_sumlist,"mthdnm","string","에서만 조제바랍니다.",(parseInt(cntmdrug) + 1));
					////			
			}	
		}	// (e) 20101123_laboru_경북대병원
		
			// 20130429_영문처방전 출력
		if(opener_ID == "SMADT01101_원외처방전출력(원무)" && engprntflag == "E") {
			var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
			ds_main_prcpdata_patinfo.setColumn(0,"rrgstno",rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
				
	//		exeReportPreview("RFADT61105", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);		
			var objDOM = rptf_createDOM();	// DOM 객체 설정
			rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
			rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
			rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
			rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
			
			var objParam = new Object();
			objParam.xml_data_XML1 = objDOM.documentElement.source;			
			
			var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
			rptf_exeReportPreview30(["RFADT61105"],[objParam], option, "", "grp_pat");
		} else {
			if( (parseInt(list2cnt) > 0) || mdrugflag != "Y" ) {	// 마약 처방만 존재할 때는 일반약 출력 X
				if( utlf_isNull(resn) ){
					if(parseInt(ds_main_prcpdata_patinfo.getColumn(0,"prnttims"), 10) > 0){
						if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1"){
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
								// 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가
							}
							
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							//trace('1'+ds_main_prcpdata_patinfo.saveXML());
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pharmacy");
						} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경			
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);				
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}

							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
						} else {
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate" ,"");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
							}
			
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경			
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							//trace('2'+ds_main_prcpdata_patinfo.saveXML());
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;

                            
							var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pharmacy");
							
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");				
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}
			
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경			
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							//trace('222'+ds_main_prcpdata_patinfo.saveXML());
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;

							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
						}
					} else {
						if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1"){
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate" ,"");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");				
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
							}
			
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경			
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							//trace('3'+ds_main_prcpdata_patinfo.saveXML());
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;

							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pharmacy");
							
						} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");
							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}

							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;

							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
			
						} else {
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate" ,"");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");				
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
							}
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							//trace('4'+ds_main_prcpdata_patinfo.saveXML());
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;

							var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pharmacy");
							
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");
							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");				
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}
			
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경			
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;

							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
						}
					}
				}else{
					if(parseInt(ds_main_prcpdata_patinfo.getColumn(0,"prnttims"), 10) > 0){
						if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1"){
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
							}
							
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							//trace('5'+ds_main_prcpdata_patinfo.saveXML());
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							objParam.xml_data_XML2 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy");
			
						} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
						
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);				
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
							
						} else {
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
							}
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							//trace('6'+ds_main_prcpdata_patinfo.saveXML());
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							objParam.xml_data_XML2 = objDOM.documentElement.source;
							
							var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy");
							
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
						}
					} else {
						if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1") {
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
							}
			
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							//trace('7'+ds_main_prcpdata_patinfo.saveXML());
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							objParam.xml_data_XML2 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy");
							
						} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
							
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");

							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
			
						} else {
							if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
								// 20100219_laboru_영문처방전일 경우 사용기간 제거
								ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
								ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
								// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							} else {
								dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
							}
							//trace('8'+ds_main_prcpdata_patinfo.saveXML());
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정							
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							objParam.xml_data_XML2 = objDOM.documentElement.source;
							
							var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy");
							
							
							dsf_makeValue(ds_main_prcpdata_patinfo,"prntkind","string","1");
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");

							if(astfMatrixData(sParam, 1, 9) == "Y") {
								var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
								ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
							}
							//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//							exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat",printerno);
							var objCxtCommon = new ExtCommon();
							ds_main_prcpdata_patinfo.updatecontrol = false;
							ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
							for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
								ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
							}
							ds_main_prcpdata_patinfo.updatecontrol = true;
							
							var objDOM = rptf_createDOM();	// DOM 객체 설정
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
							rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
							
							var objParam = new Object();
							objParam.xml_data_XML1 = objDOM.documentElement.source;
							
							if(parseInt(list3cnt) > 0) {	// 마약 처방이 있다면
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
							} else {
								var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
							}
							
							rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat");
						}
					}
				}
			} // (e) 마약 처방만 존재할 때는 일반약 출력 X
		}
		
		// 20101124_laboru_경북대병원_경북대병원_외래 환자 마약 원외 처방전 출력 할 때
		if(mdrugflag = "Y" && parseInt(list3cnt) > 0) {			
			ds_main_prcpdata_sumlist.clear();
			dsf_copyDs(ds_main_prcpdata_sumlist,ds_main_prcpdata_sumlist3,"replace");
			dsf_copyDs(ds_main_prcpdata_sumlist,ds_main_prcpdata_sumlist4,"after");
			
			var cntmdrug = ds_main_prcpdata_sumlist3.rowcount;
			
			for(var a = 0 ; a < cntmdrug ; a++) {
				var tempt 	 = "";
				var spcldrug = ds_main_prcpdata_sumlist.getColumn(a,"spcldrug");
				if(spcldrug == "M") {
					tempt = "(마약)";
				} 
				ds_main_prcpdata_sumlist.setColumn(a,"hngnm", ds_main_prcpdata_sumlist.getColumn(a,"hngnm") + tempt);
			}

			// 마약 처방전에는 환자 주소 추가			
			var cntaddr = ds_main_prcpdata_sumlist.rowcount;
//			dsf_makeValue(ds_main_prcpdata_sumlist,"hngnm","string",ds_main_prcpdata_patinfo.getColumn(0,"detladdr"),parseInt(cntaddr));
			ds_main_prcpdata_sumlist.setColumn(ds_main_prcpdata_sumlist.addRow(),"hngnm",ds_main_prcpdata_patinfo.getColumn(0,"detladdr"));
			////마약처방전 약국1곳에 사영 메세지 나타내기 //2015.7.7  김치국/
			dsf_makeValue(ds_main_prcpdata_sumlist,"mthdnm","string","마약처방전입니다.",(parseInt(cntaddr) + 1 ));
			dsf_makeValue(ds_main_prcpdata_sumlist,"mthdnm","string","반드시 한곳(약국)에서만 조제바랍니다.",(parseInt(cntaddr) + 2 ));
			////			
			if(utlf_isNull(resn)) {
				if(parseInt(ds_main_prcpdata_patinfo.getColumn(0,"prnttims"), 10) > 0){
					if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1"){
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
							// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
						}
						
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;

						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pharmacy2");
					} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);				
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정						
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
						
					} else {
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
							// 20101118_wify_외래처방전 주민번호 뒷자리 별표 처리 추가
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
		
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						

						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pharmacy2");
						
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
		
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
					}
				} else {
					if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1") {
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
							// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
						}
		
						//2009-05-07 원무에서 원외처방전출력 추가 - 트레이번호 추가
//						exeReportPreview("RFADT61100", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61100"],[objParam], option, "", "grp_pharmacy2");
						
					} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/s9umlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
		
					} else {
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
							// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pharmacy2");
						
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
					}
				}
			}else{
				if(parseInt(ds_main_prcpdata_patinfo.getColumn(0,"prnttims"), 10) > 0){
					if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1"){
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
							// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						objParam.xml_data_XML2 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy2");
		
					} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);				
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
						
					} else {
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
							// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용-재출력)-창구");
						}
		
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						objParam.xml_data_XML2 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
						rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy2");
		
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용-재출력)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
		
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
		
					}
				} else {
					if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "1"){
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
							// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
						}
		
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						objParam.xml_data_XML2 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy2");
						
					} else if(ds_send_prcpinfo.getColumn(0,"hosoutmpsflag") == "2"){	
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
		
					} else {
						if(ds_send_prcpinfo.getColumn(0,"eprntype") == "E") {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(영문명처방)-창구");
							// 20100219_laboru_영문처방전일 경우 사용기간 제거
							ds_main_prcpdata_patinfo.setColumn(0,"usedayno","");
							ds_main_prcpdata_patinfo.setColumn(0,"usedate","");
							// 20100219_laboru_영문처방전일 경우 주민번호 뒷자리 별표 처리
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						} else {
							dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(약국제출용)-창구");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61104", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pharmacy2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/resn"	, ds_main_prcpdata_resn);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						objParam.xml_data_XML2 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";
						rptf_exeReportPreview30(["RFADT61104"],[objParam], option, "", "grp_pharmacy2");
						
						dsf_makeValue(ds_main_prcpdata_patinfo,"hosoutmpsflagnm","string","(본인보관용)-창구");
						if(astfMatrixData(sParam, 1, 9) == "Y") {
							var rrgstno = ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").split("-");
							ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
						}
						//2010-11-29_wify_경북대병원_전자서명이미지추가,약품명 영문명으로 변경
//						exeReportPreview("RFADT61103", "XMLSTR", "", "", printer_name,"","","","","true", "", "grp_pat2",printerno);
						var objCxtCommon = new ExtCommon();
						ds_main_prcpdata_patinfo.updatecontrol = false;
						ds_main_prcpdata_patinfo.addColumn("prt_signdata","string");
						for(var i = 0 ; i < ds_main_prcpdata_patinfo.rowcount ; i++) {
							ds_main_prcpdata_patinfo.setColumn(i,"prt_signdata",objCxtCommon.encodeBase64(ds_main_prcpdata_patinfo.getColumn(i, "signdata")));
						}
						ds_main_prcpdata_patinfo.updatecontrol = true;
						
						var objDOM = rptf_createDOM();	// DOM 객체 설정
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/patinfo"	, ds_main_prcpdata_patinfo);	
						rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
						
						var objParam = new Object();
						objParam.xml_data_XML1 = objDOM.documentElement.source;
						
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete";
						rptf_exeReportPreview30(["RFADT61103"],[objParam], option, "", "grp_pat2");
					}
				}
			}
		}
	} else {
		this.close();
	}
}

/****************************************************************************************
 * Argument			: N/A
 * Description		: 
 ****************************************************************************************/
function fChkFloat(qty) {
	var fQty = parseFloat(qty);
	var fRst = "";
	
	if(fQty%1 == 0){
		fRst = parseInt(qty);
	} else {
		fRst = qty;
	}
	
	return fRst;
}

/****************************************************************************************
 * Argument			: pData		- 원 데이타
 * 					: pRow(▩)	- row 구분자
 * 					: pCol(▦)	- col 구분자
 * Description		: 구분자로 분리된 특정자료를 읽음
 ****************************************************************************************/
function astfMatrixData(pData, pRow, pCol)
{
    var rowSep = "▩";
    var colSep = "▦";
	var arrRow = pData.split(rowSep);

	if(arrRow.length <= pRow) return "";

	var arrCol = arrRow[pRow].split(colSep);
	if(arrCol.length <= pCol) return "";

	return arrCol[pCol];
}

function lf_complete() {
	this.close();
}

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADT61100
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADT61100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADT61100
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADT61100_onload(obj:Form, e:LoadEventInfo)
{
	fInit();	
}


function lf_spacebarcode_create()
{
	var objExtCommon = new ExtCommon();
	var fdir    = "C:\\himed\\components\\SpaceQRLib\\module\\space\\";
	
	
	//var curdate = utlf_getCurrentDateTime().replace(" ","");
	var curdate = utlf_getCurrentDate();
	
	for(var i=7; i<= 16; i++) {
	   var curddelate2 = curdate.toDate().getAddDate(-i, "D").getDateFormat();
	   //trace(curddelate2);
	   var fdir2   = "C:\\himed\\components\\SpaceQRLib\\module\\space\\";
	   fdir2 = fdir2 +curddelate2;
	   var bSucc2 = VirtualFile.deleteDirectory( fdir2, true )
	}
	
	
	fdir = fdir   +curdate;
	
	var bSucc = VirtualFile.createDirectory(fdir,false);
	
	
	var fname   = fdir+'\\'+ds_main_prcpdata_patinfo.getColumn(0,"pid")+"_"+curdate+"_"+ds_main_prcpdata_patinfo.getColumn(0,"drugno")+".jpg";
	var bSucc3 = VirtualFile.delete( fname, true )
	fdir    = "C:\\himed\\components\\SpaceQRLib\\module\\space\\";
	//trace("bSucc3 :"+bSucc3+"/"+fname+"/"+fdir);

	//헤더부분
    var v_header           = '"'+'header'+'":'+'"'+'SPACE'+'",';    //헤더 
    var v_hosp_code        = '"'+'hosp_code'+'":'+'"'+'77'+'",'; //병원코드
    var v_version          = '"'+'version'+'":'+ '"'+'2'+'",';//버전  
    var v_print_info       = '"'+'print_info'+'":'+ '"'+'L'+'",';//프린터정보
    var v_insure           = '"'+'insure'+'":'; //보험구분
    var v_insure_ex        = '"'+'insure_ex'+'":'; //공상등구분
    var v_protect          = '"'+'protect'+'":'; //보호종별
    var v_order_no         = '"'+'order_no'+'":'; //교부번호
    var v_medi_care_t      = '"'+'medi_care_t'+'":"'+ds_main_prcpdata_patinfo.getColumn(0,"facilnumber")+'",'; //요양기관기호 
    var v_hosp_name        = '"'+'hosp_name '+'":"'+ds_main_prcpdata_patinfo.getColumn(0,"hospnm1").replace(" ","")+'",'; // 의료기관 명칭 
    var v_hosp_tel         = '"'+'hosp_tel '+'":"'+'053)200-5114'+'",'; // 의료기관 전화번호
    var v_hosp_fax         = '"'+'hosp_fax'+'":"'+'053)200-6044'+'",'; //의료기관 팩스번호
    var v_hosp_email       = '"'+'hosp_email'+'":'+'"",'; //의료기관 이메일 
    var v_doc_name         = '"'+'doc_name'+'":'; //처방의 성명 
    var v_doc_license      = '"'+'doc_license'+'":'; //처방의 면허종별
    var v_doc_id           = '"'+'doc_id'+'":'; //처방의 면허번호
    var v_pat_name         = '"'+'pat_name'+'":'; //수진자 이름 
    var v_pat_rrn          = '"'+'pat_rrn'+'":'; //수진자 주민등록번호
    var v_insured_relation = '"'+'insured_relation'+'":'; //피보험자와의 관계
    var v_insurance_no     = '"'+'insurance_no'+'":'; //증번호
    var v_acc_hosp_no      = '"'+'acc_hosp_no'+'":'; //산재요양기관기호
    var v_company_name     = '"'+'company_name'+'":'; //사업자 명칭
    var v_vows_no          = '"'+'vows_no'+'":'; //보훈번호 
    var v_order_date       = '"'+'order_date'+'":'+'"'+ds_main_prcpdata_patinfo.getColumn(0,"prntdt").substr(0,8)+'",';  //발생일자 
    var v_medi_subject     = ""//진료과목 
    var v_special_code     = '"'+'special_code'+'":'+'"'+utlf_transNullToEmpty(ds_main_prcpdata_patinfo.getColumn(0,"spclcd")).substr(0,4)+'",';//특정기호 
    var v_period_date      = '"'+'period_date'+'":'+'"'+ds_main_prcpdata_patinfo.getColumn(0,"usedayno")+'",';//사용기간 
    var v_extra_data       = '"'+'extra_data'+'":'; //확장데이터 
    
    if (utlf_isNull(ds_main_prcpdata_patinfo.getColumn(0,"hospnm1"))) {
       v_hosp_name        = '"'+'hosp_name '+'":"'+ds_main_prcpdata_patinfo.getColumn(0,"hospnm").replace(" ","")+'",'; // 의료기관 명칭 
    }
    
    if (ds_main_prcpdata_patinfo.getColumn(0,"instcd") == '032') {  //칠곡
       v_hosp_tel         = '"'+'hosp_tel '+'":"'+'1566-2500'+'",'; // 의료기관 전화번호
       v_hosp_fax         = '"'+'hosp_fax'+'":"'+'053)200-2439'+'",'; //의료기관 팩스번호
    }
    
    if (utlf_transNullToEmpty(ds_main_prcpdata_patinfo.getColumn(0,"spclcd")).substr(0,1) == "V" ||
        utlf_transNullToEmpty(ds_main_prcpdata_patinfo.getColumn(0,"spclcd")).substr(0,1) == "F" ) {
        v_special_code     = '"'+'special_code'+'":'+'"'+utlf_transNullToEmpty(ds_main_prcpdata_patinfo.getColumn(0,"spclcd")).substr(0,4)+'",';//특정기호 
    }else {
        v_special_code     = '"'+'special_code'+'":'+'"'+'",';//특정기호 
    }
    
    //trace("v_special_code :"+v_special_code);

    var deptcdnm = ds_main_prcpdata_patinfo.getColumn(0,"orddeptnm");
    
    if (deptcdnm == "내분비대사내과") {
		deptcdnm = "내분비.대사내과";
    }
        
    if (deptcdnm == "정신건강의학과") {
		deptcdnm = "정신과";
    }
    
    if (deptcdnm == "마취통증의학과") {
		deptcdnm = "마취과";
    }
            
    if (deptcdnm == "외과") {
		deptcdnm = "일반외과";
    }
    
    if (deptcdnm == "비뇨의학과") {
		deptcdnm = "비뇨기과";
    }
    
    if (deptcdnm == "소아청소년과") {
		deptcdnm = "소아과";
    }
    
    if (deptcdnm == "핵의학과") {
		deptcdnm = "핵의학";
    }
    
    if (deptcdnm == "가정의학과") {
		deptcdnm = "가정의학";
    }
    
    if (deptcdnm == "대장항문소아외과") {
		deptcdnm = "일반외과";
    }

    if (deptcdnm == "유방갑상선외과") {
		deptcdnm = "일반외과";
    }


    if (deptcdnm == "알레르기감염내과") {
		deptcdnm = "감염내과";
    }

    if (deptcdnm == "재활의학과") {
		deptcdnm = "재활의학";
    }

    if (deptcdnm == "이식혈관외과") {
		deptcdnm = "일반외과";
    }

    if (deptcdnm == "모발이식센터") {
		deptcdnm = "피부과";
    }

    if (deptcdnm == "흉부외과") {
		deptcdnm = "흉곽외과";
    }

    if (deptcdnm == "방사선종양학과") {
		deptcdnm = "치료방사";
    }
    
     if (deptcdnm == "치과") {
		deptcdnm = "치주과";
    }
    
    if (deptcdnm == "대장항문외과") {
		deptcdnm = "일반외과";
    }
    
    if (deptcdnm == "방사선종양학과") {
		deptcdnm = "치료방사";
    }
    
    if (deptcdnm == "소아알레르기호흡기" || deptcdnm == "소아청소년감염" || deptcdnm == "소아청소년과" || deptcdnm == "소아청소년내분비" || deptcdnm == "소아청소년소화기영양" || deptcdnm == "소아청소년신경"  || deptcdnm == "소아청소년신장" || deptcdnm == "소아청소년심장" || deptcdnm == "소아청소년혈액종양" ) {
		deptcdnm = "소아과";
    }
    
    if (deptcdnm == "신생아") {
		deptcdnm = "소아과";
    }
    
    if (deptcdnm == "응급의학과") {
		deptcdnm = "응급의학";
    }
    
    var nRow = ds_init_P0322list.findRow( "cdnm", deptcdnm );
    var deptcd = "";
    
    
    if (nRow > - 1 ) {
       deptcd = ds_init_P0322list.getColumn(nRow,"cdid");
    }else{
       deptcd = deptcdnm.substr(0,4);
    }

    v_medi_subject     = '"'+'medi_subject'+'":'+'"'+deptcd+'",';//진료과목 
    // trace(ds_init_P0322list.saveXML());
     //trace("v_medi_subject :"+deptcdnm+"/"+v_medi_subject);
    //헤더 데이터 적재하기
    var v_insu  = (ds_main_prcpdata_patinfo.getColumn(0,"insukind")).substr(0,1);
    var v_insu2 ="";
    if(v_insu == "4") { //산재 
       v_insu2 = "3";
    }else if (v_insu == "3") { //자보 
       v_insu2 = "4";
    }else{
       v_insu2 = v_insu;
    }
    v_insure = v_insure+'"'+v_insu2+'",';
   
    if (v_insu2 == "5") { // 보험유형 기타 
    	v_insure_ex        = v_insure_ex +'"51",';
    }else {
		v_insure_ex        = v_insure_ex +'"",';
    }
    if (v_insu2 == '2') {
        v_protect          = v_protect+'"'+ds_main_prcpdata_patinfo.getColumn(0,"insukind").substr(1,1)+'",';
    }else{
		v_protect          = v_protect+'"",';
    }
    v_order_no         = v_order_no+'"'+ ds_main_prcpdata_patinfo.getColumn(0,"drugdd").substr(0,8)+ds_main_prcpdata_patinfo.getColumn(0,"drugno")+'",';
    v_doc_name         = v_doc_name+'"'+ds_main_prcpdata_patinfo.getColumn(0,"orddrnm")+'",';
    
	if (deptcdnm.indexOf("치과") >= 0 || deptcdnm.indexOf("치주") >= 0 || deptcdnm.indexOf("구강") >= 0) { //치과의사구분
		v_doc_license = v_doc_license+'"치과의사",';
	}else{
		v_doc_license      = v_doc_license+'"의사",';
	}
    
    v_doc_id           = v_doc_id+'"'+ds_main_prcpdata_patinfo.getColumn(0,"licnsno")+'",';
    v_pat_name         = v_pat_name+'"'+ds_main_prcpdata_patinfo.getColumn(0,"hngnm")+'",';
    v_pat_rrn          = v_pat_rrn+'"'+ds_main_prcpdata_patinfo.getColumn(0,"rrgstno").replace("-","")+'",';
    v_insured_relation = v_insured_relation+'"",';
    v_insurance_no     = v_insurance_no+'"",';
    v_acc_hosp_no      = v_acc_hosp_no+'"",';
    v_company_name     = v_company_name+'"",';
    v_vows_no          = v_vows_no+'"",';
    v_medi_subject     = v_medi_subject;
    v_special_code     = v_special_code;
    v_period_date      = v_period_date;
    v_extra_data       = "";
    
    //확장데이터 
    var rsrvdd         = utlf_transNullToEmpty(ds_main_prcpdata_patinfo.getColumn(0,"rsrvdd")).replace("/","");//예약일자 
    var diagcd         = new Array();
    for (var i=0; i < ds_main_prcpdata_diaginfo.rowcount; i++){
        diagcd[0] = ds_main_prcpdata_diaginfo.getColumn(0,"diagcd1");
        if(!utlf_isNull(ds_main_prcpdata_diaginfo.getColumn(0,"diagcd2"))) {
			diagcd[1] = ds_main_prcpdata_diaginfo.getColumn(0,"diagcd2");
        };
    }
    if(diagcd.length > 0 && !utlf_isNull(rsrvdd)) {
       v_extra_data = '01';
       for (var j=0; j< diagcd.length; j++) {
           v_extra_data = v_extra_data+'|'+diagcd[j];
       }
       for (var j=0; j < (4 - diagcd.length); j++) {
           v_extra_data = v_extra_data+'|';
       }
       v_extra_data = '|'+v_extra_data + '|'+rsrvdd+'|';
    }else if(diagcd.length > 0 && utlf_isNull(rsrvdd)) {
       v_extra_data = '01';
       for (var j=0; j< diagcd.length; j++) {
           v_extra_data = '|'+v_extra_data+'|'+diagcd[j];
       }
       for (var j=0; j < (4 - diagcd.length); j++) {
           v_extra_data = v_extra_data+'|';
       }
       v_extra_data = v_extra_data + '||';
    }else if(diagcd.length < 1 && !utlf_isNull(rsrvdd)) {
       v_extra_data = v_extra_data + '|||||'+rsrvdd+'|';
    }else{
       v_extra_data = v_extra_data + '"01"';
    }
    //v_extra_data = '"'+'extra_data'+'":"' + utlf_rPad(v_extra_data,200," ")+'"';
    v_extra_data = '"'+'extra_data'+'":"' + v_extra_data+'"';
    
    //trace(v_extra_data);
        
    //trace(ds_main_prcpdata_patinfo.saveXML());
 	//trace(ds_main_prcpdata_diaginfo.saveXML());
 	//trace("rsrvdd"+rsrvdd+"/"+6 - diagcd.length);
    //trace(ds_main_prcpdata_sumlist.saveXML());
   	

    //약/주사 처방부분
    var v_allow_code       = '"'+'allow_code'+'":';  //급여구분 
    var v_internal_use     = '"'+'internal_use'+'":'; //내복/외용 구분 
    var v_drug_code        = '"'+'drug_code'+'":'; //약품 코드
    var v_oneday_admin     = '"'+'oneday_admin'+'":'; //1 일 투여횟수
    var v_all_admin        = '"'+'all_admin'+'":'; //총 투여횟수 
    var v_admin_code       = '"'+'admin_code'+'":'; //용법코드 
    var v_extra_data1      = ""; // 확장데이터 
    //v_extra_data1 = utlf_rPad(v_extra_data1,100," ");
     
    var strJson  = "";
	var strJson2 = "";
	var strJson3 = "";
	
	strJson = '{ '+'\n' + v_header + '\n' + v_hosp_code + '\n' + v_version +'\n'+ v_print_info +'\n'+ v_insure +'\n'+ v_insure_ex +'\n'+ v_protect +'\n'
	        + v_order_no +'\n'+ v_medi_care_t +'\n'+ v_hosp_name +'\n'+ v_hosp_tel +'\n'+ v_hosp_fax +'\n'+ v_hosp_email +'\n'
	        + v_doc_name +'\n'+ v_doc_license +'\n'+ v_doc_id +'\n'+ v_pat_name +'\n'+ v_pat_rrn +'\n'+ v_insured_relation +'\n' +v_insurance_no +'\n'
	        + v_acc_hosp_no +'\n'+ v_company_name +'\n'+ v_vows_no +'\n'+ v_order_date +'\n'+ v_medi_subject +'\n'+ v_special_code +'\n' +v_period_date 
	        +'\n' 	        + v_extra_data;
    
    for(var i = 0 ; i < ds_main_prcpdata_sumlist.rowcount ; i++) {
           
       if (!utlf_isNull(ds_main_prcpdata_sumlist.getColumn(i,"prcptims"))) { 
       
           var v_drugkind    = ds_main_prcpdata_sumlist.getColumn(i,"drugkind");//M	주사약,N	내복약,Y	외용약
           var v_payflagcd   = ds_main_prcpdata_sumlist.getColumn(i,"payflagcd");
           var rxd_suryang   = '|'+utlf_lPad((ds_main_prcpdata_sumlist.getColumn(i,"prcpqty")*10000),5,"0")+'|0';//1회 투약량
           var rxd_code      = ds_main_prcpdata_sumlist.getColumn(i,"edicd");
		   if (utlf_isNull(ds_main_prcpdata_sumlist.getColumn(i,"edicd"))) {
			   rxd_code      = ds_main_prcpdata_sumlist.getColumn(i,"hngnm");
		   }
       
           var rxd_gubun     = "";
           var rxd_pay       = "";
           
		   if (v_drugkind == "M" || v_drugkind == "Y" ) {
		      rxd_gubun = "2";
		   }else{
			  rxd_gubun = "1";
		   }
			
           if (v_payflagcd == "0") {
			   rxd_pay = "1";
		   }else if (v_payflagcd == "1") {			    
			   rxd_pay = "3";
		   }else if (v_payflagcd == "2") {			    
			   rxd_pay = "2";
		   }else{
			   rxd_pay = "3";
		   }
			
		   v_extra_data1 = "";
		   v_extra_data1 = v_extra_data1 + rxd_suryang;
		   //v_extra_data1 = '"'+'extra_data'+'":"'+utlf_rPad(v_extra_data1,100," ")+'"';
		   v_extra_data1 = '"'+'extra_data'+'":"'+v_extra_data1+'"';
		   if(v_drugkind == 'N' || v_drugkind == 'Y') {  //약처방
		      if(utlf_isNull(strJson2)) {
			     strJson2 = strJson2   +'{'+'\n'+
			               v_allow_code     +'"'+rxd_pay+'",'+'\n'+
                           v_internal_use   +'"'+rxd_gubun+'",'+'\n'+
                           v_drug_code      +'"'+rxd_code+'",'+'\n'+
                           v_oneday_admin   +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcptims")+'",'+'\n'+
                           v_all_admin      +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcpdayno")+'",'+'\n'+
                           //v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdnm")+'",'+'\n'+
                           v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdcd").substr(0,6)+'",'+'\n'+
                           v_extra_data1 +'}' ;
              }else{
				strJson2 = '\n'+strJson2 +','+'\n'+'{ '+'\n'+
			               v_allow_code     +'"'+rxd_pay+'",'+'\n'+
                           v_internal_use   +'"'+rxd_gubun+'",'+'\n'+
                           v_drug_code      +'"'+rxd_code+'",'+'\n'+
                           v_oneday_admin   +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcptims")+'",'+'\n'+
                           v_all_admin      +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcpdayno")+'",'+'\n'+
                           //v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdnm")+'",'+'\n'+
                           v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdcd").substr(0,6)+'",'+'\n'+
                           v_extra_data1 +'}' ;
              }
		   }else{ //주사처방 
			if(utlf_isNull(strJson3)) {
			     strJson3 = strJson3   +'{'+'\n'+
			               v_allow_code     +'"'+rxd_pay+'",'+'\n'+
                           v_internal_use   +'"'+rxd_gubun+'",'+'\n'+
                           v_drug_code      +'"'+rxd_code+'",'+'\n'+
                           v_oneday_admin   +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcptims")+'",'+'\n'+
                           v_all_admin      +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcpdayno")+'",'+'\n'+
                           //v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdnm")+'",'+'\n'+
                           v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdcd").substr(0,6)+'",'+'\n'+
                           v_extra_data1 +'}' ;
              }else{
				strJson3 = '\n'+strJson3 +','+'\n'+'{ '+'\n'+
			               v_allow_code     +'"'+rxd_pay+'",'+'\n'+
                           v_internal_use   +'"'+rxd_gubun+'",'+'\n'+
                           v_drug_code      +'"'+rxd_code+'",'+'\n'+
                           v_oneday_admin   +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcptims")+'",'+'\n'+
                           v_all_admin      +'"'+ds_main_prcpdata_sumlist.getColumn(i,"prcpdayno")+'",'+'\n'+
                           //v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdnm")+'",'+'\n'+
                           v_admin_code     +'"'+ds_main_prcpdata_sumlist.getColumn(i,"mthdcd").substr(0,6)+'",'+'\n'+
                           v_extra_data1 +'}' ;
              }
		   }
       }
    }
      	
   	var strTemp  = strJson;
   	var strTemp2 = strJson2;		
	var strTemp3 = strJson3;		

	if(!utlf_isNull(strTemp2)) {
		strTemp2 = '"'+'drug_list'+'"'+': ['+ strTemp2+'\n'+' ]';
   	}
   	if(!utlf_isNull(strTemp3)) {
		strTemp3 = '"'+'injection_list'+'"'+': ['+strTemp3+'\n'+' ]';
    }
	
	if(!utlf_isNull(strTemp2) && !utlf_isNull(strTemp3)) {
       strTemp = strTemp+','+'\n'+strTemp2+','+'\n'+strTemp3+'\n'+'}';
      // return 'Y';
    }else if(!utlf_isNull(strTemp2) && utlf_isNull(strTemp3)) {
       strTemp = strTemp+','+'\n'+strTemp2+'\n'+'}';
      // return 'Y';
    }else if(utlf_isNull(strTemp2) && !utlf_isNull(strTemp3)) {
       strTemp = strTemp+','+'\n'+strTemp3+'\n'+'}';
       //return 'Y';
    }else{
       return 'N'; 
    }
        
    if(!utlf_isNull(strTemp2) || !utlf_isNull(strTemp3)) {
    
        //trace(strTemp);
		strTemp = strTemp.replace('"', '\\');
		ds_main_prcpdata_patinfo.updatecontrol = false;
		ds_main_prcpdata_patinfo.addColumn("drugfile","string");
        ds_main_prcpdata_patinfo.setColumn(0,"drugfile",fname);
        ds_main_prcpdata_patinfo.updatecontrol = true;

		objExtCommon.executeProcess(fdir + "Space_module.exe", strTemp+' '+fname);
		
	}else{
	   trace("strTemp:"+strTemp);
	   trace("strTemp2:"+strTemp2);
	   trace("strTemp3:"+strTemp3);
	}
}

]]></Script>
  </Form>
</FDL>