YNU_JEUS/app_home/himed/xpapps/ast/examcurexp/xp/SMAEB04000_환자Comment관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAEB04000" position="absolute 0 0 1196 765" titletext="환자Comment코드관리" onload="SMAEB04000_onload">
    <Layouts>
      <Layout>
        <Div id="grp_srch" taborder="1" position="absolute 0 25 1195 65" class="div_SA" anchor="left top right"/>
        <Static text="환자Comment관리" position="absolute 0 0 160 25" id="caption19" class="tit_1"/>
        <Shape position="absolute 0 89 1195 95" id="line2" class="line_10" anchor="left top right"/>
        <Button position="absolute 1132 35 1188 57" id="btn_sea" class="btn1" text="조회" anchor="top right" onclick="btn_sea_onclick"/>
        <Button position="absolute 1087 67 1140 89" id="btn_grdadd" class="btn2" text="행추가" anchor="top right" onclick="btn_grdadd_onclick"/>
        <Button position="absolute 1142 67 1195 89" id="btn_grddel" class="btn2" text="행삭제" anchor="top right" onclick="btn_grddel_onclick"/>
        <Button position="absolute 1139 740 1195 762" id="btn_save" class="btn4" text="저장" anchor="right bottom" onclick="btn_save_onclick"/>
        <Static text="환자Comment코드:" position="absolute 20 38 159 55" id="caption1" class="search_name"/>
        <Edit position="absolute 165 37 280 56" id="ipt_basecd" class="input_search" onkeyup="ipt_basecd_onkeyup"/>
        <Grid position="absolute 0 94 1195 736" id="grd_cnclcode" binddataset="ds_main_cnclcodelist_cnclcode" anchor="all" selecttype="multirow" autoenter="key">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="100"/>
                <Column size="144"/>
                <Column size="432"/>
                <Column size="463"/>
                <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="Comment코드"/>
                <Cell col="3" text="환자Comment"/>
                <Cell col="4" text="비고"/>
                <Cell col="5" text="Comment구분"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="text" edittype="text" style="align:middle;" text="bind:sortno" editlimit="4"/>
                <Cell col="2" displaytype="text" edittype="text" editfilter="upper" text="bind:basecd" editlimit="12"/>
                <Cell col="3" displaytype="text" edittype="text" text="bind:basecdflagdesc" editlimit="300"/>
                <Cell col="4" displaytype="text" edittype="text" text="bind:basecdcnts" editlimit="3000"/>
                <Cell col="5" displaytype="combo" edittype="combo" text="bind:basecdflag"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cnclcodelist_cnclcode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="sortno" type="STRING" size="256"/>
          <Column id="basecd" type="STRING" size="256"/>
          <Column id="basecdflagdesc" type="STRING" size="256"/>
          <Column id="basecdcnts" type="STRING" size="256"/>
          <Column id="basecdflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="sortno"/>
            <Col id="basecd"/>
            <Col id="basecdflagdesc"/>
            <Col id="basecdcnts"/>
            <Col id="basecdflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_globalinstance" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="instance1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instance1"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_req_data" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cnclcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cnclcd"/>
          </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="count" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="init" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="init"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="ipt_basecd" propid="value" datasetid="ds_send" columnid="cnclcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-12-04
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-06-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "ast_examcurexp::AEZ0001.xjs";

//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/*-**************************************************************************************
 * Argument			: N/A
 * Description		: 조회
 ****************************************************************************************/
function fn_TRAEB04001() {
	ds_main_cnclcodelist_cnclcode.clearData();
	dsf_createDsRow("ds_req", 	[
                                {col:"suppdeptcd", type:"STRING", size:256, val:ds_send_globalinstance.getColumn(0,"instance1")}
                              , {col:"basecd", type:"STRING", size:256, val:ds_send.getColumn(0, "cnclcd")}
                                ]);
	var oParam = {};
		oParam.id          = "TRAEB04001";
		oParam.service     = "examcurebaseapp.CnclCode";
		oParam.method      = "reqGetCmtCodeList";
		oParam.inds        = "req=ds_req";
		oParam.outds       = "ds_main_cnclcodelist_cnclcode=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAEB04001";

	tranf_submit(oParam);
}


//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SMAEB04000_onload(obj:Form, e:LoadEventInfo) {
	frmf_initForm(obj); 
	//grdf_initGrid(grd_XXX); 
	//grdf_setGridSort(grd_XXX); 
	grdf_setRowTypeIcon(grd_cnclcode, 0); 

	lf_aezfSetSuppDeptcd();
	ds_send_globalinstance.setColumn(0,"instance1",frmf_getParameter("AST_DEPTCD"));

	ds_main_cnclcodelist_cnclcode.clearData();

	ipt_basecd.setFocus();
}

/****************************************************************************************
 * Components		: Button
 * Description		: 조회
 ****************************************************************************************/
function btn_sea_onclick(obj:Button, e:ClickEventInfo) {
	fn_TRAEB04001();
}

/****************************************************************************************
 * Components		: Button
 * Description		: 행추가
 ****************************************************************************************/
function btn_grdadd_onclick(obj:Button, e:ClickEventInfo) {
	var irow = ds_main_cnclcodelist_cnclcode.addRow();
	grd_cnclcode.row = irow;
	grd_cnclcode.vscrollbar.pos = irow;
	ds_main_cnclcodelist_cnclcode.setColumn( irow , "basecdflag", "Y");
}

/****************************************************************************************
 * Components		: Button
 * Description		: 행삭제
 ****************************************************************************************/
function btn_grddel_onclick(obj:Button, e:ClickEventInfo) {
	var objGrd = grd_cnclcode;
	var selectedRows = grdf_getSelectedRows(objGrd);
	for (var i = selectedRows.length-1; i >= 0;  i--){
		if( objects[objGrd.binddataset].getRowType(selectedRows[i]) == 2 ) {
			objects[objGrd.binddataset].deleteRow(selectedRows[i]);
		}else{
			grdf_setStatus(objGrd, "D", [selectedRows[i]]);
		}
	}
}

/****************************************************************************************
 * Components		: Button
 * Description		: 저장
 ****************************************************************************************/
function btn_save_onclick(obj:Button, e:ClickEventInfo) {
	if(!frmf_chkMdtGrid(grd_cnclcode, [2], ["코드"])) return;
	
	if ( sysf_messageBox("","Q002")==6 ) {
		var dsUpdate = grdf_getGridUpdateData(grd_cnclcode, "all");
		grdf_setStatusColumn(dsUpdate, "m");
		
		if( utlf_isNull(dsUpdate) || dsUpdate.rowcount == 0 ) {
			sysf_messageBox("업데이트 정보가 없습니다.", "I");
		} else {
			ds_send_req_data.copyData(dsUpdate, true);
			dsf_setFixVal(ds_send_req_data, "suppdeptcd:"+ds_send_globalinstance.getColumn(0,"instance1"));
			var oParam = {};
				oParam.id          = "TXAEB04001";
				oParam.service     = "examcurebaseapp.CnclCode";
				oParam.method      = "reqExeCmtCodeList";
				oParam.inds        = "req=ds_send_req_data";
				oParam.outds       = "ds_hidden=item";
				oParam.async       = false;
				//oParam.callback    = "cf_TXAEB04001";

			tranf_submit(oParam);
		}
	}

	fn_TRAEB04001();
}

/****************************************************************************************
 * Components		: Edit
 * Description		: 조건입력후 조회
 ****************************************************************************************/
function ipt_basecd_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		btn_sea.click();
	}
}
]]></Script>
  </Form>
</FDL>