YNU_JEUS/app_home/himed/xpapps/pam/insubasecdmngtxp/xp/SMPIB00500_필수심사대상생성기준관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIB00500" position="absolute 0 0 1200 786" titletext="필수심사대상생성기준관리(SMPIB00500)" oninit="SMPIB00500_oninit" onload="SMPIB00500_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 1196 757" id="group3" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Div position="absolute 0 11 1194 71" align="align:center top;" id="group2" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Button position="absolute 1128 17 1184 39" id="btn_srch" class="btn1" text="조회" anchor="top right" onclick="group3_group2_btn_srch_onclick"/>
                    <Shape position="absolute 1115 7 1121 54" linetype="vertical" id="line13" class="line_4" anchor="top right"/>
                    <Static text="필수심사항목 :" position="absolute 10 9 123 26" id="caption8" class="search_name" anchor="default"/>
                    <Combo position="absolute 124 8 214 27" id="cmb_surecd" class="combo_search" innerdataset="@ds_init_P0486list" datacolumn="cdnm" codecolumn="cdid" anchor="default"/>
                    <Combo position="absolute 301 8 427 27" id="cmb_orddeptcd" class="combo_search" innerdataset="@ds_init_orddeptcdlist" datacolumn="nm" codecolumn="cd" anchor="default"/>
                    <Static text="진료과 :" position="absolute 232 9 308 26" id="caption2" class="search_name" anchor="default"/>
                    <Static text="상병구분 :" position="absolute 440 9 535 26" id="caption1" class="search_name" anchor="default"/>
                    <Combo position="absolute 525 7 585 26" id="cmb_diaggubun" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">
                            </Col>
                            <Col id="datacolumn">
                            </Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">-</Col>
                            <Col id="datacolumn">전  체</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">M</Col>
                            <Col id="datacolumn">주상병</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                    <Static text="항암제 :" position="absolute 913 9 988 26" id="caption11" class="search_name" anchor="default"/>
                    <Combo position="absolute 980 7 1049 26" id="cmb_anticanflag" class="combo_search" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                      <Dataset id="innerdataset">
                        <ColumnInfo>
                          <Column id="codecolumn"/>
                          <Column id="datacolumn"/>
                        </ColumnInfo>
                        <Rows>
                          <Row>
                            <Col id="codecolumn">
                            </Col>
                            <Col id="datacolumn">
                            </Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">-</Col>
                            <Col id="datacolumn">전체</Col>
                          </Row>
                          <Row>
                            <Col id="codecolumn">2</Col>
                            <Col id="datacolumn">2군</Col>
                          </Row>
                        </Rows>
                      </Dataset>
                    </Combo>
                    <Static text="처방중분류 :" position="absolute 753 35 852 52" id="caption10" class="search_name" anchor="default"/>
                    <Combo position="absolute 845 34 1050 53" id="cmb_earncls2" class="combo_search" innerdataset="@ds_init_ictplist_ictp2List_ictp2" datacolumn="ictp2_earncls2nm" codecolumn="ictp2_earncls2" anchor="default"/>
                    <Combo position="absolute 533 33 738 52" id="cmb_earncls1" class="combo_search" innerdataset="@ds_init_ictplist_ictp1List_ictp1" datacolumn="ictp1_earncls1nm" codecolumn="ictp1_earncls1" anchor="default" onitemchanged="group3_group2_cmb_earncls1_onitemchanged"/>
                    <Static text="처방대분류 :" position="absolute 440 35 539 52" id="caption9" class="search_name" anchor="default"/>
                    <Edit position="absolute 102 33 214 52" id="ipt_calcscorcd" class="input_search" anchor="default"/>
                    <Static text="수가코드 :" position="absolute 10 35 96 52" id="caption7" class="search_name" anchor="default"/>
                    <Edit position="absolute 230 33 427 52" id="ipt_ordnm" anchor="default"/>
                    <Static text="상병코드 :" position="absolute 595 9 681 26" id="caption3" class="search_name" anchor="default"/>
                    <Edit position="absolute 675 7 724 26" id="ipt_diagcd" class="input_search" anchor="default"/>
                    <Edit position="absolute 745 7 895 26" id="ipt_diagnm" anchor="default"/>
                    <Button id="btn_search" taborder="1" class="icon_search" position="absolute 724 8 740 24" onclick="group3_group2_btn_search_onclick" anchor="default"/>
                    <Button id="btn_search00" taborder="2" class="icon_search" position="absolute 214 34 230 50" onclick="group3_group2_btn_search00_onclick" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 0 95 1194 101" linetype="horizontal" id="line3" class="line_10" style="strokepen:3 solid #33bbbbff;" anchor="left top right"/>
              <Grid position="absolute 0 100 1194 741" id="grd_surelist" scrollbars="autoboth" binddataset="ds_main_list1_surelist" anchor="all" autofittype="col" onexpanddown="group3_grd_surelist_onexpanddown" cellsizingtype="col" cellmovingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="21"/>
                      <Column size="69"/>
                      <Column size="89"/>
                      <Column size="61"/>
                      <Column size="59"/>
                      <Column size="138"/>
                      <Column size="59"/>
                      <Column size="138"/>
                      <Column size="64"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="80"/>
                      <Column size="149"/>
                      <Column size="45"/>
                      <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" 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" text="changeflag"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" displaytype="combo" edittype="combo" text="bind:surecd" combodataset="ds_init_P0486list" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                      <Cell col="2" displaytype="combo" edittype="combo" text="bind:orddeptcd" combodataset="ds_init_orddeptcdlist" combocodecol="cd" combodatacol="nm"/>
                      <Cell col="3" displaytype="combo" edittype="combo" text="bind:diaggubun" combodataset="ds_cmb_diaggubun" combocodecol="value" combodatacol="label"/>
                      <Cell col="4" displaytype="text" edittype="text" text="bind:diagcdfrom" expandshow="show"/>
                      <Cell col="5" style="align:left middle;" text="bind:diagnmfrom"/>
                      <Cell col="6" displaytype="text" edittype="text" text="bind:diagcdto" expandshow="show"/>
                      <Cell col="7" style="align:left middle;" text="bind:diagnmto"/>
                      <Cell col="8" displaytype="number" edittype="normal" text="bind:amt" mask="9,999"/>
                      <Cell col="9" displaytype="combo" edittype="combo" text="bind:earncls1" combodataset="FilteredDataset00" combocodecol="ictp1_earncls1" combodatacol="ictp1_earncls1nm"/>
                      <Cell col="10" displaytype="combo" edittype="combo" text="bind:earncls2" combodataset="ds_tmp_ictplist_ictp2List_ictp" combocodecol="ictp2_earncls2" combodatacol="ictp2_earncls2nm"/>
                      <Cell col="11" displaytype="text" edittype="text" text="bind:calcscorcd" expandshow="show"/>
                      <Cell col="12" text="bind:ordnm"/>
                      <Cell col="13" displaytype="combo" edittype="combo" text="bind:anticanflag" combodataset="ds_cmb_anticanflag" combocodecol="value" combodatacol="label"/>
                      <Cell col="14" text="bind:seq"/>
                      <Cell col="15" text="bind:changeflag"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static text="필수심사대상 생성기준 목록" position="absolute 0 79 190 100" id="caption5" class="tit_2" anchor="default"/>
              <Button position="absolute 1140 76 1193 95" id="btn_delRow" class="btn2" text="행삭제" anchor="top right" onclick="group3_btn_delRow_onclick"/>
              <Button position="absolute 1085 76 1138 95" id="btn_addRow" class="btn2" text="행추가" anchor="top right" onclick="group3_btn_addRow_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 1 753 1196 780" id="grp_btn" scrollbars="autoboth" anchor="left right bottom">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 0 1194 6" linetype="horizontal" id="line23" class="line_6" anchor="left right bottom"/>
              <Button position="absolute 1125 5 1193 27" id="button5" class="btn4" text="초기화" anchor="right bottom" onclick="grp_btn_button5_onclick"/>
              <Button position="absolute 1064 5 1120 27" id="btn_save" class="btn4" text="저장" anchor="right bottom" onclick="grp_btn_btn_save_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="필수심사대상 생성기준관리" class="tit_1" position="absolute 1 0 281 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_itemchk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="surecd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="diaggubun" type="STRING" size="256"/>
          <Column id="anticanflag" type="STRING" size="256"/>
          <Column id="earncls1" type="STRING" size="256"/>
          <Column id="earncls2" type="STRING" size="256"/>
          <Column id="calcscorcd" type="STRING" size="256"/>
          <Column id="ordnm" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="surecd"/>
            <Col id="orddeptcd"/>
            <Col id="diaggubun"/>
            <Col id="anticanflag"/>
            <Col id="earncls1"/>
            <Col id="earncls2"/>
            <Col id="calcscorcd"/>
            <Col id="ordnm"/>
            <Col id="diagcd"/>
            <Col id="diagnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0486list" 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>
      </Dataset>
      <Dataset id="ds_init_orddeptcdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_ictplist_ictp1List_ictp1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ictp1_earncls1nm" type="STRING" size="256"/>
          <Column id="ictp1_earncls1" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_ictplist_ictp2List_ictp2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ictp2_earncls1" type="STRING" size="256" sumtext="처방중분류코드"/>
          <Column id="ictp2_earncls2" type="STRING" size="256" sumtext="처방중분류코드"/>
          <Column id="ictp2_earncls2nm" type="STRING" size="256" sumtext="처방중분류코드명"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cmb_diaggubun" 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">-</Col>
          </Row>
          <Row>
            <Col id="label">주상병</Col>
            <Col id="value">M</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_cmb_anticanflag" 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">-</Col>
          </Row>
          <Row>
            <Col id="label">2군</Col>
            <Col id="value">2</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list1_surelist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list1_surelist_oncolumnchanged">
        <ColumnInfo>
          <Column id="surecd" type="STRING" size="256" sumtext="필수심사항목"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
          <Column id="diaggubun" type="STRING" size="256" sumtext="상병구분"/>
          <Column id="diagcdfrom" type="STRING" size="256" sumtext="시작상병"/>
          <Column id="diagnmfrom" type="STRING" size="256" sumtext="시작상병명"/>
          <Column id="diagcdto" type="STRING" size="256" sumtext="종료상병"/>
          <Column id="diagnmto" type="STRING" size="256" sumtext="종료상병명"/>
          <Column id="amt" type="STRING" size="256" sumtext="금액"/>
          <Column id="earncls1" type="STRING" size="256" sumtext="처방대분류"/>
          <Column id="earncls2" type="STRING" size="256" sumtext="처방중분류"/>
          <Column id="calcscorcd" type="STRING" size="256" sumtext="수가코드"/>
          <Column id="ordnm" type="STRING" size="256" sumtext="수가명"/>
          <Column id="anticanflag" type="STRING" size="256" sumtext="항암제구분"/>
          <Column id="seq" type="STRING" size="256" sumtext="순번"/>
          <Column id="changeflag" type="STRING" size="256" sumtext="변경구분"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_item3_srchdiag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="basedd" type="STRING" size="256"/>
          <Column id="selectedrdodiagkind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_picmmech" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden_sppiz00400_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_tmp_ictplist_ictp2List_ictp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="ictp2_earncls1" type="STRING" size="256" sumtext="처방중분류코드"/>
          <Column id="ictp2_earncls2" type="STRING" size="256" sumtext="처방중분류코드"/>
          <Column id="ictp2_earncls2nm" type="STRING" size="256" sumtext="처방중분류코드명"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_item2_grdsrchnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="iptsearch" type="STRING" size="256"/>
          <Column id="searchkind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_calcdiagnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <FilteredDataset id="FilteredDataset00" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" binddataset="@ds_init_ictplist_ictp1List_ictp1" filterstr="ictp1_earncls1 != ''"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group2.cmb_surecd" propid="value" datasetid="ds_send_itemchk" columnid="surecd"/>
      <BindItem id="item1" compid="group3.group2.cmb_orddeptcd" propid="value" datasetid="ds_send_itemchk" columnid="orddeptcd"/>
      <BindItem id="item2" compid="group3.group2.cmb_diaggubun" propid="value" datasetid="ds_send_itemchk" columnid="diaggubun"/>
      <BindItem id="item3" compid="group3.group2.ipt_diagcd" propid="value" datasetid="ds_send_itemchk" columnid="diagcd"/>
      <BindItem id="item4" compid="group3.group2.ipt_diagnm" propid="value" datasetid="ds_send_itemchk" columnid="diagnm"/>
      <BindItem id="item5" compid="group3.group2.cmb_anticanflag" propid="value" datasetid="ds_send_itemchk" columnid="anticanflag"/>
      <BindItem id="item6" compid="group3.group2.ipt_calcscorcd" propid="value" datasetid="ds_send_itemchk" columnid="calcscorcd"/>
      <BindItem id="item7" compid="group3.group2.ipt_ordnm" propid="value" datasetid="ds_send_itemchk" columnid="ordnm"/>
      <BindItem id="item8" compid="group3.group2.cmb_earncls1" propid="value" datasetid="ds_send_itemchk" columnid="earncls1"/>
      <BindItem id="item9" compid="group3.group2.cmb_earncls2" propid="value" datasetid="ds_send_itemchk" columnid="earncls2"/>
    </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 SMPIB00500_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIB00500_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(group3.grd_surelist);
	grdf_setRowTypeIcon(group3.grd_surelist, 0);
	
	pamGetDeptCDDrIDList();
	
	var oParam = {};
		oParam.id          = "TRPIB00502";
		oParam.service     = "insubasecdmngtapp.AsrtJudgCd";
		oParam.method      = "reqGetEarnclsCD";
		oParam.inds        = "";
		oParam.outds       = "ds_init_ictplist_ictp1List_ictp1=ictp1 ds_tmp_ictplist_ictp2List_ictp=ictp2";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIB00502";

	tranf_submit(oParam);
	
	ds_init_ictplist_ictp2List_ictp2.copyData(ds_tmp_ictplist_ictp2List_ictp);

	var arrParam = [{dsNm: "ds_init_P0486list", cdGrpId: "P0486"}]
				   
	appf_getCodeList(arrParam);	

	//model.removeNodeset("/root/init/P0486list/P0486[cdid='' or cdid='X' or cdid='-' or cdid = '7']");
	
	frmf_addComboItem("group3.group2.cmb_surecd","","","above");
	frmf_addComboItem("group3.group2.cmb_orddeptcd","전체","-","above");
	frmf_addComboItem("group3.group2.cmb_earncls1","-","-","above");
	frmf_addComboItem("group3.group2.cmb_earncls2","-","-","above");
	
