YNU_JEUS/app_home/himed/xpapps/emr/cpgxp/xp/SPMMP02400_Exclusion입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.4">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMP02400" position="absolute 0 0 517 480" titletext="Exclusion입력" oninit="SPMMP02400_oninit" onload="SPMMP02400_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 500 441" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Tab position="absolute 0 0 500 440" id="switch1">
                <Tabpages>
                  <Tabpage text="" id="cp">
                    <Layouts>
                      <Layout>
                        <Grid position="absolute 0 54 495 149" id="grd_cplist" binddataset="ds_grd_cplist" oncellclick="grp_biz_switch1_cp_ds_grd_cplist_oncellclick">
                          <Formats>
                            <Format id="default">
                              <Columns>
                                <Col size="80"/>
                              </Columns>
                              <Rows>
                                <Row band="head" size="24"/>
                                <Row band="body" size="24"/>
                              </Rows>
                              <Band id="head">
                                <Cell col="0" disptype="normal" text="cpgnm"/>
                              </Band>
                              <Band id="body">
                                <Cell col="0" disptype="normal" text="bind:cpgnm"/>
                              </Band>
                            </Format>
                          </Formats>
                        </Grid>
                        <Static text="Exclusion 사유 입력" position="absolute 5 2 148 16" id="caption1" class="tit_2"/>
                        <Static text="이 환자는 아래의 CP 적용 대상자이지만, CP 적용을 하지 않았습니다.&#13;&#10;Exclusion 대상 CP를 선택하십시오." position="absolute 0 23 495 51" id="caption2" class="hand"/>
                        <Static text="Exclusion 사유를 선택하고 저장해 주십시오." position="absolute 0 161 370 181" id="caption3" class="hand"/>
                        <Static text="비고" position="absolute 0 323 70 343" id="caption4" class="hand"/>
                        <Shape position="absolute 0 48 495 54" linetype="vertical" id="line1" class="line_1"/>
                        <Shape position="absolute 0 147 495 153" linetype="vertical" id="line2" class="line_3"/>
                        <Shape position="absolute 0 314 495 320" linetype="vertical" id="line3" class="line_3"/>
                        <Shape position="absolute 0 434 495 440" linetype="vertical" id="line4" class="line_3"/>
                        <TextArea position="absolute 0 344 495 436" id="txt_etc"/>
                        <Grid position="absolute 0 181 495 316" id="grd_masterinfo" binddataset="ds_grd_masterinfo">
                          <Formats>
                            <Format id="default">
                              <Columns>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                                <Col size="80"/>
                              </Columns>
                              <Rows>
                                <Row band="head" size="24"/>
                                <Row band="body" size="24"/>
                              </Rows>
                              <Band id="head">
                                <Cell col="0" disptype="normal" text="valuno"/>
                                <Cell col="1" disptype="normal" text="valunm"/>
                                <Cell col="2" disptype="normal" text="valuflag"/>
                                <Cell col="3" disptype="normal" text="histseq"/>
                                <Cell col="4" disptype="normal" text="cpgappno"/>
                                <Cell col="5" disptype="normal" text="pid"/>
                                <Cell col="6" disptype="normal" text="orddd"/>
                                <Cell col="7" disptype="normal" text="cretno"/>
                                <Cell col="8" disptype="normal" text="ordtype"/>
                                <Cell col="9" disptype="normal" text="check"/>
                              </Band>
                              <Band id="body">
                                <Cell col="0" disptype="normal" text="bind:valuno"/>
                                <Cell col="1" disptype="normal" text="bind:valunm"/>
                                <Cell col="2" disptype="normal" text="bind:valuflag"/>
                                <Cell col="3" disptype="normal" text="bind:histseq"/>
                                <Cell col="4" disptype="normal" text="bind:cpgappno"/>
                                <Cell col="5" disptype="normal" text="bind:pid"/>
                                <Cell col="6" disptype="normal" text="bind:orddd"/>
                                <Cell col="7" disptype="normal" text="bind:cretno"/>
                                <Cell col="8" disptype="normal" text="bind:ordtype"/>
                                <Cell col="9" disptype="normal" text="bind:check"/>
                              </Band>
                            </Format>
                          </Formats>
                        </Grid>
                        <Shape position="absolute 0 175 495 181" linetype="vertical" id="line6" class="line_1"/>
                        <Shape position="absolute 0 336 495 342" linetype="vertical" id="line7" class="line_1"/>
                      </Layout>
                    </Layouts>
                  </Tabpage>
                  <Tabpage text="" id="cpg">
                    <Layouts>
                      <Layout>
                        <Shape position="absolute 0 52 495 58" linetype="vertical" id="line5" class="line_1"/>
                        <TextArea position="absolute 0 60 495 436" id="textarea1"/>
                        <Shape position="absolute 0 434 495 440" linetype="vertical" id="line8" class="line_3"/>
                        <Static text="미적용 사유 입력" position="absolute 5 2 123 16" id="cap_title" class="tit_2"/>
                        <Static text="CPG는 평가용 CPG입니다.&#13;&#10;CPG 미적용 사유를 입력하십시오." position="absolute 0 25 495 53" id="cap_desc" class="hand"/>
                      </Layout>
                    </Layouts>
                  </Tabpage>
                </Tabpages>
              </Tab>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 441 501 468" id="grp_btn" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 442 2 498 24" id="btn_cncl" class="btn4" visible="false" text="취소" onclick="grp_btn_btn_cncl_onclick"/>
              <Button position="absolute 442 2 498 24" id="btn_cnfm" class="btn4" text="저장" onclick="grp_btn_btn_cnfm_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_cplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" onrowposchanged="ds_grd_cplist_onrowposchanged">
        <ColumnInfo>
          <Column id="cpgnm" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_masterinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="valuno" type="STRING" size="256" sumtext="평가번호"/>
          <Column id="valunm" type="STRING" size="256" sumtext="평가명"/>
          <Column id="valuflag" type="STRING" size="256" sumtext="평가구분"/>
          <Column id="histseq" type="STRING" size="256" sumtext="이력순번"/>
          <Column id="cpgappno" type="INT" size="256" sumtext="cpg적용번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일/입원일"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="ordtype" type="STRING" size="256" sumtext="외래입원구분"/>
          <Column id="check" type="STRING" size="256" sumtext="체크"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="valuflag" type="STRING" size="256" sumtext="-구분1:평가2:drop사유3:exclusion사유"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일/입원일"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="ordtype" type="STRING" size="256" sumtext="외래입원구분"/>
          <Column id="cpgappno" type="INT" size="256" sumtext="cpg적용번호"/>
          <Column id="cpgno" type="INT" size="256" sumtext="cpg적용번호"/>
          <Column id="cpghistseq" type="INT" size="256" sumtext="cpg적용번호"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_save_req_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="valuflag" type="STRING" size="256" sumtext="-구분1:평가2:drop사유3:exclusion사유"/>
          <Column id="cpgappno" type="STRING" size="256" sumtext="cpg적용환자"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일/입원일"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="ordtype" type="STRING" size="256" sumtext="외래입원구분"/>
          <Column id="valurem" type="STRING" size="256" sumtext="평가비고"/>
          <Column id="cpgno" type="INT" size="256" sumtext="cpg번호"/>
          <Column id="cpghistseq" type="INT" size="256" sumtext="cpg이력순번"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_save_info_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="valuno" type="INT" size="256" sumtext="평가번호"/>
          <Column id="valunm" type="STRING" size="256" sumtext="평가명"/>
          <Column id="valuflag" type="STRING" size="256" sumtext="평가구분"/>
          <Column id="histseq" type="STRING" size="256" sumtext="이력순번"/>
          <Column id="cpgappno" type="INT" size="256" sumtext="적용번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일/입원일"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="ordtype" type="STRING" size="256" sumtext="외래입원구분"/>
          <Column id="check" type="STRING" size="256" sumtext="저장flag"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-09-17
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-09-17      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
 
