YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SMPID23500_동일과진료일중복명세서조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPID23500" position="absolute 0 0 1011 809" titletext="중복 명세서조회" oninit="SMPID23500_oninit" onload="SMPID23500_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 15 1005 784" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Grid position="absolute 1 247 1001 769" id="grd_clbsmast" class="datagrid2" binddataset="ds_grd_clbsmast" autofittype="col" autosizingtype="row" extendsizetype="row" cellsizingtype="col" onkeydown="grp_biz_grd_clbsmast_onkeydown" selecttype="row" oncelldblclick="grp_biz_grd_clbsmast_oncelldblclick" anchor="default">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="23"/>
                      <Column size="74"/>
                      <Column size="67"/>
                      <Column size="35"/>
                      <Column size="79"/>
                      <Column size="114"/>
                      <Column size="114"/>
                      <Column size="72"/>
                      <Column size="81"/>
                      <Column size="0"/>
                      <Column size="67"/>
                      <Column size="69"/>
                      <Column size="70"/>
                      <Column size="35"/>
                      <Column size="98"/>
                    </Columns>
                    <Rows>
                      <Row size="48" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="등록번호"/>
                      <Cell col="2" text="환자명"/>
                      <Cell col="3" text="진료&#13;&#10;분야"/>
                      <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="출장시작일&#10;(사망일)"/>
                      <Cell col="11" text="출장종료일"/>
                      <Cell col="12" text="(상병,처방)&#10;코드"/>
                      <Cell col="13" text="내원&#10;구분"/>
                      <Cell col="14" text="대상진료과"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" style="align:center middle;" text="bind:pid" wordwrap="word" autosizerow="limitmin"/>
                      <Cell col="2" text="bind:patnm"/>
                      <Cell col="3" displaytype="combo" edittype="combo" text="bind:ordfildcd" combodataset="ds_init_P0291list" combocodecol="cdid" combodatacol="cdnm" enable="true"/>
                      <Cell col="4" displaytype="combo" edittype="combo" text="bind:insukind" combodataset="ds_init_P0008list" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="5" displaytype="combo" edittype="combo" text="bind:clamdeptcd" combodataset="ds_init_clamdept" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                      <Cell col="6" displaytype="combo" edittype="combo" style="align:center;" text="bind:orddeptcd" combodataset="ds_init_orddeptcd" combocodecol="cd" combodatacol="nm" enable="false"/>
                      <Cell col="7" displaytype="combo" edittype="combo" style="align:center;" text="bind:orddrid" combodataset="ds_init_orddrid2" combocodecol="cd" combodatacol="nm" enable="false"/>
                      <Cell col="8" displaytype="date" style="align:center;" text="bind:ordfromdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="9" text="bind:clamym" mask="yyyy-mm" calendardisplaynulltype="nulltext"/>
                      <Cell col="10" displaytype="date" style="align:center;" text="bind:holi_f" wordwrap="word" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext" autosizerow="limitmin"/>
                      <Cell col="11" displaytype="date" style="align:center;" text="bind:holi_t" wordwrap="word" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext" autosizerow="limitmin"/>
                      <Cell col="12" style="align:left middle;" text="bind:diagcd"/>
                      <Cell col="13" displaytype="combo" edittype="combo" text="bind:ioflag" combodataset="ds_cmb_ioflag" combocodecol="value" combodatacol="label"/>
                      <Cell col="14" displaytype="combo" text="bind:orddeptcd_diff" combodataset="ds_init_orddeptcd" combocodecol="cd" combodatacol="nm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="대상자조회" position="absolute 4 226 130 247" id="cap_judgtrgtman" class="tit_2" anchor="default"/>
              <Shape position="absolute 1 239 1001 251" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;" anchor="default"/>
              <Div position="absolute 1 9 1001 220" align="align:center top;" id="group1" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Static text="청구년월 :" position="absolute 8 10 95 27" id="caption30" class="search_name" anchor="default"/>
                    <Calendar position="absolute 97 8 166 27" align="align:center middle;" id="ipt_clamym" class="input_search" taborder="1" mask="yyyy-mm" anchor="default" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" onchanged="grp_biz_group1_ipt_clamym_onchanged"/>
                    <Button position="absolute 935 69 991 91" id="btn_select" class="btn1" taborder="32" text="조회" anchor="top right" onclick="grp_biz_group1_btn_select_onclick"/>
                    <Shape position="absolute 926 9 928 205" linetype="vertical" id="line3" class="line_4" anchor="top right"/>
                    <Radio position="absolute 95 28 918 211" id="rdo_searchgb" columncount="3" codecolumn="cdid" datacolumn="cdnm" anchor="default" onitemchanged="grp_biz_group1_rdo_searchgb_onitemchanged" innerdataset="@ds_init_pam_PK230list"/>
                    <Static text="조회구분 :" position="absolute 8 36 94 53" id="caption1" class="search_name" anchor="default"/>
                    <Static id="caption3" text="내원유형 :" class="search_name" position="absolute 189 10 276 27" anchor="default"/>
                    <Combo id="combo1" taborder="33" position="absolute 268 7 348 26" index="-1" innerdataset="@ds_cmb_combo1" datacolumn="label" codecolumn="value" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 921 222 1001 241" id="btn_excelsave" class="btn7" text="엑셀저장" onclick="grp_biz_btn_excelsave_onclick" anchor="default"/>
              <Static text="외래상기도감염 항생제 처방조회는 하셨습니까?" position="absolute 317 224 602 238" id="caption2" style="background:#ccffccff;color:#ff0000ff;font:Dotum,9,bold;" anchor="default"/>
              <Button position="absolute 604 222 797 241" id="button1" class="btn2" text="외래상기도감염 항생제 처방조회" onclick="grp_biz_button1_onclick" anchor="default"/>
              <Button position="absolute 800 222 916 241" id="button2" class="btn2" visible="false" text="재정산 내역 조회" onclick="grp_biz_button2_onclick" anchor="default"/>
              <Button id="btn_diagHist" taborder="1" text="상병이력" onclick="grp_biz_btn_diagHist_onclick" class="btn2" position="absolute 247 222 312 241" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 944 786 1000 808" id="btn_cancel" class="btn4" text="종료" onclick="btn_cancel_onclick"/>
        <Static id="cap_title" text="중복 명세서조회" class="tit_1" position="absolute 1 0 217 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_clbsmast" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="ordfildcd" type="STRING"/>
          <Column id="insukind" type="STRING"/>
          <Column id="clamdeptcd" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="orddrid" type="STRING"/>
          <Column id="ordfromdd" type="STRING"/>
          <Column id="clamym" type="STRING"/>
          <Column id="holi_f" type="STRING"/>
          <Column id="holi_t" type="STRING"/>
          <Column id="diagcd" type="STRING"/>
          <Column id="ioflag" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0008list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0291list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_pam_PK110list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_pam_PK108list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_pam_PK109list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_item1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256"/>
          <Column id="clamtoym" type="STRING" size="256"/>
          <Column id="scrnid" type="STRING" size="256"/>
          <Column id="ioflag" type="STRING" size="256"/>
          <Column id="searchgb" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="stsioflag" type="STRING" size="256"/>
          <Column id="subgb" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="searchgb">SD</Col>
            <Col id="ioflag">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_judgrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgrid" type="STRING" size="256" sumtext="심사자ID"/>
          <Column id="judgrnm" type="STRING" size="256" sumtext="심사자명"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_suppkind" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="보조유형"/>
          <Column id="nm" type="STRING" size="256" sumtext="보조유형명"/>
          <Column id="up" type="STRING" size="256" sumtext="상위코드"/>
          <Column id="io" type="STRING" size="256" sumtext="외래입원구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_orddrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료의사"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료의사명"/>
          <Column id="dp" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="sp" type="STRING" size="256" sumtext="선택진료여부"/>
          <Column id="reqdp" type="STRING" size="256" sumtext="청구과코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_orddrid2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료의사"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료의사명"/>
          <Column id="dp" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="sp" type="STRING" size="256" sumtext="선택진료여부"/>
          <Column id="reqdp" type="STRING" size="256" sumtext="청구과코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_clamdept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256" sumtext="청구과코드"/>
          <Column id="cdnm" type="STRING" size="256" sumtext="청구과명칭"/>
          <Column id="cdval" type="STRING" size="256" sumtext="코드값(진료분야)"/>
          <Column id="minval" type="STRING" size="256" sumtext="코드최소값(M:의과, D:치과)"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료과명칭"/>
          <Column id="deptengabbr" type="STRING" size="256" sumtext="영문약어"/>
          <Column id="reqfild" type="STRING" size="256" sumtext="청구진료분야"/>
          <Column id="reqdeptno" type="STRING" size="256" sumtext="청구부서번호"/>
          <Column id="orddeptflag" type="STRING" size="256" sumtext="진료과구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_orddeptcd2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="nm" type="STRING" size="256" sumtext="진료과명칭"/>
          <Column id="deptengabbr" type="STRING" size="256" sumtext="영문약어"/>
          <Column id="reqfild" type="STRING" size="256" sumtext="청구진료분야"/>
          <Column id="reqdeptno" type="STRING" size="256" sumtext="청구부서번호"/>
          <Column id="orddeptflag" type="STRING" size="256" sumtext="진료과구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_item3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgidyn" type="STRING" size="256" sumtext="심사자id유무"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_clamdg" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamdgnm" type="STRING" size="256" sumtext="청구차수명"/>
          <Column id="clamdgcd" type="STRING" size="256" sumtext="청구차수번호"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_aftjudgerr" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING" size="256" sumtext="오류내역"/>
          <Column id="cd" type="STRING" size="256" sumtext="코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_uuee" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="scrnid" type="STRING" size="256" sumtext="화면(xrw)의 ID"/>
          <Column id="compsnm" type="STRING" size="256" sumtext="Grid ID 정보"/>
          <Column id="compscnts" type="STRING" size="256" sumtext="Grid의 칼럼명"/>
          <Column id="compsrefcnts" type="STRING" size="256" sumtext="Grid의 reference명"/>
          <Column id="compssizecnts" type="STRING" size="256" sumtext="Grid의 칼럼Size"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_ioflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_combo1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">전체</Col>
            <Col id="value"/>
          </Row>
          <Row>
            <Col id="label">DSC/CHEMO</Col>
            <Col id="value">D</Col>
          </Row>
          <Row>
            <Col id="label">응급</Col>
            <Col id="value">E</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_pam_PK230list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.group1.ipt_clamym" propid="value" datasetid="ds_send_item1" columnid="clamym"/>
      <BindItem id="item1" compid="grp_biz.group1.rdo_searchgb" propid="value" datasetid="ds_send_item1" columnid="searchgb"/>
      <BindItem id="item2" compid="grp_biz.group1.combo1" propid="value" datasetid="ds_send_item1" columnid="stsioflag"/>
    </Bind>
    <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";
