YNU_JEUS/app_home/himed/xpapps/ast/examcurexp/xp/SMAEB02800_핵종사용량일정관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAEB02800" position="absolute 0 0 1086 766" titletext="핵종사용량일정관리" oninit="SMAEB02800_oninit" onload="SMAEB02800_onload">
    <Layouts>
      <Layout>
        <Static text="핵종 사용량 일정" position="absolute 1 47 182 69" id="caption22" class="tit_2"/>
        <Shape position="absolute 0 63 1084 69" linetype="horizontal" id="line1" class="line_10"/>
        <Shape position="absolute 0 0 1084 39" id="roundrect1" type="roundrectangle"/>
        <Button position="absolute 1022 10 1078 32" id="btn_req" class="btn1" text="조회" onclick="btn_req_onclick"/>
        <Shape position="absolute 1003 8 1009 35" linetype="vertical" id="line3"/>
        <Static text="조회기간 :" position="absolute 5 11 96 28" id="caption1" class="search_name"/>
        <Calendar position="absolute 95 10 180 29" id="input1"/>
        <Calendar position="absolute 201 10 286 29" id="input2"/>
        <Static text="~" position="absolute 185 11 205 31" id="caption2"/>
        <Static text="등록번호 :" position="absolute 322 10 413 27" id="caption5" class="search_name"/>
        <Edit position="absolute 413 10 501 29" id="input4" onkeydown="input4_onkeydown"/>
        <Button position="absolute 504 11 520 27" id="btn_getpatinfo" class="icon_search" text="" onclick="btn_getpatinfo_onclick"/>
        <Grid position="absolute 0 68 1084 575" id="grd_therapy" binddataset="ds_main_therpinfo_therplist" autofittype="col" cellsizingtype="col" onkeydown="grd_therapy_onkeydown" onexpanddown="grd_therapy_onexpanddown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="20"/>
                <Column size="100"/>
                <Column size="104"/>
                <Column size="96"/>
                <Column size="161"/>
                <Column size="85"/>
                <Column size="0"/>
                <Column size="87"/>
                <Column size="259"/>
                <Column size="79"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="genrdd"/>
                <Cell col="1" text="genrno"/>
                <Cell col="2"/>
                <Cell col="3" text="일자"/>
                <Cell col="4" text="환자명"/>
                <Cell col="5" text="등록번호"/>
                <Cell col="6" text="진료과"/>
                <Cell col="7" text="병실"/>
                <Cell col="8" text="의사ID"/>
                <Cell col="9" text="의사명"/>
                <Cell col="10" text="검사"/>
                <Cell col="11" text="Dose(mCi)"/>
                <Cell col="12" text="변경불가"/>
              </Band>
              <Band id="body">
                <Cell text="bind:genrdd"/>
                <Cell col="1" text="bind:genrno"/>
                <Cell col="2" celltype="head"/>
                <Cell col="3" displaytype="date" edittype="date" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:rsrvdd" mask="yyyy-MM-dd"/>
                <Cell col="4" displaytype="text" edittype="text" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:hngnm" editautoselect="true" expandshow="show"/>
                <Cell col="5" displaytype="text" edittype="text" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:pid"/>
                <Cell col="6" displaytype="combo" edittype="combo" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:orddeptcd" combodataset="ds_init_orddeptcd" combocodecol="cd" combodatacol="nm"/>
                <Cell col="7" displaytype="combo" edittype="combo" style="align:center middle;background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:roomcd" combodataset="ds_init_item_roomlist" combocodecol="roomcd" combodatacol="roomnm"/>
                <Cell col="8" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:orddrnm"/>
                <Cell col="9" displaytype="combo" edittype="combo" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:orddrid" combodataset="ds_init_orddrid" combocodecol="cd" combodatacol="nm"/>
                <Cell col="10" displaytype="combo" edittype="combo" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:calcscorcd" combodataset="ds_init_item_examcurecdlist" combocodecol="excucd" combodatacol="excucdnm"/>
                <Cell col="11" displaytype="number" edittype="text" style="background:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');background2:EXPR(rsrvdd &lt; utlf_getCurrentDate() ? '#F0FFFF' : '#ffffff');" text="bind:doseval" mask="#,###.000"/>
                <Cell col="12" displaytype="combo" edittype="combo" text="bind:updtimpsiyn"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Div position="absolute 335 116 746 286" id="group1" style="border:1 solid #808080ff ;" visible="false">
          <Layouts>
            <Layout>
              <Static text="환자정보" position="absolute 0 1 144 22" id="caption3" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 18 408 24" linetype="horizontal" id="line2" class="line_10" anchor="default"/>
              <Grid position="absolute 0 23 409 144" id="grd_patinfopopup" binddataset="ds_init_patnm" anchor="default" autofittype="col" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="107"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="등록번호"/>
                      <Cell col="1" text="환자명"/>
                      <Cell col="2" text="진료과"/>
                      <Cell col="3" text="진료의사"/>
                      <Cell col="4" text="진료과코드"/>
                      <Cell col="5" text="의사코드"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:pid"/>
                      <Cell col="1" text="bind:hngnm"/>
                      <Cell col="2" text="bind:deptnm"/>
                      <Cell col="3" text="bind:drnm"/>
                      <Cell col="4" text="bind:deptcd"/>
                      <Cell col="5" text="bind:drid"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 323 146 365 165" id="button1" class="btn2" text="확인" anchor="default"/>
              <Button position="absolute 367 146 409 165" id="button2" class="btn2" text="취소" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 991 43 1033 62" id="btn_save" class="btn2" text="저장" onclick="btn_save_onclick"/>
        <Button position="absolute 883 43 936 62" id="btn_add" class="btn2" text="행추가" onclick="btn_add_onclick"/>
        <Button position="absolute 937 43 990 62" id="btn_del" class="btn2" text="핵삭제" onclick="btn_del_onclick"/>
        <Edit readonly="true" position="absolute 530 10 602 29" id="ipt_patnm" enable="false"/>
        <Button position="absolute 1034 43 1084 62" id="button3" class="btn6" text="출력" onclick="button3_onclick"/>
        <Grid position="absolute 0 600 1085 735" id="grd_nuclcdapplist" binddataset="ds_main_list2_nuclcdapplist" autofittype="col" cellsizingtype="col" onexpanddown="grd_nuclcdapplist_onexpanddown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="21"/>
                <Column size="100"/>
                <Column size="120"/>
                <Column size="100"/>
                <Column size="150"/>
                <Column size="100"/>
                <Column size="53"/>
                <Column size="433"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="기준일자"/>
                <Cell col="1" text="지원부서코드"/>
                <Cell col="2" text="일련번호"/>
                <Cell col="3"/>
                <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="비고"/>
              </Band>
              <Band id="body">
                <Cell text="bind:basedd"/>
                <Cell col="1" text="bind:suppdeptcd"/>
                <Cell col="2" text="bind:seqno"/>
                <Cell col="3" celltype="head" expr="currow+1"/>
                <Cell col="4" displaytype="date" edittype="date" text="bind:appdd" mask="yyyy-MM-dd"/>
                <Cell col="5" displaytype="combo" edittype="combo" text="bind:nuclcd" combodataset="ds_combo_itemlist_item" combocodecol="itemcd" combodatacol="itemnm"/>
                <Cell col="6" displaytype="text" edittype="text" text="bind:suplcmpy" expandshow="show"/>
                <Cell col="7" displaytype="none" edittype="none" text="bind:suplcmpynm"/>
                <Cell col="8" displaytype="number" edittype="text" style="align:right middle;" text="bind:appqty" mask="#,###.00"/>
                <Cell col="9" displaytype="checkbox" edittype="checkbox" text="bind:cnfmyn"/>
                <Cell col="10" displaytype="text" edittype="text" text="bind:rem"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="핵종별 신청내역" position="absolute 0 582 149 603" id="caption4" class="tit_2"/>
        <Button position="absolute 976 580 1029 599" id="button5" class="btn2" text="행추가" onclick="button5_onclick"/>
        <Button position="absolute 1031 580 1084 599" id="btn_grddel" class="btn2" text="행삭제" onclick="btn_grddel_onclick"/>
        <Button position="absolute 1025 740 1081 762" id="btn_close" class="btn4" text="닫기" onclick="btn_close_onclick"/>
        <Button position="absolute 910 740 966 762" id="button4" class="btn4" text="저장" onclick="button4_onclick"/>
        <Button position="absolute 967 740 1023 762" id="btn_print" class="btn4" text="출력" onclick="btn_print_onclick"/>
        <Edit position="absolute 590 740 680 759" id="ipt_suplcmpynm" visible="false"/>
        <Edit position="absolute 370 740 455 759" id="ipt_suplcmpy" visible="false"/>
        <Button position="absolute 829 43 855 62" id="btn_Previous" class="icon_left" text="" onclick="btn_Previous_onclick"/>
        <Button position="absolute 856 43 882 62" id="button6" class="icon_right" text="" onclick="button6_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="wardcd"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="today" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bdioflag" type="STRING" size="256" sumtext="체내외구분"/>
          <Column id="itemcd" type="STRING" size="256" sumtext="핵종코드"/>
          <Column id="itemflag" type="STRING" size="256" sumtext="핵종코드"/>
          <Column id="suppdeptcd" type="STRING" size="256" sumtext="지원부서"/>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="mon" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="bdioflag">I</Col>
            <Col id="itemflag">N</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchexamcurecd" type="STRING" size="256" sumtext="검사코드"/>
          <Column id="srchexamcurenm" type="STRING" size="256" sumtext="검사코드명"/>
          <Column id="basesuppdeptcd" type="STRING" size="256" sumtext="지원부서코드"/>
          <Column id="newoldyb" type="STRING" size="256" sumtext="구/신코드여부"/>
          <Column id="excuroomcd" type="STRING" size="256" sumtext="검사실코드"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="병통코드"/>
        </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"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_item_roomlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="roomnm" type="STRING" size="256"/>
        </ColumnInfo>
      </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="nm" type="STRING" size="256"/>
          <Column id="cd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_item_examcurecdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="excucdnm" type="STRING" size="256"/>
          <Column id="excucd" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_combo_itemlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bdioflag" type="STRING" size="256" sumtext="체내외구분"/>
          <Column id="itemflag" type="STRING" size="256" sumtext="물품구분"/>
          <Column id="itemcd" type="STRING" size="256" sumtext="물품코드"/>
          <Column id="instcd" type="STRING" size="256" sumtext="병원구분"/>
          <Column id="suppdeptcd" type="STRING" size="256" sumtext="지원부서"/>
          <Column id="itemnm" type="STRING" size="256" sumtext="항목명"/>
          <Column id="speccd" type="STRING" size="256" sumtext="규격"/>
          <Column id="rem" type="STRING" size="256" sumtext="비고"/>
          <Column id="nuclcd" type="STRING" size="256" sumtext="핵종구분"/>
          <Column id="minkeepdayno" type="STRING" size="256" sumtext="최소보관일수"/>
          <Column id="alimitqty" type="STRING" size="256" sumtext="년간허용량"/>
          <Column id="itemgrpcd" type="STRING" size="256" sumtext="항목명그룹"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_therpinfo_therplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="genrdd" type="STRING" size="256" sumtext="발생일자"/>
          <Column id="genrno" type="STRING" size="256" sumtext="발생번호"/>
          <Column id="rsrvdd" type="STRING" size="256" sumtext="예약일자"/>
          <Column id="calcscorcd" type="STRING" size="256" sumtext="수가코드"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="wardcd" type="STRING" size="256" sumtext="병동코드"/>
          <Column id="roomcd" type="STRING" size="256" sumtext="병실코드"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="진료의사ID"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="의사명"/>
          <Column id="doseval" type="STRING" size="256" sumtext="Dose값"/>
          <Column id="updtimpsiyn" type="STRING" size="256" sumtext="수정여부"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_patnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_list2_nuclcdapplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basedd" type="STRING" size="256"/>
          <Column id="suppdeptcd" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="appdd" type="STRING" size="256"/>
          <Column id="nuclcd" type="STRING" size="256"/>
          <Column id="suplcmpy" type="STRING" size="256"/>
          <Column id="suplcmpynm" type="STRING" size="256"/>
          <Column id="appqty" type="STRING" size="256"/>
          <Column id="cnfmyn" type="STRING" size="256"/>
          <Column id="rem" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_data2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input1" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item1" compid="input2" propid="value" datasetid="ds_main_cond" columnid="todd"/>
      <BindItem id="item2" compid="input4" propid="value" datasetid="ds_main_cond" columnid="pid"/>
      <BindItem id="item3" compid="ipt_patnm" propid="value" datasetid="ds_main_cond" columnid="hngnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "ast_commonxp::AST.xjs";
