YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SPPIJ03301_대표DRG번호관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIJ03301" position="absolute 0 0 945 638" titletext="대표DRG번호 기준자료 관리" oninit="SPPIJ03301_oninit" onload="SPPIJ03301_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 19 942 611" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Grid position="absolute 0 78 940 592" id="grd_dlcdlist" class="datagrid3" binddataset="ds_grd_dlcdlist" anchor="all" cellsizingtype="col" selecttype="multirow">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="35"/>
                      <Column size="69"/>
                      <Column size="326"/>
                      <Column size="54"/>
                      <Column size="59"/>
                      <Column size="55"/>
                      <Column size="59"/>
                      <Column size="59"/>
                      <Column size="96"/>
                      <Column size="85"/>
                      <Column size="85"/>
                      <Column size="60"/>
                      <Column size="127"/>
                      <Column size="60"/>
                      <Column size="161"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="59" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="대표번호"/>
                      <Cell col="2" text="DRG명"/>
                      <Cell col="3" text="양안"/>
                      <Cell col="4" text="소절개"/>
                      <Cell col="5" text="복강경"/>
                      <Cell col="6" text="연령시작"/>
                      <Cell col="7" text="연령종료"/>
                      <Cell col="8" text="수술코드구분"/>
                      <Cell col="9" text="시작일자"/>
                      <Cell col="10" text="종료일자"/>
                      <Cell col="11" text="등록자"/>
                      <Cell col="12" text="등록일자"/>
                      <Cell col="13" text="수정자"/>
                      <Cell col="14" text="수정일자"/>
                      <Cell col="15"/>
                      <Cell col="16"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" displaytype="text" edittype="text" style="align:center middle;" text="bind:adrgno" enable="false"/>
                      <Cell col="2" style="align:left middle;" text="bind:cd_name"/>
                      <Cell col="3" displaytype="checkbox" edittype="checkbox" text="bind:gbnboth" expr="expr:expr:gbnboth == 'Y' || gbnboth == '1' ? 1 : 0"/>
                      <Cell col="4" displaytype="checkbox" edittype="checkbox" text="bind:gbnmin" expr="expr:expr:gbnmin == 'Y' || gbnmin == '1' ? 1 : 0"/>
                      <Cell col="5" displaytype="checkbox" edittype="checkbox" text="bind:gbncel" expr="expr:expr:gbncel  == 'Y' || gbncel == '1' ? 1 : 0"/>
                      <Cell col="6" displaytype="normal" edittype="normal" style="align:center middle;" text="bind:gbnagef" enable="true"/>
                      <Cell col="7" displaytype="normal" edittype="normal" style="align:center middle;" text="bind:gbnaget"/>
                      <Cell col="8" displaytype="text" edittype="text" style="align:center middle;" text="bind:opgbn"/>
                      <Cell col="9" displaytype="date" edittype="date" style="align:left middle;" text="bind:fromdd" mask="yyyy-MM-dd"/>
                      <Cell col="10" displaytype="date" edittype="date" style="align:left middle;" text="bind:todd" mask="yyyy-MM-dd" enable="false"/>
                      <Cell col="11" displaytype="text" edittype="text" style="align:center middle;" text="bind:fstrgstrid"/>
                      <Cell col="12" displaytype="date" edittype="date" style="align:center middle;" text="bind:fstrgstdt" mask="yyyy-MM-dd hh:mm"/>
                      <Cell col="13" style="align:center middle;" text="bind:lastupdtrid"/>
                      <Cell col="14" displaytype="date" edittype="date" style="align:center middle;" text="bind:lastupdtdt" mask="yyyy-MM-dd hh:mm"/>
                      <Cell col="15"/>
                      <Cell col="16"/>
                    </Band>
                  </Format>
                </Formats>
                <Layouts>
                  <Layout width="940" height="514"/>
                </Layouts>
              </Grid>
              <Static text="대표DRG번호 기준자료 리스트" position="absolute 4 56 238 71" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 73 940 79" linetype="horizontal" id="line1" class="line_10" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
              <Div position="absolute 0 5 940 45" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout width="940" height="40">
                    <Static text="DRG번호 :" position="absolute 8 11 117 28" id="caption30" class="search_name" anchor="default"/>
                    <Button position="absolute 875 10 931 32" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
                    <Shape position="absolute 857 5 863 38" linetype="vertical" id="line3" class="line_4" anchor="default"/>
                    <Edit position="absolute 95 10 195 29" id="ipt_adrgno" anchor="default" onkeydown="grp_biz_group1_ipt_adrgno_onkeydown"/>
                    <Static text="수술코드 구분 :" position="absolute 208 11 330 28" id="caption1" class="search_name" anchor="default"/>
                    <Edit position="absolute 330 10 430 29" id="ipt_opgbn" anchor="default" onkeydown="grp_biz_group1_ipt_opgbn_onkeydown"/>
                    <Static text="DRG 명 :" position="absolute 448 11 559 28" id="caption2" class="search_name" anchor="default"/>
                    <Edit position="absolute 530 10 820 29" id="input1" anchor="default" onkeydown="grp_biz_group1_input1_onkeydown"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 709 54 789 73" id="btn_excelsave" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_btn_excelsave_onclick"/>
              <Button position="absolute 898 54 940 73" id="button1" class="btn5" text="저장" anchor="top right" onclick="grp_biz_button1_onclick"/>
              <Button position="absolute 790 54 843 73" id="button2" class="btn2" text="행종료" anchor="top right" onclick="grp_biz_button2_onclick"/>
              <Button position="absolute 844 54 897 73" id="button3" class="btn2" text="행추가" anchor="top right" onclick="grp_biz_button3_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 884 612 940 634" id="btn_cancel" class="btn4" text="종료" anchor="right bottom" onclick="btn_cancel_onclick"/>
        <Static id="cap_title" text="대표DRG번호 기준자료 관리" class="tit_1" position="absolute 0 0 216 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_dlcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="adrgno" type="STRING"/>
          <Column id="cd_name" type="STRING"/>
          <Column id="gbnboth" type="STRING"/>
          <Column id="gbnmin" type="STRING"/>
          <Column id="gbncel" type="STRING"/>
          <Column id="gbnagef" type="STRING"/>
          <Column id="gbnaget" type="STRING"/>
          <Column id="opgbn" type="STRING"/>
          <Column id="fromdd" type="STRING"/>
          <Column id="todd" type="STRING"/>
          <Column id="fstrgstrid" type="STRING"/>
          <Column id="fstrgstdt" type="STRING"/>
          <Column id="lastupdtrid" type="STRING"/>
          <Column id="lastupdtdt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";
			
