YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMB04200_대진의사선택.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.4">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMB04200" position="absolute 0 0 346 131" titletext="대진의사선택" class="frm_POP" oninit="SPMMB04200_oninit" onload="SPMMB04200_onload">
    <Layouts>
      <Layout>
        <Combo position="absolute 8 76 124 96" id="combo2" innerdataset="@ds_orddept" datacolumn="depthngnm" codecolumn="deptcd" onitemchanged="combo2_onitemchanged"/>
        <Combo position="absolute 236 76 338 96" id="combo3" innerdataset="@ds_userlist" datacolumn="usernm" codecolumn="userid" onitemchanged="combo3_onitemchanged"/>
        <Shape position="absolute 8 71 338 77" linetype="horizontal" id="line3" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
        <Radio position="absolute 10 44 155 64" id="radio1" visible="false" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="radio1_onitemchanged">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">M</Col>
                <Col id="datacolumn">전문의</Col>
              </Row>
              <Row>
                <Col id="codecolumn">D</Col>
                <Col id="datacolumn">진료의</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Button position="absolute 225 101 281 123" id="button1" class="btn4" text="확인" onclick="button1_onclick"/>
        <Button position="absolute 282 101 338 123" id="button2" class="btn4" text="취소" onclick="button2_onclick"/>
        <Edit position="absolute 128 76 232 96" id="input1"/>
        <Button position="absolute 162 45 235 65" id="button3" visible="false" text="button3"/>
        <Static id="stt_titleText" text="대진의사선택" class="sta_POP_title" position="absolute 12 8 225 28" style="align:left middle;"/>
        <Button id="btn_close" taborder="1" onclick="btn_close_onclick" class="btn_POP_cls" position="absolute 324 12 338 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_userlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING"/>
          <Column id="userid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="upexec" type="STRING" size="256"/>
          <Column id="supexec" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="drflag" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="drflag">D</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="radio1" propid="value" datasetid="ds_cond" columnid="drflag"/>
      <BindItem id="item1" compid="combo2" propid="value" datasetid="ds_cond" columnid="supexec"/>
      <BindItem id="item2" compid="input1" propid="value" datasetid="ds_cond" columnid="orddrid"/>
      <BindItem id="item3" compid="combo3" propid="value" datasetid="ds_cond" columnid="userid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-08-29
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-08-29      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

function SPMMB04200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	stt_titleText.text = "대진의사선택";
}

function SPMMB04200_onload(obj:Form, e:LoadEventInfo)
{
	lf_mmbfGetDeptCodeComboList(ds_orddept, "A");
									
	var defdeptcd = opener.frmf_getParameter("SPMMB04200_orddeptcd");					
	if(!utlf_isNull(defdeptcd)){
		ds_cond.setColumn(0, "supexec", defdeptcd);						
	}else{
		ds_cond.setColumn(0, "supexec", sysf_getUserInfo("dutplcecd"));						
	}

	var supexec = ds_cond.getColumn(0, "supexec");
	setUserList(supexec, -1);
	
	if(utlf_isNull(combo2.text)){
		combo2.index = 0;
	} else {
		// 진료부서가 설정된 경우, 다른부서로 변경하지 못하도록 불능 처리함.
		combo2.enable = false;
	}
}

function setUserList(sSupexec, nIndex){
	var orddrid = "";
	
	lf_mmbfGetUserComboList(ds_userlist,  sSupexec, "0330", "", "V", "", "Y");
	
	if(nIndex != -1) {
		combo3.index = nIndex;
		orddrid = combo3.value;
	}
	
	ds_cond.setColumn(0, "orddrid", orddrid);
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	close();
}

function radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	if(obj.value == "M"){ //주치의로 설정된 경우
		combo2.enable = false;
		combo3.enable = false;
		ds_cond.setColumn(0, "upexec", "");
		ds_cond.setColumn(0, "supexec", "");
		ds_cond.setColumn(0, "userid", "");
		ds_cond.setColumn(0, "orddrid", "");

	}else{
		combo2.enable = true;
		combo3.enable = true;
	}
}

function combo2_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	setUserList(obj.value, 0);
}

function combo3_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	//  퇴직진료의의 특진유무에 따라서 대진진료의의 특진유무 매칭. (일반의는 일반의로만 대진이가능하다)
	var specordyn = opener.frmf_getParameter("SPMMB04200_specordyn");
	var userid = ds_cond.getColumn(0, "userid");
	var usernm = "";
	if ( !utlf_isNull(userid) ) {
		usernm = ds_userlist.lookup("userid", userid, "usernm");
	
		if ( specordyn == "N" && usernm.lastIndexOf("Y") > -1 ) {
			sysf_messageBox("퇴직의사가 일반의인 경우에는 대진의사로 특진의를 선택", "E001");
			ds_cond.setColumn(0, "orddrid", "");
			combo3.value = e.prevalue;
		}
		else {				
			ds_cond.setColumn(0, "orddrid", ds_cond.getColumn(0, "userid"));
		}
	}
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var drflag = ds_cond.getColumn(0, "drflag");
	if(drflag == "M"){ //주치의
		opener.frmf_setParameter("SPMMB04100_useyn", "X");
	}else{ //시행부서
		var userid = ds_cond.getColumn(0, "userid");
		if(utlf_isNull(userid)){ //의사가 선택이 안된 경우
			sysf_messageBox("대진 의사를", "C002");
			return;
		}else{
			opener.frmf_setParameter("SPMMB04200_rtrnyn", "Y");			
			opener.frmf_setParameter("SPMMB04200_orddrid", ds_cond.getColumn(0, "userid"));	
		}
	}
	close();
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	opener.frmf_setParameter("SPMMB04100_useyn", "N");
	close();
}
]]></Script>
  </Form>
</FDL>