YNU_JEUS/app_home/himed/xpapps/lis/plgyrsltmngtxp/xp/SPLPR03000_CVR관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLPR03000" position="absolute 0 0 581 484" titletext="CVR 관리" oninit="SPLPR03000_oninit" onload="SPLPR03000_onload" tooltiptype="default" onclose="SPLPR03000_onclose">
    <Layouts>
      <Layout>
        <Static text="CVR 관리" position="absolute 0 0 194 20" id="caption1" class="tit_1"/>
        <Div position="absolute 0 20 270 482" id="grp_left" anchor="left top">
          <Layouts>
            <Layout>
              <Static text="CVR 이력" position="absolute 0 7 220 23" align="align:left middle;" id="caption6" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 23 265 29" linetype="horizontal" id="line2" class="line_10" anchor="default"/>
              <Div position="absolute 0 28 265 60" id="roundrect2" type="roundrectangle" anchor="default" class="div_SA2">
                <Layouts>
                  <Layout>
                    <Calendar id="ipt_fromdd" taborder="3" autoselect="true" dateformat="yyyy-MM-dd" position="absolute 2 4 87 24" anchor="default"/>
                    <Static id="caption3" text="~" position="absolute 90 4 105 24" anchor="default"/>
                    <Calendar id="ipt_todd" taborder="4" autoselect="true" dateformat="yyyy-MM-dd" position="absolute 103 4 188 24" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 189 32 200 53" linetype="vertical" id="line1" anchor="default"/>
              <Button position="absolute 199 32 260 52" id="btn_search" class="btn1" anchor="default" onclick="grp_left_btn_search_onclick" text="조회"/>
              <Grid id="grd_histtree" taborder="2" binddataset="ds_cvr_hist" useinputpanel="false" selecttype="treecell" autofittype="col" treeusecheckbox="false" position="absolute 0 66 265 461" anchor="left top" oncellclick="grp_left_grd_histtree_oncellclick">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="489"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell displaytype="normal" text="CVR 이력"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="tree" edittype="tree" text="bind:displaynm" treestartlevel="1" treelevel="bind:levl" autosizecol="limitmax"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 269 20 576 482" id="grp_right" anchor="left top right">
          <Layouts>
            <Layout>
              <Static text="CVR 전송" position="absolute 0 7 220 23" align="align:left middle;" id="caption3" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 23 307 29" linetype="horizontal" id="line5" class="line_10" anchor="left top right"/>
              <Button position="absolute 203 3 245 23" id="btn_Delete" class="btn2" text="삭제" anchor="top right" onclick="grp_right_btn_Delete_onclick"/>
              <Button position="absolute 159 3 201 23" id="btn_New" class="btn2" text="신규" anchor="top right" onclick="grp_right_btn_New_onclick"/>
              <Button position="absolute 251 3 307 23" id="btn_Save" class="btn4" text="저장" anchor="top right" onclick="grp_right_btn_Save_onclick"/>
              <Static id="caption4" text="등록번호" class="cell_1" position="absolute 0 28 70 51" anchor="default" style="padding:0 0 0 5;"/>
              <Static id="caption8" text="비고" class="cell_1" position="absolute 0 211 70 244" anchor="default" style="padding:0 0 0 5;"/>
              <TextArea id="txt_rmk" taborder="1" enable="true" position="absolute 72 211 307 244" anchor="left top"/>
              <Calendar id="cal_senddd" taborder="5" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" position="absolute 72 321 160 341" anchor="default" value="null" editformat="yyyy-MM-dd"/>
              <MaskEdit id="ipt_sendtm" taborder="7" position="absolute 168 321 208 341" mask="##:##" trimtype="both" type="string" style="align:center middle;" anchor="default" ontextchanged="grp_right_ipt_sendtm_ontextchanged"/>
              <Static id="caption01" text="환자명" class="cell_1" position="absolute 0 52 70 75" onclick="grp_right_caption01_onclick" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_pid" taborder="13" autoselect="true" class="input_default" position="absolute 72 31 187 51" anchor="default" enable="true" style="font:arial,9,bold; :disabled {font:arial,9,bold;}" readonly="true"/>
              <Edit id="ipt_hngnm" taborder="14" autoselect="true" class="input_default" position="absolute 72 55 187 75" anchor="default" enable="true" style="font:arial,9,bold; :disabled {font:arial,9,bold;}" readonly="true"/>
              <Static id="caption02" text="참조키" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 76 70 99" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_refkey" taborder="15" autoselect="true" class="input_default" position="absolute 72 78 307 98" anchor="default" enable="true" style=":disabled {font:arial,9,bold;}" readonly="true"/>
              <Static id="caption05" text="CVR기준" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 124 70 147" anchor="default" style="padding:0 0 0 5;"/>
              <Static id="caption06" text="진단" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 100 70 123" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_diagcnts" taborder="17" autoselect="true" class="input_default" position="absolute 72 101 307 121" anchor="default" enable="true" tooltiptype="hover" readonly="true"/>
              <Static id="caption07" text="전송내용" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 149 70 209" anchor="default" style="padding:0 0 0 5;"/>
              <TextArea id="txt_cvrmsg" taborder="18" enable="true" position="absolute 72 149 307 209" anchor="left top"/>
              <Static id="caption09" text="전송자" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 270 70 293" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_sendnm" taborder="19" autoselect="true" class="input_default" position="absolute 72 273 275 293" anchor="default" enable="true" readonly="true"/>
              <Static id="caption11" text="전송시간" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 318 70 341" anchor="default" style="padding:0 0 0 5;"/>
              <Static id="caption12" text="수신자" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 342 70 365" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_pid05" taborder="20" autoselect="true" class="input_default" position="absolute 168 345 275 365" anchor="default" enable="true" readonly="true"/>
              <Static id="caption13" text="수신번호" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 366 70 389" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_recvtelno" taborder="21" autoselect="true" class="input_default" position="absolute 72 368 307 388" anchor="default"/>
              <Static id="caption00" text="통보방법" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 246 70 269" anchor="default" style="padding:0 0 0 5;"/>
              <Static id="caption10" text="확인시간" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 390 70 413" anchor="default" style="padding:0 0 0 5;"/>
              <Static id="caption14" text="조치내역" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 414 70 437" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_confmsg" taborder="24" autoselect="true" class="input_default" position="absolute 72 416 307 436" anchor="default" enable="true" readonly="true"/>
              <Radio id="rdo_sendtype" taborder="25" columncount="5" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 72 248 307 268" style="textpadding:1 0 0 4;padding:1 0 0 0;" anchor="default" onitemchanged="grp_right_rdo_sendtype_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">S</Col>
                      <Col id="datacolumn">SMS</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">T</Col>
                      <Col id="datacolumn">전화</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">V</Col>
                      <Col id="datacolumn">방문</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">B</Col>
                      <Col id="datacolumn">배치</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Combo id="cmb_recvtype" taborder="26" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 72 345 160 364" onitemchanged="grp_right_cmb_recvtype_onitemchanged" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">M</Col>
                      <Col id="datacolumn">담담교수</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">담당의</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">P</Col>
                      <Col id="datacolumn">처방의</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">T</Col>
                      <Col id="datacolumn">기타</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Button id="Button03" taborder="27" class="icon_search2" position="absolute 275 346 303 366" onclick="grp_right_Button03_onclick" anchor="default"/>
              <Button id="Button00" taborder="28" class="icon_search2" position="absolute 275 273 303 293" onclick="grp_right_Button00_onclick" anchor="default"/>
              <Combo id="cmb_rgstflag" taborder="29" codecolumn="cdid" datacolumn="cdnm" position="absolute 72 124 307 147" innerdataset="@ds_rgstflag" anchor="default" onitemchanged="grp_right_cmb_rgstflag_onitemchanged"/>
              <Static id="cap_state" position="absolute 191 31 307 76" style="color:blue;padding:0 0 0 0;align:center middle;font:arial,14,bold;" class="cell_1" anchor="default"/>
              <MaskEdit id="ipt_confdt" taborder="30" type="string" mask="####-##-## ##:##" enable="true" position="absolute 72 392 307 412" style="align:left middle; :disabled {align:left middle;}" readonly="true" anchor="default"/>
              <Button id="btn_curtime" taborder="31" text="현재시간" class="btn2" position="absolute 219 322 283 341" onclick="grp_right_btn_curtime_onclick" anchor="default"/>
              <Static id="caption15" text="전송번호" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 294 70 317" anchor="default" style="padding:0 0 0 5;"/>
              <Edit id="ipt_sendtelno" taborder="32" autoselect="true" class="input_default" position="absolute 72 296 307 316" anchor="default"/>
              <Edit id="ipt_rgstflagnm" taborder="34" autoselect="true" class="input_default" position="absolute 72 125 307 145" visible="false" readonly="true" anchor="default"/>
              <Static id="caption16" text="미확인알림" onclick="grp_right_caption01_onclick" class="cell_1" position="absolute 0 438 70 461" style="padding:0 0 0 5;" tooltiptext="전송시간부터 설정시간 이후 미확인이면 대상에게 알림 SMS 전송" anchor="default"/>
              <Static id="Static00" text="설정시간" position="absolute 200 438 251 461" style="align:left middle;" anchor="default"/>
              <Edit id="ipt_unconftime" taborder="35" autoselect="true" class="input_default" position="absolute 253 440 278 460" anchor="default" maxlength="2" inputtype="number" style="align:right middle;" inputfilter="dot,comma,sign,symbol,alpha,space"/>
              <Combo id="cmb_unconftype" taborder="36" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 72 438 187 461" anchor="default" onitemchanged="grp_right_cmb_unconftype_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn" size="256"/>
                    <Column id="datacolumn" size="256"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">전송자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">B</Col>
                      <Col id="datacolumn">수신자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">C</Col>
                      <Col id="datacolumn">전송자+수신자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">Z</Col>
                      <Col id="datacolumn">해당없음</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="Static01" text="시간" position="absolute 280 438 307 461" style="align:left middle;"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond" 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="cvrtype" type="STRING" size="256"/>
          <Column id="refkey" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="msgflag" 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"/>
      <Dataset id="ds_arg" 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="cvrtype" type="STRING" size="256"/>
          <Column id="refkey" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_rgstflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cvr_hist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="drdd" type="STRING" size="256"/>
          <Column id="dispdrdd" type="STRING" size="256"/>
          <Column id="drno" type="STRING" size="256"/>
          <Column id="fromtm" type="STRING" size="256"/>
          <Column id="rmk" type="STRING" size="256"/>
          <Column id="rank" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_cvr_info" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="genrdd" type="STRING" size="256"/>
          <Column id="genrno" type="STRING" size="256"/>
          <Column id="cvrtype" type="STRING" size="256"/>
          <Column id="refkey" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="prcpno" type="STRING" size="256"/>
          <Column id="authdeptcd" type="STRING" size="256"/>
          <Column id="authdeptnm" type="STRING" size="256"/>
          <Column id="rgstflag" type="STRING" size="256"/>
          <Column id="rgstflagnm" type="STRING" size="256"/>
          <Column id="useyn" type="STRING" size="256"/>
          <Column id="diagcnts" type="STRING" size="256"/>
          <Column id="cvrmsg" type="STRING" size="256"/>
          <Column id="rmk" type="STRING" size="256"/>
          <Column id="sendid" type="STRING" size="256"/>
          <Column id="sendnm" type="STRING" size="256"/>
          <Column id="sendtelno" type="STRING" size="256"/>
          <Column id="sendtype" type="STRING" size="256"/>
          <Column id="sendyn" type="STRING" size="256"/>
          <Column id="senddd" type="STRING" size="256"/>
          <Column id="sendtm" type="STRING" size="256"/>
          <Column id="recvtype" type="STRING" size="256"/>
          <Column id="recvid" type="STRING" size="256"/>
          <Column id="recvnm" type="STRING" size="256"/>
          <Column id="recvtelno" type="STRING" size="256"/>
          <Column id="confyn" type="STRING" size="256"/>
          <Column id="confdt" type="STRING" size="256"/>
          <Column id="confcd" type="STRING" size="256"/>
          <Column id="confmsg" type="STRING" size="256"/>
          <Column id="recvmid" type="STRING" size="256"/>
          <Column id="recvmnm" type="STRING" size="256"/>
          <Column id="recvmtelno" type="STRING" size="256"/>
          <Column id="recvaid" type="STRING" size="256"/>
          <Column id="recvanm" type="STRING" size="256"/>
          <Column id="recvatelno" type="STRING" size="256"/>
          <Column id="recvpid" type="STRING" size="256"/>
          <Column id="recvpnm" type="STRING" size="256"/>
          <Column id="recvptelno" type="STRING" size="256"/>
          <Column id="unconftime" type="STRING" size="256"/>
          <Column id="unconftype" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item17" compid="grp_right.txt_cvrmsg" propid="value" datasetid="ds_cvr_info" columnid="cvrmsg"/>
      <BindItem id="item5" compid="grp_right.txt_rmk" propid="value" datasetid="ds_cvr_info" columnid="rmk"/>
      <BindItem id="item2" compid="grp_right.cal_senddd" propid="value" datasetid="ds_cvr_info" columnid="senddd"/>
      <BindItem id="item6" compid="grp_left.roundrect2.ipt_fromdd" propid="value" datasetid="ds_cond" columnid="fromdd"/>
      <BindItem id="item7" compid="grp_left.roundrect2.ipt_todd" propid="value" datasetid="ds_cond" columnid="todd"/>
      <BindItem id="item8" compid="grp_right.ipt_sendtm" propid="value" datasetid="ds_cvr_info" columnid="sendtm"/>
      <BindItem id="item0" compid="grp_right.ipt_pid" propid="value" datasetid="ds_cvr_info" columnid="pid"/>
      <BindItem id="item1" compid="grp_right.ipt_hngnm" propid="value" datasetid="ds_cvr_info" columnid="hngnm"/>
      <BindItem id="item13" compid="grp_right.ipt_refkey" propid="value" datasetid="ds_cvr_info" columnid="refkey"/>
      <BindItem id="item15" compid="grp_right.ipt_diagcnts" propid="value" datasetid="ds_cvr_info" columnid="diagcnts"/>
      <BindItem id="item16" compid="grp_right.ipt_sendnm" propid="value" datasetid="ds_cvr_info" columnid="sendnm"/>
      <BindItem id="item18" compid="grp_right.ipt_pid05" propid="value" datasetid="ds_cvr_info" columnid="recvnm"/>
      <BindItem id="item19" compid="grp_right.ipt_recvtelno" propid="value" datasetid="ds_cvr_info" columnid="recvtelno"/>
      <BindItem id="item9" compid="grp_right.ipt_confmsg" propid="value" datasetid="ds_cvr_info" columnid="confmsg"/>
      <BindItem id="item4" compid="grp_right.rdo_sendtype" propid="value" datasetid="ds_cvr_info" columnid="sendtype"/>
      <BindItem id="item10" compid="grp_right.cmb_recvtype" propid="value" datasetid="ds_cvr_info" columnid="recvtype"/>
      <BindItem id="item11" compid="grp_right.cmb_rgstflag" propid="value" datasetid="ds_cvr_info" columnid="rgstflag"/>
      <BindItem id="item14" compid="grp_right.ipt_diagcnts" propid="tooltiptext" datasetid="ds_cvr_info" columnid="diagcnts"/>
      <BindItem id="item20" compid="grp_right.ipt_confdt" propid="value" datasetid="ds_cvr_info" columnid="confdt"/>
      <BindItem id="item3" compid="grp_right.ipt_confmsg" propid="tooltiptext" datasetid="ds_cvr_info" columnid="confmsg"/>
      <BindItem id="item21" compid="grp_right.cmb_rgstflag" propid="tooltiptext" datasetid="ds_cvr_info" columnid="rgstflagnm"/>
      <BindItem id="item22" compid="grp_right.ipt_sendtelno" propid="value" datasetid="ds_cvr_info" columnid="sendtelno"/>
      <BindItem id="item12" compid="grp_right.ipt_rgstflagnm" propid="value" datasetid="ds_cvr_info" columnid="rgstflagnm"/>
      <BindItem id="item23" compid="grp_right.ipt_unconftime" propid="value" datasetid="ds_cvr_info" columnid="unconftime"/>
      <BindItem id="item24" compid="grp_right.cmb_unconftype" propid="value" datasetid="ds_cvr_info" columnid="unconftype"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2019-02-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2019-02-19      엄영만        Create
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/


