YNU_JEUS/app_home/himed/xpapps/ast/examcurestatsxp/xp/SMAES06200_재료약사용현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAES06200" position="absolute 0 0 1190 781" titletext="재료/약 사용현황" oninit="SMAES06200_oninit" onload="SMAES06200_onload">
    <Layouts>
      <Layout>
        <Div id="grp_srch" taborder="1" class="div_SA" position="absolute 0 25 1185 65" anchor="left top right">
          <Layouts>
            <Layout>
              <Shape id="line16" linetype="vertical" class="line_4" position="absolute 1102 10 1108 32" anchor="top right"/>
              <Button id="btn_select" taborder="5" text="조회" class="btn1" position="absolute 1118 10 1174 32" anchor="top right" onclick="grp_srch_btn_select_onclick"/>
              <Calendar id="ipt_srchtodd" taborder="6" class="input_s_essential" position="absolute 266 9 366 30" anchor="default"/>
              <Calendar id="ipt_srchfromdd" taborder="7" class="input_s_essential" position="absolute 140 9 240 30" anchor="default"/>
              <Static id="lbl_srchdd" text="구분 :" class="search_name" position="absolute 395 11 440 28" anchor="default"/>
              <Static id="lbl_~" text="~" class="search_no_b" position="absolute 247 11 259 28" anchor="default"/>
              <Static id="caption2" text="재료/약 사용기간 :" class="search_name" position="absolute 15 11 137 28" anchor="default"/>
              <Radio id="rdo_menuflag" taborder="8" columncount="3" rowcount="1" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 444 8 594 28" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn"/>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">1</Col>
                      <Col id="datacolumn">재료</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">4</Col>
                      <Col id="datacolumn">약제</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Static id="caption1" text="수가코드 :" class="search_name" position="absolute 625 12 696 29" anchor="default"/>
              <Edit id="input8" taborder="9" class="input_search" position="absolute 699 10 799 31" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption45" text="재료/약 사용현황 LIST" class="tit_2" position="absolute 0 78 190 96"/>
        <Shape id="line18" linetype="horizontal" class="line_1" position="absolute 0 94 1183 100" anchor="left top right"/>
        <Grid id="grd_stuffmedilist" taborder="2" binddataset="ds_main_stuffmedilist" useinputpanel="false" position="absolute 0 99 1184 749" autofittype="col" cellsizingtype="col" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="0"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="260"/>
                <Column size="101"/>
                <Column size="315"/>
                <Column size="100"/>
                <Column size="100"/>
                <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="합계"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" displaytype="none" edittype="none" text="bind:systkey3"/>
                <Cell col="2" displaytype="normal" edittype="none" text="bind:cdnm"/>
                <Cell col="3" displaytype="text" edittype="none" style="align:left middle;padding:0 0 0 5;" text="bind:systkey4"/>
                <Cell col="4" style="align:left middle;" text="bind:ordnm"/>
                <Cell col="5" displaytype="text" edittype="none" style="align:left middle;padding:0 0 0 5;" text="bind:systkey5"/>
                <Cell col="6" displaytype="text" edittype="none" style="align:left middle;padding:0 0 0 5;" text="bind:ordnm2"/>
                <Cell col="7" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:inprcpcnt"/>
                <Cell col="8" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:outprcpcnt"/>
                <Cell col="9" displaytype="number" edittype="none" style="padding:0 5 0 0;" text="bind:totalprcpcnt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_excel1" taborder="3" text="엑셀" class="btn7" position="absolute 1129 71 1184 93" onclick="btn_excel1_onclick" anchor="top right"/>
        <Button id="button1" taborder="4" text="재계산" class="btn5" position="absolute 1074 71 1127 93" onclick="button1_onclick" anchor="top right"/>
        <Static id="caption6" text="재료/약 사용현황" class="tit_1" position="absolute 0 0 200 25"/>
        <Button id="btn_prt" taborder="5" text="출력" class="btn6" visible="false" position="absolute 1 755 57 777"/>
        <Shape id="line00" class="line_1" position="absolute 0 95 1183 101" anchor="left top right"/>
        <Shape id="line01" class="line_1" position="absolute 0 93 1183 99" anchor="left top right"/>
        <Button id="button6" taborder="6" text="마감정리" onclick="group2_button6_onclick" class="btn4" position="absolute 920 72 1000 94" anchor="right bottom"/>
        <Div position="absolute 435 265 760 395" id="grp_excucdrem" visible="false" anchor="default">
          <Layouts>
            <Layout>
              <Shape position="absolute 0 0 324 121" id="rectangle2" type="rectangle" anchor="default"/>
              <Calendar position="absolute 215 40 315 59" id="input2" class="input_search" mask="yyyy-mm-dd" anchor="default"/>
              <Static text="적용일자 :" position="absolute 13 41 91 58" id="caption2" class="search_name" visible="true" anchor="default"/>
              <Button position="absolute 255 90 311 112" id="button4" class="btn4" text="닫기" anchor="default" onclick="group2_grp_excucdrem_button4_onclick"/>
              <Button position="absolute 195 90 251 112" id="button5" class="btn4" text="적용" anchor="default" onclick="group2_grp_excucdrem_button5_onclick"/>
              <Static text="마감정리" position="absolute 6 7 179 24" id="caption8" class="tit_2" anchor="default"/>
              <Calendar position="absolute 105 40 205 59" id="input1" class="input_search" mask="yyyy-mm-dd" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_stuffmedilist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="systkey3" type="STRING"/>
          <Column id="cdnm" type="STRING"/>
          <Column id="systkey4" type="STRING"/>
          <Column id="systkey5" type="STRING"/>
          <Column id="ordnm" type="STRING" size="256"/>
          <Column id="ordnm2" type="STRING"/>
          <Column id="inprcpcnt" type="STRING"/>
          <Column id="outprcpcnt" type="STRING"/>
          <Column id="totalprcpcnt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_execrcodelist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sortno" type="STRING" size="256"/>
          <Column id="basecd" type="STRING" size="256"/>
          <Column id="basecdflagdesc" type="STRING" size="256"/>
          <Column id="basecdcnts" type="STRING" size="256"/>
          <Column id="basecdflag" type="STRING" size="256"/>
          <Column id="basesuppdeptcd" type="STRING" size="256"/>
          <Column id="seq" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="sortno"/>
            <Col id="basecd"/>
            <Col id="basecdflagdesc"/>
            <Col id="basecdcnts"/>
            <Col id="basecdflag"/>
            <Col id="basesuppdeptcd"/>
            <Col id="seq"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="basecd" type="STRING" size="256"/>
          <Column id="basecdflag" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="selectallyn" type="STRING" size="256"/>
          <Column id="prntnum" type="STRING" size="256"/>
          <Column id="bolpart" type="STRING" size="256"/>
          <Column id="bolindi" type="STRING" size="256"/>
          <Column id="cnt1" type="STRING" size="256"/>
          <Column id="cnt2" type="STRING" size="256"/>
          <Column id="cnt3" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="basecd"/>
            <Col id="basecdflag"/>
            <Col id="instcd"/>
            <Col id="selectallyn"/>
            <Col id="prntnum"/>
            <Col id="bolpart"/>
            <Col id="bolindi"/>
            <Col id="cnt1"/>
            <Col id="cnt2"/>
            <Col id="cnt3"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_globalinstance" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instance1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="suppdeptcd" type="STRING" size="256"/>
          <Column id="srchexcuroomgrp" type="STRING" size="256"/>
          <Column id="srchexecroom" type="STRING" size="256"/>
          <Column id="srchpid" type="STRING" size="256"/>
          <Column id="srchioflag" type="STRING" size="256"/>
          <Column id="srchmenuflag" type="STRING" size="256"/>
          <Column id="srchcalccd" type="STRING" size="256"/>
          <Column id="sdate" type="STRING" size="256"/>
          <Column id="edate" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchfromdd"/>
            <Col id="srchtodd"/>
            <Col id="suppdeptcd"/>
            <Col id="srchexcuroomgrp"/>
            <Col id="srchexecroom"/>
            <Col id="srchpid"/>
            <Col id="srchioflag"/>
            <Col id="srchmenuflag"/>
            <Col id="srchcalccd"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_srch.ipt_srchfromdd" propid="value" datasetid="ds_send_srch" columnid="srchfromdd"/>
      <BindItem id="item1" compid="grp_srch.ipt_srchtodd" propid="value" datasetid="ds_send_srch" columnid="srchtodd"/>
      <BindItem id="item2" compid="grp_srch.rdo_menuflag" propid="value" datasetid="ds_send_srch" columnid="srchmenuflag"/>
      <BindItem id="item3" compid="grp_srch.input8" propid="value" datasetid="ds_send_srch" columnid="srchcalccd"/>
      <BindItem id="item4" compid="input1" propid="value" datasetid="ds_send" columnid="sdate"/>
      <BindItem id="item5" compid="input2" propid="value" datasetid="ds_send" columnid="edate"/>
      <BindItem id="item6" compid="grp_excucdrem.input1" propid="value" datasetid="ds_send_srch" columnid="sdate"/>
      <BindItem id="item7" compid="grp_excucdrem.input2" propid="value" datasetid="ds_send_srch" columnid="edate"/>
    </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";
