YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO14001_무산정처리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO14001" position="absolute 0 0 320 190" titletext="무산정처리" oninit="SPMMO14001_oninit" onload="SPMMO14001_onload">
    <Layouts>
      <Layout>
        <Shape position="absolute 0 12 300 18" linetype="vertical" id="line1" class="line_1"/>
        <Static text="무산정처리" position="absolute 0 0 152 15" align="align:center middle;" id="caption14" class="tit_2"/>
        <Static text="처방코드" position="absolute 1 20 86 43" align="align:center middle;" id="caption26" class="cell_1"/>
        <Edit position="absolute 90 22 300 41" id="ipt_prcpcd" enable="false"/>
        <Static text="처방명" position="absolute 1 45 86 68" align="align:center middle;" id="caption13" class="cell_1"/>
        <Edit position="absolute 90 47 300 66" id="ipt_prcpnm" enable="false"/>
        <Static text="무산정여부" position="absolute 0 70 85 93" align="align:center middle;" id="caption2" class="cell_1"/>
        <Combo position="absolute 90 70 300 89" id="combo1" codecolumn="codecolumn" datacolumn="datacolumn">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">Y</Col>
                <Col id="datacolumn">정상</Col>
              </Row>
              <Row>
                <Col id="codecolumn">C</Col>
                <Col id="datacolumn">분리청구</Col>
              </Row>
            </Rows>
          </Dataset>
        </Combo>
        <Static text="무산정사유" position="absolute 0 95 85 155" align="align:center middle;" id="caption1" class="cell_1"/>
        <TextArea position="absolute 90 95 300 155" id="txt_reason"/>
        <Button position="absolute 180 160 236 182" id="btn_save" class="btn4" text="저장" onclick="btn_save_onclick"/>
        <Button position="absolute 240 160 296 182" id="btn_exit" class="btn4" text="종료" onclick="btn_exit_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcpno" type="STRING" size="256"/>
          <Column id="prcphistno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="prcpdd"/>
            <Col id="prcpno"/>
            <Col id="prcphistno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_calcflaginfo" 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">
        <ColumnInfo>
          <Column id="precalcflag" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_reqdata" 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 		:	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 SPMMO14001_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMMO14001_onload(obj:Form, e:LoadEventInfo)
{
	var param = opener.frmf_getParameter("SSPMMO14001_Param");  // 처방키를 넘겨 받음.
	if(param != ""){
		param = param.split("|");
		ds_init.setColumn(0, "prcpdd", param[0]);	//model.setValue("/root/init/prcpdd",        param[0]);
		ds_init.setColumn(0, "prcpno", param[1]);	// model.setValue("/root/init/prcpno",        param[1]);
		ds_init.setColumn(0, "prcphistno", param[2]);	// model.setValue("/root/init/prcphistno",  param[2]);
		ds_init.setColumn(0, "instcd", param[3]);	// model.setValue("/root/init/instcd",         param[3]);	
		
		var oParam = {};
		oParam.id          = "TRMMO14001";
		oParam.service     = "prcpmngtapp.EtcPrcpMngt";
		oParam.method      = "reqGetCalcFlaginfo";
		oParam.inds        = "req=ds_init";
		oParam.outds       = "ds_main_calcflaginfo=calcflaginfo";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMO14001";

		tranf_submit(oParam);

	}else{
		alert("잘못된 데이터입니다.");
		close();
	}
	
}

function cf_TRMMO14001(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) {
		sysf_messageBox ("초기화 처리중 오류가 발생 하였습니다.", "I" );
		close();
	} else {
		var sCalcFlag = ds_main_calcflaginfo.getColumn(0, "calcflag");	//model.getValue("/root/main/calcflaginfo/calcflag");
		if(sCalcFlag == "N"){
			sysf_messageBox ("무산정 처리 할수 없는 처방 입니다.(자가약, 로봇수술, 비처방성 재료 등등)", "I" );
			close();
		}
		ds_hidden.setColumn(0, "precalcflag", sCalcFlag);	//model.setValue("/root/hidden/precalcflag", sCalcFlag);  // 초기 무산정 여부 설정.
	}
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_calcflaginfo.getColumn(0, "resncnts") == "" ){	// model.getValue("/root/main/calcflaginfo/resncnts")==""
		alert("무산정 사유를 입력 하세요.");
		return;
	}
	
	if( ds_hidden.getColumn(0, "precalcflag") == ds_main_calcflaginfo.getColumn(0, "calcflag") ){	// model.getValue("/root/hidden/precalcflag")==model.getValue("/root/main/calcflaginfo/calcflag")
		alert("무산정 여부가 변경 되지 않았습니다.");
		return;
	}
	
	dsf_copyDs(ds_send_reqdata, ds_main_calcflaginfo);	//model.copyNode("/root/send/reqdata", "/root/main/calcflaginfo");
	
	var oParam = {};
    oParam.id          = "TXMMO14001";
    oParam.service     = "prcpmngtapp.EtcPrcpMngt";
    oParam.method      = "reqInsCalcFlaginfo";
    oParam.inds        = "req=ds_send_reqdata";
    oParam.async       = false;
    oParam.callback    = "cf_TXMMO14001";

	tranf_submit(oParam);
}

function cf_TXMMO14001(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) {
		return;
	} else {
		alert("저장되었습니다.");
		close();	
	}
}

function btn_exit_onclick(obj:Button,  e:ClickEventInfo)
{
	close();
}
]]></Script>
  </Form>
</FDL>