YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO00110_가셔야할곳.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO00110" position="absolute 0 0 20 10" titletext="가셔야할곳" oninit="SPMMO00110_oninit" onload="SPMMO00110_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 0 0" id="grp_report" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_paminfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="sessuserid" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="sessinstcd" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="userinstcd" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="checkyn" type="STRING" size="256" sumtext="수가계산여부(N:계산함)"/>
          <Column id="addprcp" type="STRING" size="256" sumtext="시행부서처방여부"/>
          <Column id="gubun" type="STRING" size="256" sumtext="과거수가 계산여부"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_pattoplace_patinfo" firefirstcount="0" firenextcount="0" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" useclientlayout="true">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의ID"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민등록번호"/>
          <Column id="usernm" type="STRING" size="256" sumtext="의사명"/>
          <Column id="telno1" type="STRING" size="256" sumtext="대표번호"/>
          <Column id="telno2" type="STRING" size="256" sumtext="대표번호"/>
          <Column id="age" type="STRING" size="256" sumtext="전화예약번호"/>
          <Column id="prcptm" type="STRING" size="256" sumtext="처방시간"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="depthngnm" type="STRING" size="256" sumtext="진료과명"/>
          <Column id="medamtpostyn" type="STRING" size="256" sumtext="open card 관련  VIP"/>
          <Column id="errortelno" type="STRING" size="256" sumtext="전화번호 오류 여부"/>
          <Column id="rsrvinfo" type="STRING" size="256" sumtext="예약정보"/>
          <Column id="rcptpossynmsg" type="STRING" size="256" sumtext="자동수납 가능여부 메세지"/>
          <Column id="rcptpossynerrcd" type="STRING" size="256" sumtext="자동수납 가능여부 오류코드"/>
          <Column id="print01yn" type="STRING" size="256" sumtext="장비공동이용 안내 출력물 출력여부"/>
          <Column id="precureprcpyn" type="STRING" size="256" sumtext="선처치 처방 존재 여부"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_pattoplace_togolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcplist" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="deptnm" type="STRING" size="256" sumtext="진료의ID"/>
          <Column id="paytypenm" type="STRING" size="256" sumtext="수납구분"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";


function SPMMO00110_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMMO00110_onload(obj:Form, e:LoadEventInfo)
{	
	this.parent.position.width  = 0;
	this.parent.position.height = 0;
	// 팝업실행여부체크
	if (!frmf_isPopup()) {
		sysf_messageBox("이 프로그램은 팝업으로만 사용할 수 있습니다.!", "E000");
		close();
		return;
	}
	
	// 창 숨김
	visible = false;
	
	// 가셔야할 곳 출력
	fAsyncPrltPatTogoPlceList();
}

/**
 * @desc   : 환자의 가야할 곳을 출력한다.
 * @return : void
 * @authur : 김영학 2011. 01. 05
 */
function fAsyncPrltPatTogoPlceList() {
	// 환자Top정보
	if (!appf_getPatientInfoDetails("ds_paminfo")) {
		sysf_messageBox("환자TOP정보 획득에 문제가 발생했습니다!", "E000");
		close();
		return;
	}
	
	if (utlf_isNull(ds_paminfo.getColumn(0, "pid"))){
		sysf_messageBox("가야할곳 출력 시 환자정보(상단) 획득에 문제가 발생했습니다!\n\n처방화면 가야할곳 재출력 버튼을 이용하여 재출력 하시기 바랍니다.", "E000");
		close();
		return;
	}
	
	ds_send.setColumn(0, "instcd"    , ds_paminfo.getColumn(0, "instcd"));
	ds_send.setColumn(0, "pid"		 , ds_paminfo.getColumn(0, "pid"));
	ds_send.setColumn(0, "orddd" 	 , ds_paminfo.getColumn(0, "orddd"));
	ds_send.setColumn(0, "cretno" 	 , ds_paminfo.getColumn(0, "cretno"));
	ds_send.setColumn(0, "userinstcd", ds_paminfo.getColumn(0, "instcd"));
	ds_send.setColumn(0, "sessuserid", sysf_getUserInfo("userid"));
	ds_send.setColumn(0, "sessinstcd", ds_paminfo.getColumn(0, "instcd"));
	
	if(lf_getHardCDList("Y", 338, 3) == "N"){ // 수가 계산 여부 
		ds_send.setColumn(0, "checkyn", "Y");     // 수가계산하지 않음. 2012.02.10 이동식 요청
	} else {
		ds_send.setColumn(0, "checkyn", "N");     // 수가계산 함. 2012.02.10 이동식 요청
	}
	
	dsf_setDefaultVal(ds_send, "checkyn:N,addprcp:N,gubun:Y");

	// 가셔야할 곳 출력 데이터 조회	
	var oParam = {};
		oParam.id       = "TRMMO00141";
		oParam.service  = "prcpmngtapp.EtcPrcpMngt";
		oParam.method   = "reqGetPatWhereToPlceList";
		oParam.inds     = "req=ds_send";
		oParam.outds    = "ds_hidden_pattoplace_patinfo=patinfo ds_hidden_pattoplace_togolist=togolist";
		oParam.async    = true;
		oParam.progress = false;
		oParam.callback = "cf_TRMMO00141";

	tranf_submit(oParam);
}

function cf_TRMMO00141(sSvcId, nErrorCode, sErrorMsg) {
    if (ds_hidden_pattoplace_patinfo.rowcount == 0 || utlf_isNull(ds_hidden_pattoplace_patinfo.getColumn(0, "pid"))){
		sysf_messageBox("가야할곳 출력 시 환자정보 획득에 문제가 발생했습니다!\n\n처방화면 가야할곳 재출력 버튼을 이용하여 재출력 하시기 바랍니다.", "E000");
		close();
		return;
	}
	
	try {				
		var objDOM = rptf_createDOM();														// DOM 객체 설정	
		
 		sysf_trace(ds_hidden_pattoplace_patinfo.saveXML());
 		sysf_trace(ds_hidden_pattoplace_togolist.saveXML());
	
		rptf_setNodeListToDOM(objDOM, "/root/hidden/pattoplace/patinfo",  ds_hidden_pattoplace_patinfo);	// 데이터셋 1	
		rptf_setNodeListToDOM(objDOM, "/root/hidden/pattoplace/togolist", ds_hidden_pattoplace_togolist);	// 데이터셋 2	
		sysf_trace(objDOM.documentElement.source);	// XML 내용출력
	
		var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;								// 최상의노드 XML 스트링 추출
		var option = "open=1;save=1;directprint=1;print=1;zoom=0;callback=cbf_rpt_onFinishPrintXML;printdialog=0";
		rptf_exeReportPreview30(["RPMMO00103"],[objParam], option);
	} catch(E) {
		sysf_messageBox("가야할곳 출력 시 오류가 발생했습니다!\n\n처방화면 가야할곳 재출력 버튼을 이용하여 재출력 하시기 바랍니다.", "E000");
		close();
	}
}

function cbf_rpt_onFinishPrintXML()
{
	close();
}]]></Script>
  </Form>
</FDL>