YNU_JEUS/app_home/himed/xpapps/emr/unprepmngtxp/xp/SPMRI04300_자동승인예외환자관리.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMRI04300" position="absolute 0 0 820 550" titletext="자동승인 예외 환자관리" onload="SPMRI04300_onload">
    <Layouts>
      <Layout>
        <Div id="group3" scrollbars="autoboth" position="absolute 0 0 800 540" style="">
          <Layouts>
            <Layout>
              <Shape id="line1" class="line_1" linetype="horizontal" position="absolute 0 122 795 141" style="strokepen:3 solid #33bbbbff;" anchor="default"/>
              <Button id="btn_insert" class="btn1" position="absolute 740 1 796 23" style="" text="저장" onclick="group3_btn_insert_onclick"/>
              <Edit id="ipt_pid" position="absolute 105 30 225 49" style="" anchor="default"/>
              <Static id="caption1" class="tit_2" position="absolute 5 10 265 23" style="" text="자동승인 예외환자입력"/>
              <Button id="btn_search" class="btn1" position="absolute 620 105 676 127" style="" text="조회" onclick="group3_btn_search_onclick"/>
              <CheckBox text="종료된 사용자 조회" truevalue="Y" falsevalue="" datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="checkbox1" visible="true" position="absolute 490 107 615 127" style="">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">Y</Col>
                      <Col id="datacolumn">종료된 사용자 조회</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </CheckBox>
              <Button id="btn_modify" class="btn1" position="absolute 740 105 796 127" style="" text="저장" onclick="group3_btn_modify_onclick"/>
              <Static id="caption3" class="cell_1" position="absolute 0 30 100 50" style="" text="환자번호"/>
              <Calendar id="input1" mask="yyyy-mm-dd" position="absolute 335 30 455 49" style="" anchor="default"/>
              <Static id="caption4" class="cell_1" position="absolute 230 30 330 50" style="" text="입원일자"/>
              <Static id="caption5" class="cell_1" position="absolute 0 55 100 75" style="" text="적용시작"/>
              <Calendar id="input2" mask="yyyy-mm-dd hh:nn" position="absolute 105 55 225 74" style="" anchor="default" dateformat="yyyy-MM-dd HH:mm" value="null" editformat="yyyy-MM-dd HH:mm"/>
              <Static id="caption6" class="cell_1" position="absolute 230 55 330 75" style="" text="적용종료"/>
              <Calendar id="input3" mask="yyyy-mm-dd hh:nn" position="absolute 335 55 455 74" style="" anchor="default" dateformat="yyyy-MM-dd HH:mm" value="null" editformat="yyyy-MM-dd HH:mm"/>
              <Static id="caption7" class="cell_1" position="absolute 0 80 100 100" style="" text="비      고"/>
              <Edit id="input4" position="absolute 105 80 455 99" style="" anchor="default"/>
              <Shape id="line2" class="line_1" linetype="horizontal" position="absolute 0 25 795 28" style="" anchor="default"/>
              <Static id="caption8" class="tit_2" position="absolute 5 111 270 132" style="" text="자동승인 예외환자목록"/>
              <Button id="btn_delete" class="btn1" position="absolute 680 105 736 127" style="" text="삭제" onclick="group3_btn_delete_onclick"/>
              <Button id="btn_help" taborder="1" text="도움말" class="btn2" position="absolute 652 1 708 23" onclick="group3_btn_help_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_patlist" binddataset="ds_main_datalist_datainfo" position="absolute 0 135 795 525" style="" oncolumnchanged="grd_patlist_oncolumnchanged">
          <Formats>
            <Format id="default">
              <Columns>
                <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 text="환자번호"/>
                <Cell col="1" text="환자이름"/>
                <Cell col="2" text="입원일자"/>
                <Cell col="3" text="적용시작"/>
                <Cell col="4" text="적용종료"/>
                <Cell col="5" text="비고"/>
                <Cell col="6" text="환자별seq"/>
                <Cell col="7" text="적용시작일자"/>
                <Cell col="8" text="적용마감일자"/>
              </Band>
              <Band id="body">
                <Cell text="bind:pid"/>
                <Cell col="1" text="bind:hngnm"/>
                <Cell col="2" displaytype="date" text="bind:indd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="3" displaytype="date" text="bind:valifromdt" mask="yyyy-MM-dd HH:mm" calendardisplaynulltype="nulltext"/>
                <Cell col="4" displaytype="date" text="bind:valitodt" mask="yyyy-MM-dd HH:mm" calendardisplaynulltype="nulltext"/>
                <Cell col="5" edittype="text" style="align:left;" text="bind:patcomment"/>
                <Cell col="6" text="bind:seq"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_datalist" 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="savedata" type="STRING" size="256"/>
          <Column id="save" type="STRING" size="256"/>
          <Column id="endshowyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="savedata"/>
            <Col id="save"/>
            <Col id="endshowyn"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_datalist_datainfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="flag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
          <Column id="valifromdd" type="STRING" size="256"/>
          <Column id="valitodd" type="STRING" size="256"/>
          <Column id="patcomment" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="flag"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="seq"/>
            <Col id="valifromdd"/>
            <Col id="valitodd"/>
            <Col id="patcomment"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="patinfo" type="STRING" size="256"/>
          <Column id="datalist" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <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_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>
        <Rows>
          <Row>
            <Col id="hidden"/>
          </Row>
        </Rows>
      </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_temp_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_save" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="flag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
          <Column id="valifromdd" type="STRING" size="256"/>
          <Column id="valitodd" type="STRING" size="256"/>
          <Column id="patcomment" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="flag"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="indd"/>
            <Col id="cretno"/>
            <Col id="seq"/>
            <Col id="valifromdd"/>
            <Col id="valitodd"/>
            <Col id="patcomment"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.ipt_pid" propid="value" datasetid="ds_main_patinfo" columnid="pid"/>
      <BindItem id="item1" compid="group3.checkbox1" propid="value" datasetid="ds_send" columnid="endshowyn"/>
      <BindItem id="item2" compid="group3.input1" propid="value" datasetid="ds_main_patinfo" columnid="indd"/>
      <BindItem id="item3" compid="group3.input2" propid="value" datasetid="ds_main_patinfo" columnid="valifromdt"/>
      <BindItem id="item4" compid="group3.input3" propid="value" datasetid="ds_main_patinfo" columnid="valitodt"/>
      <BindItem id="item5" compid="group3.input4" propid="value" datasetid="ds_main_patinfo" columnid="patcomment"/>
    </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";
