YNU_JEUS/app_home/himed/xpapps/lis/donmngtxp/xp/SMLBD01500_DM발송관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLBD01500" position="absolute 0 0 1196 794" titletext="DM발송관리" oninit="SMLBD01500_oninit" onload="SMLBD01500_onload">
    <Layouts>
      <Layout>
        <Static text="DM 발송 관리" position="absolute 0 0 136 25" id="caption6" class="tit_1"/>
        <Button id="btn_reset" taborder="1" text="초기화" class="btn4" position="absolute 1127 27 1195 49" onclick="btn_reset_onclick"/>
        <Button id="btn_save" taborder="2" text="저장" class="btn4" position="absolute 1068 27 1124 49" onclick="btn_save_onclick"/>
        <Shape id="line17" linetype="horizontal" class="line_6" position="absolute 0 54 1194 60" style="strokepen:3 solid #9ebed4ff;"/>
        <Button id="btn_print" taborder="3" text="개별출력" class="btn6" position="absolute 0 30 72 52" onclick="btn_print_onclick"/>
        <Button id="button1" taborder="4" text="대장출력" class="btn6" position="absolute 83 30 163 52" onclick="button1_onclick"/>
        <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 119 1194 125" style="strokepen:3 solid #33bbbbff;"/>
        <Static id="caption1" text="DM발송 대상자" class="tit_2" position="absolute 1 101 132 118"/>
        <Div id="group1" taborder="5" position="absolute 0 58 1195 93" class="div_SA">
          <Layouts>
            <Layout>
              <Button id="btn_search" taborder="1" text="조회" class="btn1" position="absolute 1123 7 1179 29" onclick="group1_btn_search_onclick"/>
              <Shape id="line11" linetype="vertical" class="line_4" position="absolute 1105 6 1111 28"/>
              <Static id="caption2" text="조회구분 :" class="search_name" position="absolute 14 10 85 27"/>
              <Combo id="cmb_srchflag" taborder="2" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 880 8 990 27">
                <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">N</Col>
                      <Col id="datacolumn">미발송</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">Y</Col>
                      <Col id="datacolumn">발   송</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption4" text="DM발송여부 :" class="search_name" position="absolute 767 9 874 26"/>
              <Radio id="radio1" taborder="3" columncount="2" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 105 9 265 26" onitemchanged="group1_radio1_onitemchanged">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">검사일자</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">공여자명</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Div id="grp_dt" taborder="4" position="absolute 292 3 524 33">
                <Layouts>
                  <Layout>
                    <Calendar id="input8" taborder="1" class="input_s_essential" position="absolute 9 5 109 24" anchor="default"/>
                    <Calendar id="input9" taborder="2" class="input_s_essential" position="absolute 127 5 229 24" anchor="default"/>
                    <Static id="caption11" text="~" class="search_n_b" position="absolute 112 6 129 23" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Div id="grp_nm" taborder="5" position="absolute 285 3 493 33">
                <Layouts>
                  <Layout>
                    <Edit id="ipt_don" taborder="0" class="input_search" position="absolute 5 5 203 24" onkeyup="group1_grp_nm_ipt_don_onkeyup"/>
                  </Layout>
                </Layouts>
              </Div>
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_rowadd" taborder="6" text="엑셀저장" class="btn7" position="absolute 1115 97 1192 116" onclick="btn_rowadd_onclick"/>
        <Grid id="grd_dm" taborder="7" binddataset="ds_grd_dm" useinputpanel="false" position="absolute 0 123 1194 792">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="28"/>
                <Column size="32"/>
                <Column size="75"/>
                <Column size="94"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="70"/>
                <Column size="280"/>
                <Column size="70"/>
                <Column size="150"/>
                <Column size="70"/>
                <Column size="150"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </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="공여자 주민번호"/>
                <Cell col="4" text="검사일자"/>
                <Cell col="5" text="판정의"/>
                <Cell col="6" text="우편번호"/>
                <Cell col="7" text="주소"/>
                <Cell col="8" text="적합여부"/>
                <Cell col="9" text="부적합사유"/>
                <Cell col="10" text="발송여부"/>
                <Cell col="11" text="미발송사유"/>
                <Cell col="12" text="tnsrpid"/>
                <Cell col="13" text="uniqno"/>
                <Cell col="14" text="dnorno"/>
                <Cell col="15" text="dnorseqno"/>
              </Band>
              <Band id="body">
                <Cell/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                <Cell col="2" text="bind:dnornm"/>
                <Cell col="3" text="bind:rrgstno"/>
                <Cell col="4" text="bind:prcpdd" mask="yyyy-mm-dd"/>
                <Cell col="5" text="bind:lastupdtrid"/>
                <Cell col="6" text="bind:homezip"/>
                <Cell col="7" text="bind:homeaddr"/>
                <Cell col="8" text="bind:refflag"/>
                <Cell col="9" text="bind:refresndesc"/>
                <Cell col="10" displaytype="combo" edittype="combo" text="bind:dmdeliveyn"/>
                <Cell col="11" displaytype="text" edittype="text" text="bind:dmnotdeliveresn"/>
                <Cell col="12" text="bind:tnsrpid"/>
                <Cell col="13" text="bind:execprcpuniqno"/>
                <Cell col="14" text="bind:dnorno"/>
                <Cell col="15" text="bind:dnorseqno"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_dm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_dm_oncolumnchanged">
        <ColumnInfo>
          <Column id="chk" type="STRING"/>
          <Column id="dnornm" type="STRING"/>
          <Column id="rrgstno" type="STRING"/>
          <Column id="prcpdd" type="STRING"/>
          <Column id="lastupdtrid" type="STRING"/>
          <Column id="homezip" type="STRING"/>
          <Column id="homeaddr" type="STRING"/>
          <Column id="refflag" type="STRING"/>
          <Column id="refresndesc" type="STRING"/>
          <Column id="dmdeliveyn" type="STRING"/>
          <Column id="dmnotdeliveresn" type="STRING"/>
          <Column id="tnsrpid" type="STRING"/>
          <Column id="execprcpuniqno" type="STRING"/>
          <Column id="dnorno" type="STRING"/>
          <Column id="dnorseqno" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="refgbn" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="dnornm" type="STRING" size="256"/>
          <Column id="dmyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="refgbn">1</Col>
            <Col id="dmyn">0</Col>
          </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="refgbn" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="dnornm" type="STRING" size="256"/>
          <Column id="dmyn" type="STRING" size="256"/>
          <Column id="grddata" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="dnorno" type="STRING" size="256"/>
          <Column id="dnorseqno" type="STRING" size="256"/>
          <Column id="uniqno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_getDMRslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tnsrpid" type="STRING" size="256" sumtext="환자번호"/>
          <Column id="dnornm" type="STRING" size="256" sumtext="공여자명"/>
          <Column id="homeaddr" type="STRING" size="256" sumtext="주소1"/>
          <Column id="homedetladdr" type="STRING" size="256" sumtext="주소2"/>
          <Column id="hz11" type="STRING" size="256" sumtext="우편번호1"/>
          <Column id="hz12" type="STRING" size="256" sumtext="우편번호2"/>
          <Column id="hz13" type="STRING" size="256" sumtext="우편번호3"/>
          <Column id="hz21" type="STRING" size="256" sumtext="우편번호4"/>
          <Column id="hz22" type="STRING" size="256" sumtext="우편번호5"/>
          <Column id="hz23" type="STRING" size="256" sumtext="우편번호6"/>
          <Column id="lbr101" type="STRING" size="256" sumtext="ABO"/>
          <Column id="lbr102" type="STRING" size="256" sumtext="RHO"/>
          <Column id="lir107" type="STRING" size="256" sumtext="매독"/>
          <Column id="lir120" type="STRING" size="256" sumtext="B형간염항원"/>
          <Column id="lir123" type="STRING" size="256" sumtext="에이즈항체"/>
          <Column id="lir122" type="STRING" size="256" sumtext="C형간염항체"/>
          <Column id="lhr117" type="STRING" size="256" sumtext="말라리아"/>
          <Column id="lcr118" type="STRING" size="256" sumtext="AST"/>
          <Column id="lcr119" type="STRING" size="256" sumtext="ALT"/>
          <Column id="lhr100" type="STRING" size="256" sumtext="백혈구수"/>
          <Column id="lhr102" type="STRING" size="256" sumtext="혈색소"/>
          <Column id="lhr104" type="STRING" size="256" sumtext="혈수판수"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="환자번호"/>
          <Column id="refflag" type="STRING" size="256" sumtext="판정구분"/>
          <Column id="refresndesc" type="STRING" size="256" sumtext="부적합사유"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.radio1" propid="value" datasetid="ds_hidden_ref" columnid="refgbn"/>
      <BindItem id="item1" compid="group1.grp_nm.ipt_don" propid="value" datasetid="ds_hidden_ref" columnid="dnornm"/>
      <BindItem id="item2" compid="group1.cmb_srchflag" propid="value" datasetid="ds_hidden_ref" columnid="dmyn"/>
      <BindItem id="item3" compid="group1.grp_dt.input8" propid="value" datasetid="ds_hidden_ref" columnid="fromdd"/>
      <BindItem id="item4" compid="group1.grp_dt.input9" propid="value" datasetid="ds_hidden_ref" columnid="todd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";

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

