YNU_JEUS/app_home/himed/xpapps/pam/clamuncoxp/xp/SMPIF50100_원외처방개인별심결내역및지급관리.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPIF50100" position="absolute 0 0 1201 786" titletext="원외처방 개인별 심결내역 및 지급관리(SMPIF50100)" oninit="SMPIF50100_oninit" onload="SMPIF50100_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 1 13 1195 757" id="group3" scrollbars="autoboth" anchor="all">
          <Layouts>
            <Layout>
              <Static text="원외처방 심사결정사항 및 지급관리" position="absolute 0 453 235 474" id="caption16" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 469 1194 475" linetype="horizontal" id="line9" class="line_10" anchor="left top right"/>
              <Button position="absolute 1121 17 1177 39" id="button1" class="btn1" text="조회" anchor="default"/>
              <Shape position="absolute 1102 17 1108 39" linetype="vertical" id="line13" anchor="default"/>
              <Static text="심사결정사항" position="absolute 0 55 111 77" id="caption7" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 71 1194 77" linetype="horizontal" id="line8" class="line_10" anchor="left top right"/>
              <Button position="absolute 1151 450 1193 469" id="button2" class="btn5" text="저장" anchor="top right" onclick="group3_button2_onclick"/>
              <Button position="absolute 1108 450 1150 469" id="button7" class="btn5" text="삭제" anchor="top right" onclick="group3_button7_onclick"/>
              <Div position="absolute 0 11 1194 46" align="align:center top;" id="group2" class="div_SA" anchor="left top right">
                <Layouts>
                  <Layout>
                    <Shape position="absolute 1102 7 1108 29" linetype="vertical" id="line43" class="line_4" anchor="top right"/>
                    <Static text="통보심사차수 :" position="absolute 251 9 363 26" id="caption3" class="search_name" anchor="default"/>
                    <Static text="접수번호 :" position="absolute 13 9 99 26" id="caption4" class="search_name" anchor="default"/>
                    <Static text="명세서일련번호 :" position="absolute 659 9 784 26" id="caption5" class="search_name" anchor="default"/>
                    <Combo position="absolute 357 7 447 26" id="cmb_judgdg" class="combo_s_essential" innerdataset="@ds_init_U0001list" datacolumn="judgdg" codecolumn="judgdg" anchor="default" onitemchanged="group3_group2_cmb_judgdg_onitemchanged"/>
                    <Edit position="absolute 98 6 203 25" id="ipt_acptno" class="input_s_essential" anchor="default" onkeyup="group3_group2_ipt_acptno_onkeyup"/>
                    <Edit position="absolute 781 7 876 26" id="ipt_docuseqno" class="input_search" anchor="default" onkeyup="group3_group2_ipt_docuseqno_onkeyup"/>
                    <Button position="absolute 1121 7 1177 29" id="btn_srch" class="btn1" text="조회" anchor="top right" onclick="group3_group2_btn_srch_onclick"/>
                    <Static text="바로가기 ==&gt;" position="absolute 575 6 655 31" id="caption1" anchor="default" style="color:#ff6600ff;"/>
                    <CheckBox position="absolute 453 9 498 24" id="chk_flag" text="F808" anchor="default" truevalue="Y" onclick="group3_group2_chk_flag_onclick"/>
                    <Button id="btn" taborder="1" onclick="group3_group2_btn_onclick" class="icon_search" position="absolute 207 8 223 27" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Grid position="absolute 0 76 1194 410" id="grd_judgdecidetl" class="datagrid2" scrollbars="autoboth" binddataset="ds_main_list01_gridjudgdecidetl" anchor="left top right" autofittype="col" oncellclick="group3_grd_judgdecidetl_oncellclick" onkeydown="group3_grd_judgdecidetl_onkeydown" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25"/>
                      <Column size="80"/>
                      <Column size="70"/>
                      <Column size="61"/>
                      <Column size="75"/>
                      <Column size="60"/>
                      <Column size="60"/>
                      <Column size="70"/>
                      <Column size="0"/>
                      <Column size="70"/>
                      <Column size="70"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="33" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="심결도착일"/>
                      <Cell col="2" text="미수발생월"/>
                      <Cell col="3" text="명세서&#10;일련번호"/>
                      <Cell col="4" text="등록번호"/>
                      <Cell col="5" text="수진자명"/>
                      <Cell col="6" text="진료과"/>
                      <Cell col="7" text="진료의"/>
                      <Cell col="8" text="이의신청&#10;여부"/>
                      <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"/>
                      <Cell col="18"/>
                      <Cell col="19"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="currow+1"/>
                      <Cell col="1" displaytype="date" text="bind:notidd" mask="yyyy-MM-dd"/>
                      <Cell col="2" displaytype="date" text="bind:clamym" mask="yyyy-MM"/>
                      <Cell col="3" displaytype="text" style="align:center middle;" text="bind:docuseqno"/>
                      <Cell col="4" text="bind:pid"/>
                      <Cell col="5" text="bind:patnm"/>
                      <Cell col="6" text="bind:orddeptcd"/>
                      <Cell col="7" text="bind:orddrid"/>
                      <Cell col="8" text="bind:obtappyn"/>
                      <Cell col="9" text="bind:acptno"/>
                      <Cell col="10" text="bind:judgdg"/>
                      <Cell col="11" displaytype="number" text="bind:edimedcaretotamt"/>
                      <Cell col="12" displaytype="number" text="bind:ediownbamt"/>
                      <Cell col="13" displaytype="number" text="bind:ediinsuclamamt"/>
                      <Cell col="14" displaytype="number" text="bind:ediownbmaxexamt"/>
                      <Cell col="15" displaytype="number" text="bind:edisuppamt"/>
                      <Cell col="16" displaytype="number" text="bind:edihandicaprfund"/>
                      <Cell col="17" text="bind:clamseqno"/>
                      <Cell col="18" text="bind:clamno"/>
                      <Cell col="19" text="bind:f080yn"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Grid position="absolute 0 474 1194 742" id="grd_rtndetl" class="datagrid2" scrollbars="autoboth" binddataset="ds_main_list02_gridrtndetl" anchor="all" autofittype="col" cellsizingtype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="26"/>
                      <Column size="65"/>
                      <Column size="95"/>
                      <Column size="50"/>
                      <Column size="80"/>
                      <Column size="90"/>
                      <Column size="40"/>
                      <Column size="80"/>
                      <Column size="130"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="75"/>
                      <Column size="50"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="38" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1" text="통보&#10;심사차수"/>
                      <Cell col="2" text="처방전&#10;교부번호"/>
                      <Cell col="3" text="줄번호"/>
                      <Cell col="4" text="약국코드"/>
                      <Cell col="5" text="약국명"/>
                      <Cell col="6" text="조정&#10;사유"/>
                      <Cell col="7" text="약품코드"/>
                      <Cell col="8" text="약품명"/>
                      <Cell col="9" text="이의신청액"/>
                      <Cell col="10" text="부적정부담금"/>
                      <Cell col="11" text="부적정본인&#10;부담환급금"/>
                      <Cell col="12" text="부적정공단&#10;부담환수액"/>
                      <Cell col="13" text="조정액"/>
                      <Cell col="14" text="심결&#10;도착일자"/>
                      <Cell col="15" text="구분"/>
                      <Cell col="16" text="caption1"/>
                      <Cell col="17"/>
                      <Cell col="18"/>
                      <Cell col="19"/>
                      <Cell col="20"/>
                      <Cell col="21"/>
                      <Cell col="22"/>
                      <Cell col="23"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head"/>
                      <Cell col="1" text="bind:judgdg"/>
                      <Cell col="2" text="bind:mpsno"/>
                      <Cell col="3" text="bind:lnno"/>
                      <Cell col="4" displaytype="text" edittype="text" style="background:#ffff00ff;background2:#ffff00ff;" text="bind:prcpcorpmark"/>
                      <Cell col="5" displaytype="text" edittype="text" style="background:#ffff00ff;background2:#ffff00ff;" text="bind:prcpcorpnm"/>
                      <Cell col="6" displaytype="text" edittype="text" style="background:#ffff00ff;background2:#ffff00ff;" text="bind:adjtresncd"/>
                      <Cell col="7" text="bind:calcscorcd"/>
                      <Cell col="8" displaytype="number" text="bind:hngnm" mask="9,999"/>
                      <Cell col="9" displaytype="number" text="bind:obtappamt"/>
                      <Cell col="10" displaytype="number" edittype="normal" style="background:#ffff00ff;background2:#ffff00ff;" text="bind:inappbamt"/>
                      <Cell col="11" displaytype="number" edittype="normal" style="background:#ffff00ff;background2:#ffff00ff;" text="bind:inappownbrtnamt"/>
                      <Cell col="12" displaytype="number" edittype="normal" style="background:#ffff00ff;background2:#ffff00ff;" text="bind:inappcorpbrtnamt"/>
                      <Cell col="13" displaytype="number" text="bind:adjtamt"/>
                      <Cell col="14" displaytype="date" text="bind:oprcpnotidd" mask="yyyy-MM-dd"/>
                      <Cell col="15" text="bind:dataflag"/>
                      <Cell col="16" text="bind:clamno"/>
                      <Cell col="17" text="bind:acptno"/>
                      <Cell col="18" text="bind:docuseqno"/>
                      <Cell col="19" text="bind:instcd"/>
                      <Cell col="20" text="bind:adjtdayqty"/>
                      <Cell col="21" text="bind:adjttotqty"/>
                      <Cell col="22" text="bind:obtappflag"/>
                      <Cell col="23" text="bind:adjtamtflag"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Button position="absolute 30 140 217 159" id="button108" class="btn2" visible="false" text="[콤보박스]심사차수 내려받기" anchor="default" onclick="group3_button108_onclick"/>
              <Button position="absolute 30 175 193 194" id="button109" class="btn2" visible="false" text="조회버튼 엔터키로 클릭시" anchor="default"/>
              <Button position="absolute 1039 52 1114 71" id="button3" class="btn2" text="줄번호500" anchor="top right" onclick="group3_button3_onclick"/>
              <Button position="absolute 1027 450 1107 469" id="button5" class="btn7" text="엑셀저장" anchor="top right" onclick="group3_button5_onclick"/>
              <Button position="absolute 944 52 1038 71" id="button6" class="btn7" text="Open Excel" anchor="top right" onclick="group3_button6_onclick"/>
              <Button position="absolute 834 52 887 71" id="button10" class="btn2" text="열카피" anchor="top right" onclick="group3_button10_onclick"/>
              <Button position="absolute 889 52 942 71" id="button11" class="btn2" text="행카피" anchor="top right" onclick="group3_button11_onclick"/>
              <Button position="absolute 779 52 832 71" id="button13" class="btn2" text="셀카피" anchor="top right" onclick="group3_button13_onclick"/>
              <Grid position="absolute 645 411 971 468" id="datagrid1" class="datagrid2" scrollbars="autoboth" binddataset="ds_main_f090list_grdrtnf903" anchor="default" autofittype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="85"/>
                      <Column size="79"/>
                      <Column size="80"/>
                      <Column size="80"/>
                    </Columns>
                    <Rows>
                      <Row size="29" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="처방별 &#10;부적정부담금"/>
                      <Cell col="1" text="요양기관&#10;환수금"/>
                      <Cell col="2" text="본인부담&#10;환수금"/>
                      <Cell col="3" text="부적정공단&#10;부담환수액"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="number" text="bind:suminappbamt" mask="9,999"/>
                      <Cell col="1" displaytype="number" text="bind:corpramt" mask="9,999"/>
                      <Cell col="2" displaytype="number" text="bind:ownbrtnamt" mask="9,999"/>
                      <Cell col="3" displaytype="number" text="bind:insubramt" mask="9,999"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div position="absolute 1 753 1195 780" id="group4" scrollbars="autoboth" anchor="left right bottom">
          <Layouts>
            <Layout>
              <Button position="absolute 1066 4 1194 26" id="button17" class="btn4" visible="false" text="원외이신자료생성" anchor="right bottom"/>
              <Shape position="absolute 0 0 1194 6" linetype="horizontal" id="line32" class="line_6" anchor="left right bottom"/>
            </Layout>
          </Layouts>
        </Div>
        <Button position="absolute 1116 65 1196 84" id="button4" class="btn7" text="엑셀저장" anchor="top right" onclick="button4_onclick"/>
        <Static id="caption6" text="원외처방 개인별 심결내역 및 지급관리" class="tit_1" position="absolute 1 0 305 23"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_init_P0287list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_send01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="acptno" type="STRING" size="256"/>
          <Column id="judgdg" type="STRING" size="256"/>
          <Column id="f080yn" type="STRING" size="256"/>
          <Column id="termflag" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="insukind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_U0001list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgdg" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="docuseqno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list01_gridjudgdecidetl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="notidd" type="STRING" size="256" sumtext="심결도착일자"/>
          <Column id="docuseqrem" type="STRING" size="256" sumtext="비고"/>
          <Column id="clamym" type="STRING" size="256" sumtext="미수발생월"/>
          <Column id="docuseqno" type="STRING" size="256" sumtext="명일련"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="patnm" type="STRING" size="256" sumtext="수진자명"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="주치의"/>
          <Column id="obtappyn" type="STRING" size="256" sumtext="이의신청여부"/>
          <Column id="acptno" type="STRING" size="256" sumtext="접수번호"/>
          <Column id="judgdg" type="STRING" size="256" sumtext="심사차수"/>
          <Column id="edimedcaretotamt" type="STRING" size="256" sumtext="총진료비"/>
          <Column id="ediownbamt" type="STRING" size="256" sumtext="본인부담금"/>
          <Column id="ediinsuclamamt" type="STRING" size="256" sumtext="청구액"/>
          <Column id="ediownbmaxexamt" type="STRING" size="256" sumtext="상한액"/>
          <Column id="edisuppamt" type="STRING" size="256" sumtext="지원금"/>
          <Column id="edihandicaprfund" type="STRING" size="256" sumtext="장애인기금"/>
          <Column id="clamseqno" type="STRING" size="256" sumtext="청구일련번호"/>
          <Column id="clamno" type="STRING" size="256" sumtext="청구번호"/>
          <Column id="f080yn" type="STRING" size="256" sumtext="정산심결조회여부"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_f090list_grdrtnf903" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="suminappbamt" type="STRING" size="256" sumtext="처방 부적정 부담금 합계"/>
          <Column id="corpramt" type="STRING" size="256" sumtext="요양기관환수금"/>
          <Column id="ownbrtnamt" type="STRING" size="256" sumtext="본인부담환수금"/>
          <Column id="insubramt" type="STRING" size="256" sumtext="부적정공단환수금"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_list02_gridrtndetl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_send02" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="judgdg" type="STRING" size="256"/>
          <Column id="acptno" type="STRING" size="256"/>
          <Column id="clamseqno" type="STRING" size="256"/>
          <Column id="docuseqno" type="STRING" size="256"/>
          <Column id="clamno" type="STRING" size="256"/>
          <Column id="f080yn" type="STRING" size="256"/>
          <Column id="notidd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="judgdg"/>
            <Col id="acptno"/>
            <Col id="clamseqno"/>
            <Col id="docuseqno"/>
            <Col id="clamno"/>
            <Col id="f080yn"/>
            <Col id="notidd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_send03" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="srchcond1" type="STRING" size="256"/>
          <Column id="scrflag" type="STRING" size="256"/>
          <Column id="srchcond2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group2.ipt_acptno" propid="value" datasetid="ds_send_send01" columnid="acptno"/>
      <BindItem id="item1" compid="group3.group2.cmb_judgdg" propid="value" datasetid="ds_send_send01" columnid="judgdg"/>
      <BindItem id="item2" compid="group3.group2.chk_flag" propid="value" datasetid="ds_send_send01" columnid="f080yn"/>
      <BindItem id="item3" compid="group3.group2.ipt_docuseqno" propid="value" datasetid="ds_init_temp" columnid="docuseqno"/>
    </Bind>
    <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";