include "com_commonxp::comm_main.xjs";

function SPMMP02400_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	
	var cpgflagcd = frmf_getParameter("SMMMO024_cpgflagcd");
	if( cpgflagcd == "02" ){	//CPG
		grp_biz.switch1.tabindex = 1;		
		grp_btn.btn_cnfm.position.left = "384px";
		grp_btn.btn_cncl.visible = true;
		grp_biz.switch1.cpg.cap_desc.text = frmf_getParameter("SMMMO024_cpgnm") + grp_biz.switch1.cpg.cap_desc.text;
		
	}else{	//"01" (CP)
		grp_biz.switch1.tabindex = 0;		
		grp_btn.btn_cnfm.position.left = "442px";
		grp_btn.btn_cncl.visible = false;
	}
}

function SPMMP02400_onload(obj:Form, e:LoadEventInfo)
{
	ds_grd_cplist.enableevent = false;
	dsf_copyDs(ds_grd_cplist, ds_cpexclusionlist);
	ds_grd_cplist.enableevent = true;
	ds_grd_cplist.rowposition = 0;
	
	//grp_biz.switch1.cp.grd_cplist.oncellclick.fireEvent( grp_biz.switch1.cp.grd_cplist, new GridClickEventInfo);
}


function grp_biz_switch1_cp_ds_grd_cplist_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if( ds_grd_cplist.rowposition > -1 && ds_grd_cplist.rowposition <= ds_grd_cplist.rowcount ){
		
		ds_reqdata.clearData();
		ds_reqdata.addRow();
		
		ds_reqdata.setColumn(0, "cpgno", ds_grd_cplist.getColumn(ds_grd_cplist.rowposition, "cpgno") );
		ds_reqdata.setColumn(0, "cpghistseq", ds_grd_cplist.getColumn(ds_grd_cplist.rowposition, "cpghistseq") );

		var pamInfoCvs = sysf_getGlobalVariable("paminfo");  //상단정보가 있을 경우는 검색
		if(!utlf_isNull(pamInfoCvs) && pamInfoCvs.length > 0){//cvs가 ""이 아닌 경우에만 처리함.				
			 dsf_setCSVToDataset("ds_paminfo", pamInfoCvs);

			var ioflag = ds_paminfo.getColumn(0,"ioflag");
			var pid  = ds_paminfo.getColumn(0,"pid ");
			var cretno = ds_paminfo.getColumn(0,"cretno");
			var orddd = "";
			
			if(ioflag == "O"){
				orddd = ds_paminfo.getColumn(0,"/orddd");
			}else{
				orddd = ds_paminfo.getColumn(0,"/indd");
			}
			ds_reqdata.setColumn(0, "pid", pid );
			ds_reqdata.setColumn(0, "orddd", orddd );
			ds_reqdata.setColumn(0, "cretno", cretno );
			ds_reqdata.setColumn(0, "ordtype", ioflag );
		}
		
		
		var oParam = {};
			oParam.id       = "TRMMP02501";
			oParam.service  = "prcpmngtapp.CPPrcpMngt";
			oParam.method   = "reqGetValuDropExclu";
			oParam.inds     = "req=ds_reqdata";
			oParam.outds    = "ds_grd_masterinfo=info";
			oParam.async    = false;
			//oParam.callback = "cf_TRMMP02501";

		tranf_submit(oParam);
		
		dsf_setDefaultVal(ds_grd_masterinfo, "check:false");
	}
}

