YNU_JEUS/app_home/himed/xpapps/mis/stocsumxp/xp/SMRST00901_기간별 약품 입고 현황(약국).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRST00901" position="absolute 0 0 1200 790" titletext="기간별 약품입고 현황(약품)" oninit="SMRST00901_oninit" onload="SMRST00901_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1195 23" id="group1">
          <Layouts>
            <Layout>
              <Static text="기간별 약품입고 현황(약품)" position="absolute 0 0 199 24" id="caption6" class="tit_1" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 38 1195 782" id="group5" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="기간별 약품입고 현황" position="absolute 0 56 211 72" id="caption21" class="tit_2"/>
              <Div position="absolute 0 13 1195 48" align="align:center top;" id="group6" class="div_SA">
                <Layouts>
                  <Layout>
                    <Static text="마 감 월 :" position="absolute 278 9 351 26" id="caption10" class="search_name"/>
                    <Static text="기관코드 :" position="absolute 15 9 88 26" id="caption7" class="search_name"/>
                    <Combo position="absolute 95 8 236 27" align="align:center middle;" id="cmb_instcd" class="combo_essential" enable="false"/>
                    <Calendar position="absolute 354 8 442 27" align="align:center middle;" id="ipt_stocym" class="input_essential" mask="yyyy-mm" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" style="align:center middle;" autoselect="true"/>
                    <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="group5_group6_btn_search_onclick"/>
                    <Edit readonly="true" position="absolute 1034 8 1091 27" id="opt_goodflag" visible="false" autoselect="true"/>
                    <Combo position="absolute 915 8 1034 27" id="cmb_mngtcls" class="combo_essential"/>
                    <Static text="관리분류 :" position="absolute 835 9 913 26" id="caption2" class="search_name"/>
                    <Static text="~" position="absolute 445 10 460 30" id="caption1"/>
                    <Calendar position="absolute 459 8 547 27" align="align:center middle;" id="ipt_tostocym" class="input_essential" mask="yyyy-mm" dateformat="yyyy-MM" value="null" editformat="yyyy-MM" style="align:center middle;" autoselect="true"/>
                    <Div position="absolute 625 5 785 30" id="group2">
                      <Layouts>
                        <Layout>
                          <Radio position="absolute 10 2 150 22" id="rdo_gubun" columncount="2" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                            <Dataset id="innerdataset">
                              <ColumnInfo>
                                <Column id="codecolumn"/>
                                <Column id="datacolumn"/>
                              </ColumnInfo>
                              <Rows>
                                <Row>
                                  <Col id="codecolumn">Y</Col>
                                  <Col id="datacolumn">전체</Col>
                                </Row>
                                <Row>
                                  <Col id="codecolumn">N</Col>
                                  <Col id="datacolumn">입고량</Col>
                                </Row>
                              </Rows>
                            </Dataset>
                          </Radio>
                        </Layout>
                      </Layouts>
                    </Div>
                    <Static text="구분 :" position="absolute 583 9 635 26" align="align:center middle;" id="caption3" class="search_name"/>
                  </Layout>
                </Layouts>
              </Div>
              <Shape position="absolute 0 72 1195 78" linetype="horizontal" id="line15" class="line_10"/>
              <Grid position="absolute 0 77 1195 734" id="grd_stocpropertylist" class="datagrid2" binddataset="ds_main_stocpropertylist">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="20" band="left"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="84"/>
                      <Column size="169"/>
                      <Column size="0"/>
                      <Column size="42"/>
                      <Column size="40"/>
                      <Column size="44"/>
                      <Column size="42"/>
                      <Column size="57"/>
                      <Column size="44"/>
                      <Column size="42"/>
                      <Column size="0"/>
                      <Column size="70"/>
                      <Column size="41"/>
                      <Column size="113"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="150"/>
                      <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" colspan="2" text="함량/단위" taborder="undefined"/>
                      <Cell col="8" colspan="2" text="규격/단위" taborder="undefined"/>
                      <Cell col="10" text="낱개단위"/>
                      <Cell col="11" colspan="2" text="포장수량/단위" taborder="undefined"/>
                      <Cell col="13" text="최소단위"/>
                      <Cell col="14" colspan="2" text="입고수량/단위" taborder="undefined"/>
                      <Cell col="16" text="입고금액"/>
                      <Cell col="17" text="출고수량"/>
                      <Cell col="18" text="출고금액"/>
                      <Cell col="19" text="재고수량"/>
                      <Cell col="20" text="재고금액"/>
                      <Cell col="21" text="계정코드"/>
                      <Cell col="22" text="제조회사명"/>
                      <Cell col="23" text="KD코드"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="expr:currow + 1"/>
                      <Cell col="1" text="bind:lrgnm"/>
                      <Cell col="2" text="bind:dcntnm"/>
                      <Cell col="3" style="align:left;" text="bind:goodcd"/>
                      <Cell col="4" style="align:left;" text="bind:goodnm"/>
                      <Cell col="5" text="bind:goodunitcost" mask="#,###.##"/>
                      <Cell col="6" style="align:right;" text="bind:cntsqty"/>
                      <Cell col="7" text="bind:cntsunit"/>
                      <Cell col="8" style="align:right;" text="bind:specvol"/>
                      <Cell col="9" text="bind:specunit"/>
                      <Cell col="10" text="bind:deliveunit"/>
                      <Cell col="11" style="align:right;" text="bind:exchqty"/>
                      <Cell col="12" text="bind:purcunit"/>
                      <Cell col="13" text="bind:deliveunit"/>
                      <Cell col="14" displaytype="number" text="bind:abwinqty" mask="#,##0.##"/>
                      <Cell col="15" style="align:left;" text="bind:deliveunit"/>
                      <Cell col="16" displaytype="number" text="bind:abwinamt" mask="#,##0.##"/>
                      <Cell col="17" text="bind:deliveqty" mask="#,###.##"/>
                      <Cell col="18" text="bind:deliveamt" mask="#,###.##"/>
                      <Cell col="19" text="bind:abstocqty" mask="#,###.##"/>
                      <Cell col="20" text="bind:stocamt" mask="#,###.##"/>
                      <Cell col="21" text="bind:amtacnt"/>
                      <Cell col="22" style="align:left;" text="bind:prodcmpycd"/>
                      <Cell col="23" style="align:left;" text="bind:edicd"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 1106 52 1192 71" id="btn_excel" class="btn5" text="Excel Save" onclick="group5_btn_excel_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 22 1195 50" id="group4" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 0 2 56 24" id="btn_prt" class="btn6" text="출력" anchor="default" onclick="group4_btn_prt_onclick"/>
              <Shape position="absolute 0 22 1195 28" linetype="horizontal" id="line1" class="line_6" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
      </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" sumtext="기관코드"/>
          <Column id="goodflag" type="STRING" size="256" sumtext="물품구분"/>
          <Column id="stocym" type="STRING" size="256" sumtext="시작재고년월"/>
          <Column id="tostocym" type="STRING" size="256" sumtext="종료재고년월"/>
          <Column id="mngtcls" type="STRING" size="256" sumtext="관리분류(약품)"/>
          <Column id="gubun" type="STRING" size="256" sumtext="VIew구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_stocpropertylist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lrgcd" type="STRING" size="256" sumtext="대분류코드"/>
          <Column id="lrgnm" type="STRING" size="256" sumtext="대분류명칭"/>
          <Column id="dcntnm" type="STRING" size="256" sumtext="계정명"/>
          <Column id="goodcd" type="STRING" size="256" sumtext="물품코드"/>
          <Column id="goodnm" type="STRING" size="256" sumtext="물품명칭"/>
          <Column id="goodunitcost" type="STRING" size="256" sumtext="물품단가"/>
          <Column id="cntsqty" type="STRING" size="256" sumtext="함량"/>
          <Column id="cntsunit" type="STRING" size="256" sumtext="함량단위"/>
          <Column id="specvol" type="STRING" size="256" sumtext="함량단위"/>
          <Column id="specunit" type="STRING" size="256" sumtext="함량단위"/>
          <Column id="exchqty" type="STRING" size="256" sumtext="환산수량"/>
          <Column id="deliveunit" type="STRING" size="256" sumtext="수불단위"/>
          <Column id="purcunit" type="STRING" size="256" sumtext="포장단위"/>
          <Column id="brngfwrdqty" type="STRING" size="256" sumtext="이월수량"/>
          <Column id="brngfwrdamt" type="STRING" size="256" sumtext="이월금액"/>
          <Column id="winqty" type="STRING" size="256" sumtext="입고수량"/>
          <Column id="abwinqty" type="STRING" size="256" sumtext="입고수량"/>
          <Column id="abwinamt" type="STRING" size="256" sumtext="입고금액"/>
          <Column id="deliveqty" type="STRING" size="256" sumtext="출고수량"/>
          <Column id="delivedeptqty" type="STRING" size="256" sumtext="출고수량"/>
          <Column id="deliveamt" type="STRING" size="256" sumtext="출고금액"/>
          <Column id="stocqty" type="STRING" size="256" sumtext="재고수량"/>
          <Column id="abstocqty" type="STRING" size="256" sumtext="재고수량"/>
          <Column id="stocamt" type="STRING" size="256" sumtext="재고금액"/>
          <Column id="amtacnt" type="STRING" size="256" sumtext="계정코드"/>
          <Column id="prodcmpycd" type="STRING" size="256" sumtext="제조사명"/>
          <Column id="edicd" type="STRING" size="256" sumtext="EDI,KD코드"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_tmp_rexinfo_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" sumtext="기관코드"/>
          <Column id="goodflag" type="STRING" size="256" sumtext="물품구분"/>
          <Column id="stocym" type="STRING" size="256" sumtext="시작재고년월"/>
          <Column id="tostocym" type="STRING" size="256" sumtext="종료재고년월"/>
          <Column id="mngtcls" type="STRING" size="256" sumtext="관리분류(약품)"/>
          <Column id="gubun" type="STRING" size="256" sumtext="VIew구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_tmp_rexinfo_stocpropertylist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="lrgcd" type="STRING" size="256" sumtext="대분류코드"/>
          <Column id="lrgnm" type="STRING" size="256" sumtext="대분류명칭"/>
          <Column id="dcntnm" type="STRING" size="256" sumtext="계정명"/>
          <Column id="goodcd" type="STRING" size="256" sumtext="물품코드"/>
          <Column id="goodnm" type="STRING" size="256" sumtext="물품명칭"/>
          <Column id="goodunitcost" type="STRING" size="256" sumtext="물품단가"/>
          <Column id="cntsqty" type="STRING" size="256" sumtext="함량"/>
          <Column id="cntsunit" type="STRING" size="256" sumtext="함량단위"/>
          <Column id="specvol" type="STRING" size="256" sumtext="함량단위"/>
          <Column id="specunit" type="STRING" size="256" sumtext="함량단위"/>
          <Column id="exchqty" type="STRING" size="256" sumtext="환산수량"/>
          <Column id="deliveunit" type="STRING" size="256" sumtext="수불단위"/>
          <Column id="purcunit" type="STRING" size="256" sumtext="포장단위"/>
          <Column id="brngfwrdqty" type="STRING" size="256" sumtext="이월수량"/>
          <Column id="brngfwrdamt" type="STRING" size="256" sumtext="이월금액"/>
          <Column id="winqty" type="STRING" size="256" sumtext="입고수량"/>
          <Column id="abwinqty" type="STRING" size="256" sumtext="입고수량"/>
          <Column id="abwinamt" type="STRING" size="256" sumtext="입고금액"/>
          <Column id="deliveqty" type="STRING" size="256" sumtext="출고수량"/>
          <Column id="delivedeptqty" type="STRING" size="256" sumtext="출고수량"/>
          <Column id="deliveamt" type="STRING" size="256" sumtext="출고금액"/>
          <Column id="stocqty" type="STRING" size="256" sumtext="재고수량"/>
          <Column id="abstocqty" type="STRING" size="256" sumtext="재고수량"/>
          <Column id="stocamt" type="STRING" size="256" sumtext="재고금액"/>
          <Column id="amtacnt" type="STRING" size="256" sumtext="계정코드"/>
          <Column id="prodcmpycd" type="STRING" size="256" sumtext="제조사명"/>
          <Column id="edicd" type="STRING" size="256" sumtext="EDI,KD코드"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group5.group6.cmb_instcd" propid="value" datasetid="ds_send_sendlist" columnid="instcd"/>
      <BindItem id="item1" compid="group5.group6.ipt_stocym" propid="value" datasetid="ds_send_sendlist" columnid="stocym"/>
      <BindItem id="item2" compid="group5.group6.ipt_tostocym" propid="value" datasetid="ds_send_sendlist" columnid="tostocym"/>
      <BindItem id="item3" compid="group5.group6.group2.rdo_gubun" propid="value" datasetid="ds_send_sendlist" columnid="gubun"/>
      <BindItem id="item4" compid="group5.group6.cmb_mngtcls" propid="value" datasetid="ds_send_sendlist" columnid="mngtcls"/>
      <BindItem id="item5" compid="group5.group6.opt_goodflag" propid="value" datasetid="ds_send_sendlist" columnid="goodflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************
 * System Name		:	경대 의료정보시스템
 * Job Name 		:	mis_stocsumxp -> SMRST00901
 * Creator			:	yjh
 * Make Date 		:	2018-01-08
 * Description		:	
 *---------------------------------------------------------------------------------------
 * Modify Date		Modifier		Modify Description
 *---------------------------------------------------------------------------------------
 * 2018-01-08		yjh				TF->XP
 * 
 *---------------------------------------------------------------------------------------
 ****************************************************************************************/


