YNU_JEUS/app_home/himed/xpapps/ast/pharmacystocxp/xp/SMADT50500_임상약품입출고내역조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADT50200" position="absolute 0 0 1001 777" titletext="일자별 약품별 입출고내역 조회" oninit="SMADT50200_oninit" onload="SMADT50200_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="일자별 약품별 입출고내역 조회" class="tit_1" position="absolute 0 0 229 25" onclick="caption6_onclick"/>
        <Div id="group2" anchor="left top right" taborder="1" class="div_SA" position="absolute 0 24 1000 64">
          <Layouts>
            <Layout>
              <Shape id="line13" linetype="vertical" position="absolute 901 8 907 33" anchor="top right"/>
              <Static id="caption24" text="업무일자 :" class="search_name" position="absolute 10 13 81 30" anchor="default" onclick="group2_caption24_onclick"/>
              <Button id="btn_sea" taborder="8" text="조회" onclick="group3_group2_btn_sea_onclick" class="btn1" position="absolute 921 9 977 31" anchor="top right"/>
              <Calendar id="ipt_fromdd" taborder="9" autoselect="true" dateformat="yyyy-MM-dd" oneditclick="group3_group2_ipt_sumdt1_oneditclick" class="input_essential" position="absolute 88 11 188 30" anchor="default"/>
              <Calendar id="ipt_todd" taborder="10" autoselect="true" dateformat="yyyy-MM-dd" oneditclick="group3_group2_ipt_sumdt1_oneditclick" class="input_essential" position="absolute 208 11 308 30"/>
              <Static id="caption00" text="약품코드 :" onclick="group2_caption24_onclick" class="search_name" position="absolute 320 13 396 30"/>
              <Edit id="ed_screenurl" taborder="11" imemode="alpha" lengthunit="utf8" autoselect="true" onkeyup="grp_sea_ed_screenurl_onkeyup" position="absolute 392 11 489 31"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line00" class="line_1" position="absolute 2 92 761 102" style="strokepen:3 solid #33bbbbff;"/>
        <Static id="caption3" text="입출고내역 조회" class="search_name" position="absolute 7 77 172 94"/>
        <Grid id="Grid00" taborder="4" useinputpanel="false" position="absolute 774 99 991 760" binddataset="ds_stoclist" visible="true">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="86"/>
                <Column size="57"/>
                <Column size="56"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="45" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="약품코드"/>
                <Cell col="1" text="불가용&#13;&#10;재고량"/>
                <Cell col="2" text="가용&#13;&#10;재고량"/>
                <Cell col="3" text="입고량"/>
                <Cell col="4" text="출고량"/>
                <Cell col="5" text="반납량"/>
              </Band>
              <Band id="body">
                <Cell text="bind:drugcd"/>
                <Cell col="1" text="bind:nousestocqty"/>
                <Cell col="2" text="bind:usestocqty"/>
                <Cell col="3" style="align:right;padding:0 5 0 0;" text="bind:inqty"/>
                <Cell col="4" style="align:right;padding:0 5 0 0;" text="bind:outqty"/>
                <Cell col="5" style="align:right;padding:0 5 0 0;" text="bind:rtnqty"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line01" class="line_1" position="absolute 774 92 991 102" style="strokepen:3 solid #33bbbbff;"/>
        <Grid id="grd_iolist" taborder="2" binddataset="ds_iolist" useinputpanel="false" oncellclick="Grid00_oncellclick" onheadclick="Grid00_onheadclick" oncelldblclick="Grid00_oncelldblclick" position="absolute 2 99 761 760">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="82"/>
                <Column size="73"/>
                <Column size="330"/>
                <Column size="51"/>
                <Column size="49"/>
                <Column size="49"/>
                <Column size="57"/>
                <Column size="53"/>
              </Columns>
              <Rows>
                <Row size="45" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="업무일자"/>
                <Cell col="1" text="약품코드"/>
                <Cell col="2" text="약품명"/>
                <Cell col="3" text="입고량"/>
                <Cell col="4" text="불출량"/>
                <Cell col="5" text="가용-&gt;&#13;&#10;불가용"/>
                <Cell col="6" text="불가용&#13;&#10;반납량"/>
                <Cell col="7" text="가용&#13;&#10;반납량"/>
              </Band>
              <Band id="body">
                <Cell displaytype="date" edittype="date" text="bind:workdd"/>
                <Cell col="1" style="align:left;padding:5 5 5 5;" text="bind:drugcd"/>
                <Cell col="2" style="align:left;padding:0 0 0 5;" text="bind:drugnm"/>
                <Cell col="3" displaytype="number" edittype="text" editfilter="number" style="padding:0 5 0 0;" text="bind:inqty"/>
                <Cell col="4" displaytype="number" edittype="text" editfilter="number" style="padding:0 5 0 0;" text="bind:outqty"/>
                <Cell col="5" displaytype="number" edittype="text" editfilter="number" style="padding:0 5 0 0;" text="bind:nouseqty"/>
                <Cell col="6" displaytype="number" edittype="text" editfilter="number" style="padding:0 5 0 0;" text="bind:nortnqty"/>
                <Cell col="7" displaytype="number" edittype="text" editfilter="number" style="padding:0 5 0 0;" text="bind:rtnqty"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption00" text="현재고내역" class="search_name" position="absolute 776 82 941 99"/>
        <Button id="Button00" taborder="5" text="엑셀" position="absolute 717 74 761 94" onclick="Button00_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="drugcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_iolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="workdd" type="STRING" size="256"/>
          <Column id="drugcd" type="STRING" size="256"/>
          <Column id="drugnm" type="STRING" size="256"/>
          <Column id="inqty" type="STRING" size="256"/>
          <Column id="outqty" type="STRING" size="256"/>
          <Column id="rtnqty" type="STRING" size="256"/>
          <Column id="flag" type="STRING" size="256"/>
          <Column id="cmt" type="STRING" size="256"/>
          <Column id="nouseqty" type="STRING" size="256"/>
          <Column id="nortnqty" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_savedata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_stoclist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="drugcd" type="STRING" size="256"/>
          <Column id="inqty" type="STRING" size="256"/>
          <Column id="outqty" type="STRING" size="256"/>
          <Column id="rtnqty" type="STRING" size="256"/>
          <Column id="totstocqty" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_fromdd" propid="value" datasetid="ds_send" columnid="fromdd"/>
      <BindItem id="item1" compid="group2.ipt_todd" propid="value" datasetid="ds_send" columnid="todd"/>
      <BindItem id="item2" compid="group2.ed_screenurl" propid="value" datasetid="ds_send" columnid="drugcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