var col = "N";
function SMPIF50100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMPIF50100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(group3.grd_rtndetl);
	grdf_setRowTypeIcon(group3.grd_rtndetl, 0);
	
	CommCode_Load();
}

function CommCode_Load()
{
	var arrParam = [{dsNm: "ds_init_P0287list", cdGrpId: "P0287"}]
				   
	appf_getCodeList(arrParam);	
	
	group3.group2.ipt_acptno.setFocus();
}

function group3_group2_ipt_acptno_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		ds_send_send01.setColumn(0, "acptno", obj.value);
		
		group3_button108_onclick();
	}
}

function group3_button108_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send_send01.setColumn(0, "judgdg", "");
	
	ds_init_U0001list.clearData();
	
	ds_main_list01_gridjudgdecidetl.clearData();
	ds_main_list02_gridrtndetl.clearData();
	
	var oParam = {};
		oParam.id          = "TRPIF50103";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetJudgdgByOPrcp";
		oParam.inds        = "req=ds_send_send01";
		oParam.outds       = "ds_init_U0001list=U0001";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF50103";

	tranf_submit(oParam);

	if(ds_init_U0001list.rowcount == 1) 
	{
		ds_send_send01.setColumn(0, "judgdg", ds_init_U0001list.getColumn(0, "judgdg"));
		
		group3.group2.btn_srch.setFocus();
		
		var oParam = {};
			oParam.id          = "TRPIF50101";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqGetJudgDeciDetl";
			oParam.inds        = "req=ds_send_send01";
			oParam.outds       = "ds_main_list01_gridjudgdecidetl=gridjudgdecidetl";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIF50101";

		tranf_submit(oParam);

	} 
	else 
	{
		group3.group2.cmb_judgdg.setFocus();
	}
}