include "ast_examcurexp::AEZ0001.xjs";

var vSuppdeptcd ;
function SMAEB02800_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj); 
}

function SMAEB02800_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_therapy);
	grdf_initGrid(grd_nuclcdapplist);
	
	grdf_setRowTypeIcon(grd_therapy, 2);
	fInitialize();
}

function fInitialize()
{
	lf_aezfSetSuppDeptcd();
	
	ds_init.setColumn(0, "today", utlf_getCurrentDate());
	
	var fromdd = ((utlf_getCurrentDate()).toDate()).getAddDate(-7);
	ds_main_cond.setColumn(0, "fromdd", fromdd.getDateFormat());
	
	var todd = ((utlf_getCurrentDate()).toDate()).getAddDate(7);   
	ds_main_cond.setColumn(0, "todd", todd.getDateFormat());
   
    dsf_createDsRow("ds_req", [{col:"sess_posinstcd", type:"STRING", size:256 , val : ""}
                            ,  {col:"dridsorttype"  , type:"STRING", size:256 , val : ""}]);
	var oParam = {};
		oParam.id          = "TRPMOCOM01";
		oParam.service     = "pamcomnapp.PamComn";
		oParam.method      = "reqGetComCD";
		oParam.inds        = "req=ds_req";
		oParam.outds       = "ds_init_orddeptcd=orddeptcd ds_init_orddrid=orddrid";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPMOCOM01";

	tranf_submit(oParam);
	
	vSuppdeptcd = frmf_getPrestDeptCd()
	
	ds_send.setColumn(0, "wardcd", "3050135000");
	ds_send.setColumn(0, "suppdeptcd", vSuppdeptcd);
	
	ds_send_reqdata.setColumn(0, "newoldyb", "1");
	ds_send_reqdata.setColumn(0, "srchexamcurecd", "THD%");
	
	var oParam = {};
		oParam.id          = "TRAEB02802";
		oParam.service     = "examcurebaseapp.NuclBase";
		oParam.method      = "reqGetInitTherapyScheCodeList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_init_item_examcurecdlist=examcurecdlist ds_init_item_roomlist=roomlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAEB02802";

	tranf_submit(oParam);
   
	var oParam = {};
		oParam.id          = "TRAEB01802";
		oParam.service     = "examcurebaseapp.GoodCode";
		oParam.method      = "reqGetNuclCodeListNew";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_combo_itemlist_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAEB01802";

	tranf_submit(oParam);

}

