YNU_JEUS/app_home/himed/xpapps/emr/dialroomxp/xp/SMMND02900_PD등록.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMND02900" position="absolute 0 0 395 80" titletext="복막투석 유지환자 등록" onload="SMMND02900_onload">
    <Layouts>
      <Layout>
        <Div id="group3" scrollbars="autoboth" position="absolute 0 0 393 50" style="">
          <Layouts>
            <Layout>
              <Edit id="opt_matndialflag" class="output_fix" position="absolute 240 1 275 20" style="" anchor="default" readonly="true" visible="false" autoselect="true"/>
              <Edit id="opt_maintepatrgstdd" class="output_fix" position="absolute 284 1 353 20" style="" anchor="default" readonly="true" visible="false" autoselect="true"/>
              <Edit id="opt_matnflag" class="output_fix" position="absolute 354 1 388 20" style="" anchor="default" readonly="true" visible="false" autoselect="true"/>
              <Static id="caption1" class="tit_2" position="absolute 0 4 165 21" style="" text="복막투석 유지환자 등록"/>
              <Shape id="line1" class="line_1" linetype="horizontal" position="absolute 0 21 390 26" style="strokepen:3 solid #33bbbbff;" anchor="default"/>
              <Static id="caption13" class="cell_1" position="absolute 0 25 59 48" style="align: middle;" text="등록번호"/>
              <Static id="caption3" position="absolute 276 26 291 46" style="font:,,bold;" text="-"/>
              <Shape id="line2" class="line_3" linetype="horizontal" position="absolute 0 47 385 50" style="" anchor="default"/>
              <Edit id="opt_ioflag" class="output" position="absolute 350 26 389 45" style="" anchor="default" readonly="true" autoselect="true"/>
              <Shape id="line4" class="line_3" linetype="horizontal" position="absolute 0 47 390 50" style="" anchor="default"/>
              <Edit id="ipt_pid" class="input_default" position="absolute 60 26 135 45" style="" anchor="default" onkeyup="group3_ipt_pid_onkeyup" autoselect="true"/>
              <Edit id="opt_rrgstno1" class="output" position="absolute 224 26 274 45" style="" anchor="default" readonly="true" autoselect="true"/>
              <Edit id="opt_hngnm" class="output" position="absolute 156 26 221 45" style="" anchor="default" readonly="true" autoselect="true"/>
              <Edit id="opt_rrgstno2" class="output" position="absolute 288 26 348 45" style="" anchor="default" readonly="true" autoselect="true"/>
              <Button id="btn_srchpat" class="icon_search" visible="false" position="absolute 117 27 133 43" style="" text="" onclick="group3_btn_srchpat_onclick"/>
              <Button id="btn_patpopup" class="icon_search" position="absolute 136 27 152 43" style="" text="" onclick="group3_btn_patpopup_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_btn" scrollbars="autoboth" position="absolute 0 51 392 78" style="">
          <Layouts>
            <Layout>
              <Button id="button9" class="btn4" position="absolute 334 3 390 25" style="" text="등록" onclick="grp_btn_button9_onclick"/>
              <Shape id="line32" class="line_6" linetype="horizontal" position="absolute 0 0 390 3" style="" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="opt_prcpinfo" position="absolute 4 55 315 77"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cretlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_cretlist_cretinfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_cretlist_getcreinfo" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
          <Column id="maintepatrgstdd" type="STRING" size="256"/>
          <Column id="matnflag" type="STRING" size="256"/>
          <Column id="matndialflag" type="STRING" size="256"/>
          <Column id="prcpfalg" type="STRING" size="256"/>
          <Column id="prcpinfo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="ioflag"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
            <Col id="maintepatrgstdd"/>
            <Col id="matnflag"/>
            <Col id="matndialflag"/>
            <Col id="prcpfalg"/>
            <Col id="prcpinfo"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="init" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="init"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="reqdata" type="STRING" size="256"/>
          <Column id="savedata" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="reqdata"/>
            <Col id="savedata"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="hidden" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="hidden"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.opt_matndialflag" propid="value" datasetid="ds_main_cretlist_getcreinfo" columnid="matndialflag"/>
      <BindItem id="item1" compid="group3.opt_maintepatrgstdd" propid="value" datasetid="ds_main_cretlist_getcreinfo" columnid="maintepatrgstdd"/>
      <BindItem id="item2" compid="group3.opt_matnflag" propid="value" datasetid="ds_main_cretlist_getcreinfo" columnid="matnflag"/>
      <BindItem id="item3" compid="group3.opt_ioflag" propid="value" datasetid="ds_main_cretlist_getcreinfo" columnid="ioflag"/>
      <BindItem id="item4" compid="group3.ipt_pid" propid="value" datasetid="ds_main_cretlist_cretinfo" columnid="pid"/>
      <BindItem id="item5" compid="group3.opt_rrgstno1" propid="value" datasetid="ds_main_cretlist_getcreinfo" columnid="rrgstno1"/>
      <BindItem id="item6" compid="group3.opt_hngnm" propid="value" datasetid="ds_main_cretlist_getcreinfo" columnid="hngnm"/>
      <BindItem id="item7" compid="group3.opt_rrgstno2" propid="value" datasetid="ds_main_cretlist_getcreinfo" columnid="rrgstno2"/>
      <BindItem id="item9" compid="opt_prcpinfo" propid="text" datasetid="ds_main_cretlist_getcreinfo" columnid="prcpinfo"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include 'com_commonxp::comm_main.xjs';