include "com_commonxp::comm_main.xjs";


function SPLPR03000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPLPR03000_onload(obj:Form, e:LoadEventInfo)
{
	var sCvrType = "";
	var sRefKey  = "";
	
	try { 
		sCvrType = gv_CVR_CVRTYPE;
		sRefKey  = gv_CVR_REFKEY;
	} catch(e) {
	}
	
	if(utlf_isNull(sCvrType)) {
		ds_arg.copyData(arg_ds_popup);
		
		sCvrType = ds_arg.getColumn(0, "cvrtype");
		sRefKey  = ds_arg.getColumn(0, "refkey");
	}
	
	//alert("sCvrType : " + sCvrType);
	//alert("sRefKey : " + sRefKey);
	
	grdf_setToolTipBind(grp_left.grd_histtree);
	
	ds_cond.setColumn(0, "cvrtype", sCvrType);
    ds_cond.setColumn(0, "refkey" , sRefKey);
    ds_cond.setColumn(0, "fromdd" , ((utlf_getCurrentDate().toDate()).getAddDate(-6,"M")).getDateFormat()); // 최근 6개월
	ds_cond.setColumn(0, "todd"   , utlf_getCurrentDate()); //종료일자는 현재일자
	
	if(sCvrType == "P") { // 병리인경우
		grp_right.caption02.text = "병리번호";
		appf_getCodeList([{dsNm: "ds_rgstflag", cdGrpId: "L0104"}], true);
	
	} else if(sCvrType == "R") { // 영상인경우
		grp_right.caption02.text = "영상번호";
		appf_getCodeList([{dsNm: "ds_rgstflag", cdGrpId: "A0667"}], true);
	
	} else if(sCvrType == "L") { // 진검인경우
		grp_right.caption02.text = "바코드번호";
		appf_getCodeList([{dsNm: "ds_rgstflag", cdGrpId: "L0106"}], true);
	}
	
	frmf_addComboItem("grp_right.cmb_rgstflag", "선택", "-");
					
	if(!utlf_isNull(sRefKey)) {
		fGetCvrInfo("", "", sCvrType, sRefKey); // CVR 정보 조회
		ds_cond.setColumn(0, "pid", ds_cvr_info.getColumn(0, "pid"));
	}
	
	if(!utlf_isNull(ds_cond.getColumn(0, "pid"))) {
		fGetCvrHist();  // CVR 이력 조회
	}
}


