YNU_JEUS/app_home/himed/xpapps/emr/dialroomxp/xp/SMMND05100_혈액투석적정성평가 내환자 Setting 등록.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMND05100" position="absolute 0 0 361 724" titletext="인공신장실 내 환자 Setting" onload="SMMND05100_onload" oninit="SMMND05100_oninit">
    <Layouts>
      <Layout>
        <Static id="caption6" text="내 환자 Setting" class="tit_1" position="absolute 0 0 124 23"/>
        <Grid id="grd_mypatlist" taborder="1" binddataset="ds_main_mypatinfo_mypatlist" autoenter="select" useinputpanel="false" cellsizingtype="col" autofittype="col" oncellclick="group2_grd_mypatlist_oncellclick" position="absolute 0 108 355 717">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="120"/>
                <Column size="100"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="25" band="head"/>
                <Row size="25"/>
              </Rows>
              <Band id="head">
                <Cell displaytype="checkbox" edittype="checkbox"/>
                <Cell col="1" text="등록번호"/>
                <Cell col="2" text="환자명"/>
                <Cell col="3" text="S/A"/>
                <Cell col="4" text="시작일자"/>
                <Cell col="5" text="종료일자"/>
                <Cell col="6" text="wardcd"/>
                <Cell col="7" text="bfsetting"/>
                <Cell col="8" text="hdsaqnflag"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:mysetting" expr="expr:mysetting == 't' ? 1 : 0"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" text="bind:sexage"/>
                <Cell col="4" text="bind:fromdt"/>
                <Cell col="5" text="bind:todt"/>
                <Cell col="6" text="bind:wardcd"/>
                <Cell col="7" text="bind:bfsetting"/>
                <Cell col="8" text="bind:hdsaqnflag"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" class="line_1" position="absolute 0 104 355 108" style="strokepen:3 solid #33bbbbff;"/>
        <Static id="caption8" text="혈액투석 유지환자리스트" class="tit_2" position="absolute 0 87 171 103"/>
        <Button id="btn_save" taborder="2" text="저장" onclick="group2_btn_save_onclick" class="btn5" position="absolute 313 82 355 102"/>
        <Static id="caption1" text="사원번호" class="cell_1" position="absolute 0 29 70 49"/>
        <Static id="caption2" text="간호사명" class="cell_1" position="absolute 179 29 249 52"/>
        <Edit id="opt_empno" taborder="3" readonly="true" autoselect="true" class="output" position="absolute 73 30 175 49"/>
        <Edit id="opt_nursnm" taborder="4" readonly="true" autoselect="true" class="output" position="absolute 252 30 354 49"/>
        <Shape id="line2" class="line_1" position="absolute 0 25 355 29" style="strokepen:3 solid #33bbbbff;"/>
        <Shape id="line3" class="line_3" position="absolute 0 76 356 79"/>
        <Button id="btn_ref" taborder="5" text="조회" onclick="group2_btn_ref_onclick" class="btn2" position="absolute 269 82 311 102"/>
        <TextArea id="tar_settinginfo" taborder="6" visible="false" position="absolute 2 529 354 644" style="font:돋움체,13,bold;align: middle;background:#ffffcc  ;"/>
        <Edit id="inp_wardcd" taborder="7" visible="false" position="absolute 105 264 205 283"/>
        <Static id="caption3" text="유효기간" class="cell_1" position="absolute 0 52 70 75"/>
        <Static id="caption4" text="~" position="absolute 180 59 195 69"/>
        <Calendar id="ipt_fromdt" taborder="8" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" position="absolute 75 54 170 74" enable="false"/>
        <Calendar id="ipt_todt" taborder="9" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" position="absolute 200 54 295 73"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init_ward_dept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="depthngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="deptcd"/>
            <Col id="depthngnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_saveinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="message" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="message"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_mypatinfo_mypatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep" oncolumnchanged="ds_main_mypatinfo_mypatlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="mysetting" type="STRING" size="256" sumtext="세팅"/>
          <Column id="shiftflag" type="STRING" size="256" sumtext="shift"/>
          <Column id="dialarea" type="STRING" size="256" sumtext="구역"/>
          <Column id="dialseatflag" type="STRING" size="256" sumtext="투석자리"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="구분"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="sexage" type="STRING" size="256" sumtext="성별나이"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="mysetting" type="STRING" size="256" sumtext="세팅"/>
          <Column id="fromdt" type="STRING" size="256" sumtext="시작일자"/>
          <Column id="todt" type="STRING" size="256" sumtext="완료일자"/>
          <Column id="hdsaqnflag" type="STRING" size="256" sumtext="혈액투석적성도플래그"/>
        </ColumnInfo>
      </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_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_mypatinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <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="send" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="send"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
          <Column id="shiftflag" type="STRING" size="256"/>
          <Column id="fromdt" type="STRING" size="256"/>
          <Column id="todt" type="STRING" size="256"/>
          <Column id="hdsaqnflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="wardcd"/>
            <Col id="userid"/>
            <Col id="usernm"/>
            <Col id="shiftflag">-</Col>
            <Col id="fromdt"/>
            <Col id="todt"/>
          </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>
      </Dataset>
      <Dataset id="ds_main_settinginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="settingtime" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="settingtime"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_mypatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="mysetting" type="STRING" size="256" sumtext="세팅"/>
          <Column id="shiftflag" type="STRING" size="256" sumtext="shift"/>
          <Column id="dialarea" type="STRING" size="256" sumtext="구역"/>
          <Column id="dialseatflag" type="STRING" size="256" sumtext="투석자리"/>
          <Column id="ioflag" type="STRING" size="256" sumtext="구분"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="sexage" type="STRING" size="256" sumtext="성별나이"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="mysetting" type="STRING" size="256" sumtext="세팅"/>
          <Column id="fromdt" type="STRING" size="256" sumtext="시작일자"/>
          <Column id="todt" type="STRING" size="256" sumtext="완료일자"/>
          <Column id="hdsaqnflag" type="STRING" size="256" sumtext="혈액투석적성도플래그"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="opt_empno" propid="value" datasetid="ds_main_cond" columnid="userid"/>
      <BindItem id="item1" compid="opt_nursnm" propid="value" datasetid="ds_main_cond" columnid="usernm"/>
      <BindItem id="item2" compid="tar_settinginfo" propid="value" datasetid="ds_main_saveinfo" columnid="message"/>
      <BindItem id="item3" compid="inp_wardcd" propid="value" datasetid="ds_main_cond" columnid="wardcd"/>
      <BindItem id="item4" compid="ipt_fromdt" propid="value" datasetid="ds_main_cond" columnid="fromdt"/>
      <BindItem id="item5" compid="ipt_todt" propid="value" datasetid="ds_main_cond" columnid="todt"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-06-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-06-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "com_departmentcodexp::ZSD001.xjs";