//include 'emr_dialroomxp::SMMND02900.xjs';
include 'emr_carecomxp::CareCom.xjs';

var arErrorCode = new HashArray();


function SMMND02900_onload(obj:Form, e:LoadEventInfo) {
	frmf_initForm(obj); 
	//grdf_initGrid(grd_XXX); 
	//grdf_setGridSort(grd_XXX); 
	//grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

	//setHelp();  // 온라인 도움말 화면이 있는 경우 ready 에서 실행.

}


// header파일 중 SMMND02900.js 파일 시작
/*

      복막투석 유지환자 등록(SMMND02900.xrw - JScript )

      - Version :
          1)  : Ver.1.00.01
 */

/**
 * _group  :
 * _ver    : 2007.05.16
 * _by     : 김진아
 * _---------------------------------------------------
 * _type   : function
 * _access : public
 * _desc   : 등록번호로 환자를 검색한다.(예약생성시)
 * _param  :
 * _return : 환자명, 환자주민등록번호, 입원외래구분
 * _---------------------------------------------------
 */
function fSrchPat()
{
	//ds_send.clearData();
	//dsf_makeValue( ds, "send", "string", "" );
	dsf_makeValue( ds_send_reqdata, "pid", "string", ds_main_cretlist_cretinfo.getColumn(0, "pid"));
	dsf_makeValue( ds_send_reqdata, "dialflag", "string",  "P");
	ds_main_cretlist_getcreinfo.clearData();
	
	//submit("TRMND02901");	//환자기본정보 및 입원내역테이블을 조회한다.
	var oParam = {};
		oParam.id          = "TRMND03001";
		oParam.service     = "dialapp.DialPatMngt";
		oParam.method      = "reqGetHngInfo";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_cretlist_getcreinfo=getcreinfo";
		oParam.async       = false;
	tranf_submit(oParam);

	if(utlf_isNull(ds_main_cretlist_getcreinfo.getColumn(0, "hngnm")))
	{
		 sysf_messageBox("환자정보를 찾을 수", "I004", "");     
		 fInit();  // 초기화
		 return;
	}
	else 
	{
		if(ds_main_cretlist_getcreinfo.getColumn(0, "matndialflag") == "H")
		{
			 sysf_messageBox("혈액투석 유지환자로 등록되어 있는 환자", "E008", "");
			 fInit();  // 초기화
			 return;
		}
	}
}

/**
 * _group  :
 * _ver    : 2007.05.16
 * _by     : 김진아
 * _---------------------------------------------------
 * _type   : function
 * _access : public
 * _desc   : 복막투석 환자 유지환자에 저장
 * _param  :
 * _return : 
 * _---------------------------------------------------
 */