include "pam_pamcomnxp::PAM.xjs";
function SMPID23500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPID23500_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();
}

var gToday = new Date();
var gBaseyear  = gToday.getDateFormat("YYYY");
var gBasemonth = gToday.getDateFormat("MM");
var gBaseday   = gToday.getDateFormat("DD");
var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;
var gCurrentym  = gBaseyear + gBasemonth;
				
function fInitialize()
{
	grdf_initGrid(grp_biz.grd_clbsmast);
	grdf_setToolTipBind(grp_biz.grd_clbsmast);
	
	var arrParam = [{dsNm: "ds_init_P0291list", cdGrpId: "P0291"}
				   ,{dsNm: "ds_init_P0008list", cdGrpId: "P0008"}]
	appf_getCodeList(arrParam);	
	
	pamGetDeptCDDrIDList(); 
	
	var arrParam1 = new Array();
	arrParam1 = [{dsNm: "ds_init_pam_PK108list", cdGrpId: "PK108", showValue: false}
			   , {dsNm: "ds_init_pam_PK109list", cdGrpId: "PK109", showValue: false}
			   , {dsNm: "ds_init_pam_PK110list", cdGrpId: "PK110", showValue: false}
			   , {dsNm: "ds_init_pam_PK230list", cdGrpId: "PK230", showValue: false}];
				
	pamfGetCodeList(arrParam1, true, "cf_pamfGetCodeList");
	
	var lv_date = gCurrentym.toDate("YYYYMM" + "01");
	lv_date       = lv_date.getAddDate(-1, "M")
	gCurrentym    = lv_date.getDateFormat("YYYYMM")  			
	
	ds_send_item1.setColumn(0, "clamym", gCurrentym);
	ds_send_item1.setColumn(0, "clamtoym", gCurrentym);
	
	grp_biz.group1.combo1.index = 0;
	
	var oParam = {};
		oParam.id          = "TRPID20201";
		oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
		oParam.method      = "reqGetInitComCd";
		oParam.inds        = "req=ds_send_item1";
		oParam.outds       = "ds_init_judgrid=judgrid ds_init_suppkind=suppkind ds_init_orddrid=orddrid ds_init_orddrid2=orddrid2 ds_init_clamdept=clamdept ds_init_orddeptcd=orddeptcd ds_init_orddeptcd2=orddeptcd2 ds_init_item3=item3 ds_init_clamdg=clamdg ds_init_aftjudgerr=aftjudgerr ds_init_uuee=uuee";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID20201";

	tranf_submit(oParam);
}