// 	model.removenode("/root/init/orddrid");
// 	model.removenode("/root/init/centcd");
// 	model.removenode("/root/init/subdeptcd");
// 	model.removenode("/root/hidden/P0486list");
// 	model.removenode("/root/hidden/orddeptcd");
// 	model.removenode("/root/hidden/ictp1List");
// 	model.removenode("/root/hidden/ictp2List");

	fInitialize();
}

function fInitialize()
{
	ds_send_itemchk.clearData();
	ds_send_itemchk.addRow();
	
	var EarnCd1 = ds_send_itemchk.getColumn(0, "earncls1");
	
	ds_init_ictplist_ictp2List_ictp2.filterstr = "ictp2_earncls1 == '' || ictp2_earncls1 == '"+EarnCd1+"'";
	//cmb_earncls2.choices.itemset.attribute("nodeset") = "/root/init/ictplist/ictp2List/ictp2[ictp2_earncls1 = '' or ictp2_earncls1 = '"+ EarnCd1 + "']";

	ds_main_list1_surelist.clearData();
	
	group3.group2.cmb_surecd.index = 0;
	
	group3.group2.cmb_surecd.setFocus();
}

function group3_group2_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	glb_diagtype = "SEARCH";
	var today = utlf_getCurrentDate();
	
	var objArg = new Object();

	objArg.sDiagcd = "";
	objArg.sSelectedrdodiagkind = 1;
	objArg.sSingleFlag = "M";

	var objDs = frmf_modal("SPPIZ00400", "SPPIZ00400", objArg);
	
	ds_hidden_sppiz00400_rslt.copyData(objDs);
	
	ds_send_itemchk.setColumn(0, "diagcd", ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd"));
	ds_send_itemchk.setColumn(0, "diagnm", ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm"));
}

function group3_group2_btn_search00_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SMPIC00200", "SMPIC00200", "", "", "", "", "", "", "", "", "", "", "M");
	
	var calcscorcd = ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd");
	var ordnm      = ds_temp_picmmech.getColumn(0, "picmmech_hngnm");
	
	if (!utlf_isNull(calcscorcd))
	{
		ds_send_itemchk.setColumn(0, "calcscorcd", calcscorcd);
		ds_send_itemchk.setColumn(0, "ordnm", ordnm);
	}
}

