YNU_JEUS/app_home/himed/xpapps/emr/cpgxp/xp/SPMQP03700_컨설트등록.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMQP03700" position="absolute 0 0 628 520" titletext="컨설트 등록" oninit="SPMQP03700_oninit" onload="SPMQP03700_onload">
    <Layouts>
      <Layout>
        <Static text="컨설트 등록" position="absolute 243 9 348 25" id="cap_outlineinfo" class="tit_2"/>
        <Shape position="absolute 0 22 240 28" linetype="vertical" id="line1" class="line_1"/>
        <Shape position="absolute 243 25 625 31" linetype="horizontal" id="line2" class="line_10"/>
        <Shape position="absolute 243 75 625 81" linetype="horizontal" id="line13" class="line_2"/>
        <Static text="제목" position="absolute 243 54 328 77" id="cap_slipnm2" class="cell_1"/>
        <Shape position="absolute 243 100 625 106" linetype="horizontal" id="line3" class="line_2"/>
        <Static text="수신과" position="absolute 243 78 328 101" id="caption1" class="cell_1"/>
        <Static text="수신자" position="absolute 243 103 328 126" id="caption2" class="cell_1"/>
        <Shape position="absolute 243 124 625 130" linetype="horizontal" id="line7" class="line_2"/>
        <Static text="의뢰 내용" position="absolute 243 128 328 490" id="caption3" class="cell_1"/>
        <TextArea position="absolute 330 129 625 491" id="textarea1"/>
        <Shape position="absolute 243 50 625 56" linetype="horizontal" id="line4" class="line_2"/>
        <Static text="스텝명" position="absolute 243 30 328 53" id="caption4" class="cell_1"/>
        <Edit position="absolute 330 56 625 75" id="ipt_cnstclsnm"/>
        <Tab position="absolute 0 3 240 515" id="switch1" onchanged="switch1_onchanged">
          <Tabpages>
            <Tabpage text="진료의뢰" id="case1">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 0 240 485" id="grd_cnstlist" binddataset="ds_cnstformlist" scrollbars="autovert" oncelldblclick="switch1_case1_grd_cnstlist_oncelldblclick">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="211"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="0"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell text="진료과"/>
                          <Cell col="1" text="caption2"/>
                          <Cell col="2" text="caption3"/>
                          <Cell col="3" text="caption1"/>
                          <Cell col="4" text="caption4"/>
                          <Cell col="5" text="caption5"/>
                          <Cell col="6" text="caption6"/>
                        </Band>
                        <Band id="body">
                          <Cell displaytype="text" text="bind:cnstdeptnm"/>
                          <Cell col="1" text="bind:cnstdeptcd"/>
                          <Cell col="2" text="bind:formcd"/>
                          <Cell col="3" text="bind:formnm"/>
                          <Cell col="4" text="bind:cnstflag"/>
                          <Cell col="5" text="bind:cnstclsnm"/>
                          <Cell col="6" text="bind:replflag"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage text="지원부서의뢰" id="case2">
              <Layouts>
                <Layout>
                  <Grid position="absolute 0 0 240 485" id="grd_cnstlist2" scrollbars="autovert" binddataset="ds_cnstformlist" oncelldblclick="switch1_case2_grd_cnstlist2_oncelldblclick">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="79"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="142"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="0"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell text="분류"/>
                          <Cell col="1" text="caption2"/>
                          <Cell col="2" text="caption3"/>
                          <Cell col="3" text="상세"/>
                          <Cell col="4" text="caption4"/>
                          <Cell col="5" text="caption5"/>
                          <Cell col="6" text="caption6"/>
                        </Band>
                        <Band id="body">
                          <Cell displaytype="text" text="bind:cnstclsnm" wordwrap="char" suppress="1" suppressalign="middle,over"/>
                          <Cell col="1" text="bind:cnstdeptcd"/>
                          <Cell col="2" text="bind:formcd"/>
                          <Cell col="3" displaytype="text" style="align:left top;padding:3 2 1 2;" text="bind:formnm" wordwrap="char"/>
                          <Cell col="4" text="bind:cnstflag"/>
                          <Cell col="5" text="bind:cnstdeptnm"/>
                          <Cell col="6" text="bind:replflag"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Combo position="absolute 330 105 625 124" id="cmb_user" innerdataset="@ds_init_userlist" datacolumn="usernm" codecolumn="userid"/>
        <Shape position="absolute 243 490 625 496" linetype="horizontal" id="line5" class="line_2"/>
        <Button position="absolute 569 495 625 517" id="btn_attrapp" class="btn4" taborder="6" text="확인" onclick="btn_attrapp_onclick"/>
        <Edit readonly="true" position="absolute 330 31 625 50" id="output1"/>
        <Combo position="absolute 330 81 625 100" id="cmb_orddept" enable="false" innerdataset="@ds_init_orddept" datacolumn="depthngnm" codecolumn="deptcd"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cnstformlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnstclsnm" type="STRING"/>
          <Column id="cnstdeptcd" type="STRING"/>
          <Column id="formcd" type="STRING"/>
          <Column id="formnm" type="STRING"/>
          <Column id="cnstflag" type="STRING"/>
          <Column id="cnstdeptnm" type="STRING"/>
          <Column id="replflag" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_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_init_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_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cpgno" type="STRING" size="256"/>
          <Column id="cpghistseq" type="STRING" size="256"/>
          <Column id="stepnm" type="STRING" size="256"/>
          <Column id="formseq" type="STRING" size="256"/>
          <Column id="formcd" type="STRING" size="256"/>
          <Column id="formwritflag" type="STRING" size="256"/>
          <Column id="cnstflag" type="STRING" size="256"/>
          <Column id="cnstclsnm" type="STRING" size="256"/>
          <Column id="recvdeptcd" type="STRING" size="256"/>
          <Column id="recvuserid" type="STRING" size="256"/>
          <Column id="cnstcnts" type="STRING" size="256"/>
          <Column id="recvdeptnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cpgno"/>
            <Col id="cpghistseq"/>
            <Col id="stepnm"/>
            <Col id="formseq"/>
            <Col id="formcd"/>
            <Col id="formwritflag"/>
            <Col id="cnstflag"/>
            <Col id="cnstclsnm"/>
            <Col id="recvdeptcd"/>
            <Col id="recvuserid"/>
            <Col id="cnstcnts"/>
            <Col id="recvdeptnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_stepinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="output1" propid="value" datasetid="ds_cond" columnid="stepnm"/>
      <BindItem id="item1" compid="ipt_cnstclsnm" propid="value" datasetid="ds_cond" columnid="cnstclsnm"/>
      <BindItem id="item2" compid="cmb_orddept" propid="value" datasetid="ds_cond" columnid="recvdeptcd"/>
      <BindItem id="item3" compid="cmb_user" propid="value" datasetid="ds_cond" columnid="recvuserid"/>
      <BindItem id="item4" compid="textarea1" propid="value" datasetid="ds_cond" columnid="cnstcnts"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-03-12
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-03-12      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMOCommon.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

