YNU_JEUS/app_home/himed/xpapps/ast/healcarecoopxp/xp/SMARC00300_의뢰환자 진료비 현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMARC00300" position="absolute 0 0 1200 782" titletext="의뢰환자 진료비현황" oninit="SMARC00300_oninit" onload="SMARC00300_onload">
    <Layouts>
      <Layout>
        <Div id="group1" anchor="left top right" taborder="0" class="div_SA" position="absolute 0 24 1195 84">
          <Layouts>
            <Layout>
              <Button id="button5" taborder="1" text="조회" class="btn1" position="absolute 1122 19 1178 41" anchor="top right" onclick="group1_button5_onclick"/>
              <Shape id="line8" linetype="vertical" class="line_4" position="absolute 1096 7 1102 54" anchor="top right"/>
              <Static id="caption9" text="등록일자 :" class="search_name" position="absolute 20 9 114 26"/>
              <Static id="caption11" text="진료과 :" class="search_name" position="absolute 415 35 509 52"/>
              <Static id="caption13" text="병원구분 :" class="search_name" position="absolute 415 8 506 25"/>
              <Static id="caption5" text="~" class="search_no_b" position="absolute 219 9 231 26"/>
              <Calendar id="input5" taborder="2" class="input_search" position="absolute 115 8 215 27" autoselect="true" autoskip="true"/>
              <Calendar id="input1" taborder="3" class="input_search" position="absolute 235 8 335 27"/>
              <Static id="caption4" text="의뢰의사 :" class="search_name" position="absolute 20 36 114 53"/>
              <Static id="caption3" text="의뢰병원명 :" class="search_name" position="absolute 715 9 814 26"/>
              <Combo id="cmb_hospgrade" taborder="4" innerdataset="ds_init_hospgrade_A0429" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 510 7 630 26"/>
              <Edit id="ipt_coophospnm" taborder="5" class="input_search" position="absolute 820 8 940 27"/>
              <Edit id="ipt_drnm" taborder="6" class="input_search" position="absolute 115 35 215 54"/>
              <Combo id="cmb_orddeptcd" taborder="7" innerdataset="ds_init_dept_dept" codecolumn="deptcd" datacolumn="depthngnm" class="combo_search" position="absolute 510 34 630 53"/>
              <Combo id="cmb_cptype" taborder="8" innerdataset="ds_init_cmbcond_cptype_A0420" codecolumn="cdid" datacolumn="cdnm" class="combo_search" position="absolute 820 35 940 54"/>
              <Static id="cmb_onestop" text="One-Stop  :" class="search_name" position="absolute 715 36 842 53"/>
              <CheckBox id="chk_clsmatyn" taborder="9" position="absolute 960 34 1015 54" text="동문" truevalue="Y" onclick="group1_chk_clsmatyn_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line1" class="line_10" position="absolute 0 110 1195 116" anchor="left top right"/>
        <Static id="caption1" text="의뢰환자 진료비 현황" class="tit_2" position="absolute 0 94 152 116"/>
        <Button id="btn_excel" taborder="1" text="엑셀" class="btn7" position="absolute 1137 91 1195 110" anchor="top right" onclick="btn_excel_onclick"/>
        <Grid id="grd_list" taborder="2" binddataset="ds_main_list_cooppatlist" autoenter="select" useinputpanel="false" cellsizingtype="col" position="absolute 0 115 1195 753" anchor="all">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="28"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="40"/>
                <Column size="35"/>
                <Column size="80"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="100"/>
                <Column size="60"/>
                <Column size="400"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="120"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
                <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" colspan="2" text="주민번호" taborder="undefined"/>
                <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" colspan="2" text="지역" taborder="undefined"/>
                <Cell col="15" text="병원구분"/>
                <Cell col="16" text="의뢰병원명"/>
                <Cell col="17" text="의뢰의사명"/>
                <Cell col="18" text="의뢰경로"/>
                <Cell col="19" text="One-Stop"/>
                <Cell col="20" text="보험유형"/>
                <Cell col="21" text="초재진구분"/>
                <Cell col="22" text="외래진료비"/>
                <Cell col="23" text="입원진료비"/>
                <Cell col="24" text="수술비"/>
                <Cell col="25" text="합계"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow+1"/>
                <Cell col="1" text="bind:hngnm"/>
                <Cell col="2" text="bind:rrgstno1"/>
                <Cell col="3" text="bind:rrgstno2"/>
                <Cell col="4" text="bind:sex"/>
                <Cell col="5" text="bind:age"/>
                <Cell col="6" text="bind:pid"/>
                <Cell col="7" displaytype="date" text="bind:rgstdd" calendardisplaynulltype="nulltext"/>
                <Cell col="8" displaytype="date" text="bind:reqdd" calendardisplaynulltype="nulltext"/>
                <Cell col="9" displaytype="date" text="bind:orddd" calendardisplaynulltype="nulltext"/>
                <Cell col="10" displaytype="text" text="bind:orddeptnm"/>
                <Cell col="11" text="bind:orddrnm"/>
                <Cell col="12" displaytype="text" text="bind:diagnm"/>
                <Cell col="13" displaytype="combo" style="align:center middle;" text="bind:sidocd" combodataset="ds_init_areacd" combocodecol="sidocd" combodatacol="sidonm" enable="false"/>
                <Cell col="14" displaytype="text" style="align:center middle;" text="bind:sidocddetl" combodataset="ds_init_areacddelt" combocodecol="sidocddetl" combodatacol="sidonmdetl"/>
                <Cell col="15" displaytype="combo" style="align:center middle;" text="bind:hospgrade" combodataset="ds_init_hospgrade1_A0429" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="16" displaytype="text" text="bind:coophospnm"/>
                <Cell col="17" text="bind:drnm"/>
                <Cell col="18" displaytype="combo" style="align:center middle;" text="bind:reqpath" combodataset="ds_init_reqpath" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="19" displaytype="combo" style="align:center middle;" text="bind:cptype" combodataset="ds_init_cptype_A0420" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="20" displaytype="combo" style="align:center middle;" text="bind:insukind" combodataset="ds_init_insukind_P0008" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="21" displaytype="combo" style="align:center middle;" text="bind:fsexamflag" combodataset="ds_init_fsexamflag_P0021" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="22" displaytype="number" text="bind:oamt"/>
                <Cell col="23" displaytype="number" text="bind:iamt"/>
                <Cell col="24" displaytype="number" text="bind:opamt"/>
                <Cell col="25" displaytype="number" text="bind:totamt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption2" text="의뢰환자 진료비 현황" class="tit_1" position="absolute 0 0 163 24"/>
        <Button id="button10" taborder="3" text="초기화" class="btn4" position="absolute 1126 755 1194 777" anchor="right bottom" onclick="button10_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_search" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="f_date" type="STRING" size="256"/>
          <Column id="t_date" type="STRING" size="256"/>
          <Column id="coophospnm" type="STRING" size="256"/>
          <Column id="drnm" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="cptype" type="STRING" size="256"/>
          <Column id="clsmatyn" type="STRING" size="256"/>
          <Column id="hospgrade" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="f_date"/>
            <Col id="t_date"/>
            <Col id="coophospnm"/>
            <Col id="drnm"/>
            <Col id="orddeptcd"/>
            <Col id="cptype"/>
            <Col id="clsmatyn"/>
            <Col id="hospgrade"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list_cooppatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="rrgstno1" type="STRING" size="256" sumtext="주민번호1"/>
          <Column id="rrgstno2" type="STRING" size="256" sumtext="주민번호2"/>
          <Column id="sex" type="STRING" size="256" sumtext="성별"/>
          <Column id="age" type="STRING" size="256" sumtext="나이"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="rgstdd" type="STRING" size="256" sumtext="등록일자"/>
          <Column id="reqdd" type="STRING" size="256" sumtext="의뢰일자"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="진료의사"/>
          <Column id="diagnm" type="STRING" size="256" sumtext="상병명"/>
          <Column id="areacd" type="STRING" size="256" sumtext="지역"/>
          <Column id="hospgrade" type="STRING" size="256" sumtext="병원구분"/>
          <Column id="coophospnm" type="STRING" size="256" sumtext="의뢰병원명"/>
          <Column id="drnm" type="STRING" size="256" sumtext="의뢰의사"/>
          <Column id="reqpath" type="STRING" size="256" sumtext="의뢰경로"/>
          <Column id="cptype" type="STRING" size="256" sumtext="one-stop"/>
          <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
          <Column id="fsexamflag" type="STRING" size="256" sumtext="초재진구분"/>
          <Column id="oamt" type="STRING" size="256" sumtext="외래진료비"/>
          <Column id="iamt" type="STRING" size="256" sumtext="입원진료비"/>
          <Column id="opamt" type="STRING" size="256" sumtext="수술비"/>
          <Column id="totamt" type="STRING" size="256" sumtext="합계"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_areacddelt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_areacd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_cmb_areadetl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_hospgrade_A0429" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_hospgrade1_A0429" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_cptype_A0420" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_reqpath_A0421" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_fsexamflag_P0021" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_insukind_P0008" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_cmbcond_cptype_A0420" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_dept_dept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group1.input5" propid="value" datasetid="ds_send_search" columnid="f_date"/>
      <BindItem id="item1" compid="group1.ipt_drnm" propid="value" datasetid="ds_send_search" columnid="drnm"/>
      <BindItem id="item2" compid="group1.input1" propid="value" datasetid="ds_send_search" columnid="t_date"/>
      <BindItem id="item3" compid="group1.cmb_hospgrade" propid="value" datasetid="ds_send_search" columnid="hospgrade"/>
      <BindItem id="item4" compid="group1.cmb_orddeptcd" propid="value" datasetid="ds_send_search" columnid="orddeptcd"/>
      <BindItem id="item5" compid="group1.cmb_cptype" propid="value" datasetid="ds_send_search" columnid="cptype"/>
      <BindItem id="item6" compid="group1.ipt_coophospnm" propid="value" datasetid="ds_send_search" columnid="coophospnm"/>
      <BindItem id="item7" compid="group1.chk_clsmatyn" propid="value" datasetid="ds_send_search" columnid="clsmatyn"/>
    </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";
