YNU_JEUS/app_home/himed/xpapps/com/instantmsgxp/xp/SPZMI01000_환자확인.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPZMI01000" classname="SPZMI01000_환자확인" inheritanceid="" position="absolute 0 0 850 600" titletext="환자 확인" oninit="SPZMI01000_oninit" onload="SPZMI01000_onload" ontimer="SPZMI01000_ontimer">
    <Layouts>
      <Layout>
        <Div id="div_search" taborder="0" position="absolute 0 24 850 86" class="div_SA">
          <Layouts>
            <Layout>
              <Static id="Static00" text="환자번호 :" position="absolute 26 19 174 47" class="search_name" anchor="default" style="font:Dotum,20,bold;"/>
              <Edit id="edt_pid" taborder="1" position="absolute 180 17 328 45" anchor="default" autoselect="true" onkeydown="div_search_edt_pid_onkeydown" style="align:center middle;font:Dotum,14,bold;"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="Static00" text="환자 확인" position="absolute 0 0 91 25" class="tit_1"/>
        <Static id="stt_name" position="absolute 20 107 806 167" style="color:blue;font:HY헤드라인M,30,bold;"/>
        <Combo id="cmb_ordr" taborder="1" position="absolute 726 3 850 23" index="-1" innerdataset="@ds_userlist" codecolumn="userid" datacolumn="usernm"/>
        <Combo id="cmb_orddept" taborder="2" position="absolute 560 3 724 23" index="-1" innerdataset="ds_orddept" codecolumn="deptcd" datacolumn="depthngnm" onitemchanged="cmb_orddept_onitemchanged"/>
        <Div id="Div00" taborder="3" position="absolute 0 192 850 600" style="background:azure;border:5 solid black ;">
          <Layouts>
            <Layout>
              <Static id="Static00" text="함께하는 환자확인!" position="absolute 0 37 840 105" style="color:#0070c0ff;align:center middle;font:HY헤드라인M,50,bold;shadow:drop 1,1 1 black;" anchor="default"/>
              <Static id="Static01" text="진료실에 들어가기 전에&#13;&#10;진료비 영수증 또는 외래진료&#13;&#10;안내문 상단의 바코드를 읽혀주세요" position="absolute 0 122 840 367" style="linespace:20;color:#202020ff;align:center middle;font:HY헤드라인M,36,bold;" anchor="default"/>
              <Static id="Static02" text="바코드" position="absolute 347 287 506 332" style="linespace:5;color:red;align:center middle;font:HY헤드라인M,36,bold;" anchor="default"/>
              <Static id="Static03" text="진료실에 들어가기 전" position="absolute -24 146 816 207" style="linespace:20;color:blue;align:center middle;font:HY헤드라인M,36,bold;"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_search" 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="orddrid" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_patinfo" 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="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_userlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="depthngnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="div_search.edt_pid" propid="value" datasetid="ds_search" columnid="pid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs"
include "emr_prcpmngtxp::MMO001.xjs";


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

function SPZMI01000_onload(obj:Form, e:LoadEventInfo)
{
	var dutplcecd = sysf_getUserInfo("dutplcecd");
	
	trace(dutplcecd);
	
	lf_mmbfGetDeptCodeComboList(ds_orddept, "O");
	
	cmb_orddept.value = dutplcecd;
	
	lf_mmbfGetUserComboList(ds_userlist, dutplcecd, "0330");
	
	cmb_ordr.value = sysf_getUserInfo("userid");
}

function cmb_orddept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	
	lf_mmbfGetUserComboList(ds_userlist, obj.value, "0330");
	
	cmb_ordr.index = 0;
	cmb_ordr.updateToDataset();
}

function div_search_edt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		
		ds_search.setColumn(0, "orddrid",   cmb_ordr.value);
		ds_search.setColumn(0, "orddeptcd", cmb_orddept.value);
		
		var oParam = {};
			oParam.id          = "TRZMI01000";
			oParam.service     = "instantmsgapp.InstantMsg";
			oParam.method      = "reqGetPatInfo";
			oParam.inds        = "req=ds_search";
			oParam.outds       = "ds_patinfo=patinfo";
			oParam.async       = true;
			oParam.force       = true;
			oParam.callback    = "cf_TRZMI01000";

		tranf_submit(oParam);
		
		div_search.edt_pid.setFocus();
		div_search.edt_pid.setSelect();
	}
}

function cf_TRZMI01000(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    if(utlf_isNull(ds_patinfo.getColumn(0, "hngnm"))) {
		stt_name.visible = true;
		stt_name.text = "오류입니다. 등록번호를 확인해주세요.";
    } else {
		stt_name.visible = true;
		stt_name.text    = "☞ " + utlf_transNullToEmpty(ds_patinfo.getColumn(0, "hngnm")) + "님, 확인되었습니다";
		
		killTimer(0);
		setTimer(0, 5000);
	}
}

function SPZMI01000_ontimer(obj:Form, e:TimerEventInfo)
{
	if(e.timerid == 0) {
		killTimer(e.timerid);
		
		stt_name.visible         = false;
		div_search.edt_pid.value = "";
	}
}
]]></Script>
  </Form>
</FDL>