function group3_group2_btn_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send_send01.setColumn(0, "insukind", "11");
	
	frmf_setParameter("SPPIF30302_RTNTYPE", "P");
	
	
	var objArg = new Object();
		objArg.arg_ds_send= ds_send_send01;
		
	frmf_modal("SPPIF30302", "SPPIF30302", objArg, "", "", "", "", "", "", "", "", "", "M");
	
	ds_send_send01.setColumn(0, "acptno", frmf_getParameter("SPPIF30302_acptno"));
	
	frmf_clearParameter("SPPIF30302_RTNTYPE");
	frmf_clearParameter("SPPIF30302_acptno");
	
	if(!utlf_isNull(ds_send_send01.getColumn(0, "acptno")))
	{
		group3_button108_onclick();
	}
}

function group3_group2_cmb_judgdg_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	ds_main_list01_gridjudgdecidetl.clearData();
	ds_main_list02_gridrtndetl.clearData();
	
	var oParam = {};
		oParam.id          = "TRPIF50101";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetJudgDeciDetl";
		oParam.inds        = "req=ds_send_send01";
		oParam.outds       = "ds_main_list01_gridjudgdecidetl=gridjudgdecidetl";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF50101";

	tranf_submit(oParam);
}

function group3_group2_chk_flag_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(!utlf_isNull(ds_send_send01.getColumn(0, "acptno")))
	{
		var oParam = {};
			oParam.id          = "TRPIF50103";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqGetJudgdgByOPrcp";
			oParam.inds        = "req=ds_send_send01";
			oParam.outds       = "ds_init_U0001list=U0001";
			oParam.async       = false;
			oParam.callback    = "cf_TRPIF50103";

		tranf_submit(oParam);
	}
}