function grp_left_btn_search_onclick(obj:Button,  e:ClickEventInfo) {
	fGetCvrHist();
}

/**
 * @desc   : CVR 이력조회
 * @
 * @param  :
 * @return :
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fGetCvrHist(){
    var sPid = ds_cond.getColumn(0, "pid");
    if(utlf_isNull(sPid) || sPid == "-") {
		sysf_messageBox("환자 정보가 없습니다.", "E");
		return;
	}
   
    ds_cvr_hist.clearData();
	
	var oParam = {};
	oParam.id          = "TRLPR03002";
	oParam.service     = "plgyrsltmngtapp.TestRsltRgst";
	oParam.method      = "reqGetCvrHist";
	oParam.inds        = "req=ds_cond";
    oParam.outds       = "ds_cvr_hist=cvrhist";
    oParam.async       = false;
    
	tranf_submit(oParam);
		
	
	grdf_expandDepth(grp_left.grd_histtree, 2);
}

function cf_TRMMI01001(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}


function grp_left_grd_histtree_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	var nRow    = ds_cvr_hist.rowposition;	
	var sGenrDd = ds_cvr_hist.getColumn(nRow, "genrdd");
	var sGenrNo = ds_cvr_hist.getColumn(nRow, "genrno");
	
	if(!utlf_isNull(sGenrNo)) {
		fGetCvrInfo(sGenrDd, sGenrNo, "", "");
	}
}

function grp_right_btn_New_onclick(obj:Button,  e:ClickEventInfo)
{
	var sCvrType = ds_cond.getColumn(0, "cvrtype");
	var sRefKey  = ds_cond.getColumn(0, "refkey");
	
	if(!utlf_isNull(sRefKey)) {
		fGetCvrInfo("", "", sCvrType, sRefKey); // CVR 정보 조회
	}
}

/**
 * @desc   : CVR 기본정보 조회
 * @
 * @param  :
 * @return :
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fGetCvrInfo(sGenrDd, sGenrNo, sCvrType, sRefKey){
	dsf_makeValue(ds_send, "genrdd", "string", sGenrDd);	
	dsf_makeValue(ds_send, "genrno", "string", sGenrNo);	
	dsf_makeValue(ds_send, "cvrtype","string", sCvrType);	
	dsf_makeValue(ds_send, "refkey", "string", sRefKey);	
	
	var oParam = {};
	oParam.id          = "TRLPR03001";
	oParam.service     = "plgyrsltmngtapp.TestRsltRgst";
	oParam.method      = "reqGetCvrInfo";
	oParam.inds        = "req=ds_send";
	oParam.outds       = "ds_cvr_info=cvrinfo";
	oParam.async       = false;
	
	if(tranf_submit(oParam)) {
		if(ds_cvr_info.getColumn(0, "status") == "i"){ 
			grp_right.cap_state.text = "신규";

			grp_right.cmb_rgstflag.visible = true;
			grp_right.ipt_rgstflagnm.visible = false;
			
			grp_right.txt_cvrmsg.readonly = false;
			grp_right.rdo_sendtype.readonly = false;
			grp_right.ipt_sendtelno.readonly = false;
			grp_right.cal_senddd.readonly = false;
			grp_right.ipt_sendtm.readonly = false;
			grp_right.cmb_recvtype.readonly = false;
			grp_right.ipt_recvtelno.readonly = false;
			grp_right.ipt_unconftime.readonly = false;
			grp_right.cmb_unconftype.readonly = false;
			
			grp_right.btn_curtime.visible = true;
			grp_right.Button00.visible = true;
			grp_right.Button03.visible = true;
			
		} else {
			grp_right.cap_state.text = "수정";
			
			grp_right.cmb_rgstflag.visible = false;
			grp_right.ipt_rgstflagnm.visible = true;
			
			grp_right.txt_cvrmsg.readonly = true;
			grp_right.rdo_sendtype.readonly = true;
			grp_right.ipt_sendtelno.readonly = true;
			grp_right.cal_senddd.readonly = true;
			grp_right.ipt_sendtm.readonly = true;
			grp_right.cmb_recvtype.readonly = true;
			grp_right.ipt_recvtelno.readonly = true;
			grp_right.ipt_unconftime.readonly = true;
			grp_right.cmb_unconftype.readonly = true;
			
			grp_right.btn_curtime.visible = false;
			grp_right.Button00.visible = false;
			grp_right.Button03.visible = false;
		}
	}
}



function grp_right_btn_Delete_onclick(obj:Button,  e:ClickEventInfo)
{
	var sGenrNo = ds_cvr_info.getColumn(0, "genrno");	
	if(utlf_isNull(sGenrNo)) {
		sysf_messageBox("선택 된 CVR정보가 없습니다.", "E");
		return;
	}
	
	ds_cvr_info.setColumn(0, "status", "d");	 // 입력 설정
	fSaveCvrInfo();
}


function grp_right_btn_Save_onclick(obj:Button,  e:ClickEventInfo)
{
	fSaveCvrInfo();
}


/**
 * @desc   : CVR 정보 저장
 * @
 * @param  :
 * @return :
 * @author : 엄영만
 * @---------------------------------------------------
 */
