YNU_JEUS/app_home/himed/xpapps/emr/unprepmngtxp/xp/SPMRI03900_처방제어예외환자관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMRI03900" position="absolute 0 0 798 527" titletext="처방제어 예외 환자관리" oninit="SPMRI03900_oninit" onload="SPMRI03900_onload">
    <Layouts>
      <Layout>
        <Grid position="absolute 0 137 795 522" id="grd_patlist" binddataset="ds_main_datalist_datainfo" autofittype="col" ontextchanged="grd_patlist_ontextchanged" autoenter="select" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="70"/>
                <Column size="120"/>
                <Column size="120"/>
                <Column size="312"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="환자번호"/>
                <Cell col="2" text="환자이름"/>
                <Cell col="3" text="입원일자"/>
                <Cell col="4" text="적용시작"/>
                <Cell col="5" text="적용종료"/>
                <Cell col="6" text="비고"/>
                <Cell col="7" text="환자별seq"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" displaytype="date" edittype="date" text="bind:indd" calendardisplaynulltype="nulltext"/>
                <Cell col="4" displaytype="date" edittype="date" text="bind:valifromdt" mask="yyyy-MM-dd HH:mm" calendardisplaynulltype="nulltext"/>
                <Cell col="5" displaytype="date" edittype="date" text="bind:valitodt" mask="yyyy-MM-dd HH:mm" calendardisplaynulltype="nulltext"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:patcomment"/>
                <Cell col="7" text="bind:seq"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" linetype="horizontal" class="line_10" position="absolute 0 132 795 138"/>
        <Button id="btn_insert" taborder="1" text="저장" class="btn4" position="absolute 739 1 795 23" onclick="btn_insert_onclick"/>
        <Edit id="ipt_pid" taborder="2" position="absolute 105 29 225 48" autoselect="true"/>
        <Static id="caption1" text="예외환자정보" class="tit_2" position="absolute 0 7 100 23"/>
        <Button id="btn_search" taborder="3" text="조회" class="btn1" position="absolute 622 110 678 132" onclick="btn_search_onclick"/>
        <CheckBox id="checkbox1" taborder="4" position="absolute 490 113 615 133" text="종료된 사용자 조회" truevalue="Y" falsevalue="N"/>
        <Button id="btn_modify" taborder="5" text="저장" class="btn4" position="absolute 738 110 794 132" onclick="btn_modify_onclick"/>
        <Static id="caption3" text="환자번호" class="cell_1" position="absolute 0 28 100 48"/>
        <Calendar id="input1" taborder="6" position="absolute 335 29 455 48" mask="yyyy-mm-dd" autoselect="true"/>
        <Static id="caption4" text="입원일자" class="cell_1" position="absolute 230 28 330 48"/>
        <Static id="caption5" text="적용시작" class="cell_1" position="absolute 0 53 100 73"/>
        <Calendar id="input2" taborder="7" position="absolute 105 54 225 73" mask="yyyy-MM-dd HH:mm " dateformat="yyyy-MM-dd HH:mm" value="null" editformat="yyyy-MM-dd HH:mm" autoselect="true"/>
        <Static id="caption6" text="적용종료" class="cell_1" position="absolute 230 53 330 73"/>
        <Calendar id="input3" taborder="8" position="absolute 335 54 455 73" mask="yyyy-mm-dd hh:nn" dateformat="yyyy-MM-dd HH:mm" value="null" autoselect="true" editformat="yyyy-MM-dd HH:mm"/>
        <Static id="caption7" text="비      고" class="cell_1" position="absolute 0 78 100 98"/>
        <Edit id="input4" taborder="9" position="absolute 105 79 455 98" autoselect="true"/>
        <Shape id="line2" linetype="horizontal" class="line_10" position="absolute 0 23 795 29"/>
        <Static id="caption8" text="예외환자목록" class="tit_2" position="absolute 0 116 98 132"/>
        <Button id="btn_delete" taborder="10" text="삭제" class="btn4" position="absolute 680 110 736 132" onclick="btn_delete_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_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="indd" type="STRING" size="256"/>
          <Column id="valifromdt" type="STRING" size="256"/>
          <Column id="valitodt" type="STRING" size="256"/>
          <Column id="patcomment" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="indd"/>
            <Col id="valifromdt"/>
            <Col id="valitodt"/>
            <Col id="patcomment"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_datalist_datainfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_datalist_datainfo_oncolumnchanged"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="endshowyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_save" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_pid" propid="value" datasetid="ds_main_patinfo" columnid="pid"/>
      <BindItem id="item1" compid="input1" propid="value" datasetid="ds_main_patinfo" columnid="indd"/>
      <BindItem id="item2" compid="input3" propid="value" datasetid="ds_main_patinfo" columnid="valitodt"/>
      <BindItem id="item3" compid="input2" propid="value" datasetid="ds_main_patinfo" columnid="valifromdt"/>
      <BindItem id="item4" compid="input4" propid="value" datasetid="ds_main_patinfo" columnid="patcomment"/>
      <BindItem id="item5" compid="checkbox1" propid="value" datasetid="ds_send" columnid="endshowyn"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
function SPMRI03900_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMRI03900_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_patlist);
	grdf_setRowTypeIcon(grd_patlist, 0);
	fInit();
}

function fInit()
{
	fResetInput();
}

function fResetInput()
{
	fSetPatInfoValueInit();    
    fSearch(); 
}