include "emr_dialroomxp::SMMND05100.xjs";

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

function SMMND05100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_mypatlist); 
	
	fInit();
}

function fInit()
{
	var instcd = sysf_getUserInfo("dutplceinstcd");

	ipt_fromdt.value = utlf_getCurrentDate();
	ipt_todt.value = utlf_getCurrentDate();

	ds_main_mypatinfo_mypatlist.clearData();   		     	

	var pFlag = "-";

	ds_main_cond.setColumn( 0, "userid", sysf_getUserId());
	ds_main_cond.setColumn( 0, "usernm", sysf_getUserName());
	ds_main_cond.setColumn( 0, "wardcd", sysf_getUserInfo("dutplcecd"));	
	ds_main_cond.setColumn( 0, "shiftflag", pFlag);
	
	fGetPatList(pFlag);
	
	grdf_setRowStyle( grd_mypatlist , "0" , "t" , "mysetting" , "equal");
}


function ds_main_mypatinfo_mypatlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	
	if( e.columnid == "mysetting" )
	{	
		obj.updatecontrol = false;
 		obj.setColumn(e.row, "mysetting", (e.newvalue == "t" || e.newvalue == 1) ? "t" : "f");
 		obj.updatecontrol = true;
 	}
}

function fGetPatList(pFlag)
{
	var today = utlf_getCurrentDate();
	grd_mypatlist.position.height = "609"; //.attribute("height") = "609";
	tar_settinginfo.visible = false;			
 	
	ds_send.clearData();
	dsf_makeValue( ds_send, "wardcd", "string",  ds_main_cond.getColumn(0, "wardcd"));
	dsf_makeValue( ds_send, "srchflag", "string",  pFlag);
	dsf_makeValue( ds_send, "rsrvfromdd", "string",  today);
	dsf_makeValue( ds_send, "rsrvtodd", "string",  today);
	dsf_makeValue( ds_send, "shiftflag", "string",  ds_main_cond.getColumn(0, "shiftflag"));
	dsf_makeValue( ds_send, "hdsaqnflag", "string",  ds_main_cond.getColumn(0, "hdsaqnflag"));
	
	dsf_setFixVal(ds_send, "wardcd:2010702020,hdsaqnflag:H");
	
	var oParam = {};
		oParam.id          = "TRMND05101";
		oParam.service     = "dialapp.DialPatMngt";
		oParam.method      = "reqGetPatList";
		oParam.inds        = "reqcond=ds_send";
		oParam.outds       = "ds_main_mypatinfo_mypatlist=mypatlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMND05101";

	tranf_submit(oParam);
	
	ds_main_mypatinfo_mypatlist.updatecontrol = false;
	dsf_setFixVal(ds_main_mypatinfo_mypatlist, "hdsaqnflag:H");
	ds_main_mypatinfo_mypatlist.updatecontrol = true;
}	