function fSaveCvrInfo(){
    
    var sStatus = ds_cvr_info.getColumn(0, "status");
	if(sStatus == "u" || sStatus == "d") {
		var sDutPlceCd = sysf_getUserInfo("dutplcecd");
		var sDeptCd    = ds_cvr_info.getColumn(0, "authdeptcd");
		if(sDeptCd != sDutPlceCd ) {
			var sDeptNm = ds_cvr_info.getColumn(0, "authdeptnm");
			sysf_messageBox(sDeptNm + " 부서에서만 수정 및 삭제가 가능 합니다.", "E");
			return;
		}
	}
    
    var sMsg = "";
    if(sStatus == "i") {
		sMsg = "CVR 정보를 등록 하시겠습니까?";
    } else if(sStatus == "u") {
		sMsg = "CVR 정보를 수정 하시겠습니까?";
    } else if(sStatus == "d") {
		sMsg = "CVR 정보를 삭제 하시겠습니까?";
    }
    
    if( sysf_messageBox(sMsg, "Q999") == 6 ){  
		
        var oParam = {};
		oParam.id          = "TXLPR03001";
		oParam.service     = "plgyrsltmngtapp.TestRsltRgst";
		oParam.method      = "reqExecSaveCvr";
		oParam.inds        = "req=ds_cvr_info";
		oParam.outds       = "";
		oParam.async       = false;

		if(tranf_submit(oParam)) {
			if(sStatus == "i") {
				sMsg = "CVR 정보를 등록 하였습니다.";
			} else if(sStatus == "u") {
				sMsg = "CVR 정보를 수정 하였습니다.";
			} else if(sStatus == "d") {
				sMsg = "CVR 정보를 삭제 하였습니다.";
			}
			
			sysf_messageBox(sMsg, "I");
			fGetCvrHist();
		}
    }
}


