YNU_JEUS/app_home/himed/xpapps/emr/csrxp/xp/SMMNG02400_세탁청구현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNG02400" position="absolute 0 0 1180 710" titletext="청구현황" oninit="SMMNG02400_oninit" onload="SMMNG02400_onload" scrollbars="none">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 580 25" id="grp_tle">
          <Layouts>
            <Layout>
              <Static text="청구현황" position="absolute 0 0 97 25" id="caption6" class="tit_1"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 65 1175 725" id="grp_biz" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="청구현황" position="absolute 0 9 121 25" id="caption12" class="tit_2"/>
              <Shape position="absolute 0 26 1170 32" linetype="horizontal" id="line1" class="line_10"/>
              <Grid position="absolute 0 30 1170 640" id="grd_porqstatelist" binddataset="ds_main_porqinfo_porqstatelist" cellsizebandtype="allband" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="100"/>
                    </Columns>
                    <Rows>
                      <Row size="24" band="head"/>
                      <Row size="24" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell rowspan="2" style="padding:2 2 2 2;" text="병동명" wordwrap="word" autosizerow="limitmin"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:depthngnm"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Radio position="absolute 220 5 610 20" id="rdo_gubuncd" enable="false" visible="false" columncount="2" codecolumn="codecolumn" datacolumn="datacolumn">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">01</Col>
                      <Col id="datacolumn">물품마스터</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">02</Col>
                      <Col id="datacolumn">창고마스터</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
            </Layout>
          </Layouts>
        </Div>
        <Shape position="absolute 0 25 1175 60" id="roundrect1" class="roundrect_search" type="roundrectangle"/>
        <Static text="년월:" position="absolute 288 35 332 52" id="cap_csrreqdeptcd" class="search_name"/>
        <Button position="absolute 1055 32 1111 54" id="btn_search" class="btn1" taborder="2" text="조회" onclick="btn_search_onclick"/>
        <Calendar position="absolute 334 35 438 54" id="ipt_reqdd" class="input_default" mask="yyyy-mm-dd" autoselect="true" autoskip="true" onchanged="ipt_reqdd_onchanged"/>
        <Edit readonly="true" position="absolute 95 35 270 54" align="align:center middle;" id="opt_instcdnm" class="output" style="align:center middle;"/>
        <Static text="기관코드 :" position="absolute 5 35 91 52" id="cap_instcd" class="search_name"/>
        <Shape position="absolute 1047 31 1053 56" linetype="vertical" id="line2" class="line_4"/>
        <Static text="병동:" position="absolute 452 35 495 52" id="caption1" class="search_name"/>
        <Button position="absolute 1113 67 1169 89" id="btn_outrex" class="btn6" text="출력" onclick="btn_outrex_onclick"/>
        <Radio position="absolute 678 35 817 55" id="rdo_selyymmdd" columncount="3" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="rdo_selyymmdd_onitemchanged">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">DD</Col>
                <Col id="datacolumn">일별</Col>
              </Row>
              <Row>
                <Col id="codecolumn">MM</Col>
                <Col id="datacolumn">월별</Col>
              </Row>
              <Row>
                <Col id="codecolumn">YY</Col>
                <Col id="datacolumn">년별</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Button position="absolute 1115 32 1171 54" id="button3" class="btn7" text="엑셀" onclick="button3_onclick"/>
        <Static text="일자구분:" position="absolute 598 35 683 52" id="caption2" class="search_name"/>
        <Radio position="absolute 900 35 1010 55" id="rdo_seloutreq" columncount="3" codecolumn="codecolumn" datacolumn="datacolumn" onitemchanged="rdo_seloutreq_onitemchanged">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="codecolumn"/>
              <Column id="datacolumn"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="codecolumn">OUT</Col>
                <Col id="datacolumn">불출량</Col>
              </Row>
              <Row>
                <Col id="codecolumn">REQ</Col>
                <Col id="datacolumn">요청량</Col>
              </Row>
            </Rows>
          </Dataset>
        </Radio>
        <Static text="출력구분:" position="absolute 820 35 905 52" id="caption3" class="search_name"/>
        <Combo position="absolute 495 35 590 54" id="cmb_csrreqdeptcd" class="combo_essential" innerdataset="@ds_init_csrreqdeptlist" datacolumn="csrreqdeptnm" codecolumn="csrreqdeptcd" onitemchanged="cmb_csrreqdeptcd_onitemchanged"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_porqinfo_porqstatelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING" size="256"/>
          <Column id="remark1" type="STRING" size="256"/>
          <Column id="fstrgstrid" type="STRING" size="256"/>
          <Column id="fstrgstrnm" type="STRING" size="256"/>
          <Column id="a001" type="STRING" size="256"/>
          <Column id="a002" type="STRING" size="256"/>
          <Column id="a003" type="STRING" size="256"/>
          <Column id="a004" type="STRING" size="256"/>
          <Column id="a005" type="STRING" size="256"/>
          <Column id="a006" type="STRING" size="256"/>
          <Column id="a007" type="STRING" size="256"/>
          <Column id="a008" type="STRING" size="256"/>
          <Column id="a009" type="STRING" size="256"/>
          <Column id="a010" type="STRING" size="256"/>
          <Column id="a011" type="STRING" size="256"/>
          <Column id="a012" type="STRING" size="256"/>
          <Column id="a013" type="STRING" size="256"/>
          <Column id="a014" type="STRING" size="256"/>
          <Column id="a015" type="STRING" size="256"/>
          <Column id="a016" type="STRING" size="256"/>
          <Column id="a017" type="STRING" size="256"/>
          <Column id="a018" type="STRING" size="256"/>
          <Column id="a019" type="STRING" size="256"/>
          <Column id="a020" type="STRING" size="256"/>
          <Column id="a021" type="STRING" size="256"/>
          <Column id="a022" type="STRING" size="256"/>
          <Column id="a023" type="STRING" size="256"/>
          <Column id="a024" type="STRING" size="256"/>
          <Column id="a025" type="STRING" size="256"/>
          <Column id="a026" type="STRING" size="256"/>
          <Column id="a027" type="STRING" size="256"/>
          <Column id="a028" type="STRING" size="256"/>
          <Column id="a029" type="STRING" size="256"/>
          <Column id="a030" type="STRING" size="256"/>
          <Column id="a031" type="STRING" size="256"/>
          <Column id="a032" type="STRING" size="256"/>
          <Column id="a033" type="STRING" size="256"/>
          <Column id="a034" type="STRING" size="256"/>
          <Column id="a035" type="STRING" size="256"/>
          <Column id="a036" type="STRING" size="256"/>
          <Column id="a037" type="STRING" size="256"/>
          <Column id="a038" type="STRING" size="256"/>
          <Column id="a039" type="STRING" size="256"/>
          <Column id="a040" type="STRING" size="256"/>
          <Column id="reqdd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="depthngnm"/>
            <Col id="remark1"/>
            <Col id="fstrgstrid"/>
            <Col id="fstrgstrnm"/>
            <Col id="a001"/>
            <Col id="a002"/>
            <Col id="a003"/>
            <Col id="a004"/>
            <Col id="a005"/>
            <Col id="a006"/>
            <Col id="a007"/>
            <Col id="a008"/>
            <Col id="a009"/>
            <Col id="a010"/>
            <Col id="a011"/>
            <Col id="a012"/>
            <Col id="a013"/>
            <Col id="a014"/>
            <Col id="a015"/>
            <Col id="a016"/>
            <Col id="a017"/>
            <Col id="a018"/>
            <Col id="a019"/>
            <Col id="a020"/>
            <Col id="a021"/>
            <Col id="a022"/>
            <Col id="a023"/>
            <Col id="a024"/>
            <Col id="a025"/>
            <Col id="a026"/>
            <Col id="a027"/>
            <Col id="a028"/>
            <Col id="a029"/>
            <Col id="a030"/>
            <Col id="a031"/>
            <Col id="a032"/>
            <Col id="a033"/>
            <Col id="a034"/>
            <Col id="a035"/>
            <Col id="a036"/>
            <Col id="a037"/>
            <Col id="a038"/>
            <Col id="a039"/>
            <Col id="a040"/>
            <Col id="reqdd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_porqinfo_csrdeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_porqinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="csreqdeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_porqrexlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING" size="256"/>
          <Column id="depthngcd" type="STRING" size="256"/>
          <Column id="possyymm" type="STRING" size="256"/>
          <Column id="goodscd" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="posscnt" type="STRING" size="256"/>
          <Column id="remark1" type="STRING" size="256"/>
          <Column id="fstrgstrid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="depthngnm"/>
            <Col id="depthngcd"/>
            <Col id="possyymm"/>
            <Col id="goodscd"/>
            <Col id="cdnm"/>
            <Col id="posscnt"/>
            <Col id="remark1"/>
            <Col id="fstrgstrid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="reqdd" type="STRING" size="256"/>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="csreqdeptcd" type="STRING" size="256"/>
          <Column id="selyymmdd" type="STRING" size="256"/>
          <Column id="seloutreq" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="reqdd"/>
            <Col id="deptcd"/>
            <Col id="csreqdeptcd">03</Col>
            <Col id="selyymmdd">DD</Col>
            <Col id="seloutreq">OUT</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_csrdeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_possmenucnt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_possmenulist" 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="goodscd" 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="reqdd" type="STRING" size="256"/>
          <Column id="csreqdeptcd" type="STRING" size="256"/>
          <Column id="instcdnm" type="STRING" size="256"/>
          <Column id="flag" type="STRING" size="256"/>
          <Column id="gubuncd" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="porqyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="gubuncd">01</Col>
            <Col id="porqyn">Y</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_report_porqrexlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_csrreqdeptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.rdo_gubuncd" propid="value" datasetid="ds_send" columnid="gubuncd"/>
      <BindItem id="item1" compid="ipt_reqdd" propid="value" datasetid="ds_main_cond" columnid="reqdd"/>
      <BindItem id="item2" compid="opt_instcdnm" propid="value" datasetid="ds_send" columnid="instcdnm"/>
      <BindItem id="item3" compid="rdo_selyymmdd" propid="value" datasetid="ds_main_cond" columnid="selyymmdd"/>
      <BindItem id="item4" compid="rdo_seloutreq" propid="value" datasetid="ds_main_cond" columnid="seloutreq"/>
      <BindItem id="item5" compid="cmb_csrreqdeptcd" propid="value" datasetid="ds_send" columnid="csreqdeptcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-07-11
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-07-11      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

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