function fSetPatInfoValueInit()
{
    ds_main_patinfo.setColumn(0, "pid", "");
    ds_main_patinfo.setColumn(0, "indd", "");
    ds_main_patinfo.setColumn(0, "valifromdt", utlf_getCurrentDate()+String(utlf_getCurrentTime()).substr(0,4));
    ds_main_patinfo.setColumn(0, "valitodt", "999912312359");
    ds_main_patinfo.setColumn(0, "patcomment", "");
}

//조회
function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch();
}

function fSearch()
{
    var oParam = {};
		oParam.id          = "TRMRI03900";
		oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
		oParam.method      = "reqGetPatInfoRecException";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_datalist_datainfo=datainfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMRI03900";
	tranf_submit(oParam);
}

//삭제
function btn_delete_onclick(obj:Button,  e:ClickEventInfo)
{
	fPatDelValue();
}

function fPatDelValue()
{	
	var row = ds_main_datalist_datainfo.rowposition;
	
	if(row > -1)
	{
		ds_send_save.copyData(ds_main_datalist_datainfo);
		ds_send_save.clearData();
	    ds_send_save.copyRow(ds_send_save.addRow(), ds_main_datalist_datainfo, row);
	    dsf_makeValue(ds_send_save, "status", "string", "d");
	    
	    var pid = ds_send_save.getColumn(0, "pid");
	    var hngnm = ds_send_save.getColumn(0, "hngnm");
	    
	    var msgflag = sysf_messageBox(hngnm + "("+pid+")의 정보를", "Q001");
	    
	    if(msgflag == 6)
	    {
			var oParam = {};
				oParam.id          = "TXMRI03902";
				oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
				oParam.method      = "reqSetPatInfoRecException";
				oParam.inds        = "req=ds_send_save req_endflag=ds_send";
				oParam.outds       = "ds_main_datalist_datainfo=datainfo";
				oParam.async       = false;
				//oParam.callback    = "cf_TXMRI03902";
			tranf_submit(oParam);
	        
	        fResetInput();
	    }
	}
}

//저장
function btn_modify_onclick(obj:Button,  e:ClickEventInfo)
{
	fPatSetValue();
}

function fPatSetValue()
{		
	ds_send_save.clear();
	
	var updategrid = grdf_getGridUpdateData(grd_patlist);
	grdf_setStatusColumn(updategrid, "status");
	ds_send_save.copyData(updategrid, true);

	var oParam = {};
		oParam.id          = "TXMRI03901";
		oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
		oParam.method      = "reqSetPatInfoRecException";
		oParam.inds        = "req=ds_send_save req_endflag=ds_send";
		oParam.outds       = "ds_main_datalist_datainfo=datainfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TXMRI03901";
	tranf_submit(oParam);
	
	fResetInput();		
}

//저장
function btn_insert_onclick(obj:Button,  e:ClickEventInfo)
{
	fPatInsert();
}

function fPatInsert()
{
	if(utlf_isNull(ds_main_patinfo.getColumn(0, "indd")))
	{
		sysf_messageBox("해당환자의 입원 일자를 입력해 주세요.","E");
		return;
	}
	if(!utlf_isNull(ds_main_patinfo.getColumn(0, "pid")))
	{
		ds_send_save.clearData();
		ds_send_save.copyData(ds_main_patinfo);
		
		if(fGetPatinfo())
		{
			var oParam = {};
				oParam.id          = "TXMRI03900";
				oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
				oParam.method      = "reqInsPatInfoRecException";
				oParam.inds        = "req=ds_main_patinfo req_endflag=ds_send";
				oParam.outds       = "ds_main_datalist_datainfo=datainfo";
				oParam.async       = false;
				//oParam.callback    = "cf_TXMRI03900";
			tranf_submit(oParam);  
			
			fResetInput();
		}
	}
}

function fGetPatinfo()
{
	var bFlag = false;
	
	var oParam = {};
		oParam.id          = "TRMRI03901";
		oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
		oParam.method      = "reqGetPatInfoRecException_PatInfo";
		oParam.inds        = "req=ds_send_save";
		oParam.outds       = "ds_temp_patinfo=patinfoyn";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMRI03901";
	tranf_submit(oParam);
	
	if(ds_temp_patinfo.getColumn(0, "patinfoyn") == "Y")
	{
		sysf_messageBox("해당환자의 데이터가 존재합니다","E");
		bFlag = false;
	}
	else
	{
	    bFlag = true;
	}
	return bFlag;
}

function ds_main_datalist_datainfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	var row = e.row;

	var tempValiFromdt = "";
	var tempValiTodt =  "";
	var tempPatComment = "";
	
	var orgValiFromdt  = obj.getColumn(row, "valifromdt");
	var orgValiTodt  = obj.getColumn(row, "valitodt");
	var orgPatComment  = obj.getColumn(row, "patcomment");

	if(e.columnid == "valifromdt")
	{
		tempValiFromdt = e.newvalue;
	}
	
	if(e.columnid == "valitodt")
	{
		tempValiTodt = e.newvalue;
	}
	
	if(e.columnid == "patcomment")
	{
		tempPatComment = e.newvalue;
	}
	

	if(((tempValiFromdt == orgValiFromdt) && (tempValiTodt == orgValiTodt)) && (tempPatComment == orgPatComment))
	{
		obj.updatecontrol = false;
		obj.setRowType(row, "");
		obj.updatecontrol = true;
	}
}
]]></Script>
  </Form>
</FDL>