function grp_right_Button00_onclick(obj:Button,  e:ClickEventInfo)
{
	setUserInfo("S");
}


function grp_right_Button03_onclick(obj:Button,  e:ClickEventInfo)
{
	setUserInfo("R");
}

function setUserInfo(sGubun) {
	var sRtn       = appf_openUserInfo('usernm', '', '', '', '');
	var	saUserInfo = utlf_transNullToEmpty(sRtn.userInfo).split('|');
	
	var	sUserId    = saUserInfo[0];
	var	sUserNm    = saUserInfo[1];
	var sUserTelNo = saUserInfo[16];
	
	if(sGubun == "S") {        // 전송자
		ds_cvr_info.setColumn(0, "sendid",    sUserId);
		ds_cvr_info.setColumn(0, "sendnm",    sUserNm);
		ds_cvr_info.setColumn(0, "sendtelno", sUserTelNo);
	} else if(sGubun == "R") { // 수신자
		ds_cvr_info.setColumn(0, "recvtype",  "T");
		ds_cvr_info.setColumn(0, "recvid",    sUserId);
		ds_cvr_info.setColumn(0, "recvnm",    sUserNm);
		ds_cvr_info.setColumn(0, "recvtelno", sUserTelNo);
	}
}

function grp_right_cmb_recvtype_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var sRecvType = ds_cvr_info.getColumn(0, "recvtype");
	
	if(sRecvType == "M") { 
		ds_cvr_info.setColumn(0, "recvid",    ds_cvr_info.getColumn(0, "recvmid"));
		ds_cvr_info.setColumn(0, "recvnm",    ds_cvr_info.getColumn(0, "recvmnm"));
		ds_cvr_info.setColumn(0, "recvtelno", ds_cvr_info.getColumn(0, "recvmtelno"));
	
	} else if(sRecvType == "A") { 
		ds_cvr_info.setColumn(0, "recvid",    ds_cvr_info.getColumn(0, "recvaid"));
		ds_cvr_info.setColumn(0, "recvnm",    ds_cvr_info.getColumn(0, "recvanm"));
		ds_cvr_info.setColumn(0, "recvtelno", ds_cvr_info.getColumn(0, "recvatelno"));
	
	} else if(sRecvType == "P") { 
		ds_cvr_info.setColumn(0, "recvid",    ds_cvr_info.getColumn(0, "recvpid"));
		ds_cvr_info.setColumn(0, "recvnm",    ds_cvr_info.getColumn(0, "recvpnm"));
		ds_cvr_info.setColumn(0, "recvtelno", ds_cvr_info.getColumn(0, "recvptelno"));
	
	} else if(sRecvType == "T") { 
		setUserInfo("R");
	}
}

