YNU_JEUS/app_home/himed/xpapps/emr/wardcarexp/xp/SMMNW21002_SMS전송결과조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNW21002" position="absolute 0 0 1195 758" titletext="SMS 전송결과 조회" oninit="SMMNW21002_oninit" onload="SMMNW21002_onload" scrollbars="none">
    <Layouts>
      <Layout>
        <Div position="absolute 0 13 1195 758" id="group3" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Div position="absolute 0 12 1195 72" align="align:center top;" id="grp_sea" class="div_SA" anchor="default">
                <Layouts>
                  <Layout>
                    <Static text="전송구분 :" position="absolute 240 10 316 27" id="caption5" class="search_name" anchor="default"/>
                    <Static text="조회일자 :" position="absolute 461 10 532 27" id="caption2" class="search_name" anchor="default"/>
                    <Shape position="absolute 966 10 972 52" linetype="vertical" id="line13" class="line_4" anchor="default"/>
                    <Calendar position="absolute 541 8 641 27" id="input5" class="input_search" anchor="default" autoselect="true" autoskip="true"/>
                    <Calendar position="absolute 666 8 766 27" id="input1" class="input_search" anchor="default" autoselect="true"/>
                    <Static text="~" position="absolute 648 8 660 25" id="caption7" class="search_no_b" anchor="default"/>
                    <Edit position="absolute 155 35 240 54" id="input2" class="input_search" anchor="default" tooltiptext="등록번호 : 숫자 10자리나 한글2자이상을 입력하세요" onkeyup="group3_grp_sea_input2_onkeyup"/>
                    <Button position="absolute 984 20 1040 42" id="button3" class="btn1" text="조회" anchor="default" onclick="group3_grp_sea_button3_onclick"/>
                    <Static text="개별조회  등록번호 :" position="absolute 16 36 150 53" id="caption1" class="search_name" anchor="default"/>
                    <Static text="환자명 :" position="absolute 286 36 350 53" id="caption3" class="search_name" anchor="default"/>
                    <Edit position="absolute 350 35 440 54" id="input3" class="input_search" anchor="default" onkeyup="group3_grp_sea_input3_onkeyup"/>
                    <Static text="최근 등록순 으로 1,000 건을 조회합니다" position="absolute 489 35 753 50" id="caption4" class="hand_search" anchor="default"/>
                    <Button position="absolute 1043 20 1123 42" id="btn_saveexcel" class="btn3" text="엑셀저장" anchor="default" onclick="group3_grp_sea_btn_saveexcel_onclick"/>
                    <Button position="absolute 1126 20 1182 42" id="btn_print" class="btn3" text="출력" anchor="default" onclick="group3_grp_sea_btn_print_onclick"/>
                    <Combo position="absolute 314 8 414 27" id="cmb_sendgb" class="combo_search" innerdataset="ds_init_cmb_sendgb" datacolumn="typenm" codecolumn="basetypecd" anchor="default" onitemchanged="group3_grp_sea_cmb_sendgb_onitemchanged"/>
                    <Static text="전송병동 :" position="absolute 16 11 93 28" id="caption8" class="search_name" anchor="default"/>
                    <Combo id="cmb_ward" taborder="1" innerdataset="ds_init_wardinfo_ward" codecolumn="wardcd" datacolumn="wardnm" onitemchanged="group3_grp_sea_cmb_ward_onitemchanged" class="combo_search" position="absolute 97 8 227 28"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 0 72 1195 78" linetype="horizontal" id="line1" class="line_10" anchor="default"/>
              <Grid position="absolute 0 77 1195 745" id="grd_smslist" binddataset="ds_grd_smslist" autofittype="col" anchor="default" cellsizingtype="col" selecttype="multirow">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="30"/>
                      <Column size="90"/>
                      <Column size="76"/>
                      <Column size="124"/>
                      <Column size="66"/>
                      <Column size="72"/>
                      <Column size="95"/>
                      <Column size="354"/>
                      <Column size="74"/>
                      <Column size="80"/>
                    </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="전송상태"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" text="expr:currow+1"/>
                      <Cell col="1" text="bind:orddeptnm"/>
                      <Cell col="2" style="align:left;" text="bind:trsmflagnm" wordwrap="char"/>
                      <Cell col="3" displaytype="date" text="bind:trsmreqdt" mask="yyyy-MM-dd HH:mm:ss" calendardisplaynulltype="nulltext"/>
                      <Cell col="4" text="bind:pid"/>
                      <Cell col="5" text="bind:hngnm"/>
                      <Cell col="6" text="bind:recvrtelno"/>
                      <Cell col="7" style="align:left top;padding:2 0 2 5;" text="bind:msgcnts" wordwrap="char"/>
                      <Cell col="8" text="bind:fstrgstrnm"/>
                      <Cell col="9" displaytype="combo" edittype="none" style="align:center middle;" text="bind:msgstate" combodataset="ds_init_Z0008" combocodecol="cdid" combodatacol="cdnm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Static text="SMS 전송결과 조회" position="absolute 0 0 153 25" id="caption6" class="tit_1"/>
        <Div position="absolute 0 757 1195 784" id="grp_btn"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_cmb_sendgb" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="typenm" type="STRING"/>
          <Column id="basetypecd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_cmb_orddeptcd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_grd_smslist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddeptnm" type="STRING"/>
          <Column id="trsmflagnm" type="STRING"/>
          <Column id="trsmreqdt" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="recvrtelno" type="STRING"/>
          <Column id="msgcnts" type="STRING"/>
          <Column id="fstrgstrnm" type="STRING"/>
          <Column id="msgstate" type="STRING"/>
          <Column id="mtstrsmdt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_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="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="basetypecd" type="STRING" size="256"/>
          <Column id="baseclsflag" type="STRING" size="256"/>
          <Column id="supbasetypecd" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="ordclsdeptflag" type="STRING" size="256"/>
          <Column id="supdeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="basetypecd"/>
            <Col id="baseclsflag">I</Col>
            <Col id="supbasetypecd"/>
            <Col id="orddeptcd"/>
            <Col id="ordclsdeptflag"/>
            <Col id="supdeptcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_Z0008" 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_wardinfo_ward" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="wardcd" type="STRING" size="256"/>
          <Column id="wardnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item1" compid="group3.grp_sea.cmb_sendgb" propid="value" datasetid="ds_cond" columnid="supbasetypecd"/>
      <BindItem id="item2" compid="group3.grp_sea.input5" propid="value" datasetid="ds_cond" columnid="fromdd"/>
      <BindItem id="item3" compid="group3.grp_sea.input1" propid="value" datasetid="ds_cond" columnid="todd"/>
      <BindItem id="item4" compid="group3.grp_sea.input2" propid="value" datasetid="ds_cond" columnid="pid"/>
      <BindItem id="item5" compid="group3.grp_sea.input3" propid="value" datasetid="ds_cond" columnid="hngnm"/>
      <BindItem id="item7" compid="group3.grp_sea.cmb_ward" propid="value" datasetid="ds_cond" columnid="orddeptcd"/>
    </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_examcurexp::AEZ0001.xjs";
