YNU_JEUS/app_home/himed/xpapps/ast/dentalcraftxp/xp/SMAED00700_재고입출고현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAED00700" position="absolute 0 0 1195 805" titletext="치기공 재고 입출고 현황" onload="SMAED00700_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 25 1195 769" id="grp_biz" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Static text="치기공 재고 입출고 현황 리스트" position="absolute 0 52 218 74" id="caption1" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 68 1194 74" id="line1" class="line_10" anchor="left top right"/>
              <Grid position="absolute 0 73 1194 744" align="align:center middle;" id="dtg_inoutlst" binddataset="ds_main_inoutlst_item" anchor="all" selecttype="multirow" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25" band="left"/>
                      <Column size="129"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="90"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="100"/>
                      <Column size="100"/>
                      <Column size="200"/>
                      <Column size="60"/>
                      <Column size="100"/>
                    </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="수납금액"/>
                      <Cell col="8" text="이전 재고량"/>
                      <Cell col="9" text="입고량/반납량"/>
                      <Cell col="10" text="출고량/사용량"/>
                      <Cell col="11" text="이후 재고량"/>
                      <Cell col="12" text="비 고"/>
                      <Cell col="13" text="취소여부"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" text="expr:currow+1"/>
                      <Cell col="1" text="bind:stockdd" mask="expr:utlf_isNull(stockdd) ? '' : '####-##-## ##:##:##'" enable="false"/>
                      <Cell col="2" text="bind:acptno" enable="false"/>
                      <Cell col="3" edittype="none" text="bind:pid"/>
                      <Cell col="4" edittype="none" text="bind:hngnm"/>
                      <Cell col="5" edittype="none" text="bind:calcscorcd"/>
                      <Cell col="6" displaytype="combo" style="align:center middle;" text="bind:metalcd" combodataset="ds_main_eqmtlist_item" combocodecol="basecd" combodatacol="basecdflagdesc" enable="false"/>
                      <Cell col="7" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:rcptamt"/>
                      <Cell col="8" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:stockbqty"/>
                      <Cell col="9" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:inqty"/>
                      <Cell col="10" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:outqty"/>
                      <Cell col="11" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:stockaqty"/>
                      <Cell col="12" edittype="none" text="bind:bigo"/>
                      <Cell col="13" edittype="none" text="bind:cnclyn"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Div position="absolute 0 0 1194 40" align="align:center top;" id="grp_sea" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Static text="입출고 일자 :" position="absolute 15 13 135 30" id="caption2" class="search_name" anchor="default"/>
                    <Static text="~" position="absolute 227 12 239 29" id="caption5" class="search_no_b" anchor="default"/>
                    <Shape position="absolute 1104 10 1110 32" linetype="vertical" id="line13" class="line_4" anchor="top right"/>
                    <Calendar position="absolute 124 11 224 30" id="ipt_fromdd" class="input_essential" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true" taborder="0"/>
                    <Calendar position="absolute 242 11 342 30" id="ipt_todd" class="input_essential" anchor="default" dateformat="yyyy-MM-dd" autoselect="true" taborder="1"/>
                    <Button position="absolute 1123 10 1179 32" id="btn_sea" class="btn1" text="조회" anchor="top right" taborder="4" onclick="grp_biz_grp_sea_btn_sea_onclick"/>
                    <Static text="금  속 :" position="absolute 360 13 435 30" id="caption3" class="search_name" anchor="default"/>
                    <Static text="구  분 :" position="absolute 525 13 600 30" id="caption4" class="search_name" visible="false" anchor="default"/>
                    <Combo position="absolute 600 11 670 30" id="cmb_inoutgb" class="combo_search" visible="false" innerdataset="@ds_main_inoutgbcdlist_item" datacolumn="cdnm" codecolumn="cdid" anchor="default" taborder="3"/>
                    <Combo position="absolute 435 11 505 30" id="cmb_metalcd" class="combo_search" innerdataset="ds_main_eqmtlist_item" datacolumn="basecdflagdesc" codecolumn="basecd" anchor="default" taborder="2"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button position="absolute 1114 46 1194 68" id="btn_excsave" class="btn7" text="엑셀저장" anchor="top right" onclick="grp_biz_btn_excsave_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 0 773 1195 800" id="grp_btn" anchor="left bottom">
          <Layouts>
            <Layout>
              <Button position="absolute 3 2 59 24" id="button2" class="btn6" text="출력" anchor="default" onclick="grp_btn_button2_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="치기공 재고 입출고 현황" class="tit_1" position="absolute 0 0 210 25"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="hidden" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="hidden"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_globalinstance" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="instance1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instance1"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="temp"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_inoutlst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="stockdd" type="STRING" size="256"/>
          <Column id="acptno" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="calcscorcd" type="STRING" size="256"/>
          <Column id="metalcd" type="STRING" size="256"/>
          <Column id="rcptamt" type="STRING" size="256"/>
          <Column id="stockbqty" type="STRING" size="256"/>
          <Column id="inqty" type="STRING" size="256"/>
          <Column id="outqty" type="STRING" size="256"/>
          <Column id="stockaqty" type="STRING" size="256"/>
          <Column id="bigo" type="STRING" size="256"/>
          <Column id="cnclyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="stockdd"/>
            <Col id="acptno"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="calcscorcd"/>
            <Col id="metalcd"/>
            <Col id="rcptamt"/>
            <Col id="stockbqty"/>
            <Col id="inqty"/>
            <Col id="outqty"/>
            <Col id="stockaqty"/>
            <Col id="bigo"/>
            <Col id="cnclyn"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="combobscdlst" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="combobscdlst"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_inoutgbcdlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid">1</Col>
            <Col id="cdnm">입 고</Col>
          </Row>
          <Row>
            <Col id="cdid">2</Col>
            <Col id="cdnm">출 고</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_rexprnt_inoutlst" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="srchsearch" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="srchmetalcd" type="STRING" size="256"/>
          <Column id="srchinoutgb" type="STRING" size="256"/>
          <Column id="basecdflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchfromdd"/>
            <Col id="srchtodd"/>
            <Col id="srchmetalcd"/>
            <Col id="srchinoutgb"/>
            <Col id="basecdflag"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_eqmtlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
      <BindItem id="item1" compid="grp_biz.grp_sea.ipt_todd" propid="value" datasetid="ds_send" columnid="srchtodd"/>
      <BindItem id="item2" compid="grp_biz.grp_sea.cmb_inoutgb" propid="value" datasetid="ds_send" columnid="srchinoutgb"/>
      <BindItem id="item3" compid="grp_biz.grp_sea.cmb_metalcd" propid="value" datasetid="ds_send" columnid="srchmetalcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-09-30
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-09-30      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "ast_examcurexp::AEZ0001.xjs";
include "ast_examcurexp::combolist.xjs";
include "ast_tissuebankbasexp::tissuebankcombolist.xjs";
// include "ast_healexamxp::AHA001.xjs";


