YNU_JEUS/app_home/himed/xpapps/emr/medirecxp/xp/SMMMR03200_장애진단서청구이력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.4">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMMR03200" position="absolute 0 0 1195 790" titletext="장애진단서 청구관리" onload="SMMMR03200_onload">
    <Layouts>
      <Layout>
        <Static text="장애진단서 청구관리" position="absolute 0 0 156 25" id="caption6" class="tit_1"/>
        <Div position="absolute 0 25 1193 65" id="roundrect2" type="roundrectangle" class="div_SA"/>
        <Static text="장애구분 :" position="absolute 723 38 812 55" align="align:center middle;" id="caption8" class="search_name"/>
        <Static text="청구처 :" position="absolute 363 38 442 55" align="align:center middle;" id="caption17" class="search_name"/>
        <Static text="청구기간 :" position="absolute 15 38 101 55" align="align:center middle;" id="lbl_PID" class="search_name"/>
        <Calendar position="absolute 106 38 206 57" id="input1" autoskip="true" autoselect="true"/>
        <Calendar position="absolute 228 38 328 57" id="input2" autoskip="true" autoselect="true"/>
        <Static text="~" position="absolute 210 38 235 58" id="caption1"/>
        <Combo position="absolute 440 38 685 57" id="combo1" innerdataset="@ds_init_P0463" datacolumn="cdnm" codecolumn="cdid"/>
        <Combo position="absolute 816 38 923 57" id="combo2" innerdataset="@ds_init_P0461" datacolumn="cdnm" codecolumn="cdid"/>
        <Button position="absolute 1119 36 1175 58" id="btn_req" class="btn1" text="조회" onclick="btn_req_onclick"/>
        <Shape position="absolute 1098 36 1104 57" linetype="vertical" id="line3"/>
        <Grid position="absolute 0 97 1193 789" id="datagrid1" binddataset="ds_handicappublist" oncelldblclick="datagrid1_oncelldblclick" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="133"/>
                <Column size="89"/>
                <Column size="75"/>
                <Column size="263"/>
                <Column size="88"/>
                <Column size="84"/>
                <Column size="79"/>
                <Column size="74"/>
                <Column size="81"/>
              </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="입금일"/>
                <Cell col="10" text="입금액"/>
                <Cell col="11" text="잔금"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow +1"/>
                <Cell col="1" displaytype="normal" style="align:left middle;" text="bind:yearseqno"/>
                <Cell col="2" style="align:left middle;" text="bind:hngnm"/>
                <Cell col="3" style="align:left middle;" text="bind:rrgstno"/>
                <Cell col="4" displaytype="combo" edittype="combo" style="align:left middle;" text="bind:handicapflag" combodataset="ds_init_P0461" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="5" displaytype="normal" edittype="none" style="align:left middle;" text="bind:handicapgrdeno"/>
                <Cell col="6" style="align:left middle;" text="bind:detladdr"/>
                <Cell col="7" style="align:left middle;" text="bind:claimdd" mask="expr:grdf_setCellMask(claimdd, '####-##-##')"/>
                <Cell col="8" displaytype="number" text="bind:price"/>
                <Cell col="9" style="align:left middle;" text="bind:recvdd" mask="expr:grdf_setCellMask(recvdd, '####-##-##')"/>
                <Cell col="10" displaytype="number" text="bind:recvmoney"/>
                <Cell col="11" displaytype="number" text="bind:balance"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape position="absolute 0 82 1193 83" linetype="vertical" id="line1" class="line_1"/>
        <Static text="장애진단서 청구이력" position="absolute 0 76 144 92" align="align:center middle;" id="caption2" class="tit_2"/>
        <Button position="absolute 1148 75 1190 94" id="button1" class="btn2_letter2" text="엑셀" onclick="button1_onclick"/>
        <Button position="absolute 1104 75 1146 94" id="button2" class="btn2_letter2" text="출력" onclick="button2_onclick"/>
        <Div position="absolute 465 310 730 406" id="grup_claimprnt" visible="false" style="background:@gradation;border:2 solid #057777ff ;gradation:linear 0,0 white 100,100 #0577703f;">
          <Layouts>
            <Layout>
              <Static text="장애진단서 청구이력 출력" position="absolute 3 3 239 19" id="caption7" class="tit_2" anchor="default"/>
              <Button position="absolute 170 68 212 87" id="button5" class="btn2_letter2" text="출력" anchor="default" onclick="grup_claimprnt_button5_onclick"/>
              <Button position="absolute 215 68 257 87" id="button6" class="btn2_letter2" text="취소" anchor="default" onclick="grup_claimprnt_button6_onclick"/>
              <Static text="출력종류" position="absolute 3 44 63 67" align="align:left middle;" id="caption23" class="cell_1" anchor="default"/>
              <Static text="청구기관" position="absolute 3 20 63 43" align="align:left middle;" id="caption11" class="cell_1" anchor="default"/>
              <Calendar position="absolute 66 23 151 42" id="input3" anchor="default" autoselect="true" autoskip="true"/>
              <Calendar position="absolute 164 23 249 42" id="input4" anchor="default" autoselect="true" autoskip="true"/>
              <Static text="~" position="absolute 150 24 165 44" align="align:center middle;" id="caption3" anchor="default"/>
              <Combo position="absolute 66 46 257 65" id="combo3" codecolumn="codecolumn" datacolumn="datacolumn" anchor="default">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">I</Col>
                      <Col id="datacolumn">기관지별 청구이력</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">C</Col>
                      <Col id="datacolumn">청구지별 청구이력</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Combo>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="claiminstcd" type="STRING" size="256"/>
          <Column id="handicapflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_handicappublist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="yearseqno" type="STRING" size="256" sumtext="일련번호"/>
          <Column id="adddetl" type="STRING" size="256"/>
          <Column id="issno" type="STRING" size="256" sumtext="이력번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="rrgstno" type="STRING" size="256" sumtext="제증명일련번호"/>
          <Column id="handicapflag" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="handicapgrdeno" type="STRING" size="256" sumtext="내원구분"/>
          <Column id="handicapno" type="STRING" size="256" sumtext="장애번호"/>
          <Column id="handicapgrde" type="STRING" size="256" sumtext="장애급수"/>
          <Column id="detladdr" type="STRING" size="256" sumtext="일련번호"/>
          <Column id="claimdd" type="STRING" size="256" sumtext="서식코드"/>
          <Column id="price" type="STRING" size="256" sumtext="출력종류"/>
          <Column id="recvdd" type="STRING" size="256" sumtext="입금일"/>
          <Column id="balance" type="STRING" size="256" sumtext="잔액"/>
          <Column id="recvmoney" type="STRING" size="256" sumtext="입금액"/>
          <Column id="claiminstcd" type="STRING" size="256" sumtext="청구처기관코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_P0463" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0461" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0462" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0460" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_reqdata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_tmp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="prntflag" type="STRING" size="256"/>
          <Column id="totacc" type="STRING" size="256"/>
          <Column id="totacc2" type="STRING" size="256"/>
          <Column id="totcnt" type="STRING" size="256"/>
          <Column id="totcnt2" type="STRING" size="256"/>
          <Column id="startyyyymm" type="STRING" size="256"/>
          <Column id="endyyyymm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="prntflag">I</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_claiminstlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_claiminstclspatlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input1" propid="value" datasetid="ds_cond" columnid="fromdd"/>
      <BindItem id="item1" compid="input2" propid="value" datasetid="ds_cond" columnid="todd"/>
      <BindItem id="item2" compid="combo1" propid="value" datasetid="ds_cond" columnid="claiminstcd"/>
      <BindItem id="item3" compid="combo1" propid="innerdataset" datasetid="ds_init_P0463" columnid=""/>
      <BindItem id="item4" compid="combo2" propid="value" datasetid="ds_cond" columnid="handicapflag"/>
      <BindItem id="item5" compid="grup_claimprnt.input3" propid="value" datasetid="ds_tmp" columnid="fromdd"/>
      <BindItem id="item6" compid="grup_claimprnt.input4" propid="value" datasetid="ds_tmp" columnid="todd"/>
      <BindItem id="item7" compid="grup_claimprnt.combo3" propid="value" datasetid="ds_tmp" columnid="prntflag"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-10-15
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-10-15      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMOCommon.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