function SMLBD01500_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_dm);
	fSetInit();
}

// 초기화
function fSetInit()
{
	var tDay =  utlf_getCurrentDate();
	var mDate = utlf_getCurrentDate().toDate("YYYYMMDD").getAddDate(-7);
	
	ds_hidden_ref.setColumn(0, "fromdd", mDate.getDateFormat("YYYYMMDD"));
	ds_hidden_ref.setColumn(0, "todd", tDay);
	
	fSetRefGbn();	
	
	ds_grd_dm.clearData();
}

// 조회구분에따라서 변경
function fSetRefGbn()
{	
	if(ds_hidden_ref.getColumn(0, "refgbn") == "1")
	{
		group1.grp_dt.visible   = true;
		group1.grp_nm.visible = false;
	}
	else
	{
		group1.grp_dt.visible   = false;
		group1.grp_nm.visible = true;	
	}
	
}
function group1_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fSetRefGbn();
}

//조회
function group1_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetDMDelivery();
}

//조회버튼
function fGetDMDelivery()
{	
	ds_send.setColumn(0, "refgbn", ds_hidden_ref.getColumn(0, "refgbn"));
	ds_send.setColumn(0, "fromdd", ds_hidden_ref.getColumn(0, "fromdd"));
	ds_send.setColumn(0, "todd",   ds_hidden_ref.getColumn(0, "todd"));
	ds_send.setColumn(0, "dnornm", ds_hidden_ref.getColumn(0, "dnornm"));
	ds_send.setColumn(0, "dmyn",   ds_hidden_ref.getColumn(0, "dmyn"));
	
	var oParam = {};
		oParam.id          = "TRLBD01501";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetDMDelivery";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_grd_dm=getDMDelivery";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLBD01501";
	tranf_submit(oParam);
	
}
function ds_grd_dm_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	fSetGrdStat();
}

