YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO90400_외래예약현황출력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO90400" classname="SPMMO90400_외래예약현황출력" inheritanceid="" position="absolute 0 0 100 100" titletext="New Form" oninit="SPMMO90400_oninit" onload="SPMMO90400_onload">
    <Layouts>
      <Layout/>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_printlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

function SPMMO90400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);  		// 폼 초기화 
}

function SPMMO90400_onload(obj:Form, e:LoadEventInfo)
{
	// 팝업실행여부체크
	if (!frmf_isPopup()) {
		sysf_messageBox("이 프로그램은 팝업으로만 사용할 수 있습니다.!", "E000");
		close();
		return;
	}
	
	// 외래진료현황출력
	fPrintOutRsrvState();
	close();
}

/**
 * @desc   : 외래진료현황을 출력한다.
 * @return : void
 * @authur : 엄영만 2014. 12. 17
 */
function fPrintOutRsrvState() {
	
	var sOrdDeptCd  = opener.frmf_getParameter ( "SPMMO90400_orddeptcd" );
	var sOrdDeptNm  = opener.frmf_getParameter ( "SPMMO90400_orddeptnm" );
	var sCentCd 		= opener.frmf_getParameter ( "SPMMO90400_centcd" );
	var sCentNm 		= opener.frmf_getParameter ( "SPMMO90400_centnm" );
	var sOrdDrId 		= opener.frmf_getParameter ( "SPMMO90400_orddrid" );
	var sOrdDrNm		= opener.frmf_getParameter ( "SPMMO90400_orddrnm" );
	
	if(sOrdDeptCd == "" || sOrdDeptCd == "-") {
		sysf_messageBox("진료과를 선택하세요.", "E");
		return;
	}

	if(sOrdDrId == "" || sOrdDrId == "-") {
		sysf_messageBox("진료의사를 선택하세요.", "E");
		return;
	}
	
	if(sCentCd == "") {
		sCentCd = "-";
	}
	
	dsf_makeValue(ds_send, "orddeptcd", "string", sOrdDeptCd);	// 	model.makeValue("/root/send/orddeptcd", sOrdDeptCd);
	dsf_makeValue(ds_send, "orddeptnm", "string", sOrdDeptNm);	// 	model.makeValue("/root/send/orddeptnm", sOrdDeptNm);
	dsf_makeValue(ds_send, "centcd", "string", sCentCd);	// 	model.makeValue("/root/send/centcd" , 		sCentCd);
	dsf_makeValue(ds_send, "centnm", "string", sCentNm);	// 	model.makeValue("/root/send/centnm" , 	sCentNm);
	dsf_makeValue(ds_send, "orddrid", "string", sOrdDrId);	// 	model.makeValue("/root/send/orddrid" , 	sOrdDrId);
	dsf_makeValue(ds_send, "orddrnm", "string", sOrdDrNm);	// 	model.makeValue("/root/send/orddrnm" , 	sOrdDrNm);
	
	//model.removenode("/root/main/printlist");
	
	var oParam = {};
    oParam.id          = "TRMMO90401";
    oParam.service     = "prcpmngtapp.EtcPrcpMngt";
    oParam.method      = "reqGetPrintOutRsrvState";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_printlist=printlist";
    oParam.async       = false;
    //oParam.callback    = "cf_TRMMO90401";

	tranf_submit(oParam);

//submit("TRMMO90401");
	
	var rptid = "RPMMO90401";
	var desDS = ds_main_printlist;	//"/root/main/printlist"; 
	
	 var objDOM = rptf_createDOM();																	// DOM 객체 설정	
	 rptf_setNodeListToDOM(objDOM, "/root/send", ds_send);
	rptf_setNodeListToDOM(objDOM, "/root/main/printlist", ds_main_printlist);			// 데이터셋 1	
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;								// 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";
	
	rptf_exeReportPreview30(["RPMMO90401"],[objParam], option);
	//exeReportPreview(rptid, "XMLSTR", desNode, "", "true", "", "", "", "", "true", "", "", "", "", "", "", "", "", "", "", "");
}	]]></Script>
  </Form>
</FDL>