function cf_TRPIF50103(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {
		return;
	}
	else
	{
		if(ds_init_U0001list.rowcount == 1)
		{
			group3.group2.cmb_judgdg.index = 0;
		}
		
		group3.group2.cmb_judgdg.setFocus();
	}
}

function group3_group2_ipt_docuseqno_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13)
	{
		var docuseqno = obj.value;
								
		if(String(docuseqno).length == 0) 
		{
			return false;
		} 
		else if(String(docuseqno).length > 5) 
		{
			sysf_messageBox("명세서일련번호는 최대 5자리","E008");
			
			ds_init_temp.setColumn(0, "docuseqno", "");
			return false;
		}
		
		var rows = ds_main_list01_gridjudgdecidetl.rowcount;
		
		for(var i = 0; i < rows; i++) 
		{
			if(ds_main_list01_gridjudgdecidetl.getColumn(i, "docuseqno") == docuseqno)
			{
				ds_main_list01_gridjudgdecidetl.rowposition = i;
			}
		}
	}
}

function group3_group2_btn_srch_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_main_list01_gridjudgdecidetl.clearData();
	ds_main_list02_gridrtndetl.clearData();
	ds_main_f090list_grdrtnf903.clearData();
	
	if(utlf_isNull(ds_send_send01.getColumn(0, "acptno")))
	{
		sysf_messageBox("접수번호를","C001");
		group3.group2.ipt_acptno.setFocus();
		
		return false;
	}
	
	if(utlf_isNull(ds_send_send01.getColumn(0, "judgdg")))
	{
		sysf_messageBox("심사차수를","C002");
		group3.group2.cmb_judgdg.setFocus();
		
		return false;
	}
	
	var oParam = {};
		oParam.id          = "TRPIF50101";
		oParam.service     = "clamuncoapp.ClamUnco";
		oParam.method      = "reqGetJudgDeciDetl";
		oParam.inds        = "req=ds_send_send01";
		oParam.outds       = "ds_main_list01_gridjudgdecidetl=gridjudgdecidetl";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPIF50101";

	tranf_submit(oParam);
}

