YNU_JEUS/app_home/himed/xpapps/ast/healexamxp/xp/SPAHR00910_장문메시지전송.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPAHR00910" position="absolute 0 0 263 607" titletext="장문메시지전송" oninit="SPAHR00910_oninit" onload="SPAHR00910_onload">
    <Layouts>
      <Layout>
        <Static id="Static04" position="absolute 3 3 254 596" style="background:transparent URL('..\..\..\com\commonxp\images\sms_bg.gif');"/>
        <Div position="absolute 11 6 262 599" id="group1" class="sms">
          <Layouts>
            <Layout>
              <MaskEdit position="absolute 109 504 218 523" id="ipt_callback" class="input_default" anchor="default" autoselect="true" style="align:left middle;" mask="###########" maskchar=" " type="string" trimtype="both"/>
              <Edit readonly="true" position="absolute 109 481 218 500" id="opt_sender" class="input_default" enable="true" anchor="default"/>
              <Button position="absolute 49 316 114 339" id="btn_addnumber" text="번호추가" anchor="default" class="btn2" onclick="group1_btn_addnumber_onclick"/>
              <Button position="absolute 128 316 196 339" id="btn_deletenumber" class="btn2" text="번호삭제" anchor="default" onclick="group1_btn_deletenumber_onclick"/>
              <Shape position="absolute 27 471 220 477" linetype="horizontal" id="line1" anchor="default"/>
              <Calendar position="absolute 44 504 137 523" id="ipt_trsmreqdt_date" class="input_default" visible="false" anchor="default"/>
              <Radio position="absolute 44 482 205 499" align="align:left middle;" id="rdo_rsrvyn" visible="false" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default" onitemchanged="group1_rdo_rsrvyn_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">0</Col>
                      <Col id="datacolumn">즉시전송</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">예약전송</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <MaskEdit position="absolute 140 504 205 523" id="ipt_trsmreqdt_time" class="input_default" visible="false" mask="hh:nn" anchor="default"/>
              <Grid position="absolute 18 355 215 470" id="grd_recvrlist" class="datagrid_sms" binddataset="ds_main_recvrlist" anchor="default" autoenter="select" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="28" band="left"/>
                      <Column size="19" band="left"/>
                      <Column size="53"/>
                      <Column size="100"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1"/>
                      <Cell col="2" text="수신자명"/>
                      <Cell col="3" text="전화번호"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" class="sms" text="bind:chk" expr="expr:chk == 'Y' || chk == '1' ? 1 : 0"/>
                      <Cell col="2" displaytype="text" edittype="text" text="bind:recvrnm" taborder="1" editacceptstab="true"/>
                      <Cell col="3" displaytype="text" edittype="text" text="bind:recvrtelno" mask="###########" maskchar=" " taborder="2" editacceptstab="true"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 47 360 62 375" id="button7" text="v" anchor="default" onclick="group1_button7_onclick"/>
              <Static text="/2000 bytes" position="absolute 109 248 176 263" id="caption1" anchor="default"/>
              <Button position="absolute 122 529 174 550" id="btn_cancel" class="btn4" text="취소" anchor="default" onclick="group1_btn_cancel_onclick"/>
              <Button position="absolute 62 529 116 550" id="ipt_send" class="btn4" text="전송" anchor="default" onclick="group1_ipt_send_onclick"/>
              <Static id="Static06" text="발신자명" class="tit_3" position="absolute 18 480 108 500"/>
              <Static id="Static08" text="발신자번호" class="tit_3" position="absolute 18 503 108 523"/>
              <Static id="opt_bytes" position="absolute 74 246 106 265" style="color:red;align:right middle;"/>
            </Layout>
          </Layouts>
        </Div>
        <TextArea id="tx_contents" taborder="1" scrollbars="autovert" imemode="hangul" wordwrap="word" autoselect="true" onkeyup="tx_contents_onkeyup" position="absolute 34 71 223 243" style="compositecolor:black;linespace:5;background:transparent;color:black;"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_recvrlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_recvrlist_oncolumnchanged">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256"/>
          <Column id="recvrnm" type="STRING" size="256"/>
          <Column id="recvrtelno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="chk"/>
            <Col id="recvrnm"/>
            <Col id="recvrtelno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bytecnt" type="INT" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="bytecnt">0</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="bizabbr" type="STRING" size="256"/>
          <Column id="replytelno" type="STRING" size="256"/>
          <Column id="rsrvyn" type="STRING" size="256"/>
          <Column id="rsrvdate" type="STRING" size="256"/>
          <Column id="rsrvtime" type="STRING" size="256"/>
          <Column id="msgcnts" type="STRING" size="256"/>
          <Column id="msgfrmtid" type="STRING" size="256"/>
          <Column id="msgparam1" type="STRING" size="256"/>
          <Column id="msgparam2" type="STRING" size="256"/>
          <Column id="msgparam3" type="STRING" size="256"/>
          <Column id="msgparam4" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="bizabbr">ast</Col>
            <Col id="replytelno"/>
            <Col id="rsrvyn">0</Col>
            <Col id="rsrvdate"/>
            <Col id="rsrvtime"/>
            <Col id="msgcnts"/>
            <Col id="msgfrmtid"/>
            <Col id="msgparam1"/>
            <Col id="msgparam2"/>
            <Col id="msgparam3"/>
            <Col id="msgparam4"/>
          </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_send_recvrid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="tx_contents" propid="value" datasetid="ds_main" columnid="msgcnts"/>
      <BindItem id="item2" compid="group1.rdo_rsrvyn" propid="value" datasetid="ds_main" columnid="rsrvyn"/>
      <BindItem id="item3" compid="group1.ipt_trsmreqdt_date" propid="value" datasetid="ds_main" columnid="rsrvdate"/>
      <BindItem id="item4" compid="group1.ipt_trsmreqdt_time" propid="value" datasetid="ds_main" columnid="rsrvtime"/>
      <BindItem id="item5" compid="group1.ipt_callback" propid="value" datasetid="ds_main" columnid="replytelno"/>
      <BindItem id="item1" compid="group1.opt_bytes" propid="text" datasetid="ds_hidden" columnid="bytecnt"/>
    </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_healexamxp::SPAHR00910.xjs";
function SPAHR00910_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPAHR00910_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(group1.grd_recvrlist);
	
	fInitialize();
}

function tx_contents_onkeyup(obj:TextArea, e:KeyEventInfo)
{	
	var opt_bytesValue = obj.text;
	var contents =  utlf_getLengB(opt_bytesValue);
	
	if (parseInt(contents) > 2000) 
	{
		sysf_messageBox("메시지는 2000bytes 를 넘을 수 없습니다.", "I999");
		ds_main.setColumn(0, "msgcnts", String(obj.text).substr(0,2000));
		return;
	}
	
	ds_hidden.setColumn(0, "bytecnt", contents);
}

function group1_btn_addnumber_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_recvrlist.addRow();
}

function ds_main_recvrlist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "chk")
	{
		obj.setColumn(e.row, "chk", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

function group1_button7_onclick(obj:Button,  e:ClickEventInfo)
{
	fSelectAll(ds_main_recvrlist);
}

function group1_btn_deletenumber_onclick(obj:Button,  e:ClickEventInfo)
{
	fgriddelete(ds_main_recvrlist);
}

function group1_rdo_rsrvyn_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	frdocheck();
	group1.ipt_trsmreqdt_date.value="";
	group1.ipt_trsmreqdt_time.value="";
}

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

function group1_ipt_send_onclick(obj:Button,  e:ClickEventInfo)
{
	fSMSSubmit("ds_main");
}
]]></Script>
  </Form>
</FDL>