function SMARC00300_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMARC00300_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_list);
	
	fInit();
}

function fInit()
{	
	// 오늘 날짜로 세팅
	var CurrentDate = utlf_getCurrentDate();

	ds_send_search.setColumn(0, "f_date", CurrentDate);
	ds_send_search.setColumn(0, "t_date", CurrentDate);
	
	// 진료과
	var instcd = sysf_getUserInfo("dutplceinstcd");
	var standard_yn = "rcptuseyn";
	var ord_deptflag = 'D';
	var rslt_ref  = "ds_init_dept_dept";
	var sort_method = "depthngnm";
	sort_field = "depthngnm"
	
	appf_getDeptCodeList(instcd, standard_yn, ord_deptflag, sort_field, "", "", "", "", rslt_ref, false, "");

	// 공통코드 목록 가져오기
	var arrParam = [{dsNm: "ds_init_hospgrade_A0429",  cdGrpId: "A0429" }
				  , {dsNm: "ds_init_hospgrade1_A0429",  cdGrpId: "A0429" }
				  , {dsNm: "ds_init_cptype_A0420",  cdGrpId: "A0420" }
				  , {dsNm: "ds_init_reqpath_A0421",  cdGrpId: "A0421" }
				  , {dsNm: "ds_init_fsexamflag_P0021",  cdGrpId: "P0021" }
				  , {dsNm: "ds_init_insukind_P0008",  cdGrpId: "P0008" }
				  , {dsNm: "ds_init_cmbcond_cptype_A0420",  cdGrpId: "A0420" }];
				  
    appf_getCodeList(arrParam, true);
    
    //진료협력에서 관리하는 전체 지역코드 조회
	var oParam = {};
		oParam.id = "TXARH00101";
		oParam.service = "healcarecoopapp.CoopHospMngt";
		oParam.method = "reqGetAreaList";
		oParam.inds = "req=ds_send";
		oParam.outds = "ds_init_areacddelt=hosparea";
		oParam.async = false;
    tranf_submit(oParam);
    
    //병의원 정보 저장 시, 사용할 수 있도록 copy
    ds_cmb_areadetl.copyData(ds_init_areacddelt);
        
    //진료협력에서 관리하는 시/도 지역코드 조회
	var oParam = {};
		oParam.id = "TXARH00101";
		oParam.service = "healcarecoopapp.CoopHospMngt";
		oParam.method = "reqGetAreaSDList";
		oParam.inds = "req=ds_send";
		oParam.outds = "ds_init_areacd=hosparea";
		oParam.async = false;
    tranf_submit(oParam);
    
	frmf_addComboItem("group1.cmb_orddeptcd", "- 전 체 -", "", "above");
	frmf_addComboItem("group1.cmb_hospgrade", "협력병의원", "CA", "above");
	frmf_addComboItem("group1.cmb_hospgrade", "- 전 체 -", "", "above");
	frmf_addComboItem("group1.cmb_cptype", "- 전 체 -", "", "above");
	
	ds_main_list_cooppatlist.clearData();
}