//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "mis_miscommonxp::MIS.xjs";
include "mis_miscommonxp::RSZ001.xjs";


//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------



//=======================================================================================
// Function
//---------------------------------------------------------------------------------------
// 화면 open시와 초기화 버튼 클릭시 화면 초기화 기능을 수행한다.
function fInitialize() {
	
	ds_main_stocpropertylist.clearData();
	
	misfComboComCdList("030M0003",group5.group6.cmb_mngtcls,"Y");					
	group5.group6.cmb_mngtcls.index = 0;
	ds_send_sendlist.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd"));
	
	var curdd = utlf_getCurrentDate();
	ds_send_sendlist.setColumn(0, "stocym", curdd.substr(0,6));
	ds_send_sendlist.setColumn(0, "tostocym", curdd.substr(0,6));
	
	// [2010.08.26]AS-IS 코드 TO_BE 코드 전환을 위한 물품구분 변경 (goodflag= P) => (goodflag= PH) 
	ds_send_sendlist.setColumn(0, "goodflag", "PH");
	ds_send_sendlist.setColumn(0, "gubun", "N");
}


//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SMRST00901
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시
 ****************************************************************************************/
function SMRST00901_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SMRST00901
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 로딩 완료시
 ****************************************************************************************/
function SMRST00901_onload(obj:Form, e:LoadEventInfo)
{
	ds_send_sendlist.setColumn(0, "gubun", "N");
	
	fInitialize();
	misfGridInit(group5.grd_stocpropertylist);
	
	rszfUserInstList(group5.group6.cmb_instcd,sysf_getUserInfo("userid"));
	misfMsterDetailSet(group5.grd_stocpropertylist,null,"TRRST00901","Y");

	//화면 권한 설정
//					btn_save.disabled = !(checkAuth("X"));
	group4.btn_prt.enable = frmf_checkAuth("P");
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_search
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 조회버튼 클릭시
 ****************************************************************************************/
function group5_group6_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var null_check = group5.group6.cmb_instcd.value;
/*
	if( null_check=="") {
		messageBox("기관코드를","C002");
		return;
		null_check=cmb_goodflag.value;
	} else if(null_check=="") {
		messageBox("물품청구 구분","C002");
		return;
	}
*/
	var oParam = {};
		oParam.id          = "TRRST00902";
		oParam.service     = "stocsumapp.StocSumMngt";
		oParam.method      = "reqGetStocIpDrugList";
		oParam.inds        = "req=ds_send_sendlist";
		oParam.outds       = "ds_main_stocpropertylist=stocpropertylist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRRST00902";

	tranf_submit(oParam);
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_excel
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: Excel Save버튼 클릭시
 ****************************************************************************************/
function group5_btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	var reqfrdd = ds_send_sendlist.getColumn(0, "stocym");
	
	grdf_exportExcel(group5.grd_stocpropertylist, "약품입고현황"+"(" + reqfrdd + ")", "약품입고현황", false, "", "user", false);
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: btn_prt
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 출력버튼 클릭시
 ****************************************************************************************/
function group4_btn_prt_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_tmp_rexinfo_sendlist.clearData();
	ds_tmp_rexinfo_stocpropertylist.clearData();
	
	ds_tmp_rexinfo_sendlist.copyData(ds_send_sendlist);
	ds_tmp_rexinfo_stocpropertylist.copyData(ds_main_stocpropertylist);
	
	var objDOM = rptf_createDOM();				                													// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "/root/tmp/rexinfo/stocpropertylist", ds_tmp_rexinfo_stocpropertylist);									// 데이터셋 1
	rptf_setNodeListToDOM(objDOM, "/root/tmp/rexinfo/sendlist", ds_tmp_rexinfo_sendlist);									// 데이터셋 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(["RPRST00903"],[objParam], option);
}
]]></Script>
  </Form>
</FDL>