function input4_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		
		fReqTherapyInfo();
	}
}

function fReqTherapyInfo()
{
	var oParam = {};
		oParam.id          = "TRAEB02801";
		oParam.service     = "examcurebaseapp.NuclBase";
		oParam.method      = "reqGetTherapyScheInfo";
		oParam.inds        = "req=ds_main_cond";
		oParam.outds       = "ds_main_therpinfo_therplist=therplist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAEB02801";

	tranf_submit(oParam);
}

function btn_getpatinfo_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send_data2.setColumn(0, "srchcond", "2");
	ds_send_data2.setColumn(0, "pid", input4.value);
	
	var objArg = new Object();
		objArg.arg_ds_send = ds_send_data2;
	
	frmf_modal("SPPMC02500", "SPPMC02500", objArg, "", "", "", "", "", "", "", "", "", "M");
	
	var sPid = ds_patinfolist.getColumn(0, "pid");
	var sHngnm = ds_patinfolist.getColumn(0, "hngnm");
	
	ds_main_cond.setColumn(0, "pid", sPid);
	ds_main_cond.setColumn(0, "hngnm", sHngnm);
}

function btn_req_onclick(obj:Button,  e:ClickEventInfo)
{
	fReqTherapyInfo();
}

function btn_Previous_onclick(obj:Button,  e:ClickEventInfo)
{
	var setDate = ds_main_cond.getColumn(0, "fromdd");
	var sysDate = setDate.toDate("YYYYMMDD");
	
	var nowDate = sysDate.getAddDate(-14,"D");
	nowDate = nowDate.getDateFormat("YYYYMMDD");

	ds_main_cond.setColumn(0, "fromdd", nowDate);
	ds_main_cond.setColumn(0, "todd", setDate);
	
	fReqTherapyInfo();
}