function group1_chk_clsmatyn_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value == "Y"){}
	else
	{
		ds_send_search.setColumn(0, "clsmatyn", "");
	}
}

function group1_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( !fCheckDate() ) return;  //필수 저장여부 체크
	fSearch();
}

function fCheckDate()
{
	var fromdd 	= ds_send_search.getColumn(0, "f_date");
	var todd 	= ds_send_search.getColumn(0, "t_date");
	
	if( ! utlf_isValidDateTime( fromdd, 'YYYYMMDD') || ! utlf_isValidDateTime( todd, 'YYYYMMDD') )
	{
		sysf_messageBox("입력하신 일자구분이 정확한 날짜타입이 아닙니다.", "E999", "");
		return false;	
	}
	
	if( utlf_getDateInterval(fromdd, todd) > 6 )
	{
		sysf_messageBox("조회가능한 최대 기간은 1주일입니다. 일자구분에서 날짜를 수정하세요!", "E999", "");
		return false;	
	}
	
	if( utlf_getDateInterval(fromdd, todd) < 0 )
	{
		sysf_messageBox("일자구분에서 시작일자가 종료일자보다 미래일자 입니다. 확인하세요!", "E999", "");
		return false;
	}
	
	// 날짜 계산
	var daycnt = utlf_getDateInterval(fromdd, todd);
	
	// 1일이 아닌 경우는 조건을 타야 함
	if (daycnt != 0)
	{
		// 진료과 체크
		if (utlf_isNull(ds_send_search.getColumn(0, "orddeptcd")))
		{
			sysf_messageBox("일자구분에서 하루 이상의 기간을 선택했을 경우, 진료과는 조회 필수 조건입니다. 진료과를 입력하세요.", "E999", "");
			return false;
		}
		
		if (String(group1.ipt_coophospnm.text).length > 0 && String(group1.ipt_coophospnm.text).length < 2)  
		{
			sysf_messageBox("의뢰병원명은 2글자 이상으로 해주십시요!","E999","");
			group1.ipt_coophospnm.setFocus();
			return false;
		}
		
		if (String(group1.ipt_drnm.text).length > 0 && String(group1.ipt_drnm.text).length < 2)  
		{
			sysf_messageBox("의뢰의사명은 2글자 이상으로 해주십시요!","E999","");
			group1.ipt_drnm.setFocus();
			return false;
		}
	}

	return true;
}