var arErrorCode = new HashArray();
function SMMMR03200_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
	//화면초기화, 청구기간설정, 청구처, 장애구분 공통코드 조회
	
	ds_handicappublist.clearData();
	ds_cond.setColumn(0,"fromdd", utlf_getCurrentDate());
	ds_cond.setColumn(0,"todd"  , utlf_getCurrentDate());
	var arrParam = [{dsNm: "ds_init_P0460", cdGrpId: "P0460"},
					{dsNm: "ds_init_P0461", cdGrpId: "P0461"},	
					{dsNm: "ds_init_P0462", cdGrpId: "P0462"},	
					{dsNm: "ds_init_P0463", cdGrpId: "P0463"}	
				   ]
			
	appf_getCodeList(arrParam);	//공통코드 보험유형 조회

	ds_init_P0461.insertRow(0);
	ds_init_P0461.setColumn(0,"cdid","-");
	ds_init_P0461.setColumn(0,"cdnm","전체");
	ds_init_P0463.insertRow(0);
	ds_init_P0463.setColumn(0,"cdid","-");
	ds_init_P0463.setColumn(0,"cdnm","전체");

	ds_cond.setColumn(0,"claiminstcd", "-");
	ds_cond.setColumn(0,"handicapflag"  , "-");

}

function btn_req_onclick(obj:Button,  e:ClickEventInfo)
{
	dsf_copyDs(ds_send_reqdata,ds_cond,"replace");	

	var oParam = {};
    oParam.id          = "TRMMR03201";
    oParam.service     = "medirecapp.ExtnMediRec";
    oParam.method      = "reqGetHandiCapClaimHistInfo";
    oParam.inds        = "req=ds_send_reqdata";
    oParam.outds       = "ds_handicappublist=handicappublist";
    oParam.async       = true;
    //oParam.callback    = "cf_TRMMR03201";

	tranf_submit(oParam);
}