function SMMNG02400_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();
}

// 화면 open시와 초기화 버튼 클릭시 화면 초기화 기능을 수행한다.
function fInitialize() 
{
	ds_send.setColumn(0, "instcdnm", sysf_getUserInfo("dutplceinstnm")); //기관코드
	ds_main_cond.setColumn(0, "reqdd", utlf_getCurrentDate()); //년월일
	ds_send.setColumn(0, "csreqdeptcd", 'all'); //기본값 전체부서
	ds_send.setColumn(0, "gubuncd", ds_send.getColumn(0, "gubuncd"));	 //마스터코드구분 01:물품마스터02:창고마스터
	ds_send.setColumn(0, "porqyn", ds_send.getColumn(0, "porqyn"));	 //보유현황사용유무
	
	dsf_makeValue(ds_send,"instcd","string", sysf_getUserInfo("dutplceinstcd")); //기관코드
	
	// 부서구분 조회
	var oParam = {};
    oParam.id          = "TRMNG00401";
    oParam.service     = "csrapp.CsrMngt";
    oParam.method      = "reqGetDeptFlagList";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_init_csrreqdeptlist=csrreqdeptlist";
    oParam.async       = false;

	tranf_submit(oParam);
	
	frmf_addComboItem("cmb_csrreqdeptcd", "전체", "all", "above");
	
	var oParam = {};
    oParam.id          = "TRMNG02202";
    oParam.service     = "csrapp.CsrDryMngt";
    oParam.method      = "reqGetPossCnt";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_possmenucnt=posscnt";
    oParam.async       = false;

	tranf_submit(oParam);

	var oParam = {};
    oParam.id          = "TRMNG02203";
    oParam.service     = "csrapp.CsrDryMngt";
    oParam.method      = "reqGetPossMenuList";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_possmenulist=possmenulist";
    oParam.async       = false;

	tranf_submit(oParam);

	fSearch();
	
}

