<Button id="button4" class="btn4" position="absolute 252 184 308 206" style="" text="저장" onclick="group3_grp_memo_button4_onclick" anchor="default"/>
                    <Button id="button5" class="btn4" position="absolute 309 184 365 206" style="" text="닫기" onclick="group3_grp_memo_button5_onclick" anchor="default"/>
                  </Layout>
                </Layouts>
              </Div>
              <Static id="caption5" position="absolute 2 790 1249 827" style="color:#ff0000ff;font:arial,9,bold;" text="*** 원무 및 자료수집 각 금액항목의 차가 1,000원 이상인 환자 중 심사 메모가 없는 경우 주황색으로 표기함.   자료수집 및 사후의 급여총액_본인부담_청구액에는 선별급여 품목이 포함됨. " anchor="all"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" text="입원 원무_심사 금액 점검" class="tit_1" position="absolute 0 0 231 26" onclick="caption6_onclick" anchor="left top"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hidden_list1_dept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING" size="256"/>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="deptengabbr" type="STRING" size="256"/>
          <Column id="reqfild" type="STRING" size="256"/>
          <Column id="reqdeptno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="depthngnm"/>
            <Col id="deptcd"/>
            <Col id="deptengabbr"/>
            <Col id="reqfild"/>
            <Col id="reqdeptno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_send2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="basedd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="instcd"/>
            <Col id="basedd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_sppmc02500_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="srchcond" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rrgstno1" type="STRING" size="256"/>
          <Column id="rrgstno2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchcond"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="rrgstno1"/>
            <Col id="rrgstno2"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="clamfromdd" type="STRING" size="256"/>
          <Column id="clamtodd" type="STRING" size="256"/>
          <Column id="insutype" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="name" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="clamfromdd"/>
            <Col id="clamtodd"/>
            <Col id="insutype"/>
            <Col id="pid"/>
            <Col id="name"/>
            <Col id="orddeptcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_CountNode" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="CountNode" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="CountNode"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="popupendflag" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0008list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid"/>
            <Col id="cdnm"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_hidden_screen1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="checkyn1" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="checkyn1"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="memo" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_patinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="patinfolist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="patinfolist"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_list1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cretlist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cretlist"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_list1_cretlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_patinfolist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group3.group2.cmb_insutype" propid="value" datasetid="ds_send" columnid="insutype"/>
      <BindItem id="item1" compid="group3.group2.ipt_clamfromdd" propid="value" datasetid="ds_send" columnid="clamfromdd"/>
      <BindItem id="item2" compid="group3.group2.ipt_clamtodd" propid="value" datasetid="ds_send" columnid="clamtodd"/>
      <BindItem id="item3" compid="group3.group2.ipt_pid" propid="value" datasetid="ds_send" columnid="pid"/>
      <BindItem id="item4" compid="group3.group2.ipt_name" propid="value" datasetid="ds_send" columnid="name"/>
      <BindItem id="item5" compid="group3.group2.cmb_orddeptcd" propid="value" datasetid="ds_send" columnid="orddeptcd"/>
      <BindItem id="item6" compid="group3.grp_memo.textarea1" propid="value" datasetid="ds_hidden_temp" columnid="memo"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";

function SPPID10103_onload(obj:Form, e:LoadEventInfo) {
	frmf_initForm(obj); 
	grdf_initGrid(group3.grd_cretlist);

fInitialize();
}

// 화면 open시와 초기화 버튼 클릭시  화면을 초기화 기능을 수행.
function fInitialize() {

// 초기값
	group3.group2.cmb_insutype.index = 0;	// 보험유형 : -.전체

// 날짜 계산을 위하여 yyyymmdd형태로 오늘 날짜를 구한다.
	var tmp_date = new Date();
	var tmp_year = tmp_date.getYear();

// 월의 경우 0부터 시작이므로 +1을 해준다. 
	var tmp_month = tmp_date.getMonth() + 1;
	var tmp_day =  tmp_date.getDate();

// 10보다 작은경우는 앞에 '0'을 붙여서 자릿수를 맞춘다. 
	if (tmp_month<10) tmp_month = "0" + tmp_month;
	if (tmp_day<10) tmp_day = "0" + tmp_day;

// +"" 을 안해주면 숫자로 인식해서 더해버리므로 꼭 넣어준다. 
	group3.group2.ipt_clamtodd.value = tmp_year + "" + tmp_month + "" + tmp_day;
	group3.group2.ipt_clamfromdd.value = tmp_year + "" + tmp_month + "" + tmp_day;

// 기준일자
	ds_hidden_send2.setColumn( 0, "basedd", group3.group2.ipt_clamfromdd.value);

// 생성된 자료 선택 제외 여부 2008-10-08
	ds_hidden_screen1.setColumn( 0, "checkyn1", "Y");

// 진료과목
	var oParam = {};
		oParam.id          = "TRPID10102";
		oParam.service     = "bfjudgapp.InHospJudg";
		oParam.method      = "reqGetDeptList";
		oParam.inds        = "req=ds_hidden_send2";
		oParam.outds       = "ds_hidden_list1_dept=dept";
		oParam.async       = true;
		oParam.callback    = "cf_TRPID10102";

tranf_submit(oParam);
}