function group3_group2_cmb_earncls1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_send_itemchk.setColumn(0, "earncls2", "");
	
	var EarnCd1 = obj.value;
	
	ds_init_ictplist_ictp2List_ictp2.filterstr = "ictp2_earncls1 == '' || ictp2_earncls1 == '"+EarnCd1+"'";
}

function group3_group2_btn_srch_onclick(obj:Button,  e:ClickEventInfo)
{
	fSelectLIst();
}

function fSelectLIst()
{
	if(ds_send_itemchk.getColumn(0, "surecd") == "-")
	{
		ds_send_itemchk.setColumn(0, "surecd", "");
	}
	
	for(var i = 0; i < ds_main_list1_surelist.rowcount; i++ ) 
	{
		var rowstatus = ds_main_list1_surelist.getRowType(i);
		
		if (rowstatus == 2) 
		{
			var changeflag = ds_main_list1_surelist.getColumn(i, "changeflag");
			
			if (changeflag == "I") 
			{
				var arrRow = new Array();
				arrRow[0] = i; 
				grdf_setStatus(group3.grd_surelist, "I", arrRow);
			}
		}
	}
	
	var updtdata = grdf_getGridUpdateData(group3.grd_surelist);
	
	if (updtdata.rowcount != 0)
	{
		var ret = sysf_messageBox("그리드에 작업중인 내용이 있습니다. 조회를","Q003");
		
		if(ret != 6)
		{
			return false;
		}
	}

	ds_main_list1_surelist.clearData();
	
	var oParam = {};
		oParam.id          = "TRPIB00501";
		oParam.service     = "insubasecdmngtapp.AsrtJudgCd";
		oParam.method      = "reqGetPicmsureList";
		oParam.inds        = "req=ds_send_itemchk";
		oParam.outds       = "ds_main_list1_surelist=surelist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIB00501";

	tranf_submit(oParam);

	for(var i = 0; i < ds_main_list1_surelist.rowcount; i++ ) 
	{
		if(ds_main_list1_surelist.getColumn(i, "surecd") == "4")
		{
			fEarncls1(i, false);
		}
	}
}