function cf_TRMMR03201(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
}
function datagrid1_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	
	var currow = ds_handicappublist.rowposition;
	var pid   = ds_handicappublist.getColumn(currow, "pid");
	var hngnm = ds_handicappublist.getColumn(currow, "hngnm");
	var claiminstcd = ds_handicappublist.getColumn(currow, "claiminstcd");
	var handicapflag= ds_handicappublist.getColumn(currow, "handicapflag");
	var handicapgrde= ds_handicappublist.getColumn(currow, "handicapgrde");
	var handicapno  = ds_handicappublist.getColumn(currow, "handicapno");
	var yearseqno   = ds_handicappublist.getColumn(currow, "yearseqno");
	var issno       = ds_handicappublist.getColumn(currow, "issno");
	
	var param = pid + "^" + hngnm + "^" + claiminstcd + "^" +  handicapflag + "^" + handicapgrde + "^" + handicapno + "^" + yearseqno + "^" + issno;						
	frmf_setParameter("SPMMR06200_param", param);
	frmf_modal("SPMMR06200","SPMMR06200");
	
	var ev = new ClickEventInfo;
	frmf_inputEnterKey("btn_req", "onclick", ev );
	
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
// 	var fileName = window.fileDialog("save", ",", false, "제증명이력", "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");					
// 	if (fileName != ""){
// 		datagrid1.saveExcel(fileName, "sheetname:sheet1;col_08:label;col_04:label;col_07:label;col_08:label;");
// 	}
	grdf_exportExcel(datagrid1, "제증명이력", "sheet1",true,"" , "" , true);	     
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	
	grup_claimprnt.visible = true;
	ds_tmp.setColumn(0,"fromdd", ds_cond.getColumn(0,"fromdd"));
	
	ds_tmp.setColumn(0,"todd"  , ds_cond.getColumn(0,"todd"));

}

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