function SPPIJ03301_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPIJ03301_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grp_biz.grd_dlcdlist);
	grdf_setRowTypeIcon(grp_biz.grd_dlcdlist, 0);
	
	grdf_setToolTipBind(grp_biz.grd_dlcdlist)
	fInitialize();
}

function fInitialize()
{
	dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
					          , {col:"ordfildcd", type:"STRING", size:256 ,val :""}
					          , {col:"ordflag", type:"STRING", size:256 ,val :""}]);			
                                
	var oParam = {};
		oParam.id          = "TRPIJ00203";
		oParam.service     = "bfjudgapp.InHospJudgTrgtMan";
		oParam.method      = "reqGetDeptList";
		oParam.inds        = "req=ds_send"
		oParam.outds       = "ds_grd_dlcdlist=deptlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ00203";
	tranf_submit(oParam);
	
	fGetDocuList();
}

function fGetDocuList()
{
	dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
						     ,  {col:"adrgno", type:"STRING", size:256 ,val : grp_biz.group1.ipt_adrgno.value}
					         ,  {col:"opgbn", type:"STRING", size:256 ,val : grp_biz.group1.ipt_opgbn.value}
						     ,  {col:"cd_name", type:"STRING", size:256 ,val : grp_biz.group1.input1.value}]);	
	
	var oParam = {};
		oParam.id          = "TRPIJ03301";
		oParam.service     = "bfjudgapp.DRGCdIF";
		oParam.method      = "reqGetDrgDelegateCode";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_dlcdlist=rslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ03301";

	tranf_submit(oParam);
}