function fOnclick()
{
	grdf_setRowStyle(grd_mypatlist , "0" , "t" , "mysetting" , "equal");
}

function fSave()
{
	ds_send_mypatlist.clearData();

	var fromdt = ipt_fromdt.value + "000000";
	var todt   = ipt_todt.value + "235959";

	for(var i = 0; i < ds_main_mypatinfo_mypatlist.rowcount ; i++) 
	{
	    var currentMysetting = ds_main_mypatinfo_mypatlist.getColumn(i, "mysetting");
	   
	    if( currentMysetting == "t" && utlf_isNull(ds_main_mypatinfo_mypatlist.getColumn(i, "fromdt")))
	    {	        
		    ds_main_mypatinfo_mypatlist.setColumn( i , "fromdt", fromdt);
		    ds_main_mypatinfo_mypatlist.setColumn( i , "todt", todt);
		}		
	}
	
	ds_send_mypatlist.clearData();
	var updateData = grdf_getGridUpdateData(grd_mypatlist, "u");
	ds_send_mypatlist.copyData(updateData, true);
	
	dsf_setFixVal(ds_send_mypatlist, "wardcd:2010702020,hdsaqnflag:H");

	var oParam = {};
		oParam.id          = "TXMND05101";
		oParam.service     = "dialapp.DialPatMngt";
		oParam.method      = "reqSetMyPatList";
		oParam.inds        = "reqlist=ds_send_mypatlist";
		oParam.outds       = "ds_main_settinginfo=settinginfo";
		oParam.async       = false;
		oParam.callback    = "cf_TXMND05101";
	tranf_submit(oParam);
}

function cf_TXMND05101(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0)
    {	
		sysf_messageBox("저장할 내역이 ", "I004")
		return;
	}
	else
	{
		fGetPatList("setting"); 
		ds_main_saveinfo.setColumn( 0, "message",  "  " + ds_main_settinginfo.getColumn(0, "settingtime") + "\n  ["+ sysf_getUserName() + "]간호사의 \n  내환자가 Setting 되었습니다.");
		grd_mypatlist.position.height = 405; 
		tar_settinginfo.visible = true;
	}
}

function group2_grd_mypatlist_oncellclick(obj:Grid, e:GridClickEventInfo) 
{
	if(e.col > 0)
	{
		fOnclick();
	}
}

function group2_btn_save_onclick(obj:Button, e:ClickEventInfo) 
{
	fSave();
}

function group2_btn_ref_onclick(obj:Button, e:ClickEventInfo) 
{
	fGetPatList(); 
}]]></Script>
  </Form>
</FDL>