include "com_basiccodexp::ZBC001.xjs";
include "ast_examcurexp::AEZ0001.xjs";

var arErrorCode = new HashArray();
/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SMAES06200_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMAES06200_onload(obj:Form, e:LoadEventInfo)
{
	fGetScreenInit();
	fGetComboInit();
	ds_main_stuffmedilist.clearData();
	grdf_setGridSort(grd_stuffmedilist); // 그리드 소트만
}

/******************************************************************
 * Argument          : 
 * Description       : 화면 기본 초기화
 ******************************************************************/
function fGetScreenInit() {
	ds_send_srch.setColumn(0, "srchfromdd", utlf_getCurrentDate().toDate().getAddDate(-1,"D").getDateFormat("YYYYMMDD") );
	ds_send_srch.setColumn(0, "srchtodd", utlf_getCurrentDate() );
	ds_send.setColumn(0, "instcd", sysf_getUserInfo("dutplceinstcd") );
}

/******************************************************************
 * Argument          : 
 * Description       : 콤보 초기화
 ******************************************************************/
function fGetComboInit() { 
	lf_aezfSetSuppDeptcd();
	ds_send_globalinstance.setColumn(0, "instance1", frmf_getParameter("AST_DEPTCD"));
	ds_send_srch.setColumn(0, "suppdeptcd", ds_send_globalinstance.getColumn(0, "instance1"));
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function grp_srch_btn_select_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_stuffmedilist.clearData();
	
	dsf_createDsRow("ds_temp_send",
				[{col:"srchfromdd", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchfromdd")}
				,{col:"srchtodd", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchtodd")}
				,{col:"suppdeptcd", type:"string", size:256, val:ds_send_globalinstance.getColumn(0, "instance1")}
				,{col:"srchmenuflag", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchmenuflag")}
				,{col:"srchcalccd", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchcalccd")}], true);
	var oParam = {};
		oParam.id          = "TRAES06200";
		oParam.service     = "examcurestatsapp.ImgMediSc";
		oParam.method      = "reqGetStuffMediLst";
		oParam.inds        = "req=ds_temp_send";
		oParam.outds       = "ds_main_stuffmedilist=item";
		oParam.async       = true;
		//oParam.callback    = "cf_TRAES06200";

	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 재계산 button event
 ******************************************************************/
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var srchfromdd = ds_send_srch.getColumn(0, "srchfromdd");
	if( !utlf_isNull(srchfromdd) ){
		if( sysf_messageBox( srchfromdd.toDate().getDateFormat("YYYY-MM-DD") + " 일을 재계산합니다. ", "Q003") == 6 ){
			
			dsf_createDsRow("ds_temp_send1",
				[{col:"srchfromdd", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchfromdd")}
				,{col:"srchtodd", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchfromdd")}
				,{col:"suppdeptcd", type:"string", size:256, val:ds_send_globalinstance.getColumn(0, "instance1")}
				,{col:"instcd", type:"string", size:256, val:ds_send.getColumn(0, "instcd")}], true);
				
			var oParam = {};
				oParam.id          = "TXAES06200";
				oParam.service     = "examcurestatsapp.ImgMediSc";
				oParam.method      = "reqExeStuffMediReCalc";
				oParam.inds        = "req=ds_temp_send1";
				oParam.outds       = "ds_main_stuffmedilist=item";
				oParam.async       = false;
				oParam.callback    = "cf_TXAES06200";

			tranf_submit(oParam);
			
			if( arErrorCode.pop("TXAES06200") > -1 ){
				frmf_inputEnterKey("grp_srch.btn_select", "onclick", new ClickEventInfo);
			}
		}
	}else{
		sysf_messageBox( "재료/약 사용기간 시작일자가", "E013" , "확인해주세요.");
	}
}

function cf_TXAES06200(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/******************************************************************
 * Argument          : 
 * Description       : excel 저장
 ******************************************************************/
function btn_excel1_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_stuffmedilist.rowcount > 1 ){
		grdf_exportExcel(grd_stuffmedilist, "재료_약 사용현황", "재료_약 사용현황", false, "", "", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}

function group2_button6_onclick(obj:Button,  e:ClickEventInfo)
{
	grp_excucdrem.visible = true;
	ds_send_srch.setColumn(0,"sdate", ds_send_srch.getColumn(0,"srchfromdd"));
	ds_send_srch.setColumn(0,"edate", ds_send_srch.getColumn(0,"srchtodd"));
}

function group2_grp_excucdrem_button4_onclick(obj:Button,  e:ClickEventInfo)
{
	grp_excucdrem.visible = false;
}

function group2_grp_excucdrem_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	if( sysf_messageBox("재료/약 마감정리를","Q002")==6 ) {
		dsf_createDsRow("ds_temp_send1",
				[{col:"srchfromdd", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchfromdd")}
				,{col:"srchtodd", type:"string", size:256, val:ds_send_srch.getColumn(0, "srchfromdd")}
				,{col:"suppdeptcd", type:"string", size:256, val:ds_send_globalinstance.getColumn(0, "instance1")}
				,{col:"instcd", type:"string", size:256, val:ds_send.getColumn(0, "instcd")}], true);
				
		var oParam = {};
			oParam.id          = "TXAES06200";
			oParam.service     = "examcurestatsapp.ImgMediSc";
			oParam.method      = "reqExeStuffMediReCalc";
			oParam.inds        = "req=ds_temp_send1";
			oParam.outds       = "ds_main_stuffmedilist=item";
			oParam.async       = false;
			oParam.callback    = "cf_TXAES06200";

		tranf_submit(oParam);
	}
	
	grp_excucdrem.visible = false;
}
]]></Script>
  </Form>
</FDL>