function fSearch() {

	var reqdd = ds_main_cond.getColumn(0, "reqdd");

	if ( ds_main_cond.getColumn(0, "selyymmdd") == 'MM' ) {
		reqdd = reqdd.substr(0,6)  ;
	} else if ( ds_main_cond.getColumn(0, "selyymmdd") == 'YY' ){ 
		reqdd =  reqdd.substr(0,4);
	}

	ds_send.setColumn(0, "reqdd", reqdd);
	ds_send.setColumn(0, "flag", ds_main_cond.getColumn(0, "seloutreq"));

	var oParam = {};
    oParam.id          = "TRMNG02401";
    oParam.service     = "csrapp.CsrDryMngt";
    oParam.method      = "reqGetPorqStateList";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_porqinfo_porqstatelist=porqstatelist";
    oParam.async       = false;

	tranf_submit(oParam);

	fColLqidtys();

}

//20180320 이돈희 : 동적으로 셀이 들어가도록 수정
function fColLqidtys() {

	var nCellCount = grp_biz.grd_porqstatelist.getCellCount("Head");								
	
	//병동명을 제외하고 모든 행 삭제
	for(var iIndex = nCellCount-1 ; iIndex > 0 ; iIndex--){
		grp_biz.grd_porqstatelist.deleteContentsCol(iIndex);
	}
	
		
	var cnt = ds_main_possmenucnt.getColumn(0, "cnt");

	if(Number(cnt) > 0 ){
		var hngnm;
		var valuechk;
		for(var i = 0 ; i < cnt ; i++) {
		
			hngnm 		= ds_main_possmenulist.getColumn(i, "cdnm");
			valuechk 	= ds_main_possmenulist.getColumn(i, "goodscd");
			//열 추가
			var nCol = grp_biz.grd_porqstatelist.appendContentsCol(true);
			
			//2개 셀 merge
			var nMergeCell = grp_biz.grd_porqstatelist.mergeContentsCell("head", 0, nCol, 1, nCol+1,nCol, false);
		
			//헤드 명 입력
			grp_biz.grd_porqstatelist.setCellProperty("head",nMergeCell,"text",hngnm);
			grp_biz.grd_porqstatelist.setCellProperty("head",nMergeCell,"wordwrap","word");
			grp_biz.grd_porqstatelist.setCellProperty("body",nMergeCell,"text","bind:"+valuechk.toLowerCase());
		}
		

		//마지막에 비고와 관리자 추가
		nCol = grp_biz.grd_porqstatelist.appendContentsCol(true);
		nMergeCell = grp_biz.grd_porqstatelist.mergeContentsCell("head", 0, nCol, 1, nCol+1,nCol, false);
		grp_biz.grd_porqstatelist.setCellProperty("head",nMergeCell,"text","비고");
		grp_biz.grd_porqstatelist.setCellProperty("body",nMergeCell,"text","bind:remark1");
		
		nCol = grp_biz.grd_porqstatelist.appendContentsCol(true);
		nMergeCell = grp_biz.grd_porqstatelist.mergeContentsCell("head", 0, nCol, 1, nCol+1,nCol, false);
		grp_biz.grd_porqstatelist.setCellProperty("head",nMergeCell,"text","관리자");
		grp_biz.grd_porqstatelist.setCellProperty("body",nMergeCell,"text","bind:fstrgstrnm");

		
		
		//셀 크기 설정
		for(var i = 0 ; i < cnt ; i++){
			grp_biz.grd_porqstatelist.setRealColSize(i+1, 50, false);
			
		}
		grp_biz.grd_porqstatelist.setRealColSize(cnt+1, 100, false);
		grp_biz.grd_porqstatelist.setRealColSize(cnt+2, 100, false);
		
	}
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	fSearch();
}