function cf_pamfGetCodeList()
{
}

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

function fGetDocuList()
{
	grp_biz.grd_clbsmast.setCellProperty("Body", 3, "displaytype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 3, "edittype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 4, "displaytype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 4, "edittype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 5, "displaytype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 5, "edittype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 6, "displaytype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 6, "edittype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 7, "displaytype", "combo");
	grp_biz.grd_clbsmast.setCellProperty("Body", 7, "edittype", "combo");

	var chk = true;
	
	if(utlf_isNull(ds_send_item1.getColumn(0, "clamym")))
	{
		chk = false;
		sysf_messageBox("청구년월은", "I003");
		grp_biz.group1.ipt_clamym.setFocus();
	} 
	
	var searchgb = ds_send_item1.getColumn(0, "searchgb");
	
	if (chk == true) 
	{
		ds_send_item1.setColumn(0, "diagcd", ds_init_pam_PK108list.lookup("cdid", searchgb, "cdnm"));
		ds_send_item1.setColumn(0, "subgb", ds_init_pam_PK230list.lookup("cdid", searchgb, "detldesc"));
		
		var oParam = {};
			oParam.id          = "TRPID22901";
			oParam.service     = "aftjudgapp.InAftJudg";
			oParam.method      = "reqGetSameDeptNDateDocuList";
			oParam.inds        = "req=ds_send_item1";
			oParam.outds       = "ds_grd_clbsmast=clbs";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPID22901";

		tranf_submit(oParam);
			
	}
	if (searchgb == "G2")
	{
		grp_biz.grd_clbsmast.setCellProperty("head", 1, "text", "한글명");
		grp_biz.grd_clbsmast.setCellProperty("head", 2, "text", "수가코드");
		grp_biz.grd_clbsmast.setCellProperty("head", 3, "text", "EDI코드");
		grp_biz.grd_clbsmast.setCellProperty("head", 4, "text", "대분류");
		grp_biz.grd_clbsmast.setCellProperty("head", 5, "text", "중분류");
		grp_biz.grd_clbsmast.setCellProperty("head", 6, "text", "소분류");
		grp_biz.grd_clbsmast.setCellProperty("head", 7, "text", "적용일자");
		grp_biz.grd_clbsmast.setCellProperty("head", 8, "text", "수가메모");
		grp_biz.grd_clbsmast.setCellProperty("head", 10, "text", "수가메세지");
		grp_biz.grd_clbsmast.setCellProperty("head", 11, "text", "");
		grp_biz.grd_clbsmast.setCellProperty("head", 12, "text", "");
				
		grp_biz.grd_clbsmast.setCellProperty("Body", 1, "align", "left middle");
		grp_biz.grd_clbsmast.setCellProperty("Body", 2, "align", "left middle");
		
		grp_biz.grd_clbsmast.setCellProperty("Body", 3, "displaytype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 3, "edittype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 4, "displaytype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 4, "edittype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 5, "displaytype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 5, "edittype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 6, "displaytype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 6, "edittype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 7, "displaytype", "normal");
		grp_biz.grd_clbsmast.setCellProperty("Body", 7, "edittype", "normal");
		
	}
	else
	{
		grp_biz.grd_clbsmast.setCellProperty("head", 1, "text", "등록번호");
		grp_biz.grd_clbsmast.setCellProperty("head", 2, "text", "환자명");
		grp_biz.grd_clbsmast.setCellProperty("head", 3, "text", "진료분야");
		grp_biz.grd_clbsmast.setCellProperty("head", 4, "text", "보험유형");
		grp_biz.grd_clbsmast.setCellProperty("head", 5, "text", "청구과");
		grp_biz.grd_clbsmast.setCellProperty("head", 6, "text", "진료과");
		grp_biz.grd_clbsmast.setCellProperty("head", 7, "text", "진료의");
		grp_biz.grd_clbsmast.setCellProperty("head", 8, "text", "진료개시일");
		grp_biz.grd_clbsmast.setCellProperty("head", 10, "text", "출장시작일\n(사망일)");
		grp_biz.grd_clbsmast.setCellProperty("head", 11, "text", "출장종료일");
		grp_biz.grd_clbsmast.setCellProperty("head", 12, "text", "(상병,처방)\n코드");
		
		grp_biz.grd_clbsmast.setCellProperty("head", 1, "size", 74);
		grp_biz.grd_clbsmast.setCellProperty("head", 2, "size", 67);
		grp_biz.grd_clbsmast.setCellProperty("head", 3, "size", 69);
		grp_biz.grd_clbsmast.setCellProperty("head", 4, "size", 79);
		grp_biz.grd_clbsmast.setCellProperty("head", 5, "size", 114);
		grp_biz.grd_clbsmast.setCellProperty("head", 6, "size", 114);
		grp_biz.grd_clbsmast.setCellProperty("head", 7, "size", 72);
		grp_biz.grd_clbsmast.setCellProperty("head", 8, "size", 81);
		grp_biz.grd_clbsmast.setCellProperty("head", 10, "size", 67);
		grp_biz.grd_clbsmast.setCellProperty("head", 11, "size", 69);
		grp_biz.grd_clbsmast.setCellProperty("head", 12, "size", 70);
	}
}