function button6_onclick(obj:Button,  e:ClickEventInfo)
{
	var setDate = ds_main_cond.getColumn(0, "todd");
	var sysDate = setDate.toDate("YYYYMMDD");
	
	var nowDate = sysDate.getAddDate(14,"D");
	nowDate = nowDate.getDateFormat("YYYYMMDD");

	ds_main_cond.setColumn(0, "fromdd", setDate);
	ds_main_cond.setColumn(0, "todd", nowDate);
	
	fReqTherapyInfo();
}

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

function fAddRow()
{
	var iRow = ds_main_therpinfo_therplist.addRow();
	
	ds_main_therpinfo_therplist.setColumn(iRow, "genrdd", utlf_getCurrentDate());
	ds_main_therpinfo_therplist.setColumn(iRow, "rsrvdd", utlf_getCurrentDate());
	ds_main_therpinfo_therplist.setColumn(iRow, "calcscorcd", "THD071N");
	ds_main_therpinfo_therplist.setColumn(iRow, "updtimpsiyn", "N");
	
	grd_therapy.setCellPos(grd_therapy.getBindCellIndex("body", "hngnm"));
	grd_therapy.showEditor(true);
}

function btn_del_onclick(obj:Button,  e:ClickEventInfo)
{
	fDelRow();
}