// 그리드 내용 변경시 iud 변경
function fSetGrdStat()
{
	if(ds_grd_dm.getColumn(ds_grd_dm.rowposition, "chk") == 1)
	{
		ds_grd_dm.setRowType(ds_grd_dm.rowposition, 2);
	}
	else
	{
		ds_grd_dm.setRowType(ds_grd_dm.rowposition, 0);
	}
	
}
function group1_grp_nm_ipt_don_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{	
		ds_hidden_ref.setColumn(0, "dnornm", (group1.grp_nm.ipt_don.text).toUpperCase());
		fGetDMDelivery();
	}	
}

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

// 저장버튼
function fExeDMDelivery()
{	
	//var grddata = getGridUpdateData(grd_dm);

	var oParam = {};
		oParam.id          = "TXLBD01501";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqExeDMDelivery";
		oParam.inds        = "dmlist=ds_grd_dm:U";
		oParam.async       = false;
		//oParam.callback    = "cf_TXLBD01501";
	tranf_submit(oParam);
	
	fGetDMDelivery();
}

//초기화버튼
function btn_reset_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetInit();
}

//엑셀저장버튼
function btn_rowadd_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeExcel(grd_dm);
}

//엑셀저장
function fExeExcel(pGridId)
{
		grdf_exportExcel(pGridId, "DM발송 대상자_", "see");
}

