YNU_JEUS/app_home/himed/xpapps/pam/aftjudgxp/xp/SMPID23600_재정산내역조회.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml" />
  <Form id="SMPID23600" position="absolute 0 0 1020 660" titletext="재정산 내역 조회" onload="SMPID23600_onload">
    <Layouts>
      <Layout>
        <Div id="grp_tle" position="absolute 0 0 865 13" style="">
          <Layouts>
            <Layout>
              <Static id="cap_title" class="tit_1" position="absolute 0 0 216 15" style="" text="재정산 내역 조회" />
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_biz" scrollbars="autoboth" position="absolute 0 28 995 620" style="">
          <Layouts>
            <Layout>
              <Grid id="grd_clbsmast" binddataset="ds_main_list1_clbs" class="datagrid2" position="absolute 0 77 990 591" style="">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="65" />
                      <Column size="55" />
                      <Column size="110" />
                      <Column size="70" />
                      <Column size="90" />
                      <Column size="53" />
                      <Column size="70" />
                      <Column size="35" />
                      <Column size="35" />
                      <Column size="35" />
                      <Column size="35" />
                      <Column size="35" />
                      <Column size="35" />
                      <Column size="220" />
                    </Columns>
                    <Rows>
                      <Row size="23" band="head" />
                      <Row size="23" />
                    </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="원내_외&#xA;구분" />
                      <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="수가명|환자번호" />
                      <Cell col="14" text="환자명" />
                      <Cell col="15" text="진료과" />
                      <Cell col="16" text="진료개시일" />
                      <Cell col="17" text="수가코드" />
                      <Cell col="18" text="원내_외&#xA;구분" />
                      <Cell col="19" text="수납일자" />
                      <Cell col="20" text="사후" />
                      <Cell col="21" text="원무" />
                      <Cell col="22" text="사후" />
                      <Cell col="23" text="원무" />
                      <Cell col="24" text="사후" />
                      <Cell col="25" text="원무" />
                      <Cell col="26" text="수가명" />
                    </Band>
                    <Band id="body">
                      <Cell text="bind:pid" />
                      <Cell col="1" text="bind:patnm" />
                      <Cell col="2" text="bind:orddeptcd" />
                      <Cell col="3" text="bind:ordfromdd" />
                      <Cell col="4" text="bind:snglcalcscorcd" />
                      <Cell col="5" text="bind:ioflag" />
                      <Cell col="6" text="bind:rcptexecdd" />
                      <Cell col="7" text="bind:insukind_s" />
                      <Cell col="8" text="bind:insukind_o" />
                      <Cell col="9" text="bind:suppkind_s" />
                      <Cell col="10" text="bind:suppkind_o" />
                      <Cell col="11" text="bind:payflag_s" />
                      <Cell col="12" text="bind:payflag_o" />
                      <Cell col="13" text="bind:hngnm" />
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static id="cap_judgtrgtman" class="tit_2" position="absolute 4 56 130 69" style="" text="대상자조회" />
              <Shape id="line1" class="line_1" linetype="horizontal" position="absolute 0 72 988 75" style="" anchor="default" />
              <Div id="group1" position="absolute 0 5 995 45" style="align: top;">
                <Layouts>
                  <Layout>
                    <Shape id="roundrect3" anchor="default" type="roundrectangle" position="absolute 0 0 995 40" style="" />
                    <Static id="caption30" class="search_name" position="absolute 8 11 95 28" style="" text="청구년월 :" />
                    <Calendar id="ipt_clamym" class="input_search" taborder="1" mask="yyyy-mm" position="absolute 95 10 164 29" style="align:center ;" anchor="default" />
                    <Button id="btn_select" class="btn1_letter2" taborder="32" position="absolute 925 9 981 31" style="" text="조회" onclick="grp_biz_group1_btn_select_onclick" />
                    <Shape id="line3" class="line_4" linetype="vertical" position="absolute 910 4 913 37" style="" anchor="default" />
                  </Layout>
                </Layouts>
              </Div>
              <Button id="btn_excelsave" class="btn2_letter4" position="absolute 926 52 990 71" style="" text="엑셀저장" onclick="grp_biz_btn_excelsave_onclick" />
            </Layout>
          </Layouts>
        </Div>
        <Button id="btn_cancel" class="btn4_letter2" position="absolute 934 622 990 644" style="" text="종료" />
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_P0291list_P0291" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256" />
          <Column id="cdid" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"></Col>
            <Col id="cdid"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="srchcond" type="STRING" size="256" />
          <Column id="pid" type="STRING" size="256" />
          <Column id="hngnm" type="STRING" size="256" />
          <Column id="rrgstno1" type="STRING" size="256" />
          <Column id="rrgstno2" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchcond"></Col>
            <Col id="pid"></Col>
            <Col id="hngnm"></Col>
            <Col id="rrgstno1"></Col>
            <Col id="rrgstno2"></Col>
          </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_hidden_sppmc02500" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </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_P0008list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden_smpid20400_rslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="oldPid" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="oldPid"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0155list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_send_list1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="clbs" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="clbs"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0291list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden_item1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256" />
          <Column id="clamdg" type="STRING" size="256" />
          <Column id="pid" type="STRING" size="256" />
          <Column id="pidsn" type="STRING" size="256" />
          <Column id="ordym" type="STRING" size="256" />
          <Column id="maxclamdg" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="clamym"></Col>
            <Col id="clamdg"></Col>
            <Col id="pid"></Col>
            <Col id="pidsn"></Col>
            <Col id="ordym"></Col>
          </Row>
          <Row>
            <Col id="maxclamdg"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0008list_P0008" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256" />
          <Column id="cdid" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"></Col>
            <Col id="cdid"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_item1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256" />
          <Column id="pid" type="STRING" size="256" />
          <Column id="pidsn" type="STRING" size="256" />
          <Column id="ordym" type="STRING" size="256" />
          <Column id="judgrid" type="STRING" size="256" />
          <Column id="ioflag" type="STRING" size="256" />
          <Column id="ordfildcdyn" type="STRING" size="256" />
          <Column id="searchgb" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="clamym"></Col>
            <Col id="pid"></Col>
            <Col id="pidsn"></Col>
            <Col id="ordym"></Col>
            <Col id="judgrid"></Col>
            <Col id="ioflag">O</Col>
            <Col id="ordfildcdyn"></Col>
            <Col id="searchgb">SD</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0155list_P0155" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256" />
          <Column id="cdid" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"></Col>
            <Col id="cdid"></Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_smpid20400" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo />
      </Dataset>
      <Dataset id="ds_hidden_smpid20400_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" 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 />
      </Dataset>
      <Dataset id="ds_main_list1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="clbs" type="STRING" size="256" />
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="clbs"></Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.group1.ipt_clamym" propid="value" datasetid="ds_send_item1" columnid="clamym" />
    </Bind>
    <Script type="xscript4.0"><![CDATA[function SMPID23600_onload(obj:Form, e:LoadEventInfo) {
 frmf_initForm(obj); 
 //grdf_initGrid(grd_XXX); 
 //grdf_setGridSort(grd_XXX); 
 //grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

					// 화면을 초기화한다.
					fInitialize();

}

include '../../.._com_commonweb_js_common.js'
include '../../.._com_commonweb_js_dateHelper.js'
include '../../.._com_commonweb_js_numericHelper.js'
include '../../.._com_commonweb_js_stringHelper.js'
include '../../.._com_commonweb_js_tfHelper.js'
include '../../.._com_basiccodeweb_js_ZBC001.js'

				var gToday = new Date();
				var gBaseyear  = gToday.getDateFormat("YYYY");	// (dateHelper.js)에서 제공하는 함수를 사용하여 해당 년를 구한다.
				var gBasemonth = gToday.getDateFormat("MM");
				var gBaseday   = gToday.getDateFormat("DD");
				var gCurrentdd  = gBaseyear + gBasemonth + gBaseday;
				var gCurrentym  = gBaseyear + gBasemonth;

				// -----------------------
				// ▶ 화면초기화
				// -----------------------
				function fInitialize() {

					    // ---------------------------------------------------------------									
					    // 공통코드를 조회한다.
					    // (ZBC001.js) com.ZBCMCODE 에서 기초코드 값 Get
					    // ---------------------------------------------------------------											
						var arrParam = [ {dsNm: "ds_init_P0291list","ds_init_P0008list"
								, 
                  cdGrpId: 	"P0291","P0008"
								 } ];
appf_getCodeList(arrParam,  );

							var lv_date = gCurrentym.toDate("YYYYMM" + "01");
							lv_date       = lv_date.getAddDate(-1, "M")
							gCurrentym    = lv_date.getDateFormat("YYYYMM")  			

							ds_send_item1.setColumn( 0, "clamym", gCurrentym);	
							ds_send_item1.setColumn( 0, "ordym", gCurrentym);																										
					    // ---------------------------------------------------------------									
						// 청구과, 심사자, 진료과, 주치의, 청구차수, 삼시자선택 초기화 
					    // ---------------------------------------------------------------	

//model.refresh();

//						submit("TRPID20201",false);
var oParam = {};
    oParam.id          = "TRPID20201";
    oParam.service     = "aftjudgapp.InAftJudgTrgtMan";
    oParam.method      = "reqGetInitComCd";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=judgrid ds_=suppkind ds_=orddrid ds_=orddrid2 ds_=clamdept ds_=orddeptcd ds_=orddeptcd2 ds_=item3 ds_=clamdg ds_=aftjudgerr ds_=uuee";
    oParam.async       = false;
    oParam.callback    = "cf_TRPID20201";

tranf_submit(oParam);
/*
function cf_TRPID20201(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPID20201(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPID20201") > -1
arErrorCode.pop("TRPID20201") < 0
*/



				}

				// ----------------------------------------------------------------------
				// ▶ 동일진료일 명세서조회
				// ----------------------------------------------------------------------				
				function fGetDocuList() {

					var chk = true;
					if (ds_send_item1.getColumn(0, "clamym") == "") {
						chk = false;
						sysf_messageBox("청구년월은", "I003");	//I003=필수입력입니다.	
						grp_biz.group1.ipt_clamym.setFocus();
					} 

					if (chk == true) {
//						submit("TRPID23601");			
var oParam = {};
    oParam.id          = "TRPID23601";
    oParam.service     = "aftjudgapp.InAftJudg";
    oParam.method      = "reqGetReCalcList";
    oParam.inds        = "req=ds_";
    oParam.outds       = "ds_=clbs";
    oParam.async       = false;
    oParam.callback    = "cf_TRPID23601";

tranf_submit(oParam);
/*
function cf_TRPID23601(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function cf_TRPID23601(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}
arErrorCode.pop("TRPID23601") > -1
arErrorCode.pop("TRPID23601") < 0
*/


					}
				}

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

						fGetDocuList();

}

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

					grp_biz.grd_clbsmast.gridToInstance();
					if (grp_biz.grd_clbsmast.rows > 1) {

						var fileName = window.fileDialog("save", "", false, "중복 명세서조회", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
						if (fileName != "") {
							grp_biz.grd_clbsmast.saveExcel(fileName, "sheetname:;colhiddenextend:true;rowhiddenextend:false;col_3:label;col_4:label;col_5:label;col_6:label;", true, true, "", "", true);
						}
					} else {
						sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
					}								

}

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