function fDelRow()
{
	var iRow = ds_main_therpinfo_therplist.rowposition
	var updtimpsiyn = ds_main_therpinfo_therplist.getColumn(iRow, "updtimpsiyn");

	if (updtimpsiyn == "Y") 
	{
		sysf_messageBox("해당 핵종에 대해서는 임의로 삭제를", "E001"); 
		return false;
	}

	var iStatus = ds_main_therpinfo_therplist.getRowType(iRow);
	  
	if(iStatus == 2)
	{
		ds_main_therpinfo_therplist.deleteRow(iRow);
	}
	else
	{
		var arrRow = new Array();
			arrRow[0] = iRow; 
		grdf_setStatus(grd_therapy, "D", arrRow);
	}
}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	fSaveTherapyInfo();
}

function fSaveTherapyInfo()
{
	if(fChkValidSaveData()==true)
	{
		var oParam = {};
			oParam.id          = "TXAEB02801";
			oParam.service     = "examcurebaseapp.NuclBase";
			oParam.method      = "reqExeSaveTherapyScheInfo";
			oParam.inds        = "req=ds_main_therpinfo_therplist:U";
			oParam.outds       = "ds_main_therpinfo_therplist=therplist";
			oParam.async       = false;
			oParam.callback    = "cf_TXAEB02801";

		tranf_submit(oParam);
	}
}

