YNU_JEUS/app_home/himed/xpapps/mis/stocsumxp/xp/SMRST00900_재고자산수불현황출력(약국).xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMRST00900" position="absolute 0 0 1201 774" titletext="재고자산수불현황출력(약품)" oninit="SMRST00900_oninit" onload="SMRST00900_onload">
    <Layouts>
      <Layout>
        <Static text="재고자산수불현황" position="absolute 1 91 212 108" id="caption21" class="tit_2"/>
        <Div position="absolute 0 48 1195 83" align="align:center top;" id="group6">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 0 1195 35" id="roundrect3" type="roundrectangle"/>
              <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 435 8 535 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"/>
              <Static text="관리분류 :" position="absolute 725 9 813 26" id="caption2" class="search_name"/>
              <Static text="~" position="absolute 542 10 557 30" id="caption1"/>
              <Calendar position="absolute 560 8 660 27" align="align:center middle;" id="ipt_tostocym" class="input_essential" mask="yyyy-mm"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape position="absolute 0 107 1195 113" linetype="horizontal" id="line15" class="line_10"/>
        <Grid position="absolute 0 112 1195 769" id="grd_stocpropertylist" class="datagrid2" binddataset="ds_main_stocpropertylist">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <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="0"/>
                <Column size="67"/>
                <Column size="101"/>
                <Column size="70"/>
                <Column size="113"/>
                <Column size="64"/>
                <Column size="100"/>
                <Column size="66"/>
                <Column size="113"/>
                <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" colspan="2" text="함량/단위" taborder="undefined"/>
                <Cell col="8" colspan="2" text="포장수량/단위" taborder="undefined"/>
                <Cell col="10" text="최소단위"/>
                <Cell col="11" text="이월수량"/>
                <Cell col="12" text="이월금액"/>
                <Cell col="13" text="입고수량"/>
                <Cell col="14" text="입고금액"/>
                <Cell col="15" text="출고수량"/>
                <Cell col="16" text="출고금액"/>
                <Cell col="17" text="재고수량"/>
                <Cell col="18" text="재고금액"/>
                <Cell col="19" text="계정코드"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" text="bind:lrgnm"/>
                <Cell col="2" text="bind:dcntnm"/>
                <Cell col="3" style="align:left top;padding:5 2 1 2;" text="bind:goodcd" wordwrap="word"/>
                <Cell col="4" style="align:left top;padding:5 2 1 2;" text="bind:goodnm" wordwrap="word"/>
                <Cell col="5" text="bind:goodunitcost" mask="#,###.##"/>
                <Cell col="6" text="bind:cntsqty"/>
                <Cell col="7" text="bind:cntsunit"/>
                <Cell col="8" text="bind:exchqty"/>
                <Cell col="9" text="bind:purcunit"/>
                <Cell col="10" text="bind:deliveunit"/>
                <Cell col="11" displaytype="number" style="align:right middle;" text="bind:brngfwrdqty" mask="#,###.##"/>
                <Cell col="12" displaytype="number" style="align:right middle;" text="bind:brngfwrdamt" mask="#,###.##"/>
                <Cell col="13" displaytype="number" style="align:right middle;" text="bind:abwinqty" mask="#,###.##"/>
                <Cell col="14" displaytype="number" style="align:right middle;" text="bind:abwinamt" mask="#,###.##"/>
                <Cell col="15" displaytype="number" style="align:right middle;" text="bind:deliveqty" mask="#,###.##"/>
                <Cell col="16" displaytype="number" style="align:right middle;" text="bind:deliveamt" mask="#,###.##"/>
                <Cell col="17" displaytype="number" style="align:right middle;" text="bind:abstocqty" mask="#,###.##"/>
                <Cell col="18" displaytype="number" style="align:right middle;" text="bind:stocamt" mask="#,###.##"/>
                <Cell col="19" text="bind:amtacnt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button position="absolute 1106 87 1192 106" id="btn_excel" class="btn5" text="Excel Save" onclick="btn_excel_onclick"/>
        <Static id="caption6" text="재고자산수불현황출력(약품)" class="tit_1" position="absolute 0 0 209 25"/>
        <Button id="btn_prt" taborder="1" text="출력" class="btn6" position="absolute 0 26 56 48" 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.cmb_mngtcls" propid="value" datasetid="ds_send_sendlist" columnid="mngtcls"/>
      <BindItem id="item4" 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 SMRST00900_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
}

function SMRST00900_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();
	misfGridInit(grd_stocpropertylist);
	
	rszfUserInstList(group6.cmb_instcd, sysf_getUserInfo("userid"));	

	//화면 권한 설정
	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";
	group6.cmb_mngtcls.value = "";
}	
function group6_btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	var null_check = group6.cmb_instcd.value;
	
	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          = "TRRST00901";
		oParam.service     = "stocsumapp.StocSumMngt";
		oParam.method      = "reqGetStocPropertyDrugList";
		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_stocpropertylist, "재고자산수불현황(" + 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;";		
	rptf_exeReportPreview30(["RPRST00902"],[objParam], option);
	
}
]]></Script>
  </Form>
</FDL>