function cf_TRPID10102(sSvcId, nErrorCode, sErrorMsg) {
	if(nErrorCode < 0) return;
	group3.group2.cmb_orddeptcd.value = "";
}

function group3_group2_ipt_clamfromdd_onkillfocus(obj:Calendar, e:KillFocusEventInfo) {

}

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

ds_main_list1_cretlist.clearData();

// 정산일자 조회 시 동일 월만 조회되도록 하여, 정산월이 다르면서 청구월_차수가 동일한 사후 자료의 발생을 제어한다. (2015.05.28 LEJ)
	var fromdd = String(group3.group2.ipt_clamfromdd.value);
	var todd    = String(group3.group2.ipt_clamtodd.value);
	var fromyear = fromdd.substr(0,4);
	var frommonth = fromdd.substr(4,2);
	var fromym = fromyear+frommonth 													// 조회 시작 월
	var toyear = todd.substr(0,4);
	var tomonth = todd.substr(4,2);
	var toym = toyear+tomonth 																// 조회 종료 월

if (fromym != toym ) {
		alert("정산월이 동일한 경우만 동시 조회 가능합니다.  조회할 정산일자를 변경하세요");
		group3.group2.ipt_clamtodd.setFocus();
		return false;
	}

var oParam = {};
		oParam.id          = "TRPID10103";
		oParam.service     = "aftjudgapp.InClamDataCret";
		oParam.method      = "reqGetInAmtCheck";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_list1_cretlist=cretlist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRPID10103";

tranf_submit(oParam);
}

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

if (ds_main_list1_cretlist.rowcount > 0) {
		grdf_exportExcel(group3.grd_cretlist, "입원 원무_심사 금액 점검", "see",true,"","user", true);   
	} else {
		sysf_messageBox("엑셀저장할 대상자가", "I004");		///엑셀저장할 대상자가 없습니다.
	}

}

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

var ipt_pid = ds_send.getColumn(0, "pid");

if (!utlf_isNull(group3.group2.ipt_pid.value)) {
		ds_hidden_sppmc02500_cond.setColumn( 0, "srchcond", "1");		// 검색조건 : 등록번호로 설정
		ds_hidden_sppmc02500_cond.setColumn( 0, "pid", group3.group2.ipt_pid.value);
	} 
	else {
		ds_hidden_sppmc02500_cond.clearData(); 
		ds_hidden_sppmc02500_cond.addRow();
	}

var objArg = new Object();
	objArg.arg_ds_send = ds_hidden_sppmc02500_cond;
	
	frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, null, null, null, null, null, null, null, null, "M");

var srch_pid = ds_patinfolist.getColumn(0, "pid");
	var srch_hngnm = ds_patinfolist.getColumn(0, "hngnm");

if (srch_pid) {		// SPPMC02500_환자조회 화면에서 조회한 경우임
		ds_patinfolist.clearData();	// patinfolist가 제거됨 (resetInstanceNode의 경우 값은 지우고 노드는 남아있음)
		ds_send.setColumn( 0, "pid", srch_pid);
		ds_send.setColumn( 0, "name", srch_hngnm);
	}

}