function cf_TXAEB02801(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    else
    {
		fReqTherapyInfo();	
		fSetAuthGrid();
    }
}
function fChkValidSaveData()
{
	var update = grdf_getGridUpdateData(grd_therapy).rowcount;
	
	if (update == 0) 
	{
		sysf_messageBox("저장할 내역이", "I004");
		return;
	} 
	else 
	{
		var sDoseVal = ds_main_therpinfo_therplist.lookup("doseval", "", "rsrvdd");
		var sRoomCD  = ds_main_therpinfo_therplist.lookup("roomcd", "", "rsrvdd");
		var sPid     = ds_main_therpinfo_therplist.lookup("pid", "", "rsrvdd");
		var sHngNM   = ds_main_therpinfo_therplist.lookup("hngnm", "", "rsrvdd");
		var sDeptCD  = ds_main_therpinfo_therplist.lookup("orddeptcd", "", "rsrvdd");
		var sOrddrid  = ds_main_therpinfo_therplist.lookup("orddrid", "", "rsrvdd");
	   
		if (!utlf_isNull(sDoseVal))
		{
			sysf_messageBox("Dose 값을", "C001"); 
			return false;
		} 
		else if (!utlf_isNull(sPid))
		{
			sysf_messageBox("등록번호를 ", "C001");
			return false;
		} 
		else if (!utlf_isNull(sHngNM))
		{
			sysf_messageBox("환자명를 ", "C001");
			return false;
		} 
		else if (!utlf_isNull(sDeptCD))
		{
			sysf_messageBox("진료과 ", "C001");
			return false;
		}
		else if (!utlf_isNull(sOrddrid))
		{
			sysf_messageBox("진료의 ", "C001");
			return false;
		} 
		else 
		{
			return true;
		}
	}
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	for (var row = 0; row < ds_main_therpinfo_therplist.rowcount; row++) 
	{
		dsf_makeValue(ds_main_therpinfo_therplist, "calcscornm", "string", ds_init_item_examcurecdlist.lookup("excucd", ds_main_therpinfo_therplist.getColumn(row, "calcscorcd"), "excucdnm"), row);
		dsf_makeValue(ds_main_therpinfo_therplist, "orddeptnm", "string", ds_init_orddeptcd.lookup("cd", ds_main_therpinfo_therplist.getColumn(row, "orddeptcd"), "nm"), row);
	}
	
	var objDOM = rptf_createDOM();                // DOM 객체 설정 
		rptf_setNodeListToDOM(objDOM, "/root/main/therpinfo/therplist", ds_main_therpinfo_therplist);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;callno=0321234567;faxno=0323298384";
	
	rptf_exeReportPreview30(["RPAEB02800"],[objParam], option);
}

function grd_therapy_onkeydown(obj:Grid, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		obj.updateToDataset();
		
		if(obj.currentcol == obj.getBindCellIndex("Body", "pid") || obj.currentcol == obj.getBindCellIndex("Body", "hngnm"))
		{
			var iRow = obj.currentrow;
		
			ds_send_data2.setColumn(0, "pid", ds_main_therpinfo_therplist.getColumn(iRow, "pid"));
			ds_send_data2.setColumn(0, "hngnm", ds_main_therpinfo_therplist.getColumn(iRow, "hngnm"));
			
			var oParam = {};
				oParam.id          = "TRAEB02802";
				oParam.service     = "examcurebaseapp.NuclBase";
				oParam.method      = "reqGetPatNM";
				oParam.inds        = "req=ds_send_data2";
				oParam.outds       = "ds_patinfolist=patinfolist";
				oParam.async       = false;
				oParam.callback    = "cf_TRAEB02802";

			tranf_submit(oParam);
		}
	}
}

function cf_TRAEB02802(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    else
    {
		ds_main_therpinfo_therplist.setColumn(ds_main_therpinfo_therplist.rowposition, "pid", ds_patinfolist.getColumn(0, "pid"));
		ds_main_therpinfo_therplist.setColumn(ds_main_therpinfo_therplist.rowposition, "hngnm", ds_patinfolist.getColumn(0, "hngnm"));
    }
}

function grd_therapy_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	fClkGrdInptBtn();
}

function fClkGrdInptBtn()
{
	frmf_modal("SPPMC02500", "SPPMC02500", "", "", "", "", "", "", "", "", "", "", "M");
	
	var sPid   = ds_patinfolist.getColumn(0, "pid");
	var sHngnm = ds_patinfolist.getColumn(0, "hngnm");
	
	var iRow = ds_main_therpinfo_therplist.rowposition;

	ds_main_therpinfo_therplist.setColumn(iRow, "pid", sPid);
	ds_main_therpinfo_therplist.setColumn(iRow, "hngnm", sHngnm);
}

