YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SMPIF30140_자격보류관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIF30140" position="absolute 0 0 1213 703" titletext="자격보류내역" oninit="SMPIF30140_oninit" onload="SMPIF30140_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 1194 669" id="group3" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Static text="자격보류내역" position="absolute 1 10 119 32" id="caption1" class="tit_2"/>
              <Shape position="absolute 0 26 1194 32" linetype="horizontal" id="line1" class="line_1" style="strokepen:3 solid #33bbbbff;"/>
              <Grid position="absolute 0 31 1194 663" id="grd_qualrete" class="datagrid2" binddataset="ds_main_list00_gridqualrete00" cellsizingtype="col" cellclickbound="cell">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="39"/>
                      <Column size="40"/>
                      <Column size="60"/>
                      <Column size="50"/>
                      <Column size="60"/>
                      <Column size="60"/>
                      <Column size="100"/>
                      <Column size="70"/>
                      <Column size="50"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="120"/>
                      <Column size="60"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="120"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="130"/>
                      <Column size="100"/>
                      <Column size="55"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="36" band="head"/>
                      <Row size="24"/>
                    </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="청구번호"/>
                      <Cell col="6" text="기존자격반송상태"/>
                      <Cell col="7" text="No"/>
                      <Cell col="8" text="입금&#10;여부"/>
                      <Cell col="9" text="자격반송&#10;여부"/>
                      <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="대불금"/>
                      <Cell col="20" text="심결액"/>
                      <Cell col="21" text="심결장애인&#10;기금"/>
                      <Cell col="22" text="심결대불금"/>
                      <Cell col="23" text="기관삭감액"/>
                      <Cell col="24" text="장애인전환금"/>
                      <Cell col="25" text="입금액"/>
                      <Cell col="26" text="입금기관기호"/>
                      <Cell col="27" text="입금기관명"/>
                      <Cell col="28" text="보험유형"/>
                      <Cell col="29" text="의료급여&#10;종별구분"/>
                      <Cell col="30" text="기관기호"/>
                      <Cell col="31" text="기관명"/>
                      <Cell col="32" text="변경보험유형"/>
                      <Cell col="33" text="변경기관기호"/>
                      <Cell col="34" text="변경기관명"/>
                      <Cell col="35" text="변경증번호"/>
                      <Cell col="36" text="심사자"/>
                      <Cell col="37" text="재원&#10;심사자"/>
                      <Cell col="38" text="상태"/>
                      <Cell col="39"/>
                    </Band>
                    <Band id="body">
                      <Cell text="bind:clamym"/>
                      <Cell col="1" text="bind:decoseq"/>
                      <Cell col="2" text="bind:instcd"/>
                      <Cell col="3" text="bind:judgdg"/>
                      <Cell col="4" text="bind:acptno"/>
                      <Cell col="5" text="bind:clamno"/>
                      <Cell col="6" text="bind:firqualsendflag"/>
                      <Cell col="7" text="bind:reteseqno"/>
                      <Cell col="8" text="bind:depoyn"/>
                      <Cell col="9" displaytype="checkbox" edittype="checkbox" text="bind:qualsendflag" expr="qualsendflag == 'Y' || qualsendflag == '1' ? 1 : 0"/>
                      <Cell col="10" text="bind:docuseqno"/>
                      <Cell col="11" displaytype="text" edittype="text" text="bind:reteno"/>
                      <Cell col="12" displaytype="text" edittype="text" text="bind:reteresn"/>
                      <Cell col="13" text="bind:reteresnrem"/>
                      <Cell col="14" text="bind:pid"/>
                      <Cell col="15" text="bind:patnm"/>
                      <Cell col="16" displaytype="number" text="bind:clmcstotamt"/>
                      <Cell col="17" displaytype="number" text="bind:clclamamt"/>
                      <Cell col="18" displaytype="number" text="bind:clhandicaprfund"/>
                      <Cell col="19" displaytype="number" text="bind:clsubtamt"/>
                      <Cell col="20" displaytype="number" text="bind:jrjudgdeciamt"/>
                      <Cell col="21" displaytype="number" text="bind:jrhandicaprfund"/>
                      <Cell col="22" displaytype="number" text="bind:jrsubtamt"/>
                      <Cell col="23" displaytype="number" text="bind:instreductamt"/>
                      <Cell col="24" displaytype="number" text="bind:handicapcvrtamt"/>
                      <Cell col="25" displaytype="number" text="bind:depoamt"/>
                      <Cell col="26" text="bind:depoprocinstmark"/>
                      <Cell col="27" text="bind:depoprocinstmarknm"/>
                      <Cell col="28" text="bind:insukind"/>
                      <Cell col="29" text="bind:medcarekindflag"/>
                      <Cell col="30" text="bind:procinstmark"/>
                      <Cell col="31" text="bind:procinstmarknm"/>
                      <Cell col="32" displaytype="text" edittype="text" text="bind:updtinsukind"/>
                      <Cell col="33" displaytype="text" edittype="text" text="bind:updtprocinstmark"/>
                      <Cell col="34" displaytype="text" edittype="text" text="bind:updtprocinstmarknm"/>
                      <Cell col="35" displaytype="text" edittype="text" text="bind:updtcertno"/>
                      <Cell col="36" text="bind:judgrid"/>
                      <Cell col="37" text="bind:clamdg"/>
                      <Cell col="38" text="bind:pidsn"/>
                      <Cell col="39" text="bind:seq"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 1112 7 1194 26" id="button12" class="btn7" text="엑셀저장" onclick="group3_button12_onclick"/>
              <Button position="absolute 1047 7 1111 26" id="btn_listselect" class="btn2" text="전체선택" onclick="group3_btn_listselect_onclick"/>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 2 659 1196 692" id="group2" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 0 5 56 27" id="button93" class="btn6" text="출력" anchor="default" enable="false" onclick="group2_button93_onclick"/>
              <Button position="absolute 1136 5 1192 27" id="button3" class="btn4" text="닫기" anchor="default" onclick="group2_button3_onclick"/>
              <Button position="absolute 1078 5 1134 27" id="button42" class="btn4" text="저장" anchor="default" onclick="group2_button42_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send_sendlnk" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_sendlist00" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="clamno" type="STRING" size="256"/>
          <Column id="acptno" type="STRING" size="256"/>
          <Column id="judgdg" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="cpcd" type="STRING" size="256"/>
          <Column id="assocd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list00_gridqualrete00" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_list00_gridqualrete00_oncolumnchanged">
        <ColumnInfo>
          <Column id="clamym" type="STRING" size="256" sumtext="청구월"/>
          <Column id="decoseq" type="STRING" size="256" sumtext="미수일련번호"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="judgdg" type="STRING" size="256" sumtext="심사차수"/>
          <Column id="acptno" type="STRING" size="256" sumtext="접수번호"/>
          <Column id="clamno" type="STRING" size="256" sumtext="청구번호"/>
          <Column id="firqualsendflag" type="STRING" size="256" sumtext="기존자격반송상태"/>
          <Column id="reteseqno" type="STRING" size="256" sumtext="순번"/>
          <Column id="depoyn" type="STRING" size="256" sumtext="입금엽 "/>
          <Column id="qualsendflag" type="STRING" size="256" sumtext="자격반송여부"/>
          <Column id="docuseqno" type="STRING" size="256" sumtext="명일련"/>
          <Column id="reteno" type="STRING" size="256" sumtext="보류번호"/>
          <Column id="reteresn" type="STRING" size="256" sumtext="보류사유"/>
          <Column id="reteresnrem" type="STRING" size="256" sumtext="보류사유설명"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="patnm" type="STRING" size="256" sumtext="수진자명"/>
          <Column id="clmcstotamt" type="STRING" size="256" sumtext="청구총진료비"/>
          <Column id="clclamamt" type="STRING" size="256" sumtext="청구액"/>
          <Column id="clhandicaprfund" type="STRING" size="256" sumtext="청구장애인기금"/>
          <Column id="clsubtamt" type="STRING" size="256" sumtext="청구대불금"/>
          <Column id="jrjudgdeciamt" type="STRING" size="256" sumtext="심결액"/>
          <Column id="jrhandicaprfund" type="STRING" size="256" sumtext="심결장애인기금"/>
          <Column id="jrsubtamt" type="STRING" size="256" sumtext="심결대불금"/>
          <Column id="instreductamt" type="STRING" size="256" sumtext="기관삭감액"/>
          <Column id="handicapcvrtamt" type="STRING" size="256" sumtext="장애인전환금"/>
          <Column id="depoamt" type="STRING" size="256" sumtext="입금액"/>
          <Column id="depoprocinstmark" type="STRING" size="256" sumtext="입금기관기호"/>
          <Column id="depoprocinstmarknm" type="STRING" size="256" sumtext="입금기관명"/>
          <Column id="insukind" type="STRING" size="256" sumtext="보험유형"/>
          <Column id="medcarekindflag" type="STRING" size="256" sumtext="의료급여종별구분"/>
          <Column id="procinstmark" type="STRING" size="256" sumtext="기관기호"/>
          <Column id="procinstmarknm" type="STRING" size="256" sumtext="기관명"/>
          <Column id="updtinsukind" type="STRING" size="256" sumtext="변경보험유형"/>
          <Column id="updtprocinstmark" type="STRING" size="256" sumtext="변경기관기호"/>
          <Column id="updtprocinstmarknm" type="STRING" size="256" sumtext="변경기관명"/>
          <Column id="updtcertno" type="STRING" size="256" sumtext="변경증번호"/>
          <Column id="judgrid" type="STRING" size="256" sumtext="심사자"/>
          <Column id="clamdg" type="STRING" size="256" sumtext="청구차수"/>
          <Column id="pidsn" type="STRING" size="256" sumtext="등록번호순번"/>
          <Column id="seq" type="STRING" size="256" sumtext="순번"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2016-05-24
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2016-05-24      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "pam_pamcomnxp::PAM001.xjs";
include "pam_pamcomnxp::PAM.xjs";