function grp_biz_group1_rdo_searchgb_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fGetDocuList();
}

function grp_biz_group1_ipt_clamym_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	var date = obj.value;
	var str_date = String(date).substr(0,6);
	
	ds_send_item1.setColumn(0, "clamym", str_date);
}

function grp_biz_btn_excelsave_onclick(obj:Button,  e:ClickEventInfo)
{
	if (ds_grd_clbsmast.rowcount > 0) 
	{
		grdf_exportExcel(grp_biz.grd_clbsmast, "중복 명세서조회", "see");
	}
	else 
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
}

function grp_biz_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_open("SMPIS01000", "SMPIS01000", "", "", "", "", "", "", "", "", "", "", "M");
}

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

function grp_biz_grd_clbsmast_onkeydown(obj:Grid, e:KeyEventInfo)
{
	if(e.ctrlKey == true && e.keycode == 67) {
		var selectedRows = grdf_getSelectedRows(obj);
		
		if (selectedRows.length == 1) {			// 한줄
			// 등록번호
			var clip = obj.getCellValue(obj.currentrow, obj.getBindCellIndex("body", "pid"));
			system.setClipboard("CF_TEXT",  clip);
		}
		else if (selectedRows.length > 1) {		// 여러줄
			grdf_clipboardCopy(obj);
		}
		
	}
}

function lf_fGetDiagHistList()
{
	var clamym = ds_grd_clbsmast.getColumn(ds_grd_clbsmast.rowposition, "clamym");
	
	if (!utlf_isNull(clamym))
	{	
		// 조회된 심사대상자가 있으면
		// 심사대상자의 등록번호를 조건으로 하여 전체 청구 상병이력을 조회한다.
		var smpiz00100 = new Object();
			smpiz00100.sPid    = ds_grd_clbsmast.getColumn(ds_grd_clbsmast.rowposition, "pid");
			smpiz00100.sIoflag = "-";
		
		var rtnDs = frmf_modal("SMPIZ00100", "SMPIZ00100", smpiz00100, "", "", "", "", "", "", "", "", "", "M");

 	}
}
function grp_biz_btn_diagHist_onclick(obj:Button,  e:ClickEventInfo)
{
	lf_fGetDiagHistList()
}

function grp_biz_grd_clbsmast_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	lf_fGetDiagHistList()
}
]]></Script>
  </Form>
</FDL>