include "com_basiccodexp::ZBC001.xjs";
include "com_departmentcodexp::ZSD001.xjs";
include "emr_carecomxp::CareCom.xjs";

function fDeptList(){
	var oParam = {};
		oParam.id          = "TRMNR02501";
		oParam.service     = "wardcareapp.WardCareMngt";
		oParam.method      = "reqGetWMInitData";
		oParam.inds        = "reqcond=ds_send";
		oParam.outds       = "ds_init_wardinfo_ward=ward ds_init_dept=dept";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNR02501";

	tranf_submit(oParam);
   
   //2017.12.01 본원_간호간병서비스 병동(609병동) 추가
   if(sysf_getUserInfo("dutplceinstcd") == "031") {
	   var vWardcd = "3050159000";
	   ds_init_wardinfo_ward.filter("wardcd=='" + vWardcd + "'");   
	   //ds_init_wardinfo_ward.filter("wardcd == '3050159000'");
	   //ds_init_wardinfo_ward.filter("");
   }	
   
}

function fBaseCodeSearch(typegubn){
	

	 ds_cond.setColumn(0,"baseclsflag", "I");  // 병동기준자료(emr.mnembtms)
	 ds_cond.setColumn(0,"basetypecd", typegubn);
	 ds_cond.setColumn(0,"supbasetypecd", "I");					 
	
	 var oParam = {};
		oParam.id          = "TRMNO00801";
		oParam.service     = "wardcareapp.WardBizMngt";
		oParam.method      = "reqGetBaseCodeListInfo";
		oParam.inds        = "req=ds_cond";
		oParam.outds       = "ds_init_cmb_sendgb=basecodelistinfo";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNO00801";

	tranf_submit(oParam);
	
	ds_init_cmb_sendgb.insertRow(0);
	ds_init_cmb_sendgb.setColumn(0,"basetypecd","-");
	ds_init_cmb_sendgb.setColumn(0,"typenm","전체");
}

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