function SMPIF30140_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIF30140_onload(obj:Form, e:LoadEventInfo)
{
	if(frmf_checkOpener()) 
	{
		ds_send_sendlnk.copyData(arg_ds_send_sendlnk);
	}
	
	select_init();
}

function select_init()
{
	var vclamno, vacptno, vinstcd, vjudgdg, cpcd, assocd ;
	
	vclamno = ds_send_sendlnk.getColumn(0, "clamno");
	vacptno = ds_send_sendlnk.getColumn(0, "acptno");
	vjudgdg = ds_send_sendlnk.getColumn(0, "judgdg");
	vinstcd = ds_send_sendlnk.getColumn(0, "instcd");
	vcpcd = ds_send_sendlnk.getColumn(0, "cpcd");
	vassocd = ds_send_sendlnk.getColumn(0, "assocd");
	
	if(utlf_isNull(vacptno) || utlf_isNull(vclamno) || utlf_isNull(vjudgdg))
	{
		return;
	}
	
	ds_send_sendlist00.setColumn(0, "acptno", vacptno);
	ds_send_sendlist00.setColumn(0, "clamno", vclamno);
	ds_send_sendlist00.setColumn(0, "judgdg", vjudgdg);
	ds_send_sendlist00.setColumn(0, "instcd", vinstcd);
	ds_send_sendlist00.setColumn(0, "cpcd", vcpcd);
	ds_send_sendlist00.setColumn(0, "assocd", vassocd);
	
	var oParam = {};
		oParam.id          = "TRPIF30141";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetQualReteSpec";
		oParam.inds        = "req=ds_send_sendlist00";
		oParam.outds       = "ds_main_list00_gridqualrete00=gridqualrete00";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF30141";

	tranf_submit(oParam);
}