function fSaveMatn()
{
	if(ds_main_cretlist_getcreinfo.getColumn(0, "matndialflag") == "H")
	{
		sysf_messageBox("혈액투석 유지환자로 등록되어 있는 환자", "E008", "");
		fInit();
	} 
	else 
	{
		if(utlf_isNull(ds_main_cretlist_cretinfo.getColumn(0, "pid")))
		{
			 sysf_messageBox("등록번호는", "I003", "");
			 return;
		} 

		if(utlf_isNull(ds_main_cretlist_getcreinfo.getColumn(0, "hngnm")))
		{
			 sysf_messageBox("환자기본 정보 조회 수행을 하지", "E007", "(등록번호 입력 후 엔터키를 누르십시오.)");
			 return;
		}

		if(ds_main_cretlist_getcreinfo.getColumn(0, "matnflag") != "1")
		{
			ds_send_savedata.clearData();
			ds_send_savedata.addRow();
			dsf_makeValue( ds_send_savedata, "pid", "string", ds_main_cretlist_cretinfo.getColumn(0, "pid"));
			dsf_makeValue( ds_send_savedata, "status", "string",  "i");					//상태값 지정(insert)
			dsf_makeValue( ds_send_savedata, "dialflag", "string",  "P");
			dsf_makeValue( ds_send_savedata, "rsrvcnts", "string",  "");

			var oParam = {};
				oParam.id          = "TXMND02901";
				oParam.service     = "dialapp.DialPatMngt";
				oParam.method      = "reqExeSaveMatnInfo";
				oParam.inds        = "req=ds_send_savedata";
				oParam.outds       = "";
				oParam.async       = false;
				oParam.callback    = "cf_TXMND02901";

			tranf_submit(oParam);

			if(arErrorCode.pop("TXMND02901") > -1) {
				sysf_messageBox("유지환자관리 등록이 ", "I001", "간호정보조사지를 작성하십시오.");	
				this.close();
			}
		}else if(ds_main_cretlist_getcreinfo.getColumn(0, "matnflag") == "1"){
			 sysf_messageBox("이미 유지환자에 등록 되어있는 환자", "E008", "");
			 fInit();
		}
	}
}

function cf_TXMND02901(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/**
 * _group  :
 * _ver    : 2007.06.30
 * _by     : 김진아
 * _---------------------------------------------------
 * _type   : function
 * _access : public
 * _desc   : 컨트롤 초기화
 * _param  :
 * _return : 
 * _---------------------------------------------------
 */
function fInit(){
   if(ds_main_cretlist_cretinfo.rowcount > 0){
	   fClearChildNode("ds_main_cretlist_cretinfo");
   }
   if(ds_main_cretlist_getcreinfo.rowcount > 0){
	   fClearChildNode("ds_main_cretlist_getcreinfo");
   }

	//model.refresh();

}

function fUseridPopup(pPath, pNodeID, pNodeNM, pNodeRrgsNo1, pNodeRrgsNo2, pDOC, e) {
	//ds_properties_parameters_SendData_SendDatavalue.clearData();  
	var pParam = frmf_setParameter("SendData", "");
	
// 	var x = e.screenX - 100;
// 	var y = e.screenY - 100;

	//modal("SMMNE03700", 1, e.screenX-100, e.screenY-100, "SMMNE03700", "ds_main_cretlist_cretinfo_pid", "ds_init_searchitem");
	
	var objArg = new Object();
    objArg.arg_searchflag = "userid";    //userid, usernm
	objArg.arg_searchitem = ds_main_cretlist_cretinfo.getColumn(0, "pid");
	frmf_modal("SMMNE03700", "SMMNE03700",objArg, "", "", "", "", "", "", "", "", "", "M");

	//var pParam = ds_properties_parameters_SendData.getColumn(0, "SendDatavalue");
	
	var pParam = frmf_getParameter("senddata");
	var pParamValue = pParam.split("|");

	ds_main_cretlist_cretinfo.setColumn( 0, "pid", pParamValue[0]);

	//group3.ipt_pid.refresh();

}  

// header파일 중 SMMND02900.js 파일 끝

function group3_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo) 
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		group3.btn_srchpat.click();
	}
}

function group3_btn_srchpat_onclick(obj:Button, e:ClickEventInfo) {

	fSrchPat();	//환자기본정보 조회

}

function group3_btn_patpopup_onclick(obj:Button, e:ClickEventInfo) {
	
	fUseridPopup("ds_main_cretlist_cretinfo", "pid", "",  "",  "", group3.ipt_pid, e);
	fSrchPat();	//환자기본정보 조회

}

function grp_btn_button9_onclick(obj:Button, e:ClickEventInfo) {

	fSaveMatn();

}

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