YNU_JEUS/app_home/himed/xpapps/emr/prcpinfoxp/xp/SPMMI00600_마취환자분류정보입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMI00600" classname="SPMMI00500_처방에러내역" inheritanceid="" position="absolute 0 0 300 160" titletext="환자분류 정보" oninit="SPMMI00600_oninit" onload="SPMMI00600_onload">
    <Layouts>
      <Layout>
        <Static id="caption9" text="환자분류 정보" class="tit_1" position="absolute 0 0 144 25"/>
        <Static id="caption5" text="환자분류 :" class="search_name" position="absolute 4 31 75 51"/>
        <Combo id="cmb_ansttype" taborder="2" position="absolute 75 31 208 51" innerdataset="@ds_M0808" datacolumn="cdnm" codecolumn="cdid"/>
        <Static id="caption12" text="기      타:" class="search_name" position="absolute 5 59 84 79"/>
        <TextArea id="TextArea_etc" taborder="3" position="absolute 75 56 300 139" wordwrap="both"/>
        <Button id="btn_save" taborder="4" text="저장" class="btn4" position="absolute 187 140 243 160" anchor="right bottom" onclick="btn_save_onclick"/>
        <Button id="btn_cancel" taborder="5" text="취소" class="btn3" position="absolute 244 140 300 160" anchor="right bottom" onclick="btn_cancel_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_M0808" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="oprsrvno" type="STRING" size="256"/>
          <Column id="ophistno" type="STRING" size="256"/>
          <Column id="anstclassify1" type="STRING" size="256"/>
          <Column id="anstclassify2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="TextArea_etc" propid="value" datasetid="ds_req" columnid="anstclassify2"/>
      <BindItem id="item1" compid="cmb_ansttype" propid="value" datasetid="ds_req" columnid="anstclassify1"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";

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

function SPMMI00600_onload(obj:Form, e:LoadEventInfo)
{
	appf_getCodeList([{dsNm: "ds_M0808", cdGrpId: "M0808", sortField: "cdnm"}], true); 
	
	var oprsrvno      = opener.frmf_getParameter("SPMMI00600_oprsrvno");
    var ophistno      = opener.frmf_getParameter("SPMMI00600_ophistno");
    var anstclassify1 = opener.frmf_getParameter("SPMMI00600_anstclassify1");
    var anstclassify2 = opener.frmf_getParameter("SPMMI00600_anstclassify2");

	ds_req.setColumn(0, "oprsrvno", oprsrvno);
	ds_req.setColumn(0, "ophistno", ophistno);
	if(utlf_isNull(anstclassify1)){
		cmb_ansttype.value = "A1";
	} else{
		ds_req.setColumn(0, "anstclassify1", anstclassify1);
	}
	
	if(utlf_isNull(anstclassify2)){
		TextArea_etc.value = "";
	} else{
		ds_req.setColumn(0, "anstclassify2", anstclassify2);
	}
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	var yy1 = utlf_transNullToEmpty(TextArea_etc.text);
	var xx1 = 0;
	for(var i=0 ; i < yy1.length ; i++) {   
		(yy1.charCodeAt(i) > 255) ? xx1 += 2 : xx1 += 1;  
	}
	if ( xx1 > 60) {
		sysf_messageBox("최대 한글 30자, 영어 60자 까지만 입력할 수 있습니다.", "I");
		return;
	}
		
	var oParam = {};
		oParam.id       = "TRMMI00601";
		oParam.service  = "prcpmngtapp.EtcPrcpMngt";
		oParam.method   = "reqSetAnstTypeData";
		oParam.inds     = "req=ds_req";
		oParam.async    = false;

	tranf_submit(oParam);
	
	this.close();
}

function btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}


]]></Script>
  </Form>
</FDL>