function ipt_reqdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	fSearch();
}

function btn_outrex_onclick(obj:Button,  e:ClickEventInfo)
{
	fPrintRex();
}

function rdo_selyymmdd_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fSearch();
}

function button3_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grp_biz.grd_porqstatelist, "세탁물청구현황", "SheetName" , true, "" , "" , true);	
}

function rdo_seloutreq_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fSearch();
}

function cmb_csrreqdeptcd_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSearch();
}

function fPrintRex() {
	ds_send.setColumn(0, "flag", ds_main_cond.getColumn(0, "seloutreq"));					
	
	var oParam = {};
    oParam.id          = "TRMNG02402";
    oParam.service     = "csrapp.CsrDryMngt";
    oParam.method      = "reqGetPorqRexList";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_porqrexlist=porqrexlist";
    oParam.async       = false;

	tranf_submit(oParam);
	
	dsf_createDs("ds_send_report_porqrexlist");
	
	ds_send_report_porqrexlist.copyData(ds_main_porqrexlist);
		
	//exeReportPreview("RPMNG02400", "XMLSTR", "/root/send/report/porqrexlist");
	//미리보기출력
	var objDOM = rptf_createDOM();			
	rptf_setNodeListToDOM(objDOM, "root/main/porqrexlist/porqrexlist", ds_send_report_porqrexlist);	// 데이터셋 1	
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;											// 최상의노드 XML 스트링 추출
	
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";	
	rptf_exeReportPreview30(["RPMNG02400"],[objParam], option);
}
				]]></Script>
  </Form>
</FDL>