function fEarncls1(jrow, clearflag)
{
	if ( clearflag == true ) 
	{
		ds_main_list1_surelist.setColumn(jrow, "earncls2", "-");
	}
	var EarnCd1 = ds_main_list1_surelist.getColumn(jrow, "earncls1");
	
	ds_tmp_ictplist_ictp2List_ictp.filterstr = "ictp2_earncls1 == '-' || ictp2_earncls1 == '"+EarnCd1+"'";
}

function ds_main_list1_surelist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "earncls1")
	{
		fEarncls1(e.row, true);
	}

	ds_main_list1_surelist.setColumn(e.row, "changeflag", "U");
}

function group3_grd_surelist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	var oldvalue = ds_main_list1_surelist.getColumn(e.row, e.col);

	if(e.col == obj.getBindCellIndex("body", "diagcdfrom"))
	{
		ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_surelist.getColumn(e.row, "diagcdfrom"));
		ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "2");
		
		fSrchNm("diagcdfrom");
	}
	
	if(e.col == obj.getBindCellIndex("body", "diagcdto"))
	{
		ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_surelist.getColumn(e.row, "diagcdto"));
		ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "2");
		
		fSrchNm("diagcdto");
	}
	
	if(e.col == obj.getBindCellIndex("body", "calcscorcd"))
	{
		ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_surelist.getColumn(e.row, "calcscorcd"));
		ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "1");
		
		fSrchNm("calcscorcd");
	}

	var newvalue = ds_main_list1_surelist.getColumn(e.row, e.col);
						
	if ( oldvalue == "-" ) 
	{ 
		oldvalue = ""; 
	}
	if ( newvalue == "-" ) 
	{ 
		newvalue = ""; 
	}

	if ( oldvalue != newvalue ) 
	{
		var rowstatus = ds_main_list1_surelist.getRowType(e.row);
	
		if (rowstatus == 2) 
		{
			ds_main_list1_surelist.setColumn(e.row, "changeflag", "U");
		} 
		else if (rowstatus != 8) 
		{
			var arrRow = new Array();
			arrRow[0] = e.row; 
			grdf_setStatus(group3.grd_surelist, "I", arrRow);
		}
	}
}

