YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADT62201.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[
var nTotal = 0;
/*
var prepagecnt 	= 0;
var nextpagecnt = 0;
*/

/****************************************************************************************
 * Argument			: N/A
 * Description		: 초기화
 ****************************************************************************************/
function fInit_prnt() {

	dsf_createDsRow("ds_req", 	[
								{col:"drugdd", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"drugdd")}
							  , {col:"drugno", type:"INT", size:256, val:ds_send_prcpinfo.getColumn(0,"drugno")}
							  , {col:"pid", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"pid")}
							  , {col:"prcpdd", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"drugdd")}
							  , {col:"orddd", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"orddd")}
							  , {col:"cretno", type:"INT", size:256, val:ds_send_prcpinfo.getColumn(0,"cretno")}
							  , {col:"orddeptcd", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"orddeptcd")}
							  , {col:"prcpgenrflag", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"prcpgenrflag")}
							  , {col:"lblflag", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"lblflag")}
							  , {col:"prcpflag", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"prcpflag")}
							  , {col:"prntflag", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"prntflag")}
							  , {col:"etcdescflag", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"etcdescflag")}
							  , {col:"reyn", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"reyn")}
							  , {col:"autoyn", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"autoyn")}
							  , {col:"reprintyn", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"reprintyn")}
							  , {col:"stocdeptcd", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"stocdeptcd")}
							  , {col:"autolimanti", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"autolimanti")}
							  , {col:"clientprnttime", type:"STRING", size:256, val:utlf_getCurrentDateTime().replace(" ","")}
							  , {col:"intiflag", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"intiflag")}
							  , {col:"intinoflag", type:"STRING", size:256, val:ds_send_prcpinfo.getColumn(0,"intinoflag")}
								]);
								


	var oParam = {};
		oParam.id          = "TRADT62201";
		oParam.service     = "pharmacyprescriptionapp.DrugPrint";
		oParam.method      = "reqGetInPrintData";
		oParam.inds        = "req=ds_req";
		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_TRADT62201";

	tranf_submit(oParam);



 
 	dsf_createDs("ds_main_prcpdata_sumlist_copy");	//
 	dsf_copyColInfo(ds_main_prcpdata_sumlist_copy,ds_main_prcpdata_sumlist);
 	ds_main_prcpdata_sumlist_copy.copyData(ds_main_prcpdata_sumlist);
 	ds_main_prcpdata_sumlist.clearData();
 	
 	var intiyn1 = "N";  //인티팜처방 유무
 	var intiyn2 = "N";  //인티팜처방 유무
 	var intirow = 0;    //인티팜처방 마지막 row
 	var dcyn    = "N";  //반환약 여부 
 	var drugno  = "";   //drugno
 	
 	for (var i = 0 ; i < ds_main_prcpdata_sumlist_copy.rowcount ; i++) {
 	     var engnm = ds_main_prcpdata_sumlist_copy.getColumn(i,"engnm");
 	     if (!utlf_isNull(ds_main_prcpdata_sumlist_copy.getColumn(i,"drugno"))) {
 	        drugno =ds_main_prcpdata_sumlist_copy.getColumn(i,"drugno");
 	     }
 	       if (!utlf_isNull(engnm)) {
 			   if (engnm.indexOf("반 환 약") > 0  ) {
 			      dcyn = "Y";
 			   }
 		   }
 	}
 	
 	
 	
    if (dcyn == "N") { 	
		for (var i = 0 ; i < ds_main_prcpdata_sumlist_copy.rowcount ; i++) {
			 var engnm = ds_main_prcpdata_sumlist_copy.getColumn(i,"engnm");
			 var edicd = ds_main_prcpdata_sumlist_copy.getColumn(i,"edicd");
			   if (!utlf_isNull(engnm)) {
				   if (engnm.indexOf("이하 여백") < 0  && ds_main_prcpdata_sumlist_copy.getColumn(i,"mediflag") != 'M') {
						var iRow = ds_main_prcpdata_sumlist.addRow();
						ds_main_prcpdata_sumlist.copyRow(iRow, ds_main_prcpdata_sumlist_copy, i);
						intiyn1 = "Y";
						intirow = iRow;
				   }	
				   //trace(engnm);
				   if (engnm.indexOf("반 환 약") > 0  ) {
					  dcyn = "Y";
				   }
			   }
		}

 		for (var i = 0 ; i < ds_main_prcpdata_sumlist_copy.rowcount ; i++) {
 				var iRow = 0;
 				if (ds_main_prcpdata_sumlist_copy.getColumn(i,"mediflag") == 'M') {
 					
 					//trace("aaaaaaaaaaaaaaa :"+intiyn1+"/"+intiyn2);
 					if (intiyn1 == "Y" && intiyn2 == "N" ) {
 						iRow = ds_main_prcpdata_sumlist.addRow();
 						ds_main_prcpdata_sumlist.setColumn(iRow, "edicd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugtype","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "hngnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "powdflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvolunit","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "dailyqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqtyunit","");					
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcptims","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdayno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "totdrugqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mthdnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdelivefact","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugmd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpkindcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugstatnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mediflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "nextpageyn","Y");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "careprnexecflag","");
 						
 						iRow = ds_main_prcpdata_sumlist.addRow();
 					
 						ds_main_prcpdata_sumlist.copyRow(iRow, ds_main_prcpdata_sumlist_copy, i);
 						ds_main_prcpdata_sumlist.setColumn(iRow, "edicd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugtype","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "hngnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "powdflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvolunit","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "dailyqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqtyunit","");					
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcptims","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdayno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "totdrugqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mthdnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdelivefact","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugmd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpkindcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugstatnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mediflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","<  인티팜 약  >");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "nextpageyn","Y");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "careprnexecflag","");
 						
 					}else if (intiyn1 == "N" && intiyn2 == "N" ) {
 					
 						//trace('AAAAAAAAAAAAAAAAAAAAAAAAAAAA');
 						iRow = ds_main_prcpdata_sumlist.addRow();
 						ds_main_prcpdata_sumlist.setColumn(iRow, "edicd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugtype","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "hngnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "powdflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvolunit","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "dailyqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqtyunit","");					
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcptims","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdayno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "totdrugqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mthdnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdelivefact","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugmd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpkindcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugstatnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mediflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "nextpageyn","Y");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "careprnexecflag","");
 						
 						iRow = ds_main_prcpdata_sumlist.addRow();
 					
 						ds_main_prcpdata_sumlist.copyRow(iRow, ds_main_prcpdata_sumlist_copy, i);
 						ds_main_prcpdata_sumlist.setColumn(iRow, "edicd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugtype","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "hngnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "powdflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvolunit","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "dailyqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqtyunit","");					
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcptims","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdayno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "totdrugqty","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mthdnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpdelivefact","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugno","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugmd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpkindcd","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "drugstatnm","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpvol2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "prcpqty2","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "mediflag","");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "engnm","<  인티팜 약  >");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "nextpageyn","Y");
 						ds_main_prcpdata_sumlist.setColumn(iRow, "careprnexecflag","");
 					}
 					
 					iRow = ds_main_prcpdata_sumlist.addRow();
 					
 					ds_main_prcpdata_sumlist.copyRow(iRow, ds_main_prcpdata_sumlist_copy, i);
 					intiyn2 = "Y";
 				}
 		}
 
 		for (var i = 0 ; i < ds_main_prcpdata_sumlist_copy.rowcount ; i++) {
 			 var engnm      = ds_main_prcpdata_sumlist_copy.getColumn(i,"engnm");
 			 var edicd      = ds_main_prcpdata_sumlist_copy.getColumn(i,"edicd");
 			 var nextpageyn = ds_main_prcpdata_sumlist_copy.getColumn(i,"nextpageyn");
 			   if (!utlf_isNull(engnm)) {
 			   //if (utlf_isNull(edicd)) {
 				   if (engnm.indexOf("이하 여백") >= 0 ) {
 						var iRow = ds_main_prcpdata_sumlist.addRow();
 						ds_main_prcpdata_sumlist.copyRow(iRow, ds_main_prcpdata_sumlist_copy, i);
 				   }
 				}
 		}
 	}else{
 	
 	     ds_main_prcpdata_sumlist.copyData(ds_main_prcpdata_sumlist_copy);

 	}
 	

	
	//20090811 이선경 처방전 수동 첫출력시 log 생성
	if(ds_send_prcpinfo.getColumn(0,"autoyn") != "Y"  && ds_send_prcpinfo.getColumn(0,"reprintyn") != "Y") {
		sysf_trace("병동처방전 출력 log START");
		sysf_trace("pid : " 	+ ds_main_prcpdata_patinfo.getColumn(0,"pid"));
		sysf_trace("prcpdd : " 	+ ds_main_prcpdata_patinfo.getColumn(0,"prcpdd"));
		sysf_trace("drugno : " 	+ ds_main_prcpdata_patinfo.getColumn(0,"drugno"));
		sysf_trace("병동처방전 출력 log END");
	}
	
	//20101102 이선경 수정 : 일일기준과 1회 기준의 용량과 수량을 보여주는 것을 결정하여 결과를 리턴
	var colHidnValue = lf_grdBaseColHidn("D");
	//1회 기준
	if( colHidnValue == "C" ) {
		dsf_makeValue(ds_main_prcpdata_patinfo,"prcpvol2chk","string","Y");
	}

	if(!utlf_isNull(ds_main_prcpdata_patinfo.getColumn(0,"pid"))) {
		var memo 		= utlf_transNullToEmpty(ds_main_prcpdata_patinfo.getColumn(0,"memo"));
		var memoCnt 	= 0;
		var lineCnt   	= 0;
		var pageCnt 	= 0;
		var strMemo 	= "";
		var nextMemo	= "";
		/*
		if ( memo.indexOf("\n", lineCnt) >=0 ){
			while ( (memoCnt = memo.indexOf("\n", lineCnt ))>=0){
				if( pageCnt < 3) {
					if (lineCnt == 0) {
						strMemo = strMemo + memo.substring( lineCnt, memoCnt );
					} else {
						strMemo = strMemo + "\n" + memo.substring( lineCnt, memoCnt ) ;
					}
				} else {
					if (pageCnt == 3) {
						nextMemo = nextMemo + memo.substring( lineCnt, memoCnt );
					} else {
						nextMemo = nextMemo + "\n" + memo.substring( lineCnt, memoCnt ) ;
					}
				} 
				lineCnt = memoCnt + 1;
				pageCnt++;
			}
			
			if ( lineCnt < memo.length ) {
				nextMemo = nextMemo + "\n" + memo.substring( lineCnt, memo.length );
			}
			
		} else {
			strMemo = memo;				
		}
		*/		
		ds_main_prcpdata_patinfo.setColumn(0,"memo", memo);
		dsf_makeValue(ds_main_prcpdata_patinfo,"memo1","string", nextMemo);

        
 		var prepagecnt 	= 0;
 		var nextpagecnt = 0;

		dsf_createDs("ds_temp_prcpdata_sumlist");
		dsf_copyColInfo(ds_temp_prcpdata_sumlist,ds_main_prcpdata_sumlist);
		ds_temp_prcpdata_sumlist.copyData(ds_main_prcpdata_sumlist);


// trace('000000000000000000');
// trace(ds_temp_prcpdata_sumlist.saveXML());
		ds_main_prcpdata_sumlist.clearData();
		dsf_createDs("ds_main_prcpdata_sumlist2");	//다음페이지 출력할 약품 
		
		dsf_copyColInfo(ds_main_prcpdata_sumlist,ds_temp_prcpdata_sumlist);
		dsf_copyColInfo(ds_main_prcpdata_sumlist2,ds_temp_prcpdata_sumlist);

		for (var i = 0 ; i < ds_temp_prcpdata_sumlist.rowcount ; i++) {
			var nextpageyn = ds_temp_prcpdata_sumlist.getColumn(i,"nextpageyn");

			if(nextpageyn == "N" || utlf_isNull(nextpageyn)) {
				ds_main_prcpdata_sumlist.copyRow(ds_main_prcpdata_sumlist.addRow(),ds_temp_prcpdata_sumlist,i);
				prepagecnt++;
			} else if(nextpageyn == "Y") {				
				ds_main_prcpdata_sumlist2.copyRow(ds_main_prcpdata_sumlist2.addRow(),ds_temp_prcpdata_sumlist,i);
				nextpagecnt++;
			} else {
			}
		}
		
		if( nextpagecnt > 0 ) {
			if(ds_temp_prcpdata_sumlist.rowcount > 0) {
				if(ds_temp_prcpdata_sumlist.getColumn(ds_temp_prcpdata_sumlist.rowcount-2,"nextpageyn") == "E") {
					ds_main_prcpdata_sumlist2.copyRow(ds_main_prcpdata_sumlist2.addRow(),ds_temp_prcpdata_sumlist,ds_temp_prcpdata_sumlist.rowcount-2);
				}
			}
			ds_main_prcpdata_sumlist2.copyRow(ds_main_prcpdata_sumlist2.addRow(),ds_temp_prcpdata_sumlist,ds_temp_prcpdata_sumlist.rowcount-1);
		} else {
			if(ds_temp_prcpdata_sumlist.rowcount > 0) {
				if(ds_temp_prcpdata_sumlist.getColumn(ds_temp_prcpdata_sumlist.rowcount-2,"nextpageyn") == "E") {
					ds_main_prcpdata_sumlist.copyRow(ds_main_prcpdata_sumlist.addRow(),ds_temp_prcpdata_sumlist,ds_temp_prcpdata_sumlist.rowcount-2);
				}
			}
			ds_main_prcpdata_sumlist.copyRow(ds_main_prcpdata_sumlist.addRow(),ds_temp_prcpdata_sumlist,ds_temp_prcpdata_sumlist.rowcount-1);
		}

// 		trace('1111111111111111111111');
// 			trace(ds_main_prcpdata_sumlist.saveXML());
// 		trace(ds_main_prcpdata_sumlist2.saveXML());	
		//처방전에 환자 키, 체중을 입력하기 위해 첫번째 공백 노드 삭제.(2010-01-18)
		if(utlf_isNull(ds_main_prcpdata_sumlist2.getColumn(0,"hngnm"))) {
			ds_main_prcpdata_sumlist2.deleteRow(0);
		}
		
		//처방전에 환자 키, 체중을 입력하기 위해 첫번째 공백 노드 삭제.(2010-01-18)
		if(utlf_isNull(ds_main_prcpdata_sumlist.getColumn(0,"hngnm"))) {
			ds_main_prcpdata_sumlist.deleteRow(0);
		}
		
		//처방전에 DUR이 존재하면 RFADT62202 존재하지 않으면 RFADT62200 출력
		var resn = ds_main_prcpdata_resn.getColumn(0,"resnnm");
		

		
		// 20101106_laboru_경북대병원_주민번호 뒷자리 별표 처리
		var rrgstno = utlf_transNullToEmpty(ds_main_prcpdata_patinfo.getColumn(0,"rrgstno")).split("-");
		ds_main_prcpdata_patinfo.setColumn(0,"rrgstno", rrgstno[0] + "-" + rrgstno[1].substring(0, 1) + "******");
		
		// 20120228_laboru_지참약 유무 출력
		if(!utlf_isNull(ds_main_prcpdata_sumlist.getColumn(0,"selfflag"))) {
			dsf_makeValue(ds_main_prcpdata_patinfo,"selfflag","string", "(" + ds_main_prcpdata_sumlist.getColumn(0,"selfflag") + ")");
		}
		//trace('222222222222222   -> '+nextpagecnt);
		// 20120402_laboru_처방전에 인티팜 약인지 여부 표시
		if(nextpagecnt > 0) {
			for (var i = 0 ; i < ds_main_prcpdata_sumlist2.rowcount ; i++) {
				var tempmedi = "";
				if(ds_main_prcpdata_sumlist2.getColumn(i,"mediflag") == "M") {
					tempmedi = "인티";
				} else if(ds_main_prcpdata_sumlist2.getColumn(i,"mediflag") == "P") {
					tempmedi = "약국";
				} 
				
				if (!utlf_isNull(tempmedi)) {
					ds_main_prcpdata_sumlist2.setColumn(i,"engnm",  tempmedi + " - " + ds_main_prcpdata_sumlist2.getColumn(i,"engnm") );
				}			
			}
			for (var i = 0 ; i < ds_main_prcpdata_sumlist.rowcount ; i++) {
				var tempmedi = "";
				if(ds_main_prcpdata_sumlist.getColumn(i,"mediflag") == "M") {
					tempmedi = "인티";
				} else if(ds_main_prcpdata_sumlist.getColumn(i,"mediflag") == "P") {
					tempmedi = "약국";
				} 
				
				if (!utlf_isNull(tempmedi)) {
					ds_main_prcpdata_sumlist.setColumn(i,"engnm",  tempmedi + " - " + ds_main_prcpdata_sumlist.getColumn(i,"engnm") );
				}			
			}
		} else {
			for (var i = 1 ; i < ds_main_prcpdata_sumlist.rowcount ; i++) {
				var tempmedi = "";
				if(ds_main_prcpdata_sumlist.getColumn(i,"mediflag") == "M") {
					tempmedi = "인티";
				} else if(ds_main_prcpdata_sumlist.getColumn(i,"mediflag") == "P") {
					tempmedi = "약국";
				} 

				if (!utlf_isNull(tempmedi)) {
					ds_main_prcpdata_sumlist.setColumn(i,"engnm", tempmedi  + " - " + ds_main_prcpdata_sumlist.getColumn(i,"engnm") );
				}			
			}
		}

		
		// 20101117_wify_경북대병원_보고서폼 변경 처리
		// RFADT622000 ==> RFADT622003
		// RFADT622001 ==> RFADT622004
		// RFADT622002 ==> RFADT622005
		if(utlf_isNull(resn)) {
			if ( !utlf_isNull(nextMemo) ) {
				nTotal = prepagecnt + nextpagecnt;
				if(prepagecnt > 0) {
					nTotal = nTotal - prepagecnt;
//sysf_trace("1-1 total : "+nTotal);
// 					makeReportPreview(0,0,10, 10, "grp_report1");
					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;
					if (nextpagecnt < 1) {
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";
					}else{
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";										
					}
					rptf_exeReportPreview30(["RFADT62203"],[objParam], option);
				}
				
				if(nextpagecnt > 0) {
					nTotal = nTotal - nextpagecnt;

//sysf_trace("1-2 total : "+nTotal);
//					makeReportPreview(0,0,10, 10, "grp_report2");
//					makeReportPreview(0,0,10, 10, "grp_report3");				
					var objDOM = rptf_createDOM();	// DOM 객체 설정
					ds_main_prcpdata_sumlist.clearData();
					ds_main_prcpdata_sumlist.copyData(ds_main_prcpdata_sumlist2);
					//rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist);	
					rptf_setNodeListToDOM(objDOM, "/root/main/prcpdata/sumlist"	, ds_main_prcpdata_sumlist2);	
					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;
					if (nextpagecnt < 1) {
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";
					}else{
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";										
					}
					rptf_exeReportPreview30(["RFADT62203","RFADT62204"],[objParam], option);
				} else {

//					makeReportPreview(0,0,10, 10, "grp_report2");				
					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(["RFADT62204"],[objParam], option);
				}
			} else {
				nTotal = prepagecnt + nextpagecnt;
				
				if(prepagecnt > 0) {
					nTotal = nTotal - prepagecnt;

//sysf_trace("2-1 total : "+nTotal+"/"+prepagecnt+"/"+nextpagecnt);
//					makeReportPreview(0,0,10, 10, "grp_report1");
					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;
					if (nextpagecnt < 1) {
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";
					}else{
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";										
					}
					rptf_exeReportPreview30(["RFADT62203"],[objParam], option);
					
				}

				if(nextpagecnt > 0) {
//sysf_trace("2-2 total : "+nTotal);
					nTotal = nTotal - nextpagecnt;

					
//					makeReportPreview(0,0,10, 10, "grp_report2");
					var objDOM = rptf_createDOM();	// DOM 객체 설정
					
 					ds_main_prcpdata_sumlist.clearData();
 					ds_main_prcpdata_sumlist.copyData(ds_main_prcpdata_sumlist2);
 					
					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;";	
					var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";
					rptf_exeReportPreview30(["RFADT62203"],[objParam], option);
				}
			}
		}else {
			if ( !utlf_isNull(nextMemo) ) {
				nTotal = prepagecnt + nextpagecnt;
				if(prepagecnt > 0) {
					nTotal = nTotal - prepagecnt;
//sysf_trace("3-1 total : "+nTotal);
//					makeReportPreview(0,0,10, 10, "grp_report1");
					var objDOM1 = rptf_createDOM();	// DOM 객체 설정
					var objDOM2 = rptf_createDOM();	// DOM 객체 설정
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/sumlist", ds_main_prcpdata_sumlist);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/patinfo", ds_main_prcpdata_patinfo);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
					rptf_setNodeListToDOM(objDOM2, "/root/main/prcpdata/resn", ds_main_prcpdata_resn);
					var objParam = new Object();
					objParam.xml_data_XML1 = objDOM1.documentElement.source;
					objParam.xml_data_XML2 = objDOM2.documentElement.source;
					if (nextpagecnt < 1) {
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";
					}else{
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";										
					}
					rptf_exeReportPreview30(["RFADT62205"],[objParam], option);
				}
				
				if(nextpagecnt > 0) {
					nTotal = nTotal - nextpagecnt;
//sysf_trace("3-2 total : "+nTotal);
//					makeReportPreview(0,0,10, 10, "grp_report2");
//					makeReportPreview(0,0,10, 10, "grp_report3");				
					ds_main_prcpdata_sumlist.clear();
					ds_main_prcpdata_sumlist.copyData(ds_main_prcpdata_sumlist2);
					var objDOM1 = rptf_createDOM();	// DOM 객체 설정
					var objDOM2 = rptf_createDOM();	// DOM 객체 설정
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/sumlist", ds_main_prcpdata_sumlist);	
					//rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/sumlist", ds_main_prcpdata_sumlist2);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/patinfo", ds_main_prcpdata_patinfo);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
					rptf_setNodeListToDOM(objDOM2, "/root/main/prcpdata/resn", ds_main_prcpdata_resn);
					var objParam = new Object();
					objParam.xml_data_XML1 = objDOM1.documentElement.source;
					objParam.xml_data_XML2 = objDOM2.documentElement.source;
					var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";	
					rptf_exeReportPreview30(["RFADT62205","RFADT62204"],[objParam], option);
				} else {
//					makeReportPreview(0,0,10, 10, "grp_report2");				
					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(["RFADT62204"],[objParam], option);
				}
			} else {
				nTotal = prepagecnt + nextpagecnt;
				if(prepagecnt > 0) {
					nTotal = nTotal - prepagecnt;
//sysf_trace("4-1 total : "+nTotal);
//					makeReportPreview(0,0,10, 10, "grp_report1");
					var objDOM1 = rptf_createDOM();	// DOM 객체 설정
					var objDOM2 = rptf_createDOM();	// DOM 객체 설정
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/sumlist", ds_main_prcpdata_sumlist);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/patinfo", ds_main_prcpdata_patinfo);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
					rptf_setNodeListToDOM(objDOM2, "/root/main/prcpdata/resn", ds_main_prcpdata_resn);
					var objParam = new Object();
					objParam.xml_data_XML1 = objDOM1.documentElement.source;
					objParam.xml_data_XML2 = objDOM2.documentElement.source;
					//var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";	
					if (nextpagecnt < 1) {
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";
					}else{
						var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;";										
					}
					rptf_exeReportPreview30(["RFADT62205"],[objParam], option);
				}
				
				if(nextpagecnt > 0) {
					nTotal = nTotal - nextpagecnt;
//sysf_trace("4-2 total : "+nTotal);
//					makeReportPreview(0,0,10, 10, "grp_report2");
					ds_main_prcpdata_sumlist.clear();
					ds_main_prcpdata_sumlist.copyData(ds_main_prcpdata_sumlist2);
					var objDOM1 = rptf_createDOM();	// DOM 객체 설정
					var objDOM2 = rptf_createDOM();	// DOM 객체 설정
					//rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/sumlist", ds_main_prcpdata_sumlist);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/sumlist", ds_main_prcpdata_sumlist);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/patinfo", ds_main_prcpdata_patinfo);	
					rptf_setNodeListToDOM(objDOM1, "/root/main/prcpdata/diaginfo", ds_main_prcpdata_diaginfo);	
					rptf_setNodeListToDOM(objDOM2, "/root/main/prcpdata/resn", ds_main_prcpdata_resn);
					var objParam = new Object();
					objParam.xml_data_XML1 = objDOM1.documentElement.source;
					objParam.xml_data_XML2 = objDOM2.documentElement.source;
					var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=1;callback=lf_complete;";	
					rptf_exeReportPreview30(["RFADT62205"],[objParam], option);

				}
			}
		}
	} else {
		this.close();
	}
}

function lf_complete() {
    //trace("nTotal "+nTotal);
    //trace(ds_main_prcpdata_patinfo.saveXML());
	if(nTotal == 0) this.close();
	
			
}

]]></Script>