YNU_JEUS/app_home/himed/xpapps/emr/cpgxp/xp/SPMMP02500_평가입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.4">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMP02500" position="absolute 0 0 517 333" titletext="평가입력" onload="SPMMP02500_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 501 306" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="평가입력" position="absolute 5 10 100 31" id="caption1" class="tit_2"/>
              <Shape position="absolute 0 22 500 28" linetype="vertical" id="line1" class="line_1"/>
              <Grid position="absolute 0 30 500 170" id="grd_masterinfo" binddataset="ds_grd_masterinfo">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="20"/>
                      <Column size="38"/>
                      <Column size="440"/>
                      <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/>
                      <Cell col="1" text="선택"/>
                      <Cell col="2" text="내용"/>
                      <Cell col="3"/>
                      <Cell col="4"/>
                      <Cell col="5"/>
                      <Cell col="6"/>
                    </Band>
                    <Band id="body">
                      <Cell text="expr:currow+1"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:check" expr="expr:getColumn(currow,&quot;check&quot;)==&quot;true&quot;?&quot;1&quot;:&quot;0&quot;"/>
                      <Cell col="2" text="bind:valunm"/>
                      <Cell col="3" text="bind:valuno"/>
                      <Cell col="4" text="bind:valuflag"/>
                      <Cell col="5" text="bind:histseq"/>
                      <Cell col="6" text="bind:cpgappno"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="비고" position="absolute 5 176 55 197" id="caption2" class="tit_2"/>
              <TextArea position="absolute 0 195 500 305" id="txt_valurem"/>
              <Shape position="absolute 0 187 500 193" linetype="vertical" id="line2" class="line_1"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 306 501 333" id="grp_btn" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 385 5 441 27" id="button4" class="btn4" text="저장" onclick="grp_btn_button4_onclick"/>
              <Button position="absolute 444 5 500 27" id="button9" class="btn4" text="취소" onclick="grp_btn_button9_onclick"/>
              <Shape position="absolute 0 0 501 6" linetype="vertical" id="line32" class="line_6"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_masterinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_masterinfo_oncolumnchanged">
        <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>
        <Rows>
          <Row>
            <Col id="check">true</Col>
          </Row>
          <Row>
            <Col id="check">false</Col>
          </Row>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cpgappno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="valuflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </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_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-09-26
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-09-26      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs"

//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SPMMP02500
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 로드시 화면 초기화 실행
 ****************************************************************************************/
function SPMMP02500_onload(obj:Form, e:LoadEventInfo)
{
	var srchWindow = frmf_findPopup("SMMMP00800");
	if( srchWindow != null ){
		//2008-02-11 손주연 수정 시작 endsetp 처방 발행 후 평가 없이 퇴원예고를 할경우...parameter처리없이 통으로 넘김. 
		//parameter값이 null이 아닐 경우만 hidden에 copy되도록 처리.  
		if(  srchWindow.frmf_getParameter("cpgappno") != ""  ) {
			//model.setValue("/root/hidden/cpgappno", srchWindow.javascript.getParameter("cpgappno"));
			ds_hidden.setColumn(0,"cpgappno",srchWindow.frmf_getParameter("cpgappno"));
		}
		//2008-02-11 손주연 수정 종료
		//model.copyNode("/root/send/reqdata", "/root/hidden");
		dsf_copyDs(da_reqdata,ds_hidden,"replace");

		//submit("TRMMP02501");	
		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 = "";

		tranf_submit(oParam);
	}
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_btn.button4
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 저장버튼 실행
 ****************************************************************************************/
function grp_btn_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	// 2007-12-05 (전지은)
	// 그리드의 rowheader를 update -> seq, 그에 따라 보낼 데이터를 체크 여부에 따라 재구성하여 보낸다

	//model.copyNode("/root/send/savedata", "/root/hidden");
	dsf_copyDs(ds_savedata,ds_hidden,"replace");

	var header = "valuno▦valunm▦valuflag▦histseq▦cpgappno▦pid▦orddd▦cretno▦ordtype▦check";
	var data = "";
	//var nodeList = instance1.selectNodes("/root/main/masterinfo/info" + "[check = 'true']");
	var nodeCnt  = ds_grd_masterinfo.findRow("check", "true");
	if(nodeCnt < 0){
		sysf_messageBox("사유를", "C002");
		return;
	}

	for(var i=0; i<ds_grd_masterinfo.rowcount; 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 cpgappno 	= node.selectSingleNode("cpgappno");
// 		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");
		var valuno 		= ds_grd_masterinfo.getColumn(i,"valuno");
		var valunm 		= ds_grd_masterinfo.getColumn(i,"valunm");
		var valuflag 	= ds_grd_masterinfo.getColumn(i,"valuflag");
		var histseq 	= ds_grd_masterinfo.getColumn(i,"histseq");
		var cpgappno 	= ds_grd_masterinfo.getColumn(i,"cpgappno");
		var pid 		= ds_grd_masterinfo.getColumn(i,"pid");
		var orddd 		= ds_grd_masterinfo.getColumn(i,"orddd");
		var cretno 		= ds_grd_masterinfo.getColumn(i,"cretno");
		var ordtype 	= ds_grd_masterinfo.getColumn(i,"ordtype");
		var check 		= ds_grd_masterinfo.getColumn(i,"check");
		
		data = data + "▩" + valuno.text + "▦" + valunm.text + "▦" + valuflag.text + "▦" + histseq.text + "▦" + cpgappno.text + "▦" + pid.text + "▦" + orddd.text + "▦" + cretno.text + "▦" + ordtype.text + "▦" + check.text;
	}

	model.makeValue("/root/send/savedata/info", header + data + "▩");

	   model.makeValue("/root/send/savedata/valurem", model.getValue("/root/main/valurem"));
	if(submit("TXMMP02501")){
		var srchWindow = getOpenWindow("SMMMP00800");
		if( srchWindow != null ){
			srchWindow.model.setValue("/root/temp1/getdata/appstat", "40");
			srchWindow.btn_allInfoSave.disabled = true;
			srchWindow.btn_drop.disabled = true;
			srchWindow.btn_val.disabled = true;
		}
		this.close();
	}	
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: grp_btn.button9
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 취소버튼 실행
 ****************************************************************************************/
function grp_btn_button9_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

/****************************************************************************************
 * Components		: Dataset
 * Components ID	: ds_grd_masterinfo
 * Event			: oncolumnchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: check버튼 클릭시 check컬럼값 설정
 ****************************************************************************************/
function ds_grd_masterinfo_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid=="check") {
		obj.setColumn(e.row,"check",e.newvalue=="1"?"true":"");
	}
}
]]></Script>
  </Form>
</FDL>