//include "emr_unprepmngtxp::SPMRI04300.xjs";

function SPMRI04300_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

	fInit(); 

}

function fInit(){
	fResetInput();
}

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


}

function fSearch(){

    var oParam = {};
    oParam.id          = "TRMRI03900";
    oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
    oParam.method      = "reqGetPatAcptExpt";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_datalist_datainfo=datainfo";
    oParam.async       = false;
    //oParam.callback    = "cf_TRMRI03900";

    tranf_submit(oParam);

    
}

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.copyData(ds_main_patinfo); 

		if(fGetPatinfo()){
//		  submit("TXMRI04300");	   

			var oParam = {};
			oParam.id          = "TXMRI03900";
			oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
			oParam.method      = "reqInsPatAcptExpt";
			oParam.inds        = "req=ds_main_patinfo req_endflag=ds_";
			oParam.outds       = "ds_main_datalist_datainfo=datainfo";
			oParam.async       = false;
			//oParam.callback    = "cf_TXMRI03900";

			tranf_submit(oParam);

			fResetInput();
		}
	}else {
		if(utlf_isNull(ds_main_patinfo.getColumn(0, "pid"))){
			sysf_messageBox("환자번호를 입력해 주세요.","E");
			return;
		}
	}
}

function fPatCheckedSetGrid(){

	if(utlf_isNull(isDataCell())){
        var row = ds_main_datalist_datainfo.rowposition;

        var tempValiFromdt = ds_temp_datalist_datainfo.getColumn(row, "valifromdt");
        var tempValiTodt = ds_temp_datalist_datainfo.getColumn(row, "valitodt");
        var tempPatComment = ds_temp_datalist_datainfo.getColumn(row, "patcomment");

        var orgValiFromdt  = ds_main_datalist_datainfo.getColumn(row, "valifromdt");
        var orgValiTodt  = ds_main_datalist_datainfo.getColumn(row, "valitodt");
        var orgPatComment  = ds_main_datalist_datainfo.getColumn(row, "patcomment");

        if(((tempValiFromdt == orgValiFromdt) && (tempValiTodt == orgValiTodt)) && (tempPatComment == orgPatComment)){
            grd_patlist.removeStatus(row, "delete");
            grd_patlist.removeStatus(row, "update");                                
        }
    }
}