function fSearch()
{
	var oParam = {};
		oParam.id          = "TRARC00301";
		oParam.service     = "healcarecoopapp.ReqMngt";
		oParam.method      = "reqGetCoopPatAmtList";
		oParam.inds        = "req=ds_send_search";
		oParam.outds       = "ds_main_list_cooppatlist=cooppatlist";
		oParam.async       = false;
		oParam.callback    = "cf_TRARC00301";

	tranf_submit(oParam);
}

function cf_TRARC00301(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) 
    {
		sysf_messageBox("조회를", "E009");
		return;
	}
    
}

function btn_excel_onclick(obj:Button,  e:ClickEventInfo)
{
	fExcel();
}

function fExcel()
{
	if (ds_main_list_cooppatlist.rowcount == 0) return;
	
	grdf_exportExcel(grd_list, "의뢰환자 진료비현황 리스트", "Sheet1", "true", "", "");
}

function button10_onclick(obj:Button,  e:ClickEventInfo)
{
	fAllClear();
}

function fAllClear()
{
	ds_send_search.clearData();
	ds_send_search.addRow();
	
	// 오늘 날짜로 세팅
	var CurrentDate = utlf_getCurrentDate();
	
	ds_send_search.setColumn(0, "f_date", CurrentDate);
	ds_send_search.setColumn(0, "t_date", CurrentDate);
	
	group1.cmb_hospgrade.index = 0;
	group1.cmb_orddeptcd.index = 0;
	group1.cmb_cptype.index = 0;
	ds_main_list_cooppatlist.clearData();
}
]]></Script>
  </Form>
</FDL>