YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SPADT63200_특조처방전출력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPADT63200" position="absolute 0 0 378 134" titletext="특수조제실처방전출력" oninit="SPADT63200_oninit" onload="SPADT63200_onload">
    <Layouts>
      <Layout>
        <Shape position="absolute 0 0 378 134" id="roundrect1" class="roundrect_error" type="roundrectangle"/>
        <Static text="특조 처방전 출력 중" position="absolute 130 43 327 99" id="caption1" style="font:Dotum,11,bold;"/>
        <ImageViewer position="absolute 42 33 117 103" id="img1" image="URL('theme://images\error.png')" style="background:transparent;" stretch="none"/>
        <Div position="absolute 0 0 0 0" id="grp_report1" visible="false"/>
        <Div position="absolute 0 0 0 0" id="grp_report2" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <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_resn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <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_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"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"
include "ast_commonxp::AST.xjs"
//include "ast_pharmacyxp::SPADT63200.xjs"
include "emr_prcpmngtxp::MMOCommon.xjs"

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 초기화
 ****************************************************************************************/
function fInit() {
	var params = opener.frmf_clearParameter("params");
	dsf_setCSVToDs("ds_send_prcpinfo",params);
	
// 	var sParam = model.getAttribute("params");
// 
// 	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", astfMatrixData(sParam, 1, 2));
// 	model.makeValue("/root/send/prcpinfo/prcpdd", astfMatrixData(sParam, 1, 3));
// 	model.makeValue("/root/send/prcpinfo/orddd", astfMatrixData(sParam, 1, 4));
// 	model.makeValue("/root/send/prcpinfo/cretno", astfMatrixData(sParam, 1, 5));
// 	model.makeValue("/root/send/prcpinfo/prcpgenrflag", astfMatrixData(sParam, 1, 6));
// 	model.makeValue("/root/send/prcpinfo/pid", astfMatrixData(sParam, 1, 7));
// 	model.makeValue("/root/send/prcpinfo/orddeptcd", astfMatrixData(sParam, 1, 8));
// 	model.makeValue("/root/send/prcpinfo/wardcd", astfMatrixData(sParam, 1, 9));
// 	model.makeValue("/root/send/prcpinfo/lblflag", astfMatrixData(sParam, 1, 10));
// 	model.makeValue("/root/send/prcpinfo/prcpflag", astfMatrixData(sParam, 1, 11));
// 	model.makeValue("/root/send/prcpinfo/prntflag", astfMatrixData(sParam, 1, 12));
// 	model.makeValue("/root/send/prcpinfo/drugflag", astfMatrixData(sParam, 1, 13));
// 	model.makeValue("/root/send/prcpinfo/memoflag", "Y");
// 	model.refresh();
//sysf_trace(ds_send_prcpinfo.saveXML());    
	ds_send_prcpinfo.setColumn(0,"prcpdd",ds_send_prcpinfo.getColumn(0,"drugdd"));
	dsf_setTypeFormat(ds_send_prcpinfo, "drugno:INT^cretno:INT");
	var oParam = {};
		oParam.id          = "TRADT63201";
		oParam.service     = "pharmacyprescriptionapp.DrugPrint";
		oParam.method      = "reqGetSpPrintData";
		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_TRADT63201";

	tranf_submit(oParam);

	//20101102 이선경 수정 : 일일기준과 1회 기준의 용량과 수량을 보여주는 것을 결정하여 결과를 리턴
	var colHidnValue = lf_grdBaseColHidn("D");
	//1회 기준
	if( colHidnValue == "C") {
		dsf_makeValue(ds_main_prcpdata_patinfo,"prcpvol2chk","string","Y");
	}
//sysf_trace(utlf_isNull(ds_main_prcpdata_patinfo.getColumn(0,"pid")));	
	if(!utlf_isNull(ds_main_prcpdata_patinfo.getColumn(0,"pid"))){
		var memo 	 = ds_main_prcpdata_patinfo.getColumn(0,"memo");
		var memoCnt  = 0;
		var lineCnt  = 0;
		var pageCnt  = 0;
		var strMemo  = "";
		var nextMemo = "";
		
		if ( !utlf_isNull(memo) && 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", strMemo);
		dsf_makeValue(ds_main_prcpdata_patinfo,"memo1","string", nextMemo);
		
		// 처방전에 DUR이 존재하면 RFADT63202 존재하지 않으면 RFADT63200 출력
		// 20101117_wify_경북대병원_보고서폼 변경 처리
		// RFADT63200 ==> RFADT63203
		// RFADT63201 ==> RFADT63204
		// RFADT63203 ==> RFADT63205
		var resn 	= ds_main_prcpdata_resn.getColumn(0,"resnnm");
		// 20101106_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) + "******");	

		if(utlf_isNull(resn)) {
			if ( !utlf_isNull(nextMemo) ) {
// 				makeReportPreview(0,0,10, 10, "grp_report1"); //root/main/prcpdata/sumlist
// 				exeReportPreview("RFADT63203", "XMLSTR","","","true","","","","","","","grp_report1"); 				
// 				makeReportPreview(0,0,10, 10, "grp_report2");				
// 				exeReportPreview("RFADT63204", "XMLSTR","","","true","","","","","","","grp_report2");
				var objDOM 		= rptf_createDOM();	// DOM 객체 설정
				var objParam 	= new Object();
				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);
				objParam.xml_data_XML1 	= objDOM.documentElement.source;
				var option 		= "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0;callback=lf_complete";
				rptf_exeReportPreview30(["RFADT63203","RFADT63204"],[objParam], option);
			} else {
// 				makeReportPreview(0,0,10, 10, "grp_report1");
// 				exeReportPreview("RFADT63203", "XMLSTR","","","true","","","","","","","grp_report1"); 	
				var objDOM 		= rptf_createDOM();	// DOM 객체 설정
				var objParam 	= new Object();
				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);
				objParam.xml_data_XML1 	= objDOM.documentElement.source;
				var option 		= "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0;callback=lf_complete";
				rptf_exeReportPreview30(["RFADT63203"],[objParam], option);
				//removeReportPreview();
			}
		}else{
			if ( !utlf_isNull(nextMemo) ) {
// 				makeReportPreview(0,0,10, 10, "grp_report1");
// 				exeReportPreview("RFADT63205", "XMLSTR","","","true","","","","","","","grp_report1"); 				
// 				makeReportPreview(0,0,10, 10, "grp_report2");				
// 				exeReportPreview("RFADT63204", "XMLSTR","","","true","","","","","","","grp_report2");
				var objDOM1 	= rptf_createDOM();	// DOM 객체 설정
				var objDOM2 	= rptf_createDOM();	// DOM 객체 설정
				var objParam 	= new Object();
				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);
				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=0;callback=lf_complete";
				rptf_exeReportPreview30(["RFADT63205","RFADT63204"],[objParam], option);
			} else {
// 				makeReportPreview(0,0,10, 10, "grp_report1");
// 				exeReportPreview("RFADT63205", "XMLSTR","","","true","","","","","","","grp_report1"); 	
				var objDOM1 	= rptf_createDOM();	// DOM 객체 설정
				var objDOM2 	= rptf_createDOM();	// DOM 객체 설정
				var objParam 	= new Object();
				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);
				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=0;callback=lf_complete";
				rptf_exeReportPreview30(["RFADT63205"],[objParam], option);
				//removeReportPreview();
			}
		}
	} else {
		this.close();
	}
	
	//this.close();
}

// function cf_TRADT63201(sSvcId, nErrorCode, sErrorMsg) {
//     if(nErrorCode < 0) return;
//     dsf_setTypeFormat(ds_main_prcpdata_patinfo, "drugno:INT");
//     dsf_setTypeFormat(ds_main_prcpdata_sumlist, "prcptims:INT^prcpdayno:INT");
// }

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

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

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPADT63200
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SPADT63200_onload(obj:Form, e:LoadEventInfo)
{
	if(frmf_checkOpener()) {
		fInit();	// 초기화
	}
}
]]></Script>
  </Form>
</FDL>