function fBtnRefClicked(){
	if(utlf_isNull(ds_cond.getColumn(0,"supbasetypecd"))){
		sysf_messageBox("전송구분을 선택하지 ","E007");
		return;
	}
						
	ds_cond.setColumn(0,"basetypecd", "I");
	ds_cond.setColumn(0,"baseclsflag", "I");

	//model.copynode("/root/send/req", "/root/main/cond");
			
	var oParam = {};
		oParam.id          = "";
		oParam.service     = "wardcareapp.WardBizMngt";
		oParam.method      = "reqGetSmsList";
		oParam.inds        = "req=ds_cond";
		oParam.outds       = "ds_grd_smslist=smslist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNO01200";

	tranf_submit(oParam);

 	
}

function SMMNW21002_onload(obj:Form, e:LoadEventInfo)
{
	var dt = utlf_getCurrentDate();
	
	ds_cond.setColumn(0,"fromdd",  getDateCalc(dt, 7));
	ds_cond.setColumn(0,"todd",dt);

	var instcd = sysf_getUserInfo("dutplceinstcd");
	var standard_yn = "rcptuseyn";
	var ord_deptflag = 'X';
	var sort_field = "depthngnm";
	var sort_method = "asc";
	
	fDeptList();
	/*
	//zsdfGetCareOutOrderDepartmentList(instcd, "ds_init_cmb_orddeptcd", dt);
	*/
	var arrParam = [{dsNm: "ds_init_Z0008", cdGrpId: "Z0008"}					 					  		
					   ]		
	appf_getCodeList(arrParam);
	
	 
	ds_cond.setColumn(0,"orddeptcd",  sysf_getUserInfo("dutplcecd"));  // 근무지부서코드

	fBaseCodeSearch("I");   // 전송구분 조회
	
	group3.grp_sea.cmb_sendgb.index = 0;
	frmf_inputEnterKey("group3.grp_sea.cmb_sendgb", "onitemchanged", new ItemChangeEventInfo);

}


function group3_grp_sea_input2_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		fBtnRefClicked();
		group3.grp_sea.input2.value = "";
		group3.grp_sea.input3.value = "";
	}
}

function group3_grp_sea_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	fBtnRefClicked();
}

function group3_grp_sea_input3_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		fBtnRefClicked();
		group3.grp_sea.input2.value = "";
		group3.grp_sea.input3.value = "";
	}
}

function group3_grp_sea_btn_saveexcel_onclick(obj:Button,  e:ClickEventInfo)
{
	if(ds_grd_smslist.rowcount < 1) return;
	grdf_exportExcel(group3.grd_smslist, "SMS전송결과조회_"+utlf_getCurrentDateTime(), "SMS전송결과조회", true);
}

function group3_grp_sea_btn_print_onclick(obj:Button,  e:ClickEventInfo)
{
		
	var objDOM = rptf_createDOM();	// DOM 객체 설정
		rptf_setNodeListToDOM(objDOM, "root/send/printdata/smslist/smslist", ds_grd_smslist); // 데이터셋
		rptf_setNodeListToDOM(objDOM, "root/send/printdata/cond", ds_cond);
		
	var objParam = new Object();
	
	objParam.xml_data_XML1 = objDOM.documentElement.source;	
	var option = "open=1;save=1;directprint=0;print=1;zoom=0";
	rptf_exeReportPreview30(["RPMNO01200"],[objParam], option);
}

function group3_grp_sea_cmb_sendgb_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	obj.updateToDataset();
	fBtnRefClicked();
}

function group3_grp_sea_cmb_orddeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	var sordclsdeptflag = ds_init_cmb_orddeptcd.lookup("deptcd", ds_cond.getColumn(0,"orddeptcd"),"ordclsdeptflag");  // 센터/대표/분과/서브 구분
	var ssupdeptcd = ds_init_cmb_orddeptcd.lookup("deptcd", ds_cond.getColumn(0,"orddeptcd"),"supdeptcd"); // 상위부서코드
	
	ds_cond.setColumn(0,"ordclsdeptflag",sordclsdeptflag);
	ds_cond.setColumn(0,"supdeptcd",ssupdeptcd);
		
	fBaseCodeSearch("I");   // 전송구분 조회
	group3.grp_sea.cmb_sendgb.index = 0;
	fBtnRefClicked();
}
]]></Script>
  </Form>
</FDL>