function grp_right_ipt_sendtm_ontextchanged(obj:MaskEdit,  e:TextChangedEventInfo)
{
	utlf_validMaskEditTime(obj, e);
}

function grp_right_btn_curtime_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_cvr_info.setColumn(0, "senddd", utlf_getCurrentDate()); 
	ds_cvr_info.setColumn(0, "sendtm", utlf_getCurrentTime().substring(0,4)); 
}

function grp_right_rdo_sendtype_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	var sSendType = ds_cvr_info.getColumn(0, "sendtype");
	if(sSendType == "S" || sSendType == "B") { // SMS, 배치
		if(sSendType == "S") { // SMS
			ds_cvr_info.setColumn(0, "senddd", ""); 
			ds_cvr_info.setColumn(0, "sendtm", ""); 
		} else {
			ds_cvr_info.setColumn(0, "senddd", utlf_getCurrentDate()); 
			ds_cvr_info.setColumn(0, "sendtm", utlf_getCurrentTime().substring(0,4)); 
		}
	} else {
		ds_cvr_info.setColumn(0, "unconftime", "0"); 
		ds_cvr_info.setColumn(0, "unconftype", "Z"); 
	}
}


function SPLPR03000_onclose(obj:Form, e:CloseEventInfo)
{
	// CVR 전용으로 Ku를 실행 했을 시에는 종료시 프로그램도 같이 종료한다
    var isSingle = false;
    try {
        isSingle = (gv_isSingleYN == "Y");
    } catch(e) {}
    
    if(isSingle) {
        frmf_logout();
    }
}

