YNU_JEUS/app_home/himed/xpapps/mis/stocsumxp/xp/SMRST00902_부서별 계정별 약품 사용금액 조회(약국).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRST00902" position="absolute 0 0 1200 773" titletext="기간별 약품입고 현황(약품)" oninit="SMRST00902_oninit" onload="SMRST00902_onload">
    <Layouts>
      <Layout>
        <Static text="부서별 계정별 약품 사용금액 통계" position="absolute 1 88 261 105" id="caption21" class="tit_2"/>
        <Div position="absolute 0 45 1195 80" align="align:center top;" id="group6" class="div_SA">
          <Layouts>
            <Layout>
              <Static text="조 회 월 :" position="absolute 353 9 446 26" id="caption10" class="search_name"/>
              <Static text="기관코드 :" position="absolute 15 9 108 26" id="caption7" class="search_name"/>
              <Combo position="absolute 100 8 241 27" align="align:center middle;" id="cmb_instcd" class="combo_essential" enable="false"/>
              <Calendar position="absolute 439 8 539 27" align="align:center middle;" id="ipt_stocym" class="input_essential" mask="yyyy-mm"/>
              <Shape position="absolute 1106 7 1112 29" linetype="vertical" id="line18" class="line_4"/>
              <Button position="absolute 1124 7 1180 29" id="btn_search" class="btn1" text="조회" onclick="group6_btn_search_onclick"/>
              <Edit readonly="true" position="absolute 960 5 1060 24" id="opt_goodflag" visible="false"/>
              <Combo position="absolute 810 8 960 27" id="cmb_mngtcls" class="combo_essential" visible="false"/>
              <Static text="관리분류 :" position="absolute 725 9 813 26" id="caption2" class="search_name" visible="false"/>
              <Static text="~" position="absolute 543 10 558 30" id="caption1" visible="false"/>
              <Calendar position="absolute 560 8 660 27" align="align:center middle;" id="ipt_tostocym" class="input_essential" visible="false" mask="yyyy-mm"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape position="absolute 0 104 1195 110" linetype="horizontal" id="line15" class="line_10"/>
        <Grid position="absolute 0 109 1195 766" id="grd_stocpropertylist" class="datagrid2" binddataset="ds_main_stocpropertylist">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="0"/>
                <Column size="190"/>
                <Column size="142"/>
                <Column size="70"/>
                <Column size="147"/>
                <Column size="0"/>
                <Column size="0"/>
              </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="계정코드"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" text="bind:lrgnm"/>
                <Cell col="2" text="bind:deptnm"/>
                <Cell col="3" text="bind:acntnm"/>
                <Cell col="4" displaytype="number" style="align:right;" text="bind:outcnts"/>
                <Cell col="5" displaytype="number" style="align:right middle;" text="bind:totuseamt" mask="#,###"/>
                <Cell col="6" text="bind:stocamt" mask="#,###.##"/>
                <Cell col="7" text="bind:amtacnt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 1106 84 1192 103" id="btn_excel" class="btn5" text="Excel Save" onclick="btn_excel_onclick"/>
        <Static id="caption6" text="부서별 계정별 약품 사용금액 통계" class="tit_1" position="absolute 0 0 245 22"/>
        <Button id="btn_prt" taborder="1" text="출력" class="btn6" visible="false" position="absolute 0 23 56 45" onclick="btn_prt_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_sendlist" 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="goodflag" type="STRING" size="256"/>
          <Column id="stocym" type="STRING" size="256"/>
          <Column id="tostocym" type="STRING" size="256"/>
          <Column id="mngtcls" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="goodflag"/>
            <Col id="stocym"/>
            <Col id="tostocym"/>
            <Col id="mngtcls"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_stocpropertylist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group6.cmb_instcd" propid="value" datasetid="ds_send_sendlist" columnid="instcd"/>
      <BindItem id="item1" compid="group6.ipt_stocym" propid="value" datasetid="ds_send_sendlist" columnid="stocym"/>
      <BindItem id="item2" compid="group6.ipt_tostocym" propid="value" datasetid="ds_send_sendlist" columnid="tostocym"/>
      <BindItem id="item3" compid="group6.opt_goodflag" propid="value" datasetid="ds_send_sendlist" columnid="goodflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2017-06-19
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2017-06-19      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "mis_miscommonxp::MIS.xjs";
include "mis_miscommonxp::PIC002.xjs";
include "mis_miscommonxp::RAC001.xjs";
include "mis_miscommonxp::RBC001.xjs";
include "mis_miscommonxp::RSZ001.xjs";

var arErrorCode 	= new HashArray();

function SMRST00902_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
}

function SMRST00902_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();
	misfGridInit(grd_stocpropertylist);
	
	rszfUserInstList(group6.cmb_instcd, sysf_getUserInfo("userid"));
	//misfMsterDetailSet(grd_stocpropertylist, null, "TRRST00901","Y");

	//화면 권한 설정
	btn_prt.enable= frmf_checkAuth("P");
}

// 화면 open시와 초기화 버튼 클릭시 화면 초기화 기능을 수행한다.
function fInitialize() {
	ds_main_stocpropertylist.clearData();
		
	ds_send_sendlist.clearData();
	ds_send_sendlist.addRow();
	
	misfComboComCdList("030M0003",group6.cmb_mngtcls,"Y");					
	ds_send_sendlist.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
	
	var curdd = utlf_getCurrentDate();
	group6.ipt_stocym.value = curdd.substr(0,6);
	group6.ipt_tostocym.value = curdd.substr(0,6);
	// [2010.08.26]AS-IS 코드 TO_BE 코드 전환을 위한 물품구분 변경 (goodflag= P) => (goodflag= PH) 
	group6.opt_goodflag.value = "PH";	
}
function group6_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var null_check = ds_send_sendlist.getColumn(0, "instcd");	
	ds_send_sendlist.setColumn(0, "stocym", ds_send_sendlist.getColumn(0, "stocym").substr(0, 6));
	ds_send_sendlist.setColumn(0, "tostocym", ds_send_sendlist.getColumn(0, "tostocym").substr(0, 6));
		
	var oParam = {};
		oParam.id          = "TRRST00903";
		oParam.service     = "stocsumapp.StocSumMngt";
		oParam.method      = "reqGetDeptAnCostList";
		oParam.inds        = "req=ds_send_sendlist";
		oParam.outds       = "ds_main_stocpropertylist=stocpropertylist";
		oParam.async       = false;		

	tranf_submit(oParam);
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_list, "부서별 계정별 약품사용금액" + utlf_getCurrentDate(), "sheetname1" , true, "" , "" , true);
}

function btn_prt_onclick(obj:Button,  e:ClickEventInfo)
{
	var objDOM = rptf_createDOM();			
	rptf_setNodeListToDOM(objDOM, "root/send/sendlist", ds_send_sendlist);	// 데이터셋 1	
	rptf_setNodeListToDOM(objDOM, "root/tmp/rexinfo/stocpropertylist"	, ds_main_stocpropertylist);		// 데이터셋 2
	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;														// 최상의노드 XML 스트링 추출
	
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";	
	//var option = "open=1;save=1;directprint=1;printdialog=0;print=1;zoom=0;";
	rptf_exeReportPreview30(["RPRST00903"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>