YNU_JEUS/app_home/himed/xpapps/pam/bfjudgxp/xp/SPPIJ03304_DRG기준관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPPIJ03304" position="absolute 0 0 945 644" titletext="DRG기준자료 관리" oninit="SPPIJ03304_oninit" onload="SPPIJ03304_onload" onkeydown="SPPIJ03304_onkeydown">
    <Layouts>
      <Layout>
        <Button position="absolute 883 614 939 636" 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"/>
        <Div id="group1" anchor="left top right" taborder="1" onkeydown="grp_biz_group1_onkeydown" class="div_SA" position="absolute 0 24 940 64">
          <Layouts>
            <Layout>
              <Button id="btn_select" taborder="1" text="조회" onclick="grp_biz_group1_btn_select_onclick" class="btn1" position="absolute 875 10 931 32" anchor="top right"/>
              <Shape id="line3" linetype="vertical" class="line_4" position="absolute 857 5 863 38" anchor="top right"/>
              <Edit id="ipt_drgno" taborder="2" position="absolute 100 10 200 29" anchor="default"/>
              <Static id="caption30" text="DRG코드 :" class="search_name" position="absolute 8 11 103 28" anchor="default"/>
              <Edit id="ipt_cd_name" taborder="3" position="absolute 305 10 650 29" anchor="default"/>
              <Static id="caption1" text="코드명 :" class="search_name" position="absolute 223 11 322 28" anchor="default"/>
              <CheckBox id="chk_endyn" taborder="4" text="종료 제외" value="Y" truevalue="Y" falsevalue="N" onclick="grp_biz_group1_chk_endyn_onclick" position="absolute 745 11 845 31" anchor="top right"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="cap_judgtrgtman" text="DRG기준자료 리스트" class="tit_2" position="absolute 0 76 234 99"/>
        <Grid id="grd_drgalist" class="datagrid3" taborder="2" binddataset="ds_grd_drgalist" useinputpanel="false" selecttype="multirow" position="absolute 0 98 940 612" anchor="all" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="56"/>
                <Column size="382"/>
                <Column size="39"/>
                <Column size="45"/>
                <Column size="45"/>
                <Column size="66"/>
                <Column size="63"/>
                <Column size="51"/>
                <Column size="55"/>
                <Column size="55"/>
                <Column size="80"/>
                <Column size="79"/>
                <Column size="76"/>
                <Column size="76"/>
                <Column size="75"/>
                <Column size="35"/>
                <Column size="36"/>
                <Column size="60"/>
                <Column size="100"/>
                <Column size="60"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="62" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" text="DRG코드"/>
                <Cell col="2" text="코드명"/>
                <Cell col="3" text="평균&#10;재원&#10;일수"/>
                <Cell col="4" text="정상군&#10;하한입&#10;원일수"/>
                <Cell col="5" text="정상군&#10;상한입&#10;원일수"/>
                <Cell col="6" text="상대가치&#10;점수"/>
                <Cell col="7" text="일당점수"/>
                <Cell col="8" text="점수당&#10;단가"/>
                <Cell col="9" text="야간&#10;공휴&#10;점수"/>
                <Cell col="10" text="산부인과&#10;가산점수"/>
                <Cell col="11" text="야간공휴금액"/>
                <Cell col="12" text="수정체/로봇&#10;제외금액"/>
                <Cell col="13" text="시작일자"/>
                <Cell col="14" text="종료일자"/>
                <Cell col="15" text="기준진료비"/>
                <Cell col="16" text="고정&#10;비율"/>
                <Cell col="17" text="DRG&#10;구분"/>
                <Cell col="18" text="등록자"/>
                <Cell col="19" text="등록일자"/>
                <Cell col="20" text="수정자"/>
                <Cell col="21" text="수정일자"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" displaytype="text" edittype="text" editfilter="upper,number,char" text="bind:drgno" enable="false"/>
                <Cell col="2" displaytype="text" edittype="text" text="bind:cd_name"/>
                <Cell col="3" displaytype="number" text="bind:avg_adm_days"/>
                <Cell col="4" displaytype="number" style="align:right middle;" text="bind:ngrp_llmt_adm_days"/>
                <Cell col="5" displaytype="number" style="align:right middle;" text="bind:ngrp_hlmt_adm_days"/>
                <Cell col="6" displaytype="number" style="align:right middle;" text="bind:rlv_pnt"/>
                <Cell col="7" displaytype="number" text="bind:daily_pnt"/>
                <Cell col="8" displaytype="number" style="align:right middle;" text="bind:spot_awc_prc"/>
                <Cell col="9" displaytype="number" text="bind:nig_pnt"/>
                <Cell col="10" displaytype="number" style="align:right middle;" text="bind:obgy_pnt"/>
                <Cell col="11" displaytype="number" text="bind:nig_amt"/>
                <Cell col="12" displaytype="number" style="align:right middle;" text="bind:robotamt"/>
                <Cell col="13" displaytype="date" edittype="date" text="bind:fromdd" mask="yyyy-MM-dd" enable="false"/>
                <Cell col="14" displaytype="date" edittype="date" text="bind:todd" mask="yyyy-MM-dd" enable="false"/>
                <Cell col="15" displaytype="number" text="bind:std_amt"/>
                <Cell col="16" displaytype="number" style="align:right middle;" text="bind:fix_amt_rat"/>
                <Cell col="17" displaytype="checkbox" edittype="checkbox" text="bind:drg_cls" expr="expr:drg_cls == 'Y' || drg_cls == '1' ? 1 : 0"/>
                <Cell col="18" displaytype="text" edittype="none" style="align:center middle;" text="bind:fstrgstrid"/>
                <Cell col="19" displaytype="date" edittype="date" style="align:center middle;" text="bind:fstrgstdt" mask="yyyy-MM-dd hh:mm"/>
                <Cell col="20" displaytype="text" edittype="text" style="align:center middle;" text="bind:lastupdtrid"/>
                <Cell col="21" displaytype="date" edittype="date" style="align:center middle;" text="bind:lastupdtdt" mask="yyyy-MM-dd hh:mm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line1" class="line_1" position="absolute 0 89 940 103" anchor="left top right" style="strokepen:3 solid #33bbbbff;"/>
        <Button id="btn_excelsave" taborder="3" text="엑셀저장" onclick="grp_biz_btn_excelsave_onclick" class="btn7" position="absolute 709 74 789 93" anchor="top right"/>
        <Button id="button2" taborder="4" text="행종료" onclick="grp_biz_button2_onclick" class="btn2" position="absolute 790 74 843 93" anchor="top right"/>
        <Button id="button3" taborder="5" text="행추가" onclick="grp_biz_button3_onclick" class="btn2" position="absolute 844 74 897 93" anchor="top right"/>
        <Button id="button1" taborder="6" text="저장" onclick="grp_biz_button1_onclick" class="btn5" position="absolute 898 74 940 93" anchor="top right"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_drgalist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drgno" type="STRING"/>
          <Column id="cd_name" type="STRING"/>
          <Column id="std_amt" type="STRING"/>
          <Column id="avg_adm_days" type="STRING"/>
          <Column id="ngrp_llmt_adm_days" type="STRING"/>
          <Column id="ngrp_hlmt_adm_days" type="STRING"/>
          <Column id="fix_amt_rat" type="STRING"/>
          <Column id="drg_cls" type="STRING"/>
          <Column id="rlv_pnt" type="STRING"/>
          <Column id="spot_awc_prc" type="STRING"/>
          <Column id="nig_pnt" type="STRING"/>
          <Column id="obgy_pnt" type="STRING"/>
          <Column id="nig_amt" type="STRING"/>
          <Column id="robotamt" 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"/>
          <Column id="daily_pnt" type="STRING" size="256"/>
        </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 SPPIJ03304_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPPIJ03304_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_drgalist);
	grdf_setRowTypeIcon(grd_drgalist, 0);
	fInitialize();
}