function group3_group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo) {

// Enter 입력 시에
	if (e.keycode == '13') {
		obj.updateToDataset();

if (!utlf_isNull(obj.value)) {
			ds_hidden_sppmc02500_cond.setColumn( 0, "srchcond", "1");		// 검색조건 : 등록번호로 설정
			ds_hidden_sppmc02500_cond.setColumn( 0, "pid", obj.value);
		} 
		else {
			ds_hidden_sppmc02500_cond.clearData(); 
			ds_hidden_sppmc02500_cond.addRow();
		}
		
		var objArg = new Object();
		objArg.arg_ds_send = ds_hidden_sppmc02500_cond;
		
		frmf_modal("SPPMC02500", "SPPMC02500", objArg, null, null, null, null, null, null, null, null, null, "M");

var srch_pid = ds_patinfolist.getColumn(0, "pid");
		var srch_hngnm = ds_patinfolist.getColumn(0, "hngnm");

if (srch_pid) {		// SPPMC02500_환자조회 화면에서 조회한 경우임
			ds_patinfolist.clearData();	// patinfolist가 제거됨 (resetInstanceNode의 경우 값은 지우고 노드는 남아있음)
			ds_send.setColumn( 0, "pid", srch_pid);
			ds_send.setColumn( 0, "name", srch_hngnm);
		}
	}
}

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

var aftjudgcmt = group3.grp_memo.textarea1.text;
	var TotLength = utlf_getStringLength(aftjudgcmt);		
	if (TotLength > 4000){
		sysf_messageBox("메모 내용이 너무길어 저장을 ","E001");
		return false;
	}
	var oParam = {};
	var SelectedRows = grdf_getSelectedRows(group3.grd_cretlist);
	var row;
	for (var k=0; k < SelectedRows.length; k++ ) {
		row = SelectedRows[k];
		
		ds_main_list1_cretlist.setColumn(row,"memo", aftjudgcmt);

ds_send_temp.clearData(); 
		ds_send_temp.addRow();
		dsf_makeValue( ds_send_temp, "spclspec", "string",  aftjudgcmt);
		dsf_makeValue( ds_send_temp, "spclmemoflag", "string",  'B');
		dsf_makeValue( ds_send_temp, "m", "string",  "i");
		dsf_makeValue( ds_send_temp, "unitflag", "string",  "M");
		dsf_makeValue( ds_send_temp, "spclcd", "string",  "MX998");
		dsf_makeValue( ds_send_temp, "seqno", "string",  "1");
		dsf_makeValue( ds_send_temp, "pid", "string",  ds_main_list1_cretlist.getColumn(row, "pid"));
		dsf_makeValue( ds_send_temp, "indd", "string",  ds_main_list1_cretlist.getColumn(row, "indd") );
		dsf_makeValue( ds_send_temp, "mskind", "string",  ds_main_list1_cretlist.getColumn(row, "mskind"));
		dsf_makeValue( ds_send_temp, "cretno", "string",  ds_main_list1_cretlist.getColumn(row, "cretno"));
		dsf_makeValue( ds_send_temp, "fromdd", "string",  ds_main_list1_cretlist.getColumn(row, "indd"));
		dsf_makeValue( ds_send_temp, "instcd", "string",  "");
		dsf_makeValue( ds_send_temp, "lastupdtrid", "string",  "");

oParam = {};
		oParam.id          = "TXPID10103";
		oParam.service     = "aftjudgapp.InClamDataCret";
		oParam.method      = "reqExeSaveAftMemo";
		oParam.inds        = "req=ds_send_temp";
		oParam.outds       = "";
		oParam.async       = false;

tranf_submit(oParam);
	}

group3.grp_memo.visible = false;

}

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

group3.grp_memo.visible = false;

}

function group3_grd_cretlist_onexpanddown(obj:Grid, e:GridMouseEventInfo)
{
	ds_hidden_temp.clearData();
	dsf_makeValue( ds_hidden_temp, "memo", "string", "" );
	ds_hidden_temp.setColumn( 0, "memo",   ds_main_list1_cretlist.getColumn(ds_main_list1_cretlist.rowposition, "memo"));
	group3.grp_memo.visible = true;

}

function group3_group2_ipt_clamfromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	if (group3.group2.ipt_clamfromdd.value > group3.group2.ipt_clamtodd.value) {
		group3.group2.ipt_clamtodd.value = group3.group2.ipt_clamfromdd.value;
	}

if (String(group3.group2.ipt_clamfromdd.value).substr(0,6) != String(group3.group2.ipt_clamtodd.value).substr(0,6)) {
		group3.group2.ipt_clamtodd.value = group3.group2.ipt_clamfromdd.value;
	}

ds_hidden_send2.setColumn( 0, "basedd", group3.group2.ipt_clamfromdd.value);

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