var arErrorCode = new HashArray();
function SPMQP03700_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMQP03700_onload(obj:Form, e:LoadEventInfo)
{
	//copyNodeListType("/root/init/stepinfo", "root/temp/steplist/stepinfo", "after", model, opener.model);
	ds_init_stepinfo.copyData(opener.ds_temp_steplist_stepinfo);
	var stepno = opener.ds_send_reqdata.getColumn(0,"stepno");
	ds_cond.setColumn(0,"stepnm", ds_init_stepinfo.lookup("stepno", stepno , "stepnm"));
	lf_mmbfGetDeptCodeComboList(ds_init_orddept, "A"); //부서코드 콤보
	var editmode = opener.frmf_getParameter("SPMQP03700_edit");
	if (utlf_isNull(editmode)) {
		ds_cond.setColumn(0,"cnstflag" , "1");
		switch1.tabindex = 0;
	} else {
		var cnstflag = opener.frmf_getParameter("SPMQP03700_cnstflag");
		ds_cond.setColumn(0,"cnstflag"		, cnstflag);
		ds_cond.setColumn(0,"formcd"		, opener.frmf_getParameter("SPMQP03700_formcd"));
		ds_cond.setColumn(0,"cnstclsnm"	, opener.frmf_getParameter("SPMQP03700_cnstclsnm"));
		ds_cond.setColumn(0,"recvdeptcd"	, opener.frmf_getParameter("SPMQP03700_recvdeptcd"));
		
		ds_cond.setColumn(0,"cnstcnts"		, opener.frmf_getParameter("SPMQP03700_cnstcnts"));

		if (cnstflag =="1" ) {
			cmb_user.enable = true;
			lf_mmbfGetUserComboList(ds_init_userlist, ds_cond.getColumn(0,"recvdeptcd"), "0330");
			ds_cond.setColumn(0,"recvuserid"	, opener.frmf_getParameter("SPMQP03700_recvuserid"));	
			switch1.tabindex = 0;
		} else  {
			switch1.tabindex = 1;
			cmb_user.enable = false;
		}							
	}
	fGetCnstFormList() ;
	
	dsf_createDs("ds_temp_cond");
	ds_temp_cond.copyData(ds_cond);
	
}
function fGetCnstFormList() {
	ds_send_reqdata.clear();
	dsf_makeValue(ds_send_reqdata,"cnstflag", "string", ds_cond.getColumn(0,"cnstflag"));
	var oParam = {};
		oParam.id          = "TRMQP03701";
		oParam.service     = "prcpbaseapp.CpMngt";
		oParam.method      = "reqGetCnstFormList";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_cnstformlist=cnstformlist";
		oParam.async       = true;
		oParam.callback    = "cf_TRMQP03701";

	tranf_submit(oParam);
}
function cf_TRMQP03701(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function switch1_onchanged(obj:Tab, e:TabIndexChangeEventInfo)
{
	 if(e.postindex == 0)
	 {
		ds_cond.setColumn(0,"cnstflag" , "1");
					
		fGetCnstFormList() ;
	 }
	 else
	 {
		ds_cond.setColumn(0,"cnstflag" , "3");
					
		fGetCnstFormList() ;
	 }
}

function switch1_case1_grd_cnstlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var recvdeptnm 	= ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"cnstdeptnm");
	var recvdeptcd 		= ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"cnstdeptcd");
	if( ds_cond.getColumn(0,"cnstflag") == "1" ){
		var cnstclsnm  		= ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"cnstclsnm") + "(" + recvdeptnm + ")";
	}else{
		var cnstclsnm  		= ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"cnstclsnm");
	}
	var formcd       		= ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"formcd");
	ds_cond.setColumn(0,"recvdeptnm"	, recvdeptnm);
	ds_cond.setColumn(0,"recvdeptcd"		, recvdeptcd);
	ds_cond.setColumn(0,"cnstclsnm" 		, cnstclsnm);
	ds_cond.setColumn(0,"cnstcnts" 		, "");
	ds_cond.setColumn(0,"formcd" 			, formcd);

	var cnstflag = ds_cond.getColumn(0,"cnstflag");
	if (cnstflag =="1" ) {
		cmb_user.enable = true;
		lf_mmbfGetUserComboList(ds_init_userlist, ds_cond.getColumn(0,"recvdeptcd"), "0330");
	} else  {
		cmb_user.enable = false;
	}
	cmb_user.index = 0;
}

