YNU_JEUS/app_home/himed/xpapps/pam/pamcomnxp/xp/SMPMO00997_감사자료조회(SAM파일).xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPMO00997" position="absolute 0 0 1280 1024" titletext="자료조회" onload="SMPMO00997_onload">
    <Layouts>
      <Layout>
        <Div id="group1" position="absolute 0 0 1195 25" style="">
          <Layouts>
            <Layout>
              <Static id="caption6" class="tit_1" position="absolute 0 0 189 23" style="" text="자료조회"/>
              <Static id="caption4" class="patient_text_black" position="absolute 922 0 1194 17" style=""/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group5" position="absolute 0 23 1195 68" style="align: top;" class="div_SA">
          <Layouts>
            <Layout>
              <Shape id="line13" class="line_4" linetype="vertical" position="absolute 1051 7 1054 40" style="border: solid #ffe4bb #ffe4bb;" anchor="default"/>
              <Static id="caption21" class="search_name" position="absolute 16 14 102 31" style="" text="조회일자 :"/>
              <Button id="btn_search" class="btn2_letter2" position="absolute 1057 13 1113 35" style="" text="조회" onclick="group5_btn_search_onclick"/>
              <Static id="caption1" class="search_name" position="absolute 331 13 417 30" style="" text="진료과 :"/>
              <Combo innerdataset="ds_init_pam_init_orddeptcd" datacolumn="nm" codecolumn="cd" columncount="-1" rowcount="-1" id="cmb_orddeptcd" position="absolute 405 12 535 31" style="align:center middle;"/>
              <Static id="caption2" class="search_name" position="absolute 541 13 627 30" style="" text="수진구분:"/>
              <Combo datacolumn="datacolumn" codecolumn="codecolumn" columncount="-1" rowcount="-1" id="combo3" position="absolute 625 12 680 31" style="align:center middle;">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">O</Col>
                      <Col id="datacolumn">외래</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">입원</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption3" position="absolute 205 13 220 33" style="" text="~"/>
              <Calendar id="ipt_fromdd" class="input_s_essential" position="absolute 100 13 192 32" style="" anchor="default"/>
              <Calendar id="ipt_todd" class="input_s_essential" position="absolute 225 13 317 32" style="" anchor="default"/>
              <Button id="button1" class="btn2_letter4" position="absolute 1114 13 1178 35" style="" text="엑셀저장" onclick="group5_button1_onclick"/>
              <Static id="caption5" class="search_name" position="absolute 696 14 782 31" style="" text="환자번호:"/>
              <Edit id="input1" position="absolute 780 12 850 31" style="" anchor="default"/>
              <Static id="caption7" class="search_name" position="absolute 866 13 952 30" style="" text="환자이름:"/>
              <Edit id="input2" position="absolute 950 12 1035 31" style="" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 70 1195 74" style="" anchor="default"/>
        <Grid id="grd_sam" binddataset="ds_main_samdata" position="absolute 0 74 1195 784" style="">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24"/>
                <Column size="76"/>
                <Column size="72"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="150"/>
                <Column size="53"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="82"/>
                <Column size="73"/>
                <Column size="82"/>
                <Column size="78"/>
                <Column size="63"/>
                <Column size="77"/>
                <Column size="82"/>
                <Column size="78"/>
              </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="EDI코드"/>
                <Cell col="9" text="수가명"/>
                <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 expr="currow + 1"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" displaytype="date" text="bind:indd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="4" displaytype="date" text="bind:execdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                <Cell col="5" style="align:left middle;" text="bind:depthngnm"/>
                <Cell col="6" text="bind:hangno"/>
                <Cell col="7" style="align:left middle;" text="bind:snglcalcscorcd"/>
                <Cell col="8" style="align:left middle;" text="bind:edicd"/>
                <Cell col="9" style="align:left middle;" text="bind:calchngnm"/>
                <Cell col="10" text="bind:payflag"/>
                <Cell col="11" displaytype="number" text="bind:payamt" mask="#,##0"/>
                <Cell col="12" displaytype="number" text="bind:payinsubamt" mask="#,##0"/>
                <Cell col="13" displaytype="number" text="bind:payownbamt" mask="#,##0"/>
                <Cell col="14" displaytype="number" text="bind:allownbamt" mask="#,##0"/>
                <Cell col="15" displaytype="number" text="bind:nopyamt" mask="#,##0"/>
                <Cell col="16" displaytype="number" text="bind:specamt" mask="#,##0"/>
                <Cell col="17" displaytype="number" text="bind:discamt" mask="#,##0"/>
                <Cell col="18" displaytype="number" text="bind:uncoamt" mask="#,##0"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
      </Layout>
    </Layouts>
    <Objects>
      <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_pam" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="init" type="STRING" size="256"/>
        </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="init" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="init"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="orddeptcd"/>
            <Col id="ordtype"/>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_samdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="indd" type="STRING" size="256"/>
          <Column id="execdd" type="STRING" size="256"/>
          <Column id="depthngnm" type="STRING" size="256"/>
          <Column id="hangno" type="STRING" size="256"/>
          <Column id="snglcalcscorcd" type="STRING" size="256"/>
          <Column id="edicd" type="STRING" size="256"/>
          <Column id="calchngnm" type="STRING" size="256"/>
          <Column id="payflag" type="STRING" size="256"/>
          <Column id="payamt" type="STRING" size="256"/>
          <Column id="payinsubamt" type="STRING" size="256"/>
          <Column id="payownbamt" type="STRING" size="256"/>
          <Column id="allownbamt" type="STRING" size="256"/>
          <Column id="nopyamt" type="STRING" size="256"/>
          <Column id="specamt" type="STRING" size="256"/>
          <Column id="discamt" type="STRING" size="256"/>
          <Column id="uncoamt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="indd"/>
            <Col id="execdd"/>
            <Col id="depthngnm"/>
            <Col id="hangno"/>
            <Col id="snglcalcscorcd"/>
            <Col id="edicd"/>
            <Col id="calchngnm"/>
            <Col id="payflag"/>
            <Col id="payamt"/>
            <Col id="payinsubamt"/>
            <Col id="payownbamt"/>
            <Col id="allownbamt"/>
            <Col id="nopyamt"/>
            <Col id="specamt"/>
            <Col id="discamt"/>
            <Col id="uncoamt"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group5.cmb_orddeptcd" propid="value" datasetid="ds_send_reqdata" columnid="orddeptcd"/>
      <BindItem id="item1" compid="group5.combo3" propid="value" datasetid="ds_send_reqdata" columnid="ordtype"/>
      <BindItem id="item2" compid="group5.ipt_fromdd" propid="value" datasetid="ds_send_reqdata" columnid="fromdd"/>
      <BindItem id="item3" compid="group5.ipt_todd" propid="value" datasetid="ds_send_reqdata" columnid="todd"/>
      <BindItem id="item4" compid="group5.input1" propid="value" datasetid="ds_send_reqdata" columnid="pid"/>
      <BindItem id="item5" compid="group5.input2" propid="value" datasetid="ds_send_reqdata" columnid="hngnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs"