//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var arErrorCode = new HashArray();

//=======================================================================================
// Function 
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 화면 초기화
 ****************************************************************************************/
function fGetScreenInit(){
	ds_main_inoutlst_item.clearData();
	
	lf_aezfSetSuppDeptcd();
	ds_send_globalinstance.setColumn(0,"instance1",frmf_getParameter("AST_DEPTCD"));

	// 금속종류 코드 LIST(대분류)
	ds_send.setColumn(0,"basecdflag", "H");	
	ds_main_eqmtlist_item.clearData();
	dsf_createDsRow("ds_req", 	[
								{col:"basesuppdeptcd", type:"STRING", size:256, val:ds_send_globalinstance.getColumn(0,"instance1")}
							  , {col:"instcd", type:"STRING", size:256, val:""}
							  , {col:"basecdflag", type:"STRING", size:256, val:"H"}
								]);
	var oParam = {};
		oParam.id          = "TRAED00103";
		oParam.service     = "dentalcraftapp.DentalCraftCode";
		oParam.method      = "reqGetEqmtCodeList";
		oParam.inds        = "req=ds_req";
		oParam.outds       = "ds_main_eqmtlist_item=item";
		oParam.async       = false;
		//oParam.callback    = "cf_TRAED00103";

	tranf_submit(oParam);

	ds_send.setColumn( 0, "srchfromdd", utlf_getCurrentDate());
	ds_send.setColumn( 0, "srchtodd", 	utlf_getCurrentDate());

	frmf_addComboItem("grp_biz.grp_sea.cmb_metalcd", "전 체", "", "above");
	grp_biz.grp_sea.cmb_metalcd.value = "";

	frmf_addComboItem("grp_biz.grp_sea.cmb_inoutgb", "전 체", "", "above");
	grp_biz.grp_sea.cmb_inoutgb.value = "";		               
}
 
