YNU_JEUS/app_home/himed/xpapps/emr/nssmngtxp/xp/SMMMT02001_대상자수동등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMT02001" classname="SMMMT02001_대상자수동등록" inheritanceid="" position="absolute 0 0 308 196" titletext="대상자수동등록" oninit="SMMMT02001_oninit">
    <Layouts>
      <Layout>
        <Static id="stt_head" text="대상자수동등록" onclick="caption28_onclick" class="tit_1" position="absolute 0 0 124 24"/>
        <Static id="cap_02" text="등록번호" class="cell_1" position="absolute 9 36 78 59"/>
        <Static id="cap_00" text="입원일자" class="cell_1" position="absolute 9 68 78 91"/>
        <Edit id="Edit00" taborder="1" position="absolute 86 36 186 59"/>
        <Calendar id="Calendar00" taborder="2" position="absolute 86 68 186 91"/>
        <Button id="btn_save" taborder="3" text="등록" class="btn2" position="absolute 142 99 184 119" anchor="top right" onclick="btn_save_onclick"/>
        <Static id="Static00" text="※ 대상자를 수동으로 등록할 수 있습니다." position="absolute 11 128 247 148" style="color:blue;"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="status" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_rtn" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="Calendar00" propid="value" datasetid="ds_cond" columnid="indd"/>
      <BindItem id="item1" compid="Edit00" propid="value" datasetid="ds_cond" columnid="pid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
		
		ds_cond.setColumn(0,"status","i2");
		
		var oParam = {};
			oParam.id       = "TXMMT02001";
			oParam.service  = "nssmngtapp.NssrecMngt";
			oParam.method   = "reqExeSaveNssRecInfo";
			oParam.inds     = "req=ds_cond";
			oParam.outds    = "ds_rtn=recinfo";
			oParam.async    = false;
			oParam.callback = "";

		tranf_submit(oParam);
		
		var cnt = ds_rtn.getColumn(0,"cnt");
		var existcnt = ds_rtn.getColumn(0,"existcnt");
		var rgstcnt = ds_rtn.getColumn(0,"rgstcnt");
		
		if (cnt == "0") {
			sysf_messageBox("입원등록 이력이 없습니다","I");
			return;
		}
		
		if (existcnt > "0") {
			sysf_messageBox("이미 대상으로 등록되었습니다","I");
			return;
		}
		
		if (rgstcnt > "0") {
			sysf_messageBox("정상적으로 등록되었습니다","I");
		}
		
}

function SMMMT02001_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}
]]></Script>
  </Form>
</FDL>