YNU_JEUS/app_home/himed/xpapps/ast/healcarecoopxp/xp/SPARC05400_회신서미리보기.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPARC05400" position="absolute 0 0 860 976" titletext="회신서미리보기" oninit="SPARC05400_oninit" onload="SPARC05400_onload">
    <Layouts>
      <Layout>
        <Static id="caption2" text="회신서미리보기" class="tit_1" position="absolute 0 0 158 25"/>
        <Div id="div_report" taborder="1" position="absolute 0 38 850 952"/>
      </Layout>
    </Layouts>
    <Objects/>
    <Bind/>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-06
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-06      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/ 
include "com_commonxp::comm_main.xjs"
function SPARC05400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPARC05400_onload(obj:Form, e:LoadEventInfo)
{
	fInit();
}

function fInit()
{
	var pid 	  = opener.frmf_getParameter("pid");
	var replseqno = opener.frmf_getParameter("replseqno");
	var fstyn	  = opener.frmf_getParameter("fstyn");
	
	dsf_createDsRow("ds_cond_TRARC02507", [{col:"pid", type:"STRING", size:256, val:pid}
										  , {col:"replseqno", type:"INT", size:256, val:replseqno}
										  , {col:"instcd", type:"STRING", size:256, val:""}
											]);
    
    dsf_setDefaultVal(ds_cond_TRARC02507, "replseqno:0");
    
    
    //<!--  기본정보  -->
	dsf_createDs("ds_data_baseinfo", [{col:"instcdnm", type:"STRING", size:256}
								  , {col:"ordfromdd", type:"STRING", size:256}
								  , {col:"ordtodd", type:"STRING", size:256}
								  , {col:"telno1", type:"STRING", size:256}
								  , {col:"telno2", type:"STRING", size:256}
								  , {col:"faxno", type:"STRING", size:256}
								  , {col:"url", type:"STRING", size:256}
								  , {col:"mainemail", type:"STRING", size:256}
								  , {col:"maindeptnm", type:"STRING", size:256}]);

	//<!--  환자정보  -->
	dsf_createDs("ds_data_patientinfo", [{col:"pid", type:"STRING", size:256}
									  , {col:"hngnm", type:"STRING", size:256}
									  , {col:"sex", type:"STRING", size:256}
									  , {col:"age", type:"BIGDECIMAL", size:256}
									  , {col:"rrgstno1", type:"STRING", size:256}
									  , {col:"rrgstno2", type:"STRING", size:256}
									  , {col:"brthdd", type:"STRING", size:256}]);
	//dsf_setTypeFormat(ds_data_patientinfo, "age:BIGDECIMAL");

	//<!--  회신내용  -->
	dsf_createDs("ds_data_replinfo", [{col:"pid", type:"STRING", size:256}
									  , {col:"replseqno", type:"BIGDECIMAL", size:256}
									  , {col:"replflag", type:"STRING", size:256}
									  , {col:"writflag", type:"STRING", size:256}
									  , {col:"recdd", type:"STRING", size:256}
									  , {col:"orddeptcd", type:"STRING", size:256}
									  , {col:"orddeptnm", type:"STRING", size:256}
									  , {col:"orddrid", type:"STRING", size:256}
									  , {col:"orddrnm", type:"STRING", size:256}
									  , {col:"reqorddd", type:"STRING", size:256}
									  , {col:"reqcretno", type:"BIGDECIMAL", size:256}
									  , {col:"reqseqno", type:"BIGDECIMAL", size:256}
									  , {col:"rsrvdd", type:"STRING", size:256}
									  , {col:"rsrvtm", type:"STRING", size:256}
									  , {col:"rsrvorddeptcd", type:"STRING", size:256}
									  , {col:"rsrvorddrid", type:"STRING", size:256}
									  , {col:"rsrvorddeptnm", type:"STRING", size:256}
									  , {col:"rsrvorddrnm", type:"STRING", size:256}
									  , {col:"rsrvcretno", type:"BIGDECIMAL", size:256}
									  , {col:"diagnm", type:"STRING", size:256}
									  , {col:"curecnts", type:"STRING", size:256}
									  , {col:"delivefact", type:"STRING", size:256}
									  , {col:"reqagnkindcd", type:"STRING", size:256}
									  , {col:"reqagnkindnm", type:"STRING", size:256}
									  , {col:"saverid", type:"STRING", size:256}
									  , {col:"savernm", type:"STRING", size:256}
									  , {col:"savedd", type:"STRING", size:256}
									  , {col:"aprvrid", type:"STRING", size:256}
									  , {col:"aprvrnm", type:"STRING", size:256}
									  , {col:"aprvdd", type:"STRING", size:256}
									  , {col:"aprvdeptcd", type:"STRING", size:256}
									  , {col:"aprvdeptnm", type:"STRING", size:256}
									  , {col:"saveflag", type:"STRING", size:256}
									  , {col:"footflag", type:"STRING", size:256}
									  , {col:"prntdt", type:"STRING", size:256}]);

	//<!--  의뢰병원정보  -->
	dsf_createDs("ds_data_reqhospinfo", [{col:"reqdd", type:"STRING", size:256}
									  , {col:"coophospcd", type:"STRING", size:256}
									  , {col:"coophospnm", type:"STRING", size:256}
									  , {col:"coopdrcd", type:"STRING", size:256}
									  , {col:"coopdrnm", type:"STRING", size:256}
									  , {col:"clsmatyn", type:"STRING", size:256}
									  , {col:"gradyear", type:"STRING", size:256}
									  , {col:"telno", type:"STRING", size:256}
									  , {col:"mpphontel", type:"STRING", size:256}
									  , {col:"emailid", type:"STRING", size:256}
									  , {col:"emailaddr", type:"STRING", size:256}
									  , {col:"coopflag", type:"STRING", size:256}
									  , {col:"reqorddd", type:"STRING", size:256}
									  , {col:"reqcretno", type:"BIGDECIMAL", size:256}
									  , {col:"reqseqno", type:"BIGDECIMAL", size:256}
									  , {col:"addr", type:"STRING", size:256}
									  , {col:"detladdr", type:"STRING", size:256}
									  , {col:"zipcd1", type:"STRING", size:256}
									  , {col:"zipcd2", type:"STRING", size:256}
									  , {col:"drflag", type:"STRING", size:256}
									  , {col:"faxno", type:"STRING", size:256}], true);

	//<!--  검사내역  -->
	dsf_createDs("ds_data_rsltinfo", [{col:"prcpdd", type:"STRING", size:256}
									  , {col:"examnm", type:"STRING", size:256}
									  , {col:"spcnm", type:"STRING", size:256}
									  , {col:"examgubun", type:"STRING", size:256}
									  , {col:"lastreptdd", type:"STRING", size:256}
									  , {col:"bcno", type:"STRING", size:256}
									  , {col:"testmdlcd", type:"STRING", size:256}
									  , {col:"execprcpuniqno", type:"STRING", size:256}
									  , {col:"pid", type:"STRING", size:256}
									  , {col:"depth", type:"STRING", size:256}
									  , {col:"replseqno", type:"BIGDECIMAL", size:256}
									  , {col:"seqno", type:"BIGDECIMAL", size:256}]);

	//<!--  처방내역  -->
	dsf_createDs("ds_data_prcpinfo", [{col:"prcpdd", type:"STRING", size:256}
									  , {col:"prcpcd", type:"STRING", size:256}
									  , {col:"prcpnm", type:"STRING", size:256}
									  , {col:"prcpqty", type:"BIGDECIMAL", size:256}
									  , {col:"prcpqtyunitnm", type:"STRING", size:256}
									  , {col:"prcptims", type:"BIGDECIMAL", size:256}
									  , {col:"prcpdayno", type:"BIGDECIMAL", size:256}
									  , {col:"prcpno", type:"BIGDECIMAL", size:256}
									  , {col:"prcphistno", type:"BIGDECIMAL", size:256}
									  , {col:"pid", type:"STRING", size:256}
									  , {col:"replseqno", type:"BIGDECIMAL", size:256}
									  , {col:"seqno", type:"BIGDECIMAL", size:256}
									  , {col:"prcpqtyunitflag", type:"STRING", size:256}]);

	//<!--  수술정보  -->
	dsf_createDs("ds_data_opinfo", [{col:"opdd", type:"STRING", size:256}
									  , {col:"opnm", type:"STRING", size:256}
									  , {col:"perdeptnm", type:"STRING", size:256}
									  , {col:"perfdrnm", type:"STRING", size:256}
									  , {col:"opstatcd", type:"STRING", size:256}
									  , {col:"pid", type:"STRING", size:256}
									  , {col:"replseqno", type:"BIGDECIMAL", size:256}
									  , {col:"seqno", type:"BIGDECIMAL", size:256}
									  , {col:"oprsrvno", type:"BIGDECIMAL", size:256}
									  , {col:"ophistno", type:"BIGDECIMAL", size:256}
									  , {col:"opcd", type:"STRING", size:256}
									  , {col:"perfdrid", type:"STRING", size:256}
									  , {col:"perfdeptcd", type:"STRING", size:256}]);	

	//<!--  입퇴원요약정보  -->
	dsf_createDs("ds_data_dschinfo", [{col:"indd", type:"STRING", size:256}
									  , {col:"orddeptnm", type:"STRING", size:256}
									  , {col:"orddrnm", type:"STRING", size:256}
									  , {col:"dschdd", type:"STRING", size:256}
									  , {col:"roomcd", type:"STRING", size:256}
									  , {col:"formrecseq", type:"BIGDECIMAL", size:256}
									  , {col:"orddeptcd", type:"STRING", size:256}
									  , {col:"orddrid", type:"STRING", size:256}
									  , {col:"pid", type:"STRING", size:256}
									  , {col:"replseqno", type:"BIGDECIMAL", size:256}
									  , {col:"seqno", type:"BIGDECIMAL", size:256}]);
    
    // 미리보기는 저장된 내용이 있어야만 미리보기가 된다.
	var oParam = {};
		oParam.id          = "TRARC02507";
		oParam.service     = "healcarecoopapp.ReqMngt";
		oParam.method      = "reqGetPreviewInfo";
		oParam.inds        = "req=ds_cond_TRARC02507";
		oParam.outds       = "ds_data_baseinfo=baseinfo ds_data_patientinfo=patientinfo ds_data_replinfo=replinfo " +
							 "ds_data_reqhospinfo=reqhospinfo ds_data_rsltinfo=rsltinfo ds_data_prcpinfo=prcpinfo " +
							 "ds_data_opinfo=opinfo ds_data_dschinfo=dschinfo";
		oParam.async       = false;
		oParam.callback    = "cf_TRARC02507";

	tranf_submit(oParam);
	
	var curecnts = utlf_transNullToEmpty(ds_data_replinfo.getColumn(0, "curecnts"));
	cureArray = curecnts.split("\n");
	
	if( cureArray.length > 0 && this.objects["ds_data_curelsit"] == null ){
		dsf_createDs("ds_data_curelsit", [{col:"curecnts", type:"STRING", size:256}]);
	}else if(this.objects["ds_data_curelsit"] != null){
		ds_data_curelsit.clearData();
	}
	
	for (i = 0; i < cureArray.length; i++)
	{
		var nRow = ds_data_curelsit.addRow();
		ds_data_curelsit.setColumn(nRow, "curecnts", cureArray[i]);
	}
	    
	fComInitial_subordlist();

	var rsltinfoCnt = ds_data_rsltinfo.rowcount;
	if (rsltinfoCnt > 0)
	{
		if(!utlf_isNull(ds_data_rsltinfo.getColumn(0, "prcpdd")))
		{
			for( var i=0; i<rsltinfoCnt; i++ ) {
				var nRow = ds_send_maindata.addRow();
				ds_send_maindata.setColumn(nRow, "bcno"			, utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "bcno")));           //바코드번호
				ds_send_maindata.setColumn(nRow, "testmdlcd"	, utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "testmdlcd")));      //검사중분류코드
				ds_send_maindata.setColumn(nRow, "lastreptdd"	, utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "lastreptdd")));     //최종보고일자
				ds_send_maindata.setColumn(nRow, "examgubun"	, utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "examgubun")));      //검사구분
				ds_send_maindata.setColumn(nRow, "level"		, utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "depth")));          //바코드검사레벨(LIS)
				ds_send_maindata.setColumn(nRow, "pid"			, utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "pid")));            //등록번호
				ds_send_maindata.setColumn(nRow, "instcd"		, sysf_getUserInfo("dutplceinstcd"));               					   //기관코드
				ds_send_maindata.setColumn(nRow, "prcpdd"		, utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "prcpdd")));         //처방일자
				ds_send_maindata.setColumn(nRow, "execprcpuniqno", utlf_transNullToEmpty(ds_data_rsltinfo.getColumn(i, "execprcpuniqno"))); //실시유일번호
			}
		
			var oParam = {};
				oParam.id          = "TRAER00850";
				oParam.service     = "examcureresultrefapp.RsltRef";
				oParam.method      = "reqGetRsltRefDetailList";
				oParam.inds        = "reqparam=ds_send_maindata";
				oParam.outds       = "ds_main_subordlist1=getResultDetail";
				oParam.async       = false;
				oParam.callback    = "cf_TRAER00850";

			tranf_submit(oParam);
			
		}	    
	}
	
	var objDOM = rptf_createDOM();	// DOM 객체 설정
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/baseinfo", ds_data_baseinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/patientinfo", ds_data_patientinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/replinfo", ds_data_replinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/reqhospinfo", ds_data_reqhospinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/rsltinfo", ds_data_rsltinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/prcpinfo", ds_data_prcpinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/opinfo", ds_data_opinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/dschinfo", ds_data_dschinfo);
	rptf_setNodeListToDOM(objDOM, "/root/main/previewinfo/curelsit", ds_data_curelsit);
	rptf_setNodeListToDOM(objDOM, "/root/main/subordlist1/subresultdetail1", ds_main_subordlist1);
		
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;	// 최상의노드 XML 스트링 추출
	var option = "open=0;save=1;directprint=0;printdialog=0;print=1;zoom=1;moveprev=1;movenext=1;combo=1;movefirst=1;movelast=1;excel=0;pdf=1;hwp=0;refresh=0;";
	
	rptf_exeReportPreview30(["RPARC02500"],[objParam], option, "", "div_report");
}