include "com_basiccodexp::ZBC001.xjs"
include "pam_pamcomnxp::PAM.xjs"
include "emr_prcpmngtxp::MMO001.xjs"

var arErrorCode = new HashArray();

function SMPMO00997_onload(obj:Form, e:LoadEventInfo) {
	frmf_initForm(obj); 
	grdf_initGrid(this.grd_sam); 
	//grdf_setGridSort(grd_XXX); 
	//grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 


	frmf_addComboItem("group5.cmb_orddeptcd","전체", "-", "above");

	if (frmf_checkOpener()){
		dsf_makeValue( ds_send_reqdata, "fromdd", "string",  opener.javascript.frmf_getParameter("indd"));
		dsf_makeValue( ds_send_reqdata, "todd", "string",  opener.javascript.frmf_getParameter("indd"));
		dsf_makeValue( ds_send_reqdata, "orddeptcd", "string",  opener.javascript.frmf_getParameter("orddeptcd"));
		dsf_makeValue( ds_send_reqdata, "ordtype", "string",  opener.javascript.frmf_getParameter("ordtype"));
		dsf_makeValue( ds_send_reqdata, "pid", "string",  opener.javascript.frmf_getParameter("pid"));
		dsf_makeValue( ds_send_reqdata, "cretno", "string",  opener.javascript.frmf_getParameter("cretno"));
		dsf_makeValue( ds_send_reqdata, "hngnm", "string",  opener.javascript.frmf_getParameter("hngnm"));

		group5.btn_search.click(); 
	}else{
		dsf_makeValue( ds_send_reqdata, "fromdd", "string",  utlf_getCurrentDate());
		dsf_makeValue( ds_send_reqdata, "todd", "string",  utlf_getCurrentDate());

		dsf_makeValue( ds_send_reqdata, "orddeptcd", "string",  "-");
		dsf_makeValue( ds_send_reqdata, "ordtype", "string",  "O");
	}

	//model.refresh();

}

function group5_btn_search_onclick(obj:Button, e:ClickEventInfo) {

	//if(submit("TRPAO05003")){
	var oParam = {};
		oParam.id          = "TRPAO05003";
		oParam.service     = "pamcomnapp.GamSa";
		oParam.method      = "reqGetSamData";
		oParam.inds        = "req=ds_send_reqdata";
		oParam.outds       = "ds_main_samdata=item";
		oParam.async       = false;
		oParam.callback    = "cf_TRPAO05003";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRPAO05003") > -1) {
		//model.refresh();
	}

}

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


function group5_button1_onclick(obj:Button, e:ClickEventInfo) {

	// 	var fileName = window.fileDialog("save", ",", false, "개인별내역", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");	
	// 	grd_sam.saveExcel(fileName, "sheet1");	
	grdf_exportExcel(this.grd_sam, "Sheet1", "개인별내역", false, "" , 'user' , true);

}

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