function grp_biz_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if (ds_grd_dlcdlist.rowcount > 0) {
		grdf_exportExcel(grp_biz.grd_dlcdlist, "exportExcel", "see");
	} else {
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}	
}

function grp_biz_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridDeleteRow();
}

function fSpclGridDeleteRow()
{
	var SelectedRows = grdf_getSelectedRows(grp_biz.grd_dlcdlist);
	
	for(var i = 0; i < SelectedRows.length; i++)
	{
		var sel = SelectedRows[i];
		
		var arrRow = new Array();
		arrRow[0] = sel; 
		grdf_setStatus(grp_biz.grd_dlcdlist, "D", arrRow);
	}
}

function btn_cancel_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
 
function grp_biz_group1_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	 fGetDocuList() 
}

function grp_biz_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fSpclGridInsertRow();
}

function fSpclGridInsertRow(){
	var addRw = ds_grd_dlcdlist.addRow();
	var arrPostion = new Array();
	arrPostion[0] = addRw;
	grdf_setStatus(grp_biz.grd_dlcdlist, "I", arrPostion);
}

function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grp_biz.grd_dlcdlist, "all");

	if (updtdata.rowcount == 0)
	{
		sysf_messageBox("변경된 데이터가","I004");
		return;
	}
	
	for (var i=0; i < ds_grd_dlcdlist.rowcount; i++)
	{
		if (ds_grd_dlcdlist.getRowType(i) == 2 || ds_grd_dlcdlist.getRowType(i) == 4 ) {
			var adrgno = grp_biz.grd_dlcdlist.getBindCellIndex("body","adrgno");
			var opgbn = grp_biz.grd_dlcdlist.getBindCellIndex("body","opgbn");
			var fromdd = grp_biz.grd_dlcdlist.getBindCellIndex("body","fromdd");
			var todd = grp_biz.grd_dlcdlist.getBindCellIndex("body","todd");
			
			if(!frmf_chkMdtGrid(grp_biz.grd_dlcdlist,[adrgno,opgbn,fromdd,todd],
								["대표번호","수술코드부분","시작일자","종료일자"]))
								{
								return;
								}
			}
	}
	

	if (sysf_messageBox("저장", "S001") == 6) {
		var Ids = dsf_createDsRow("ds_send", [
								{col:"instcd", type:"STRING", size:256, val :sysf_getUserInfo("dutplceinstcd")}
							  , {col:"adrgno", type:"STRING", size:256, val :grp_biz.group1.ipt_adrgno.value}
							  , {col:"ipt_opgbn", type:"STRING", size:256, val :grp_biz.group1.ipt_opgbn.value}
							  , {col:"input1", type:"STRING", size:256, val :grp_biz.group1.input1.value}
								]);
		var oParam = {};
			oParam.id          = "TXPIJ03301";
			oParam.service     = "bfjudgapp.DRGCdIF";
			oParam.method      = "reqExeDrgDelegateCode";
			oParam.inds        = "srch="+Ids+" req=ds_grd_dlcdlist:U";
			oParam.outds       = "ds_grd_dlcdlist=rslt";
			oParam.async       = false;
			oParam.callback    = "cf_TXPIJ03301";

		tranf_submit(oParam);		
	}
}

function cf_TXPIJ03301(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0) return;
    sysf_messageBox("저장이","I002");
}

function grp_biz_group1_ipt_adrgno_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fGetDocuList();	 
	}
}

function grp_biz_group1_ipt_opgbn_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fGetDocuList();	 
	}
}

function grp_biz_group1_input1_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		fGetDocuList();	 
	}
}
]]></Script>
  </Form>
</FDL>