function grp_btn_btn_cncl_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function grp_btn_btn_cnfm_onclick(obj:Button,  e:ClickEventInfo)
{
	//model.copyNode("/root/send/savedata", "/root/hidden");
	var header = "valuno▦valunm▦valuflag▦histseq▦pid▦orddd▦cretno▦ordtype▦check";
	//var data = "";
	//var nodeList = instance1.selectNodes("/root/main/masterinfo/info" + "[check = 'true']");
	ds_grd_masterinfo.filter("check=='true'");
	
	
	//CP별 exclusion 사유를 마스터에 모두 입력하면, CP사유 선택 필수 (2008.10.21 JJE)
	if( ds_grd_masterinfo.rowcount < 1 && grp_biz.switch1.cp.txt_etc.text == "") {
	
		sysf_messageBox("사유를 선택하지 않았습니다.\n사유를 선택하거나 비고에", "C001");		//C001:입력하십시오, C002:선택하십시오
		return;
	}
	
	if( ds_grd_masterinfo.rowcount < 1 ){
		//var pid           = opener.model.getValue ("/root/temp/paminfo/list/pid")
		//var cretno       = opener.model.getValue("/root/temp/paminfo/list/cretno");
		//var ordtype     = opener.model.getValue("/root/temp/paminfo/list/ioflag");
		
		var pid				= ds_paminfo.getColumn(0,"pid");
		var cretno          = ds_paminfo.getColumn(0,"cretno");
		var ordtype         = ds_paminfo.getColumn(0,"ioflag");
		
		if( ordtype == "O" ){
			//var orddd       = opener.model.getValue("/root/temp/paminfo/list/orddd");
			var orddd       = ds_paminfo.getColumn(0,"orddd");
		}else{
			//var orddd       = opener.model.getValue("/root/temp/paminfo/list/indd");
			var orddd       = ds_paminfo.getColumn(0,"indd");
		}
	
		data = "▩0▦(선택안함)▦3▦0▦" + pid + "▦" + orddd + "▦" + cretno + "▦" + ordtype+ "▦true";
		
	}else{
		for(var i=0; i<nodeList.length; i++){
			var node = nodeList.item(i);
			var valuno = node.selectSingleNode("valuno");
			var valunm = node.selectSingleNode("valunm");
			var valuflag = node.selectSingleNode("valuflag");
			var histseq = node.selectSingleNode("histseq");
			var pid = node.selectSingleNode("pid");
			var orddd = node.selectSingleNode("orddd");
			var cretno = node.selectSingleNode("cretno");
			var ordtype = node.selectSingleNode("ordtype");
			var check = node.selectSingleNode("check");
			
			data = data + "▩" + valuno.text + "▦" + valunm.text + "▦" + valuflag.text + "▦" + histseq.text +  "▦" + pid.text + "▦" + orddd.text + "▦" + cretno.text + "▦" + ordtype.text + "▦" + check.text;
		}
	}
	
	dsf_setCSVToDataset("ds_save_info_data", header + data + "▩");
	dsf_setCSVToDataset("ds_save_req_data", data);
	//model.makeValue("/root/send/savedata/info", header + data + "▩");
	//model.makeValue("/root/send/savedata/valurem", model.getValue("/root/main/valurem"));
	

	var oParam = {};
    oParam.id       = "TXMMP02501";
    oParam.service  = "prcpmngtapp.CPPrcpMngt";
    oParam.method   = "reqExeValuDropExclu";
    oParam.inds     = "req=ds_save_req_data info=ds_save_info_data";
    oParam.outds    = "ds_grd_masterinfo=info";
    oParam.async    = false;
    //oParam.callback = "cf_TXMMP02501";

	tranf_submit(oParam);
	
	frmf_setParameter("TRMMP03200_saversnyn", "Y");
	
	this.close();
	
}