function fInitialize()
{
	fGetDocuList();
}

function grp_biz_group1_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetDocuList();
}

function fGetDocuList(){
	dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val: sysf_getUserInfo("dutplceinstcd")}
							 ,	{col:"drgno", type:"STRING", size:256 ,val :group1.ipt_drgno.value}
							 ,  {col:"cd_name", type:"STRING", size:256 ,val :group1.ipt_cd_name.value}
							 ,  {col:"endyn", type:"STRING", size:256 ,val :group1.chk_endyn.value}]);	

	var oParam = {};
		oParam.id          = "TRPIJ03304";
		oParam.service     = "bfjudgapp.DRGCdIF";
		oParam.method      = "reqGetDrgAList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_drgalist=rslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIJ03304";

	tranf_submit(oParam);
}

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

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

function fSpclGridDeleteRow(){
	var SelectedRows = grdf_getSelectedRows(grd_drgalist);
	grdf_setStatus(grd_drgalist, "D", SelectedRows);
}

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

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

function grp_biz_group1_onkeydown(obj:Div, e:KeyEventInfo)
{
	if(e.keycode == 13)
	 {
		fInitialize();	 
	 }
}

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

function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var updtdata = grdf_getGridUpdateData(grd_drgalist);

	if ( updtdata.rowcount == 0)
	{
		sysf_messageBox("변경된 데이터가","I004");
		return;
	}
	for (var i=0; i < ds_grd_drgalist.rowcount; i++)
	{
		if (ds_grd_drgalist.getRowType(i) == 2 || ds_grd_drgalist.getRowType(i) == 4 ) 
		{
			var diagcd = grd_drgalist.getBindCellIndex("body","drgno");
			var cd_name = grd_drgalist.getBindCellIndex("body","cd_name");
			var std_amt = grd_drgalist.getBindCellIndex("body","std_amt");
			var avg_adm_days = grd_drgalist.getBindCellIndex("body","avg_adm_days");
			var ngrp_llmt_adm_days = grd_drgalist.getBindCellIndex("body","ngrp_llmt_adm_days");
			var ngrp_hlmt_adm_days = grd_drgalist.getBindCellIndex("body","ngrp_hlmt_adm_days");
			var fix_amt_rat = grd_drgalist.getBindCellIndex("body","fix_amt_rat");
			var rlv_pnt = grd_drgalist.getBindCellIndex("body","rlv_pnt");
			var spot_awc_prc = grd_drgalist.getBindCellIndex("body","spot_awc_prc");
			var nig_pnt = grd_drgalist.getBindCellIndex("body","nig_pnt");
			var nig_amt = grd_drgalist.getBindCellIndex("body","nig_amt");
			var fromdd = grd_drgalist.getBindCellIndex("body","fromdd");
			var todd = grd_drgalist.getBindCellIndex("body","todd");
			var daily_pnt = grd_drgalist.getBindCellIndex("body","daily_pnt");
			
			if(!frmf_chkMdtGrid(grd_drgalist,[diagcd,cd_name,std_amt,avg_adm_days,ngrp_llmt_adm_days,ngrp_hlmt_adm_days,fix_amt_rat,rlv_pnt,spot_awc_prc,nig_pnt,nig_amt,fromdd,todd],["DRG코드","코드명","기준진료비","평균재원일수","정상군하한입원일수","정상군상한입원일수","고정비율","상대가치점수","점수당단가","야간공휴점수","산부인과가산점수","시작일자","종료일자"]))
			{
				return;
			}
		}
	}
	
	if (sysf_messageBox("저장", "S001") == 6) 
	{
		var Ids = dsf_createDsRow("ds_send", [{col:"instcd", type:"STRING", size:256, val :sysf_getUserInfo("dutplceinstcd") }
											 , {col:"diagcd", type:"STRING", size:256, val :group1.ipt_drgno.value}
											 , {col:"diagnm", type:"STRING", size:256, val :group1.ipt_cd_name.value}]);
		var oParam = {};
		oParam.id          = "TXPIJ03303";
		oParam.service     = "bfjudgapp.DRGCdIF";
		oParam.method      = "reqExeDrgAList";
		oParam.inds        = "srch="+Ids+" req=ds_grd_drgalist:U";
		oParam.outds       = "ds_grd_drgalist=rslt";
		oParam.async       = false;
		oParam.callback    = "cf_TXPIJ03303";

		tranf_submit(oParam);
	}
}


function cf_TXPIJ03303(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode < 0) return;
	sysf_messageBox("저장이","I002");
}]]></Script>
  </Form>
</FDL>