function switch1_case2_grd_cnstlist2_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var recvdeptnm = ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"cnstdeptnm");
	var recvdeptcd = ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"cnstdeptcd");
	var cnstclsnm  = ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"formnm");
	var formcd       = ds_cnstformlist.getColumn(ds_cnstformlist.rowposition,"formcd");
	ds_cond.setColumn(0,"recvdeptnm"	, recvdeptnm);
	ds_cond.setColumn(0,"recvdeptcd"		, recvdeptcd);
	ds_cond.setColumn(0,"cnstclsnm" 		, cnstclsnm);
	ds_cond.setColumn(0,"formcd" 			, formcd);
	
	cmb_user.enable = false;
}

function btn_attrapp_onclick(obj:Button,  e:ClickEventInfo)
{
	var formcd 		= ds_cond.getColumn(0,"formcd");
	var cnstflag 	= ds_cond.getColumn(0,"cnstflag");
	var cnstclsnm 	= ds_cond.getColumn(0,"cnstclsnm");
	var recvdeptcd 	= ds_cond.getColumn(0,"recvdeptcd");
	var recvuserid 	= ds_cond.getColumn(0,"recvuserid");
	var cnstcnts 	= ds_cond.getColumn(0,"cnstcnts");
	
	if (utlf_isNull(formcd)) {
		sysf_messageBox("진료과는 필수입니다.","");
		return;
	}
	if (utlf_isNull(cnstclsnm)) {
		sysf_messageBox("제목은 필수입니다.","");
		
		ipt_cnstclsnm.setFocus();
		return;
	}					
	if (utlf_isNull(recvdeptcd)) {
		sysf_messageBox("수신과는 필수입니다.","");

		cmb_orddept.setFocus();
		return;
	}	
	if (utlf_isNull(cnstcnts)) {
		sysf_messageBox("의뢰내용은 필수입니다.","");

		textarea1.setFocus();
		return;
	}				
	var updateflag = lf_compareNodeVal(ds_cond, ds_temp_cond);
	if (updateflag == true) {
		opener.frmf_setParameter("SPMQP03700_rtn"    	, "Y");
	}
	opener.frmf_setParameter("SPMQP03700_formcd"    	, formcd);
	opener.frmf_setParameter("SPMQP03700_cnstflag"   	, cnstflag);
	opener.frmf_setParameter("SPMQP03700_cnstclsnm"	, cnstclsnm);
	opener.frmf_setParameter("SPMQP03700_recvdeptcd"	, recvdeptcd);
	opener.frmf_setParameter("SPMQP03700_recvuserid"	, recvuserid);
	opener.frmf_setParameter("SPMQP03700_cnstcnts"		, cnstcnts);
	
	this.close();
}
]]></Script>
  </Form>
</FDL>