function group3_btn_listselect_onclick(obj:Button,  e:ClickEventInfo)
{
	var vrowcount = ds_main_list00_gridqualrete00.rowcount
	var vretechk ;

	if(group3.btn_listselect.text == "전체선택")
	{
		vretechk = "Y" ;
		group3.btn_listselect.text = "전체해제"  ;
	} 
	else 
	{
		vretechk = "N" ;
		group3.btn_listselect.text = "전체선택"  ;
	}

	for (var i = 0; i < vrowcount; i++) 
	{
		ds_main_list00_gridqualrete00.setColumn(i, "qualsendflag", vretechk);
	}
}

function group3_button12_onclick(obj:Button,  e:ClickEventInfo)
{
	var today = new Date();
	
	var yy = today.getYear() + "";
	var mm = today.getMonth() + 1;
	var dd = today.getDate();
	
	if(mm < 10) 
	{ 
		mm = "0" + mm; 
	}
	else 
	{ 
		mm = mm + ""; 
	}
	
	if(dd < 10) 
	{ 
		dd = "0" + dd; 
	}
	else 
	{
		dd = dd + ""; 
	}
	
	var tmp = yy + mm + dd;
	
	if(ds_main_list00_gridqualrete00.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
	else
	{
		grdf_exportExcel(group3.grd_qualrete, "자격보류관리_"+tmp, "see");
	}
}

function group2_button42_onclick(obj:Button,  e:ClickEventInfo)
{
	var oParam = {};
		oParam.id          = "TXPIF30141";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqSetQualRete";
		oParam.inds        = "req=ds_main_list00_gridqualrete00";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXPIF30141";

	tranf_submit(oParam);

	select_init() ;
}

function group2_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function group2_button93_onclick(obj:Button,  e:ClickEventInfo)
{
	
}

function ds_main_list00_gridqualrete00_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "qualsendflag" ){
		obj.setColumn(e.row, "qualsendflag", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}
]]></Script>
  </Form>
</FDL>