function grup_claimprnt_button5_onclick(obj:Button,  e:ClickEventInfo)
{
	var prntflag = ds_tmp.getColumn(0,"prntflag");
	var submitid = "";
	
	//기관지별 청구이력 출력
	if(prntflag == "I"){
		ds_tmp.setColumn(0,"startyyyymm", ds_tmp.getColumn(0,"fromdd").substring(0, 6));
		ds_tmp.setColumn(0,"endyyyymm"  , ds_tmp.getColumn(0,"todd").substring(0, 6));

		ds_send_reqdata.clear();
		dsf_makeValue(ds_send_reqdata,"fromdd", "string", ds_tmp.getColumn(0,"startyyyymm"), 0);
		dsf_makeValue(ds_send_reqdata,"todd"  , "string",  ds_tmp.getColumn(0,"endyyyymm"), 0);

		var oParam = {};
			oParam.id          = "TRMMR03202";
			oParam.service     = "medirecapp.ExtnMediRec";
			oParam.method      = "reqGetInstClaimClsHist";
			oParam.inds        = "req=ds_send_reqdata";
			oParam.outds       = "ds_claiminstlist=claiminstlist";
			oParam.async       = false;
			oParam.callback    = "cf_TRMMR03202";

		tranf_submit(oParam);
		
	}else if(prntflag == "C"){
		ds_tmp.setColumn(0,"startyyyymm", ds_tmp.getColumn(0,"fromdd").substring(0, 6));
		ds_tmp.setColumn(0,"endyyyymm"  , ds_tmp.getColumn(0,"todd").substring(0, 6));
		
		ds_send_reqdata.clear();
		dsf_makeValue(ds_send_reqdata,"fromdd", "string",ds_tmp.getColumn(0,"startyyyymm"), 0);
		dsf_makeValue(ds_send_reqdata,"todd"  , "string",ds_tmp.getColumn(0,"endyyyymm"), 0);
		
		var oParam = {};
			oParam.id          = "TRMMR03203";
			oParam.service     = "medirecapp.ExtnMediRec";
			oParam.method      = "reqGetClaimInstClsPatList";
			oParam.inds        = "req=ds_send_reqdata";
			oParam.outds       = "ds_claiminstclspatlist=claiminstclspatlist";
			oParam.async       = false;
			oParam.callback    = "cf_TRMMR03203";

		tranf_submit(oParam);

	}

	
}
function cf_TRMMR03202(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    
    var totacc = ds_claiminstlist.getSum("account"); 
	var totacc2= ds_claiminstlist.getSum("account2");
	var totcnt = ds_claiminstlist.getSum("claimcnt");
	var totcnt2= ds_claiminstlist.getSum("claimcnt2");
	
	ds_tmp.setColumn(0,"totacc" , totacc);
	ds_tmp.setColumn(0,"totacc2", totacc2);
	ds_tmp.setColumn(0,"totcnt" , totcnt);
	
	ds_tmp.setColumn(0,"totcnt2", totcnt2);								
	//sysf_trace(ds_tmp.saveXML());
	//exeReportPreview("RFMMR03202", "XMLSTR"); //미리보기만 가능
	
	//////////////
	var objDOM = rptf_createDOM();															// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "/root/main/claiminstlist/claiminstlist", ds_claiminstlist);						// 데이터셋 1	
	rptf_setNodeListToDOM(objDOM, "/root/temp", ds_tmp);						// 데이터셋 2	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;								// 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";	
	rptf_exeReportPreview30(["RFMMR03202"],[objParam], option);
	///////////////////
	//rptf_exeReportPreview30("RFMMR03202");
	
	grup_claimprnt.visible = false;
    
}
function cf_TRMMR03203(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    
    //////////////
	var objDOM = rptf_createDOM();															// DOM 객체 설정	
	rptf_setNodeListToDOM(objDOM, "/root/main/claiminstclspatlist/claiminstclspatlist", ds_claiminstclspatlist);						// 데이터셋 1	
	rptf_setNodeListToDOM(objDOM, "/root/temp", ds_tmp);						// 데이터셋 2	
	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;								// 최상의노드 XML 스트링 추출
	var option = "open=1;save=1;directprint=0;print=1;zoom=0;";	
	rptf_exeReportPreview30(["RFMMR03203"],[objParam], option);
	///////////////////
	
    //rptf_exeReportPreview30("RFMMR03203"); //미리보기만 가능
    
    grup_claimprnt.visible = false;
}

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