function group3_grd_judgdecidetl_oncellclick(obj:Grid, e:GridClickEventInfo)
{
	if(e.row > -1)
	{
		ds_main_list02_gridrtndetl.clearData();
		ds_main_f090list_grdrtnf903.clearData();
		
		if(ds_main_list01_gridjudgdecidetl.rowcount < 0)
		{
			return false;
		}
		
		var row = e.row;
		
		ds_send_send02.setColumn(0, "docuseqno", ds_main_list01_gridjudgdecidetl.getColumn(row, "docuseqno"));
		ds_send_send02.setColumn(0, "acptno", ds_main_list01_gridjudgdecidetl.getColumn(row, "acptno"));
		ds_send_send02.setColumn(0, "judgdg", ds_main_list01_gridjudgdecidetl.getColumn(row, "judgdg"));
		ds_send_send02.setColumn(0, "clamseqno", ds_main_list01_gridjudgdecidetl.getColumn(row, "clamseqno"));
		ds_send_send02.setColumn(0, "clamno", ds_main_list01_gridjudgdecidetl.getColumn(row, "clamno"));
		ds_send_send02.setColumn(0, "f080yn", ds_main_list01_gridjudgdecidetl.getColumn(row, "f080yn"));
		ds_send_send02.setColumn(0, "notidd", ds_main_list01_gridjudgdecidetl.getColumn(row, "notidd"));
		
		var oParam = {};
			oParam.id          = "TRPIF50102";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqGetRtnF903";
			oParam.inds        = "req=ds_send_send02";
			oParam.outds       = "ds_main_f090list_grdrtnf903=grdrtnf903";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIF50102";

		tranf_submit(oParam);
		
		var oParam = {};
			oParam.id          = "TRPIF50102";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqGetRtnDetl";
			oParam.inds        = "req=ds_send_send02";
			oParam.outds       = "ds_main_list02_gridrtndetl=gridrtndetl";
			oParam.async       = false;
			oParam.callback    = "cf_TRPIF50102";

		tranf_submit(oParam);
	}
	
	var lv_nAreaStartRow;
	var lv_nAreaEndRow;
	var lv_nAreaStartCol;
	var lv_nAreaEndCol;

	if(col == "Y")
	{
		lv_nAreaStartRow = 0;
		lv_nAreaEndRow   = parseInt(obj.rowcount-1);
		lv_nAreaStartCol = parseInt(obj.currentcol);
		lv_nAreaEndCol   = parseInt(obj.currentcol);
		
		grdf_initGridStyle(obj);
		
		for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++) 
		{
			for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++) 
			{
				obj.setCellProperty("body",nCell,"background","#FFE7E5");
				obj.setCellProperty("body",nCell,"background2","#FFE7E5");
			}
		}
	}
	else
	{
		grdf_initGridStyle(obj);		
	}
}