//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Description		: 화면 처음 초기화시 폼초기화
 ****************************************************************************************/
function SMAED00700_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj); 
	//grdf_initGrid(grd_XXX); 
	grdf_setGridSort(grp_biz.dtg_inoutlst); 
	//grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 
	
	dsf_setDefaultVal(ds_send,"all");

	fGetScreenInit();	
}

/****************************************************************************************
 * Components		: Button
 * Description		: 조회
 ****************************************************************************************/
function grp_biz_grp_sea_btn_sea_onclick(obj:Button, e:ClickEventInfo) {
	if( ds_send.getColumn(0, "srchfromdd") == ""){
		sysf_messageBox("조회기간", "E013", "입력 후 다시 조회하세요.");
		return;
	}

	if( ds_send.getColumn(0, "srchtodd") == "" ){
		sysf_messageBox("조회기간", "E013", "입력 후 다시 조회하세요.");
		return;
	}
	
	var oParam = {};
		oParam.id          = "TRAED00700";
		oParam.service     = "dentalcraftapp.DentalCraft";
		oParam.method      = "reqGetDentalCrafinoutnowLst";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_inoutlst_item=item";
		oParam.async       = false;
		oParam.callback    = "cf_TRAED00700";

	tranf_submit(oParam);
}

function cf_TRAED00700(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    dsf_setDefaultVal(ds_main_inoutlst_item,"all");
}

/****************************************************************************************
 * Components		: Button
 * Description		: 엑셀저장
 ****************************************************************************************/
function grp_biz_btn_excsave_onclick(obj:Button, e:ClickEventInfo) {
	if( ds_main_inoutlst_item.rowcount > 0 ){
		grdf_exportExcel(grp_biz.dtg_inoutlst, "SheetName", "SheetName", false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}

/****************************************************************************************
 * Components		: Button
 * Description		: 출력
 ****************************************************************************************/
function grp_btn_button2_onclick(obj:Button, e:ClickEventInfo) {
	var cnt = ds_main_inoutlst_item.rowcount;
	
	if(cnt == 0) return;
	
	dsf_createDs("ds_rexprnt_inoutlst_item");
	dsf_copyColInfo(ds_rexprnt_inoutlst_item,ds_main_inoutlst_item);
	for( var i = 0; i < cnt; i++) {
		var nRow = ds_rexprnt_inoutlst_item.addRow();
		ds_rexprnt_inoutlst_item.copyRow(nRow, ds_main_inoutlst_item, i);
		ds_rexprnt_inoutlst_item.setColumn(nRow, "stockdd", grp_biz.dtg_inoutlst.getCellText(i, grp_biz.dtg_inoutlst.getBindCellIndex("body","stockdd")));
		ds_rexprnt_inoutlst_item.setColumn(nRow, "metalcd", grp_biz.dtg_inoutlst.getCellText(i, grp_biz.dtg_inoutlst.getBindCellIndex("body","metalcd")));
	}

	var srchtitle = "";
	srchtitle = "▣ 입출고 일자 :  " + grp_biz.grp_sea.ipt_fromdd.text + " ~ " + grp_biz.grp_sea.ipt_todd.text ;

	if( grp_biz.grp_sea.cmb_metalcd.value != "" ){
		srchtitle = srchtitle + "      ▣ 금 속 :  " + grp_biz.grp_sea.cmb_metalcd.text ;
	} 	

	if( grp_biz.grp_sea.cmb_inoutgb.value != "" ){
		srchtitle = srchtitle + "      ▣ 구 분 :  " + grp_biz.grp_sea.cmb_inoutgb.text ;
	}

	dsf_makeValue(ds_rexprnt_inoutlst, "srchsearch", "string", srchtitle);

    var objDOM = rptf_createDOM();
    var objParam = new Object();
    rptf_setNodeListToDOM(objDOM, "/root/rexprnt/inoutlst" , ds_rexprnt_inoutlst);
    rptf_setNodeListToDOM(objDOM, "/root/rexprnt/inoutlst/item" , ds_rexprnt_inoutlst_item);
    objParam.xml_data_XML1 	= objDOM.documentElement.source;
    var option = "open=1;save=1;directprint=0;printdialog=1;print=1;zoom=0";
    rptf_exeReportPreview30(["RPAED00700"],[objParam], option); 		
	
	ds_rexprnt_inoutlst_item.clearData();
	ds_rexprnt_inoutlst.clearData();
}

]]></Script>
  </Form>
</FDL>