var arErrorCode = new HashArray();

/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/

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

function SMADT50200_onload(obj:Form, e:LoadEventInfo)
{
	
	var drugcd = arg_drugcd;
	ds_send.setColumn(0, "fromdd", utlf_getCurrentDate().substr(0,6) + "01");
	ds_send.setColumn(0, "todd", utlf_getLastDate(utlf_getCurrentDate()));
	ds_send.setColumn(0, "drugcd", drugcd);
	
	//grdf_setRowTypeIcon(grd_iolist, 0); //상태값 표시
	//ds_iolist.updatecontrol = true;
	fSearch();
}

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

function fSearch() {
	var oParam = {};
		oParam.id          = "TRADT50401";
		oParam.service     = "pharmacystocapp.DrugStocSum";
		oParam.method      = "reqGetImsangDrugSubulInfo";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_iolist=info ds_stoclist=stoclist";
		oParam.async       = false;
		//oParam.callback    = "TRADT50300";
	tranf_submit(oParam);

}

function btn_save_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send_savedata.clearData();
	
	var updtdata1 = grdf_getGridUpdateData(grd_iolist, "all");
	grdf_setStatusColumn(updtdata1, "m");
	ds_send_savedata.copyData(updtdata1,true);
	
	var oParam = {};
		oParam.id          = "TXADT50401";
		oParam.service     = "pharmacystocapp.DrugStocSum";
		oParam.method      = "reqExeImsangDrugInOutInfo";
		oParam.inds        = "req=ds_send_savedata";
		oParam.outds       = "ds_iolist=info";
		oParam.async       = false;
		//oParam.callback    = "TRADT50300";
	tranf_submit(oParam);
	
	fSearch();
}

function group2_caption24_onclick(obj:Static,  e:ClickEventInfo)
{
	
}

function Button00_onclick(obj:Button,  e:ClickEventInfo)
{
	//조회된 자료가 없으면 먼저 조회하라고 message
	if(ds_iolist.rowcount < 1) {
		sysf_messageBox("조회된 결과가 존재하지 않습니다. \n\n먼저 조회 후 Download 하십시요. ", "E999", "");							
		return;
	}
																							
	grdf_exportExcel(grd_iolist, "excel", "savetype", false, "", "user", false);
}

function caption6_onclick(obj:Static,  e:ClickEventInfo)
{
	
}
]]></Script>
  </Form>
</FDL>