YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO14400_퇴원후외래처방진료일정.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO14400" position="absolute 0 0 523 51" titletext="퇴원후 외래처방 진료일정" onload="SPMMO14400_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 406 31 463 51" id="button2" class="btn4" taborder="6" text="예약" onclick="button2_onclick"/>
        <Static text="진료의" position="absolute 192 5 262 25" id="caption7" class="cell_1"/>
        <Static text="진료과" position="absolute 0 5 64 25" align="align:left middle;" id="caption1" class="cell_1"/>
        <Shape position="absolute 0 -1 522 5" linetype="horizontal" id="line7" class="line_10"/>
        <Static text="진료일" position="absolute 359 5 429 25" id="caption2" class="cell_1"/>
        <Button position="absolute 465 31 522 51" id="button1" class="btn4" taborder="7" text="취소" onclick="button1_onclick"/>
        <Shape position="absolute 0 27 522 33" linetype="horizontal" id="line4" class="line_3"/>
        <Calendar position="absolute 431 5 522 25" align="align:center middle;" id="input1" taborder="3" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
        <MaskEdit position="absolute 310 31 355 51" align="align:center middle;" id="input2" taborder="4" visible="false" mask="#"/>
        <Combo position="absolute 65 5 190 25" id="cmb_orddept" class="combo_default" taborder="1" innerdataset="@ds_orddept" datacolumn="depthngnm" codecolumn="deptcd" onitemchanged="cmb_orddept_onitemchanged"/>
        <Combo position="absolute 264 5 357 25" id="cmb_dr" taborder="2" innerdataset="@ds_userlist" datacolumn="usernm" codecolumn="userid"/>
        <MaskEdit position="absolute 360 31 405 51" align="align:center middle;" id="input3" taborder="5" visible="false" mask="#"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="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" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="usernm" type="STRING"/>
          <Column id="userid" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_root" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="ordh" type="STRING" size="256"/>
          <Column id="ordm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="ordh">09</Col>
            <Col id="ordm">00</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input2" propid="value" datasetid="ds_root" columnid="ordh"/>
      <BindItem id="item1" compid="input3" propid="value" datasetid="ds_root" columnid="ordm"/>
      <BindItem id="item2" compid="input1" propid="value" datasetid="ds_root" columnid="orddd"/>
      <BindItem id="item3" compid="cmb_orddept" propid="value" datasetid="ds_main_cond" columnid="orddeptcd"/>
      <BindItem id="item4" compid="cmb_dr" propid="value" datasetid="ds_main_cond" columnid="orddrid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMOCommon.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