function grd_nuclcdapplist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	var arrArg = new Object();
	var sRtnValue;
		arrArg.sVal01 = "";
		arrArg.sVal02 = "";
		arrArg.sVal03 = sysf_getUserInfo("dutplceinstcd");
		arrArg.sVal04 = "";
	sRtnValue = frmf_modal("PPRAC00600", "PPRAC00600", arrArg, "", "", "", "", "", "", "", "", "", "M");
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_list2_nuclcdapplist.addRow();
				
	dsf_makeValue(ds_main_list2_nuclcdapplist, "basedd", "string", utlf_getCurrentDate(), row);
	dsf_makeValue(ds_main_list2_nuclcdapplist, "suppdeptcd", "string", ds_send.getColumn(0, "suppdeptcd"), row);
	dsf_makeValue(ds_main_list2_nuclcdapplist, "appdd", "string", utlf_getCurrentDate(), row);
}

function btn_grddel_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_list2_nuclcdapplist.rowposition;
	ds_main_list2_nuclcdapplist.deleteRow(row);
}

function button4_onclick(obj:Button,  e:ClickEventInfo)
{
	chkUpdatedData();
}

function chkUpdatedData()
{
	if ( sysf_messageBox("", "Q002") == 6 )
	{
		
		var nodeCnt = ds_main_list2_nuclcdapplist.rowcount;
		
		for (var i = 0; i < nodeCnt; i++) 
		{
			var appdd = ds_main_list2_nuclcdapplist.getColumn(i, "appdd");
			
			if (utlf_isNull(appdd))
			{
				sysf_messageBox("신청일자는 필수 입력입니다.", "I");
				return;
			}
			
			var rem = ds_main_list2_nuclcdapplist.getColumn(i, "rem");
			var iRemLength = utlf_getStringLength(rem);
			
			if (iRemLength > 255) 
			{
				sysf_messageBox("비고 내용이 입력 범위를 초과하였습니다.", "I");
				return;
			}
			
			var cnfmyn = ds_main_list2_nuclcdapplist.getColumn(i, "cnfmyn");
			
			if (cnfmyn == "true") 
			{
				ds_main_list2_nuclcdapplist.setColumn(i, "cnfmyn", "Y");
			} 
			else 
			{
				ds_main_list2_nuclcdapplist.setColumn(i, "cnfmyn", "N");
			}
		}
		
		var update = grdf_getGridUpdateData(grd_nuclcdapplist).rowcount;
		
		if ( update == 0)
		{
			sysf_messageBox("업데이트 정보가 없습니다.", "I");
			return;
		} 
		else 
		{
			var oParam = {};
				oParam.id          = "TXAEB02701";
				oParam.service     = "examcurebaseapp.NuclBase";
				oParam.method      = "reqExeNuclAppQtyRgst";
				oParam.inds        = "req=ds_main_list2_nuclcdapplist:U";
				oParam.outds       = "";
				oParam.async       = false;
				oParam.callback    = "cf_TXAEB02701";

			tranf_submit(oParam);
		}
	}
}

function cf_TXAEB02701(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) return;
    else
    {
		dsf_createDsRow("ds_req", [{col:"suppdeptcd", type:"STRING", size:256 , val : vSuppdeptcd}
							    ,  {col:"instcd"	, type:"STRING", size:256 , val : sysf_getUserInfo("dutplceinstcd")}
							    ,  {col:"basedd"	, type:"STRING", size:256 , val : utlf_getCurrentDate()}
							    ,  {col:"nuclcd"	, type:"STRING", size:256 , val : ""}]);
		var oParam = {};
			oParam.id          = "TRAEB02702";
			oParam.service     = "examcurebaseapp.NuclBase";
			oParam.method      = "reqGetNuclAppQtyList";
			oParam.inds        = "req=ds_req";
			oParam.outds       = "ds_main_list2_nuclcdapplist=nuclcdapplist";
			oParam.async       = false;
			//oParam.callback    = "cf_TRAEB02702";

		tranf_submit(oParam);
	}
}

function btn_print_onclick(obj:Button,  e:ClickEventInfo)
{
	var objDOM = rptf_createDOM();                // DOM 객체 설정 
		rptf_setNodeListToDOM(objDOM, "/root/tmp/list1/nuclcdlist", ds_main_list2_nuclcdapplist);
	var objParam = new Object();
		objParam.xml_data_XML1 = objDOM.documentElement.source;          // 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;callno=0321234567;faxno=0323298384";
	
	rptf_exeReportPreview30(["RPAEB02700"],[objParam], option);
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}
]]></Script>
  </Form>
</FDL>