function fSrchNm(col)
{
	var row = ds_main_list1_surelist.rowposition;
	var today = utlf_getCurrentDate();
	
	if (col == "calcscorcd")
	{
		ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_surelist.getColumn(row, "calcscorcd"));
		ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "1");
	}
	else if (col == "diagcdfrom")
	{
		ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_surelist.getColumn(row, "diagcdfrom"));
		ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "2");
	}
	else if (col == "diagcdto")
	{
		ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", ds_main_list1_surelist.getColumn(row, "diagcdto"));
		ds_send_item2_grdsrchnm.setColumn(0, "searchkind", "2");
	}
	if(ds_send_item2_grdsrchnm.getColumn(0, "iptsearch") == "-")
	{
		ds_send_item2_grdsrchnm.setColumn(0, "iptsearch", "");
	}
	
	var oParam = {};
		oParam.id          = "TRPID00202";
		oParam.service     = "insubasecdmngtapp.AsrtJudgCd";
		oParam.method      = "reqGetNm";
		oParam.inds        = "req=ds_send_item2_grdsrchnm";
		oParam.outds       = "ds_temp_calcdiagnm=calcdiagnm";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID00202";

	tranf_submit(oParam);
	
	var hngnm = ds_temp_calcdiagnm.getColumn(0, "hngnm");
	
	if (utlf_isNull(hngnm))
	{
		if (col == "calcscorcd")
		{
			frmf_modal("SMPIC00200", "SMPIC00200", "", "", "", "", "", "", "", "", "", "", "M");
			
			ds_main_list1_surelist.setColumn(row, "calcscorcd", ds_temp_picmmech.getColumn(0, "picmmech_calcscorcd"));
			ds_main_list1_surelist.setColumn(row, "ordnm", ds_temp_picmmech.getColumn(0, "picmmech_hngnm"));																							
		}
		else 
		{
			if (col == "diagcdfrom" || col == "diagcdto") 
			{
				ds_send_item3_srchdiag.setColumn(0, "basedd", today);
				
				if (col == "diagcdfrom")
				{
					ds_send_item3_srchdiag.setColumn(0, "diagcd", ds_main_list1_surelist.getColumn(row, "diagcdfrom"));
				} 
				else 
				{
					ds_send_item3_srchdiag.setColumn(0, "diagcd", ds_main_list1_surelist.getColumn(row, "diagcdto"));
				}
				
				if(ds_send_item3_srchdiag.getColumn(0, "diagcd") == "-")
				{
					ds_send_item3_srchdiag.setColumn(0, "diagcd", "");
				}
				
				var objArg = new Object();
				
				objArg.sDiagcd = ds_send_item3_srchdiag.getColumn(0, "diagcd");
				objArg.sSelectedrdodiagkind = 1;
				objArg.sSingleFlag = "M";

				var objDs = frmf_modal("SPPIZ00400", "SPPIZ00400", objArg);
				
				ds_hidden_sppiz00400_rslt.copyData(objDs);
				
				ds_main_list1_surelist.setColumn(row, "diagcdfrom" , ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd"));
				ds_main_list1_surelist.setColumn(row, "diagnmfrom" , ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm"));
				ds_main_list1_surelist.setColumn(row, "diagcdto" , ds_hidden_sppiz00400_rslt.getColumn(0, "diagcd"));
				ds_main_list1_surelist.setColumn(row, "diagnmto" , ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm"));
			}
		}
		
		if (col == "calcscorcd")
		{
			var srchnm = ds_temp_picmmech.getColumn(0, "picmmech_hngnm");
			
			if (utlf_isNull(srchnm))
			{
				ds_main_list1_surelist.setColumn(row, "calcscorcd", "");
				ds_main_list1_surelist.setColumn(row, "ordnm", ""); 
			}
		}
		if (col == "diagcdfrom")
		{
			var srchnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm");
			if (utlf_isNull(srchnm))
			{
				ds_main_list1_surelist.setColumn(row, "diagcdfrom", "");
				ds_main_list1_surelist.setColumn(row, "diagnmfrom", ""); 
			}
		}
		if (col == "diagcdto")
		{
			var srchnm = ds_hidden_sppiz00400_rslt.getColumn(0, "diaghngnm");
			
			if (utlf_isNull(srchnm))
			{
				ds_main_list1_surelist.setColumn(row, "diagcdto", "");
				ds_main_list1_surelist.setColumn(row, "diagnmto", ""); 
			}
		}	
	}
	else 
	{
		if (col == "calcscorcd")
		{
			ds_main_list1_surelist.setColumn(row, "ordnm", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
		}
		if (col == "diagcdfrom")
		{
			ds_main_list1_surelist.setColumn(row, "diagnmfrom", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
			
			var diagcdto = ds_main_list1_surelist.getColumn(row, "diagcdto");
			var diagnmto = ds_main_list1_surelist.getColumn(row, "diagnmto");
			
			if((utlf_isNull(diagcdto) || diagcdto == "-" ) && (utlf_isNull(diagnmto)|| diagnmto == "-" ))
			{
				ds_main_list1_surelist.setColumn(row, "diagcdto", ds_main_list1_surelist.getColumn(row, "diagcdfrom"));
				ds_main_list1_surelist.setColumn(row, "diagnmto", ds_main_list1_surelist.getColumn(row, "diagnmfrom"));
			}
		}
		if (col == "diagcdto")
		{
			ds_main_list1_surelist.setColumn(row, "diagnmto", ds_temp_calcdiagnm.getColumn(0, "hngnm"));
			var diagcdfrom = ds_main_list1_surelist.getColumn(row, "diagcdfrom");
			var diagnmfrom = ds_main_list1_surelist.getColumn(row, "diagnmfrom");
			
			if((utlf_isNull(diagcdfrom) || diagcdfrom == "-" ) && (utlf_isNull(diagnmfrom) || diagnmfrom == "-" ))
			{
				ds_main_list1_surelist.setColumn(row, "diagcdfrom", ds_main_list1_surelist.getColumn(row, "diagcdto"));
				ds_main_list1_surelist.setColumn(row, "diagnmfrom", ds_main_list1_surelist.getColumn(row, "diagnmto"));
			}
		}
	}
}

function group3_btn_addRow_onclick(obj:Button,  e:ClickEventInfo)
{
	fAddRow();
}

function fAddRow()
{	
	var row = ds_main_list1_surelist.addRow();
	
	ds_main_list1_surelist.setColumn(row, "orddeptcd", "-");
	ds_main_list1_surelist.setColumn(row, "diaggubun", "-");
	ds_main_list1_surelist.setColumn(row, "amt", "0");
	ds_main_list1_surelist.setColumn(row, "earncls1", "-");
	ds_main_list1_surelist.setColumn(row, "earncls2", "-");
	
	fEarncls1(row,false);
	
	ds_main_list1_surelist.setColumn(row, "anticanflag", "-");
	ds_main_list1_surelist.setColumn(row, "changeflag", "I");
}

function group3_btn_delRow_onclick(obj:Button,  e:ClickEventInfo)
{
	fDeleteRow();
}

function fDeleteRow()
{
	var row = ds_main_list1_surelist.rowposition;
	var rowstatus = ds_main_list1_surelist.getRowType(row);
			
	if (rowstatus == 2)
	{
		ds_main_list1_surelist.deleteRow(row);
	} 
	else 
	{
		var arrRow = new Array();
		arrRow[0] = row; 
		grdf_setStatus(group3.grd_surelist, "D", arrRow);
	}
}

function grp_btn_btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( fCheckSaveInfo() == false ) 
	{
		return;
	}

	var oParam = {};
		oParam.id          = "TXPIB00501";
		oParam.service     = "insubasecdmngtapp.AsrtJudgCd";
		oParam.method      = "reqExePicmsureCd";
		oParam.inds        = "req=ds_main_list1_surelist:U";
		oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TXPIB00501";

	tranf_submit(oParam);
}

function cf_TXPIB00501(sSvcId, nErrorCode, sErrorMsg)
{
    if(nErrorCode < 0)
    {
		return;
	}
	else
	{
		fSelectLIst();
		
		sysf_messageBox("정상적으로 저장되었습니다.", "I999");
	}
}

function fCheckSaveInfo()
{
	for(var i = 0; i < ds_main_list1_surelist.rowcount; i++ ) 
	{
		var rowstatus = ds_main_list1_surelist.getRowType(i);

		if (rowstatus == 2) 
		{
			var changeflag = ds_main_list1_surelist.getColumn(i, "changeflag");
			
			if (changeflag == "I")
			{
				var arrRow = new Array();
				arrRow[0] = i; 
				grdf_setStatus(group3.grd_surelist, "I", arrRow);
			}
		}
	}

	var updtdata = grdf_getGridUpdateData(group3.grd_surelist);

	if (updtdata.rowcount == 0) 
	{
		sysf_messageBox("변경된 데이터가","I004"); // 변경된 데이이터가 없습니다.
		return false;
	}

	for(var i = 0; i < ds_main_list1_surelist.rowcount; i++ ) 
	{

		var rowstatus = ds_main_list1_surelist.getRowType(i);

		if(rowstatus != 1)
		{
				
			var g_surecd       = ds_main_list1_surelist.getColumn(i, "surecd");
			var g_diagcdfrom = ds_main_list1_surelist.getColumn(i, "diagcdfrom");
			var g_diagcdto    = ds_main_list1_surelist.getColumn(i, "diagcdto");
			var g_amt           = ds_main_list1_surelist.getColumn(i, "amt");
			var g_earncls1    = ds_main_list1_surelist.getColumn(i, "earncls1");
			var g_earncls2    = ds_main_list1_surelist.getColumn(i, "earncls2");
			var g_calcscorcd = ds_main_list1_surelist.getColumn(i, "calcscorcd");

			if ( g_diagcdfrom == "-" ) 
			{
				g_diagcdfrom = "";
			}
			if ( g_diagcdto     == "-" ) 
			{
				g_diagcdto    = "";
			}
			if ( g_calcscorcd == "-" ) 
			{
				g_calcscorcd = "";
			}
			if ( g_earncls1     == "-" ) 
			{
				g_earncls1     = "";
			}
			if ( g_earncls2     == "-" ) 
			{	
				g_earncls2     = "";
			}
			if ( g_amt  == "0" ) 
			{	
				g_amt = "";
			}

			if (utlf_isNull(g_surecd))
			{
				sysf_messageBox("필수항목구분은","I003");
				return false;
			}

			if ( g_surecd == "1" ) 
			{
				if (utlf_isNull(g_diagcdfrom) || utlf_isNull(g_diagcdto))
				{
					sysf_messageBox("상병 구분일때 시작,종료상병은","I003");
					return false;
				}
				if (!utlf_isNull(g_amt))
				{
					sysf_messageBox("상병 구분일때 금액은 제외대상입니다.","I999");
					return false;
				}
				if (!utlf_isNull(g_calcscorcd))
				{
					sysf_messageBox("상병 구분일때 수가코드는 제외대상입니다.","I999");
					return false;
				}
				if ( !utlf_isNull(g_earncls1) || !utlf_isNull(g_earncls2))
				{
					sysf_messageBox("상병 구분일때 처방분류는 제외대상입니다.","I999");
					return false;
				}
			}

			if ( g_surecd == "2" || g_surecd == "3" ) 
			{
				if (!utlf_isNull(g_diagcdfrom) || !utlf_isNull(g_diagcdto))
				{
					sysf_messageBox("진료비 구분일때 시작,종료상병은 제외대상입니다.","I999");
					return false;
				}
				if (utlf_isNull(g_amt))
				{
					sysf_messageBox("진료비 구분일때 금액은","I003");
					return false;
				}
				if (!utlf_isNull(g_calcscorcd))
				{
					sysf_messageBox("진료비 구분일때 수가코드는 제외대상입니다.","I999");
					return false;
				}
				if (!utlf_isNull(g_earncls1) || !utlf_isNull(g_earncls2))
				{
					sysf_messageBox("진료비 구분일때 처방분류는 제외대상입니다.","I999");
					return false;
				}
			}

			if ( g_surecd == "4" ) 
			{
				if ( !utlf_isNull(g_diagcdfrom) || !utlf_isNull(g_diagcdto))
				{
					sysf_messageBox("처방분류 구분일때 시작,종료상병은 제외대상입니다.","I999");
					return false;
				}
				if (!utlf_isNull(g_amt))
				{
					sysf_messageBox("처방분류 구분일때 금액은 제외대상입니다.","I999");
					return false;
				}
				if (!utlf_isNull(g_calcscorcd))
				{
					sysf_messageBox("처방분류 구분일때 수가코드는 제외대상입니다.","I999");
					return false;
				}
				if ( utlf_isNull(g_earncls1) && utlf_isNull(g_earncls2))
				{
					sysf_messageBox("처방분류 구분일때 처방분류는","I003");
					return false;
				}
			}
			
			if ( g_surecd == "5" )
			{
				if ( !utlf_isNull(g_diagcdfrom) || !utlf_isNull(g_diagcdto))
				{
					sysf_messageBox("처방코드 구분일때 시작,종료상병은 제외대상입니다.","I999");
					return false;
				}
				if (!!utlf_isNull(g_amt))
				{
					sysf_messageBox("처방코드 구분일때 금액은 제외대상입니다.","I999");
					return false;
				}
				if ( utlf_isNull(g_calcscorcd ))
				{
					sysf_messageBox("처방코드 구분일때 수가코드는","I003");
					return false;
				}
				if (!utlf_isNull(g_earncls1)|| !utlf_isNull(g_earncls2))
				{
					sysf_messageBox("처방코드 구분일때 처방분류는 제외대상입니다.","I999");
					return false;
				}
			}

			if ( g_surecd == "6" ) 
			{
				if ( !utlf_isNull(g_diagcdfrom) || !utlf_isNull(g_diagcdto))
				{
					sysf_messageBox("항암제 구분일때 시작,종료상병은 제외대상입니다.","I999");
					return false;
				}
				if ( !utlf_isNull(g_amt))
				{
					sysf_messageBox("항암제 구분일때 금액은 제외대상입니다.","I999");
					return false;
				}
				if ( !utlf_isNull(g_calcscorcd))
				{
					sysf_messageBox("항암제 구분일때 수가코드는 제외대상입니다.","I999");
					return false;
				}
				if ( !utlf_isNull(g_earncls1) || !utlf_isNull(g_earncls2))
				{
					sysf_messageBox("항암제 구분일때 처방분류는 제외대상입니다.","I999");
					return false;
				}
			}
		}
	}
	return true;
}

function grp_btn_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	fInitialize();
	fAddRow();
}
]]></Script>
  </Form>
</FDL>