function SPMMO14400_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	
	//20081117 마정민수정: 서소영선생님 요청으로 followup 진료과, 진료의를 환자진료과, 주치의정보로 함.
	//mmbfGetDeptCodeComboList("/root/send/reqdata", "/root/init/orddept", "O");
	lf_mmbfGetDeptCodeComboList(ds_orddept, "O");
	
	var vDutplcecd = opener.ds_paminfo.getColumn(0, "orddeptcd"); //opener.model.getvalue ( "/root/paminfo/list/orddeptcd" );
	
	if ( utlf_isNull(vDutplcecd )) {
		vDutplcecd = sysf_getUserInfo("dutplcecd");
	}
	
	var vUserid = opener.ds_paminfo.getColumn(0, "medispclid"); 	//opener.model.getvalue ( "/root/paminfo/list/medispclid" );
	
	if ( utlf_isNull(vUserid )) {
		vDutplcecd = sysf_getUserInfo("userid");
	}
	//mmbfGetUserComboList("/root/send/reqdata", "/root/init/userlist", vDutplcecd, "0330");
	lf_mmbfGetUserComboList(ds_userlist, vDutplcecd, "0330");
	
    ds_main_cond.setColumn(0, "orddeptcd", vDutplcecd);
	ds_main_cond.setColumn(0, "orddrid", vUserid);
	
	//20081005 마정민수정: 퇴원예고일자를 진료일로 박아준다.
	//여기 진료일은 진료희망일 용도로만 쓰인다. 실제 예약잡을때는 퇴원예고일로 처리해 준다.					
	var orddd = opener.ds_paminfo.getColumn(0, "dschdclrdt").substring(0, 8);  //opener.model.getValue ( "/root/paminfo/list/dschdclrdt" ).substring( 0, 8 );
	var prcpgenrflag = opener.ds_patflag.getColumn(0, "prcpgenrflag"); 			//opener.model.getValue("/root/patflag/list/prcpgenrflag");
	
	if ( prcpgenrflag != "E" ) { //응급
		cmb_orddept.enable = true;
		cmb_dr.enable = true;
		ds_root.setColumn(0, "orddd", orddd);
	} else {
		ds_root.setColumn(0, "orddd", orddd);
	}	
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	if (utlf_isNull(cmb_orddept.text)) {
		sysf_messageBox ( "진료과가", "E014" );
		return;
	}				
	if (utlf_isNull(cmb_dr.text)) {
		sysf_messageBox ( "진료의가", "E014" );
		return;
	}						
	
	var orddd = ds_root.getColumn(0, "orddd"); //model.getValue ( "/root/orddd" );		
	if ( utlf_isNull(orddd)) {
		sysf_messageBox ( "진료일이", "E014" );
		return;					
	}		
	
	if ( !utlf_isValidDateTime ( orddd, "YYYYMMDD")) {
		sysf_messageBox ( "진료일이", "E016" );
		return;		 					                              	
	}
	
	if ( orddd < utlf_getCurrentDate()) {
		sysf_messageBox ( "진료일를 과거일자로 선택 할수 없습니다.", "E999" );
		return;		 					                              	
	}
	
	var ordh = ds_root.getColumn(0, "ordh"); 
	var ordm = ds_root.getColumn(0, "ordm");			
	if ( utlf_isNull(ordh) ||  utlf_isNull(ordm)) {
		sysf_messageBox ( "진료시간이", "E014" );
		return;					
	}				
	if ( eval(ordh) >= 24 ) {
		sysf_messageBox ( "예약시간이 잘못 입력되었습니다.", "E" );
		return;
	}
	if ( eval(ordm) >= 60 ) {
		sysf_messageBox ( "예약분이 잘못 입력되었습니다.", "E" );
		return;
	}
	
	if( "11111"  == ds_main_cond.getColumn(0, "orddrid") || "EMR"  == ds_main_cond.getColumn(0, "orddrid") ) {
		sysf_messageBox ( "일반의사 또는 의무기록으로 퇴원후외래(F/U) 예약을 진행 할 수 없습니다.", "E" );
		return;
	}

	ordh = ordh.toString().getLeftPad ( 2, "0" );
	ordm = ordm.toString().getLeftPad ( 2, "0" );														
	
	opener.frmf_setParameter ( "SPMMO14400_orddeptcd", ds_main_cond.getColumn(0, "orddeptcd") );
	opener.frmf_setParameter ( "SPMMO14400_orddrid", ds_main_cond.getColumn(0, "orddrid") );
	opener.frmf_setParameter ( "SPMMO14400_otpt_orddd", orddd );
	opener.frmf_setParameter ( "SPMMO14400_ordtm", ordh + ordm );
	opener.frmf_setParameter ( "SPMMO14400_rtnyn","Y" );
	close();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	opener.frmf_setParameter ( "SPMMO14400_rtnyn","N" );
	close();
}

function cmb_orddept_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
// 	model.removeNodeset("/root/init/userlist");					
// 	model.makeNode("/root/init/userlist/usercombo");
	lf_mmbfGetUserComboList(ds_userlist, cmb_orddept.value, "0330");
	
	cmb_dr.value = "";
}
]]></Script>
  </Form>
</FDL>