function grp_right_cmb_rgstflag_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var sAddMsg = "";
	var sCvrMsg = "";
	
	var sCvrType = ds_cond.getColumn(0, "cvrtype"); 
	
	if(sCvrType == "R") { // 영상CVR인경우
		if (obj.value != "-" && obj.value != "99") {  // 선택 또는 기타가 아니면
			sCvrMsg = ds_cvr_info.getColumn(0, "cvrmsg");
			if (obj.value == "98") { // 판독문 수정안내
				sCvrMsg = sCvrMsg.replace("[영상CVR]", "[판독수정안내]");
				sAddMsg = "판독문 수정되어 확인부탁합니다";
			} else {
				sCvrMsg = sCvrMsg.replace("[판독수정안내]", "[영상CVR]");
				sAddMsg = obj.text;
			}
			
			sCvrMsg = sCvrMsg + "\r\n" + sAddMsg;
			ds_cvr_info.setColumn(0, "cvrmsg", sCvrMsg );
			grp_right.txt_cvrmsg.vscrollbar.pos = grp_right.txt_cvrmsg.vscrollbar.max;
		}
	}
}

function grp_right_cmb_unconftype_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var sUnConfType = ds_cvr_info.getColumn(0, "unconftype");
	if(sUnConfType == "Z") { 
		ds_cvr_info.setColumn(0, "unconftime", "0"); 
		grp_right.ipt_unconftime.readonly = true;
	} else {
		grp_right.ipt_unconftime.readonly = false;
	}
}
]]></Script>
  </Form>
</FDL>