function cf_TRPIF50102(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {
		return;
	}
	else
	{
// 		model.makeNode("/root/main/list04/gridrtndetl");
// 		model.makeNode("/root/main/list04/grdrtnf903");
// 		model.copyNode("/root/main/list04","/root/main/list02");
	}
}

function group3_button13_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "N";
	group3.grd_judgdecidetl.selecttype = "multiarea";
}

function group3_button10_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "Y";
	group3.grd_judgdecidetl.selecttype = "multiarea";
}

function group3_button11_onclick(obj:Button,  e:ClickEventInfo)
{
	col = "N";
	group3.grd_judgdecidetl.selecttype = "multirow";
}

function group3_button6_onclick(obj:Button,  e:ClickEventInfo)
{
	system.execShell("excel");
}

function group3_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_list01_gridjudgdecidetl.rowposition;
	
	ds_send_send03.setColumn(0, "srchcond", "2");
	ds_send_send03.setColumn(0, "srchcond1", ds_send_send01.getColumn(0, "judgdg"));
	ds_send_send03.setColumn(0, "scrflag", "");
	ds_send_send03.setColumn(0, "srchcond2", "");

	var objArg = new Object();
		objArg.arg_ds_send_send_clamkey= ds_send_send03;
		
	frmf_modal("SPPIE01210", "SPPIE01210", objArg, "", "", "", "", "", "", "", "", "", "M");
}

function button4_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_list01_gridjudgdecidetl.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
	else
	{
		grdf_exportExcel(group3.grd_judgdecidetl, "원외처방개인별심결내역및지급관리Grid01_"+tmp, "see");
	}
}