function cf_TRARC02507(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode < 0){
		sysf_messageBox("출력정보를  저장", "E001");
		return;
	}
	dsf_setDefaultVal(ds_data_replinfo, "reqcretno:0,reqseqno:0,rsrvcretno:0");
	dsf_setDefaultVal(ds_data_opinfo, "replseqno:0,seqno:0,oprsrvno:0,ophistno:0");
	dsf_setDefaultVal(ds_data_dschinfo, "formrecseq:0,replseqno:0,seqno:0");
}


// 결과내역 인스턴스 초기화
function fComInitial_subordlist() {
    
    // 일자별 그리드
    dsf_createDs("ds_main_subordlist1", [{col:"check", type:"STRING", size:256}
										  , {col:"reptrslt", type:"STRING", size:256}
										  , {col:"judgmark", type:"STRING", size:256}
										  , {col:"judgmark2", type:"STRING", size:256}
										  , {col:"prcpcd", type:"STRING", size:256}
										  , {col:"prcpnm", type:"STRING", size:256}
										  , {col:"img", type:"STRING", size:256}
										  , {col:"imgcnts", type:"BLOB", size:256}
										  , {col:"spcno", type:"STRING", size:256}
										  , {col:"pacsno", type:"STRING", size:256}
										  , {col:"flag", type:"STRING", size:256}]);
    
    // 일자별 그리드
    dsf_createDs("ds_send_maindata", [{col:"bcno", type:"STRING", size:256}		
								  , {col:"testmdlcd", type:"STRING", size:256}	
								  , {col:"lastreptdd", type:"STRING", size:256}	
								  , {col:"examgubun", type:"STRING", size:256}
								  , {col:"level", type:"STRING", size:256}
								  , {col:"pid", type:"STRING", size:256}	//srchpid
								  , {col:"instcd", type:"STRING", size:256}	//dutplceinstcd
								  , {col:"prcpdd", type:"STRING", size:256}
								  , {col:"execprcpuniqno", type:"STRING", size:256}
								  , {col:"check", type:"STRING", size:256}
								  , {col:"hla", type:"STRING", size:256}]);
    
			
}
]]></Script>
  </Form>
</FDL>