123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205 |
- <?xml version="1.0" encoding="utf-8"?>
- <FDL version="1.5">
- <TypeDefinition url="..\..\..\default_typedef.xml"/>
- <Form id="SMADS02400" position="absolute 0 0 1203 784" titletext="특수조제실 조제건수 통계" oninit="SMADS02400_oninit" onload="SMADS02400_onload">
- <Layouts>
- <Layout>
- <Shape id="line1" linetype="horizontal" class="line_1" position="absolute 0 118 1200 124" anchor="left top right"/>
- <Div id="group1" taborder="1" class="div_SA" position="absolute 0 25 1200 105" anchor="left top right">
- <Layouts>
- <Layout>
- <Shape id="line2" linetype="vertical" class="line_4" position="absolute 1107 10 1113 70" anchor="top right"/>
- <Button id="button1" taborder="3" text="조회" class="btn1" position="absolute 1120 29 1176 51" anchor="top right" onclick="group1_button1_onclick"/>
- <Calendar id="ipt_fromdd" taborder="4" class="input_default" position="absolute 110 30 210 49" mask="yyyy-mm-dd" anchor="default"/>
- <Calendar id="ipt_todd" taborder="5" class="input_default" position="absolute 228 30 328 49" mask="yyyy-mm-dd" anchor="default"/>
- <Static id="caption5" text="~" class="search_no_b" position="absolute 213 35 225 52" anchor="default"/>
- <Static id="caption3" text="일자 :" class="search_name" position="absolute 15 30 101 47" anchor="default"/>
- <Static id="caption4" text="통계양식 :" class="search_name" position="absolute 720 30 806 47" anchor="default"/>
- <Radio id="radio1" taborder="6" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 810 30 1045 50" anchor="default">
- <Dataset id="innerdataset">
- <ColumnInfo>
- <Column id="codecolumn"/>
- <Column id="datacolumn"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="codecolumn">1</Col>
- <Col id="datacolumn">연별</Col>
- </Row>
- <Row>
- <Col id="codecolumn">2</Col>
- <Col id="datacolumn">월별</Col>
- </Row>
- <Row>
- <Col id="codecolumn">3</Col>
- <Col id="datacolumn">일별</Col>
- </Row>
- </Rows>
- </Dataset>
- </Radio>
- <Radio id="radio2" taborder="7" columncount="0" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 470 11 605 70" anchor="default">
- <Dataset id="innerdataset">
- <ColumnInfo>
- <Column id="codecolumn"/>
- <Column id="datacolumn"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="codecolumn">A</Col>
- <Col id="datacolumn">항암제 조제현황</Col>
- </Row>
- <Row>
- <Col id="codecolumn">B</Col>
- <Col id="datacolumn">TPN 조제현황</Col>
- </Row>
- </Rows>
- </Dataset>
- </Radio>
- <Static id="caption1" text="구 분" class="search_name" position="absolute 410 30 462 48" anchor="default"/>
- </Layout>
- </Layouts>
- </Div>
- <Static id="caption6" text="특수조제실 조제건수 통계" class="tit_1" position="absolute 0 0 200 25"/>
- <Div id="div_print" anchor="all" taborder="2" scrollbars="none" position="absolute 8 157 1199 770"/>
- </Layout>
- </Layouts>
- <Objects>
- <Dataset id="ds_main_statslist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
- <Dataset id="ds_send" 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="formflag" type="STRING" size="256"/>
- <Column id="gubunflag" type="STRING" size="256"/>
- </ColumnInfo>
- <Rows>
- <Row>
- <Col id="formflag">1</Col>
- <Col id="gubunflag">A</Col>
- </Row>
- </Rows>
- </Dataset>
- </Objects>
- <Bind>
- <BindItem id="item0" compid="group1.ipt_fromdd" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
- <BindItem id="item1" compid="group1.ipt_todd" propid="value" datasetid="ds_send" columnid="srchtodd"/>
- <BindItem id="item2" compid="group1.radio2" propid="value" datasetid="ds_send" columnid="gubunflag"/>
- <BindItem id="item3" compid="group1.radio1" propid="value" datasetid="ds_send" columnid="formflag"/>
- </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 "com_departmentcodexp::ZSD001.xjs";
- include "ast_commonxp::AST.xjs";
- var arErrorCode = new HashArray();
- /******************************************************************
- * Argument :
- * Description : 초기화
- ******************************************************************/
- function SMADS02400_oninit(obj:Form, e:InitEventInfo)
- {
- frmf_initForm(obj);
- }
- function SMADS02400_onload(obj:Form, e:LoadEventInfo)
- {
- ds_send.setColumn(0, "srchfromdd", utlf_getCurrentDate());
- ds_send.setColumn(0, "srchtodd", utlf_getCurrentDate());
- ds_send.setColumn(0, "formflag", "1");
- }
- /******************************************************************
- * Argument :
- * Description : 조회 Button event
- ******************************************************************/
- function group1_button1_onclick(obj:Button, e:ClickEventInfo)
- {
- var OKtri = "Y" ;
- var Sformflag = ds_send.getColumn(0, "formflag") ;
- var Sfromdd = ds_send.getColumn(0, "srchfromdd");
- var Stodd = ds_send.getColumn(0, "srchtodd");
- var Sformflag = ds_send.getColumn(0, "formflag");
- var tridd = Stodd - Sfromdd ;
- if ( tridd > 10000) {
- alert("조회 일수가 1년을 넘었습니다. 1년단위로 조회 하세요")
- OKtri = "N" ;
- }
- if ( OKtri == "Y") {
- if( ds_send.getColumn(0, "gubunflag") == "A" )
- {
- var oParam = {};
- oParam.id = "TRADS02401";
- oParam.service = "pharmacystatsapp.PharmacyStats";
- oParam.method = "reqGetSpcCntList";
- oParam.inds = "req=ds_send";
- oParam.outds = "ds_main_statslist=item";
- oParam.async = false;
- oParam.callback = "cf_TRADS02401";
- tranf_submit(oParam);
- if( arErrorCode.pop("TRADS02401") > -1 ){
- var objDOM = rptf_createDOM(); // DOM 객체 설정
- rptf_setNodeListToDOM(objDOM, "/root/main/statslist/item", ds_main_statslist); // 데이터셋 1
- rptf_setNodeListToDOM(objDOM, "/root/send", ds_send); // 데이터셋 2
- //sysf_trace(objDOM.documentElement.source); // XML 내용출력
-
- var objParam = new Object();
- objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
-
- var option = "open=1;save=1;directprint=0;print=1;zoom=0;show=1;";
- rptf_exeReportPreview30(["RPADS02401"],[objParam], option, null, "div_print");
- }
- }
- else if( ds_send.getColumn(0, "gubunflag") == "B" )
- {
- var oParam = {};
- oParam.id = "TRADS02501";
- oParam.service = "pharmacystatsapp.PharmacyStats";
- oParam.method = "reqGetSpcTCntList";
- oParam.inds = "req=ds_send";
- oParam.outds = "ds_main_statslist=item";
- oParam.async = false;
- oParam.callback = "cf_TRADS02501";
- tranf_submit(oParam);
-
- if( arErrorCode.pop("TRADS02501") > -1 ){
- var objDOM = rptf_createDOM(); // DOM 객체 설정
- rptf_setNodeListToDOM(objDOM, "/root/main/statslist/item", ds_main_statslist); // 데이터셋 1
- rptf_setNodeListToDOM(objDOM, "/root/send", ds_send); // 데이터셋 2
- //sysf_trace(objDOM.documentElement.source); // XML 내용출력
-
- var objParam = new Object();
- objParam.xml_data_XML1 = objDOM.documentElement.source; // 최상의노드 XML 스트링 추출
-
- var option = "open=1;save=1;directprint=0;print=1;zoom=0;show=1;";
- rptf_exeReportPreview30(["RPADS02501"],[objParam], option, null, "div_print");
- }
- }
- }
- }
- function cf_TRADS02401(sSvcId, nErrorCode, sErrorMsg) {
- arErrorCode.push(sSvcId, nErrorCode);
- }
- function cf_TRADS02501(sSvcId, nErrorCode, sErrorMsg) {
- arErrorCode.push(sSvcId, nErrorCode);
- }]]></Script>
- </Form>
- </FDL>
|