function group3_grd_judgdecidetl_onkeydown(obj:Grid, e:KeyEventInfo)
{
	if(col == "Y")
	{
		var CONST_SEPARATOR = "	";	//컬럼별 구분자
		var lv_oBindDs = eval(obj.binddataset);
		var lv_sColID;
		var lv_sVal;
		var lv_sClipboard = "";
		var lv_nAreaStartRow;
		var lv_nAreaEndRow;
		var lv_nAreaStartCol;
		var lv_nAreaEndCol;
	   
		if(obj.selecttype == "multiarea") 
		{
			lv_nAreaStartRow = 0;
			lv_nAreaEndRow   = parseInt(obj.rowcount-1);
			lv_nAreaStartCol = parseInt(obj.currentcol);
			lv_nAreaEndCol   = parseInt(obj.currentcol);
		} 
		
		for(var nRow = lv_nAreaStartRow; nRow <= lv_nAreaEndRow; nRow++) 
		{
			for(var nCell = lv_nAreaStartCol; nCell <= lv_nAreaEndCol; nCell++) 
			{
				lv_sColID = obj.getCellProperty("body",nCell,"text");
				lv_sVal = obj.getCellValue(nRow,nCell);
				lv_sClipboard = lv_sClipboard + lv_sVal + CONST_SEPARATOR;
			}

			lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
			lv_sClipboard = lv_sClipboard +String.fromCharCode(10);
		}

		lv_sClipboard = lv_sClipboard.substr(0,lv_sClipboard.length-1);
		
		iv_sClipboard = lv_sClipboard;	
		
		system.setClipboard("CF_TEXT",lv_sClipboard);
	}
	else
	{
		if (e.ctrlKey == true && e.keycode == 67 )
		{
			grdf_clipboardCopy(obj, "PAM");
		}
	}
}

function group3_button5_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_list02_gridrtndetl.rowcount == 0)
	{
		sysf_messageBox("엑셀저장할 내역이", "I004");		///엑셀저장할 내역이 없습니다.
	}
	else
	{
		grdf_exportExcel(group3.grd_rtndetl, "원외처방개인별심결내역및지급관리Grid02_"+tmp, "see");
	}
}

function group3_button7_onclick(obj:Button,  e:ClickEventInfo)
{
	var row = ds_main_list02_gridrtndetl.rowcount;
	
	if(ds_main_list02_gridrtndetl.getRowType(row) != 2 && ds_main_list02_gridrtndetl.getRowType(row) != 4) 
	{
		ds_main_list02_gridrtndetl.deleteRow(row);
	}
}

function group3_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	var rows = ds_main_list02_gridrtndetl.rowcount;
						
	if(rows > 0) 
	{
		for(var i = 0; i < rows; i++) 
		{ 
			var adjtamt1 = ds_main_list02_gridrtndetl.getColumn(i, "adjtamt");
			//var adjtamt2 = model.getValue("/root/main/list04/gridrtndetl["+i+"]/adjtamt");	// 최초 이신데이터 생성화면에서 내려받은 조정금액
			
// 			if(adjtamt1 == adjtamt2) {
// 				grd_rtndetl.valueMatrix(i,23) = "N";
// 			} else {
// 				grd_rtndetl.valueMatrix(i,23) = "Y";
// 			}
		}
		
		var oParam = {};
			oParam.id          = "TXPIF50101";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqPutPirhobtd";
			oParam.inds        = "req=ds_main_list02_gridrtndetl:U";
			oParam.outds       = "";
			oParam.async       = false;
			oParam.callback    = "cf_TXPIF50101";

		tranf_submit(oParam);
	}
}

function cf_TXPIF50101(sSvcId, nErrorCode, sErrorMsg) 
{
    if(nErrorCode < 0) 
    {
		return;
	}
	else
	{
		var oParam = {};
			oParam.id          = "TRPIF50102";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqGetRtnF903";
			oParam.inds        = "req=ds_send_send02";
			oParam.outds       = "ds_main_f090list_grdrtnf903=grdrtnf903";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIF50102";

		tranf_submit(oParam);

		var oParam = {};
			oParam.id          = "TRPIF50102";
			oParam.service     = "clamuncoapp.ClamUnco";
			oParam.method      = "reqGetRtnDetl";
			oParam.inds        = "req=ds_send_send02";
			oParam.outds       = "ds_main_list01_gridjudgdecidetl=gridrtndetl";
			oParam.async       = false;
			//oParam.callback    = "cf_TRPIF50102";

		tranf_submit(oParam);

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