//개별출력
function btn_print_onclick(obj:Button,  e:ClickEventInfo)
{
	fPrint();
}

// 개별출력
function fPrint()
{	
	var uniqnoList   = ""; 
	var uniqnoList2 = "";
	
	//for(i=1; i< grd_dm.rows; i++)
	for(i = 0; i < ds_grd_dm.rowcount; i++)
	{
		//if(model.getValue("/root/main/dmdelivery["+i+"]/chk")=="Y")
		if(ds_grd_dm.getColumn(i, "chk") == 1)
		{
			//uniqnoList += "," + model.getValue("/root/main/dmdelivery["+i+"]/execprcpuniqno");	
			uniqnoList += "," + ds_grd_dm.getColumn(i, "execprcpuniqno");
		}	
	}
	
	if(utlf_isNull(uniqnoList))
	{
		sysf_messageBox("출력할", "E013");
		return;	
	}
	
	uniqnoList2 = uniqnoList.substr(1, uniqnoList.length);
	//model.setValue("/root/send/uniqno", uniqnoList2);
	ds_send.setColumn(0, "uniqno", uniqnoList2);
	
	var oParam = {};
		oParam.id          = "TRLBD01502";
		oParam.service     = "donmngtapp.DonRgst";
		oParam.method      = "reqGetDMRslt";
		oParam.inds        = "cond=ds_send";
		oParam.outds       = "ds_getDMRslt=getDMRslt";
		oParam.async       = false;
		//oParam.callback    = "cf_TRLBD01502";
	tranf_submit(oParam);
	
	//model.setValue("/root/hidden/prtflag", "1"); 
	ds_hidden_ref.setColumn(0, "prtflag", "1");	// 출력 구분  개별출력_20080902_승현 추가
	
	exeReportPreview("RPLBP01503", "XMLSTR"); // 1장에 출력 
	
	objParam.xml_data_XML1 = rptf_getXMLString(ds_grd_dm, "root/main/report/dmrslt");
	rptf_exeReportPreview30(["RPLBP01503"],[objParam], option, printoption);

}

//대장출력버튼
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fPrintDMList();
}

// 대장출력
function fPrintDMList()
{
	var newrow  = 1; 
	
	//for(i=1; i< grd_dm.rows; i++)
	for( i = 0; i < ds_grd_dm.rowcount; i++)
	{
		//if(model.getValue("/root/main/dmdelivery["+i+"]/chk")=="Y")
		if(ds_grd_dm.getColumn(i, "chk") == 1)
		{
		}	
	}
	if(newrow < 1)
	{
		sysf_messageBox("출력할", "E013");
		return;
	}
	objParam.xml_data_XML1 = rptf_getXMLString(ds_grd_dm, "root/hidden/report/dmlist");
	rptf_exeReportPreview30(["RPLBP01503"],[objParam], option, printoption);

	
}]]></Script>
  </Form>
</FDL>