function ds_grd_cplist_onrowposchanged(obj:Dataset, e:DSRowPosChangeEventInfo)
{
	
	if( obj.rowposition > -1 && obj.rowposition <= obj.rowcount ){
		
		sysf_trace("111");
		
		ds_reqdata.clearData();
		ds_reqdata.addRow();
		
		ds_reqdata.setColumn(0, "cpgno", ds_grd_cplist.getColumn(ds_grd_cplist.rowposition, "cpgno") );
		ds_reqdata.setColumn(0, "cpghistseq", ds_grd_cplist.getColumn(ds_grd_cplist.rowposition, "cpghistseq") );

		var pamInfoCvs = sysf_getGlobalVariable("paminfo");  //상단정보가 있을 경우는 검색
		if(!utlf_isNull(pamInfoCvs) && pamInfoCvs.length > 0){//cvs가 ""이 아닌 경우에만 처리함.				
			 dsf_setCSVToDataset("ds_paminfo", pamInfoCvs);

			var ioflag = ds_paminfo.getColumn(0,"ioflag");
			var pid  = ds_paminfo.getColumn(0,"pid ");
			var cretno = ds_paminfo.getColumn(0,"cretno");
			var orddd = "";
			
			if(ioflag == "O"){
				orddd = ds_paminfo.getColumn(0,"/orddd");
			}else{
				orddd = ds_paminfo.getColumn(0,"/indd");
			}
			ds_reqdata.setColumn(0, "pid", pid );
			ds_reqdata.setColumn(0, "orddd", orddd );
			ds_reqdata.setColumn(0, "cretno", cretno );
			ds_reqdata.setColumn(0, "ordtype", ioflag );
		}
		
		
		var oParam = {};
			oParam.id       = "TRMMP02501";
			oParam.service  = "prcpmngtapp.CPPrcpMngt";
			oParam.method   = "reqGetValuDropExclu";
			oParam.inds     = "req=ds_reqdata";
			oParam.outds    = "ds_grd_masterinfo=info";
			oParam.async    = false;
			//oParam.callback = "cf_TRMMP02501";

		tranf_submit(oParam);
		
		dsf_setDefaultVal(ds_grd_masterinfo, "check:false");
	}
}
]]></Script>
  </Form>
</FDL>