function fPatDelValue(){

	var row = ds_main_datalist_datainfo.rowposition;

	if(row >= 0){
	
        ds_send_save.clearData();
        ds_send_save.addRow();
	    ds_send_save.copyRow( 0, 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){
//	        submit("TXMRI04302");

			var oParam = {};
			oParam.id          = "TXMRI03902";
			oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
			oParam.method      = "reqSetPatAcptExpt";
			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);

	        ds_send_save.clearData(); 
	        ds_send_save.addRow();    
	        fResetInput();
	    }
	}
}

function fPatSetValue(){

// 	ds_send.setColumn( 0, "savedata","");
// 	ds_send.setColumn( 0, "savedata",grd_patlist.getUpdateData());

//	submit("TXMRI04301");

	var oParam = {};
    oParam.id          = "TXMRI03901";
    oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
    oParam.method      = "reqSetPatAcptExpt";
    oParam.inds        = "req=ds_main_datalist_datainfo:U req_endflag=ds_send";
    oParam.outds       = "ds_main_datalist_datainfo=datainfo";
    oParam.async       = false;
    //oParam.callback    = "cf_TXMRI03901";

	tranf_submit(oParam);


	fResetInput();		
}

function fGetPatinfo(){

	var bFlag = false;

//	submit("TRMRI04301");

	var oParam = {};
	oParam.id          = "TRMRI03901";
    oParam.service     = "unprepmngtapp.ChrtUnprepMngt";
    oParam.method      = "reqGetPatAcptExptExistPat";
    oParam.inds        = "req=ds_main_patinfo";
    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 fResetInput(){
 	fSetPatInfoValueInit();    
    fSearch(); 
}

// function fCheckedChangeDataGridValue(row){
// 	//debugger;
// 	var pid    = ds_main_datalist_datainfo.getColumn(row, "pid"));
// 	var indd   = ds_main_datalist_datainfo.getColumn(row, "indd"));
// 	var cretno = ds_main_datalist_datainfo.getColumn(row, "cretno"));
// 	var seq    = ds_main_datalist_datainfo.getColumn(row, "seq"));
// 	var patcomment = ds_main_datalist_datainfo.getColumn(row, "patcomment"));
// 
// 	var compValue = model.getValue("ds_temp_datalist_datainfo[pid = '"+pid+"' and indd = '"+indd+"' and cretno = '"+cretno+"' and seq = '"+seq+"' ]_patcomment");
// 
// 	var bFlag = false;
// 
// 	if(patcomment != compValue){
// 	   bFlag = true;	
// 	}
// 
// 	return bFlag;
// }


function group3_btn_insert_onclick(obj:Button, e:ClickEventInfo) {

	fPatInsert();

}

function group3_btn_search_onclick(obj:Button, e:ClickEventInfo) {

	fSearch();

}

function group3_btn_modify_onclick(obj:Button, e:ClickEventInfo) {

	fPatSetValue();

}

function group3_btn_delete_onclick(obj:Button, e:ClickEventInfo) {

	fPatDelValue();

}

function grd_patlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo) {

	fPatCheckedSetGrid();

}


function group3_btn_help_onclick(obj:Button,  e:ClickEventInfo)
{
	var parammsg = "A@자동승인 예외 환자관리@REC01";
    
    if( !utlf_isNull(parammsg) ){
        frmf_setParameter("SPMQR06000_param", parammsg);  // 파라미터 설정         
        frmf_modal("SPMQR06000", "SPMQR06000", null, null, null, null, null, null, null, null, null, null, "M");      
    }
}
]]></Script>
  </Form>
</FDL>