YNU_JEUS/app_home/himed/xpapps/pam/acquaintancexp/xp/SMPAM00403_과제별환자내역.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPAM00403" position="absolute 0 0 1213 805" titletext="임상 연구 검사비 미수 청구 관리" onload="SMPAM00403_onload">
    <Layouts>
      <Layout>
        <Static id="cap_title" class="tit_1" position="absolute 0 0 149 25" style="align:left middle;font:Dotum,9, bold;" text="과제별 환자 내역"/>
        <Button id="btn_search" class="btn2" taborder="4" position="absolute 346 79 410 98" text="새로고침" onclick="btn_search_onclick"/>
        <Grid id="grd_proj" binddataset="ds_main_projinfo" position="absolute 0 25 1195 75" style="">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="120"/>
                <Column size="314"/>
                <Column size="0"/>
                <Column size="70"/>
                <Column size="0"/>
                <Column size="120"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="90"/>
                <Column size="90"/>
                <Column size="90"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="kind"/>
                <Cell col="1" text="과제구분"/>
                <Cell col="2" text="과제코드"/>
                <Cell col="3" text="과제번호"/>
                <Cell col="4" text="과제명"/>
                <Cell col="5" text="rshid"/>
                <Cell col="6" text="연구책임자"/>
                <Cell col="7" text="unitcd"/>
                <Cell col="8" text="연구책임자소속"/>
                <Cell col="9" text="과제시작일"/>
                <Cell col="10" text="과제종료일"/>
                <Cell col="11" text="연구비총액"/>
                <Cell col="12" text="연구비잔액"/>
                <Cell col="13" text="연구비입금액"/>
              </Band>
              <Band id="body">
                <Cell text="bind:kind"/>
                <Cell col="1" text="bind:kindnm"/>
                <Cell col="2" text="bind:projcd"/>
                <Cell col="3" text="bind:studycd"/>
                <Cell col="4" text="bind:projnm" tooltiptext="bind:projnm"/>
                <Cell col="5" text="bind:rshid"/>
                <Cell col="6" text="bind:rshnm"/>
                <Cell col="7" text="bind:unitcd"/>
                <Cell col="8" text="bind:unitnm"/>
                <Cell col="9" displaytype="date" text="bind:fromdd" calendardisplaynulltype="nulltext"/>
                <Cell col="10" displaytype="date" text="bind:todd" calendardisplaynulltype="nulltext"/>
                <Cell col="11" displaytype="number" text="bind:projamt"/>
                <Cell col="12" displaytype="number" text="bind:remnamt"/>
                <Cell col="13" displaytype="number" text="bind:depoamt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption1" class="tit_2" position="absolute 0 82 168 99" style="" text="과제별 보고서 작성 이력"/>
        <Grid id="grd_pt" binddataset="ds_main_ptlist_uncoinfo" position="absolute 415 103 1195 773" style="">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="24" band="left"/>
                <Column size="60"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="120"/>
                <Column size="50"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="60"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
              </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="수납자명"/>
                <Cell col="12" text="보험유형"/>
                <Cell col="13" text="보조유형"/>
                <Cell col="14" text="퇴원일"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="currow + 1"/>
                <Cell col="1" text="bind:pid"/>
                <Cell col="2" text="bind:hngnm"/>
                <Cell col="3" displaytype="date" text="bind:rcptexecdd" calendardisplaynulltype="nulltext"/>
                <Cell col="4" displaytype="combo" style="align:center middle;" text="bind:ordtype" combodataset="ds_init_ordtype" combocodecol="value" combodatacol="label"/>
                <Cell col="5" displaytype="date" text="bind:orddd" calendardisplaynulltype="nulltext"/>
                <Cell col="6" text="bind:orddeptnm"/>
                <Cell col="7" text="bind:orddrnm"/>
                <Cell col="8" displaytype="number" text="bind:uncoamt"/>
                <Cell col="9" displaytype="number" style="font:Dotum,9,bold;" text="bind:clamamt"/>
                <Cell col="10" displaytype="number" style="color:green;color2:green;font:Dotum,9,bold;" text="bind:rcptamt"/>
                <Cell col="11" text="bind:rcptnm"/>
                <Cell col="12" text="bind:insukindnm"/>
                <Cell col="13" text="bind:suppkindnm"/>
                <Cell col="14" displaytype="text" style="align:center middle;" text="bind:dschdd" mask="####-##-##" maskchar=" "/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Grid id="grd_rept" binddataset="ds_main_reptlist_reptinfo" position="absolute 0 103 410 773" style="" oncelldblclick="grd_rept_oncelldblclick" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="100"/>
                <Column size="0"/>
                <Column size="40"/>
                <Column size="80"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="60"/>
                <Column size="45"/>
                <Column size="80"/>
              </Columns>
              <Rows>
                <Row size="24" 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="작성일"/>
                <Cell col="8" text="제출일"/>
                <Cell col="9" text="작성자ID"/>
                <Cell col="10" text="작성자"/>
                <Cell col="11" text="환자수"/>
                <Cell col="12" text="청구금액"/>
              </Band>
              <Band id="body">
                <Cell text="bind:projcd"/>
                <Cell col="1" text="bind:studycd"/>
                <Cell col="2" text="bind:subjno"/>
                <Cell col="3" text="bind:reptcd"/>
                <Cell col="4" style="align:left middle;padding:0 5 0 5;" text="bind:reptnm"/>
                <Cell col="5" text="bind:seqno"/>
                <Cell col="6" text="bind:status"/>
                <Cell col="7" displaytype="date" text="bind:bsdd" calendardisplaynulltype="nulltext"/>
                <Cell col="8" text="bind:sbmtdd"/>
                <Cell col="9" text="bind:bsid"/>
                <Cell col="10" text="bind:bsnm"/>
                <Cell col="11" style="align:center middle;" text="bind:ptcnt"/>
                <Cell col="12" displaytype="number" text="bind:clamamt"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape id="line2" class="line_10" linetype="horizontal" position="absolute 0 99 410 103" style="" anchor="default"/>
        <Static id="caption6" class="tit_2" position="absolute 415 81 599 98" style="" text="과제 및 보고서별 환자 내역"/>
        <Shape id="line5" class="line_10" linetype="horizontal" position="absolute 415 99 1195 103" style="" anchor="default"/>
        <Button id="btn_excel" class="btn7" position="absolute 1115 79 1195 98" text="엑셀저장" onclick="btn_excel_onclick"/>
        <Button id="btn_prt" class="btn6" position="absolute 1064 79 1114 98" text="출력" onclick="btn_prt_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_ptlist_uncoinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_temp_projinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="proj_kind" type="STRING" size="256"/>
          <Column id="proj_kindnm" type="STRING" size="256"/>
          <Column id="proj_projcd" type="STRING" size="256"/>
          <Column id="proj_studycd" type="STRING" size="256"/>
          <Column id="proj_projnm" type="STRING" size="256"/>
          <Column id="proj_rshid" type="STRING" size="256"/>
          <Column id="proj_rshnm" type="STRING" size="256"/>
          <Column id="proj_unitcd" type="STRING" size="256"/>
          <Column id="proj_unitnm" type="STRING" size="256"/>
          <Column id="proj_fromdd" type="STRING" size="256"/>
          <Column id="proj_todd" type="STRING" size="256"/>
          <Column id="proj_projamt" type="STRING" size="256"/>
          <Column id="proj_remnamt" type="STRING" size="256"/>
          <Column id="proj_depoamt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="proj_kind"/>
            <Col id="proj_kindnm"/>
            <Col id="proj_projcd"/>
            <Col id="proj_studycd"/>
            <Col id="proj_projnm"/>
            <Col id="proj_rshid"/>
            <Col id="proj_rshnm"/>
            <Col id="proj_unitcd"/>
            <Col id="proj_unitnm"/>
            <Col id="proj_fromdd"/>
            <Col id="proj_todd"/>
            <Col id="proj_projamt"/>
            <Col id="proj_remnamt"/>
            <Col id="proj_depoamt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_ptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="projcd" type="STRING" size="256"/>
          <Column id="studycd" type="STRING" size="256"/>
          <Column id="reptcd" type="STRING" size="256"/>
          <Column id="reptseq" type="STRING" size="256"/>
          <Column id="rcptflag" type="STRING" size="256"/>
          <Column id="realrcptflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="projcd"/>
            <Col id="studycd"/>
            <Col id="reptcd"/>
            <Col id="reptseq"/>
            <Col id="rcptflag"/>
            <Col id="realrcptflag">N</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_ptlist_ptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="rcptexecdd" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="ordtype" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="insukindnm" type="STRING" size="256"/>
          <Column id="suppkindnm" type="STRING" size="256"/>
          <Column id="unconm" type="STRING" size="256"/>
          <Column id="uncoamt" type="STRING" size="256"/>
          <Column id="clamamt" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_projinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="kind" type="STRING" size="256"/>
          <Column id="kindnm" type="STRING" size="256"/>
          <Column id="projcd" type="STRING" size="256"/>
          <Column id="studycd" type="STRING" size="256"/>
          <Column id="projnm" type="STRING" size="256"/>
          <Column id="rshid" type="STRING" size="256"/>
          <Column id="rshnm" type="STRING" size="256"/>
          <Column id="unitcd" type="STRING" size="256"/>
          <Column id="unitnm" type="STRING" size="256"/>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="projamt" type="STRING" size="256"/>
          <Column id="remnamt" type="STRING" size="256"/>
          <Column id="depoamt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="kind"/>
            <Col id="kindnm"/>
            <Col id="projcd"/>
            <Col id="studycd"/>
            <Col id="projnm"/>
            <Col id="rshid"/>
            <Col id="rshnm"/>
            <Col id="unitcd"/>
            <Col id="unitnm"/>
            <Col id="fromdd"/>
            <Col id="todd"/>
            <Col id="projamt"/>
            <Col id="remnamt"/>
            <Col id="depoamt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_main_reptlist_reptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="projcd" type="STRING" size="256"/>
          <Column id="studycd" type="STRING" size="256"/>
          <Column id="subjno" type="STRING" size="256"/>
          <Column id="reptcd" type="STRING" size="256"/>
          <Column id="reptnm" type="STRING" size="256"/>
          <Column id="seqno" type="STRING" size="256"/>
          <Column id="status" type="STRING" size="256"/>
          <Column id="bsdd" type="STRING" size="256"/>
          <Column id="sbmtdd" type="STRING" size="256"/>
          <Column id="bsid" type="STRING" size="256"/>
          <Column id="bsnm" type="STRING" size="256"/>
          <Column id="ptcnt" type="STRING" size="256"/>
          <Column id="clamamt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="projcd"/>
            <Col id="studycd"/>
            <Col id="subjno"/>
            <Col id="reptcd"/>
            <Col id="reptnm"/>
            <Col id="seqno"/>
            <Col id="status"/>
            <Col id="bsdd"/>
            <Col id="sbmtdd"/>
            <Col id="bsid"/>
            <Col id="bsnm"/>
            <Col id="ptcnt"/>
            <Col id="clamamt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp_reptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="rept_projcd" type="STRING" size="256"/>
          <Column id="rept_studycd" type="STRING" size="256"/>
          <Column id="rept_subjno" type="STRING" size="256"/>
          <Column id="rept_reptcd" type="STRING" size="256"/>
          <Column id="rept_reptnm" type="STRING" size="256"/>
          <Column id="rept_seqno" type="STRING" size="256"/>
          <Column id="rept_status" type="STRING" size="256"/>
          <Column id="rept_bsdd" type="STRING" size="256"/>
          <Column id="rept_sbmtdd" type="STRING" size="256"/>
          <Column id="rept_bsid" type="STRING" size="256"/>
          <Column id="rept_bsnm" type="STRING" size="256"/>
          <Column id="rept_ptcnt" type="STRING" size="256"/>
          <Column id="rept_clamamt" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="rept_projcd"/>
            <Col id="rept_studycd"/>
            <Col id="rept_subjno"/>
            <Col id="rept_reptcd"/>
            <Col id="rept_reptnm"/>
            <Col id="rept_seqno"/>
            <Col id="rept_status"/>
            <Col id="rept_bsdd"/>
            <Col id="rept_sbmtdd"/>
            <Col id="rept_bsid"/>
            <Col id="rept_bsnm"/>
            <Col id="rept_ptcnt"/>
            <Col id="rept_clamamt"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_reptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init_status" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">진행</Col>
            <Col id="value">P</Col>
          </Row>
          <Row>
            <Col id="label">반려</Col>
            <Col id="value">R</Col>
          </Row>
          <Row>
            <Col id="label">제출</Col>
            <Col id="value">E</Col>
          </Row>
          <Row>
            <Col id="label">확인</Col>
            <Col id="value">A</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_ordtype" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="label" type="STRING" size="256"/>
          <Column id="value" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">외래</Col>
            <Col id="value">O</Col>
          </Row>
          <Row>
            <Col id="label">응급</Col>
            <Col id="value">E</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind/>
    <Script type="xscript4.0"><![CDATA[ include "com_commonxp::comm_main.xjs";

function fGetDF4Rpt(str) {
	return str.substr(0, 4) + "-" + str.substr(4, 2) + "-" + str.substr(6, 2);
}

function SMPAM00403_onload(obj:Form, e:LoadEventInfo) {
	frmf_initForm(obj); 
	//grdf_initGrid(this.grd_proj); 
	//grdf_initGrid(this.grd_pt); 
	//grdf_initGrid(this.grd_rept); 
	
	//grdf_setGridSort(grd_XXX); 
	//grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

	if (frmf_checkOpener()) {
		var projcd = utlf_transNullToEmpty(opener.frmf_getParameter("SMPAM00403_projcd"));

		if (projcd == "") {
			projcd = opener.frmf_getParameter("SMPAM00403PAM_projcd");
		}

		if (!utlf_isNull(projcd)) {
			ds_send.setColumn( 0, "projcd", projcd);
			
			//submit("TRPAM00413");
			var oParam = {};
			oParam.id          = "TRPAM00413";
			oParam.service     = "acquaintanceapp.PamCtms";
			oParam.method      = "reqGetProjInfo";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_projinfo=proj ds_main_reptlist_reptinfo=rept";
			oParam.async       = false;
			tranf_submit(oParam);
		}
	}
}

function btn_search_onclick(obj:Button, e:ClickEventInfo) {
	//submit("TRPAM00413");
	var oParam = {};
	oParam.id          = "TRPAM00413";
	oParam.service     = "acquaintanceapp.PamCtms";
	oParam.method      = "reqGetProjInfo";
	oParam.inds        = "req=ds_send";
	oParam.outds       = "ds_main_projinfo=proj ds_main_reptlist_reptinfo=rept";
	oParam.async       = false;
	tranf_submit(oParam);



//grd_pt.refresh();

	//grd_pt.rebuildStyle();
	
	// 추후 작업 필요
// 	grd_pt.cellStyle("background-image", 1, grd_pt.colRef("sbmtynimg")) = "../../.._com_commonweb_images_check.gif";
// 	grd_pt.cellStyle("background-image", 1, grd_pt.colRef("applynimg")) = "../../.._com_commonweb_images_check.gif";

}

function grd_rept_oncelldblclick(obj:Grid, e:GridClickEventInfo) {

	if (e.col < 0 || e.row < 0 ) {
		return;
	}

// 	if (grd_rept.row < grd_rept.fixedRows) {
// 		return;
// 	}

	var row = ds_main_reptlist_reptinfo.rowposition; 

	ds_send.setColumn( 0, "studycd", ds_main_reptlist_reptinfo.getColumn(row, "studycd"));
	ds_send.setColumn( 0, "reptcd",  ds_main_reptlist_reptinfo.getColumn(row, "reptcd"));
	ds_send.setColumn( 0, "reptseq", ds_main_reptlist_reptinfo.getColumn(row, "seqno"));

	ds_main_ptlist_uncoinfo.clearData();
	//submit("TRPAM00407");
	var oParam = {};
	oParam.id          = "TRPAM00407";
	oParam.service     = "acquaintanceapp.PamCtms";
	oParam.method      = "reqGetRisdUncoList";
	oParam.inds        = "req=ds_send";
	oParam.outds       = "ds_main_ptlist_uncoinfo=unco";
	oParam.async       = false;
	tranf_submit(oParam);


}

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

	var stdycd = ds_main_projinfo.getColumn(0, "studycd");
	var row = ds_main_reptlist_reptinfo.rowposition; 
	var bsdd = ds_main_reptlist_reptinfo.getColumn(row, "bsdd");

	//var filename = window.fileDialog("save", ",", false, "보고서별 환자 내역_" + stdycd + "_" + bsdd, "xls", "Excel Files(*.xls)|*.xls|All Files (*.*)|*.*");
	//grd_pt.saveExcel(filename, "sheetname:보고서별 환자 내역;col_4:label");
	
	grdf_exportExcel(grd_pt, "보고서별 환자 내역_" + stdycd + "_" + bsdd, "Sheet1", true, "" , 'user' , true);

	sysf_messageBox("엑셀 저장이 완료되었습니다.", "I999");

}

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

	ds_temp_projinfo.clearData();
	ds_temp_projinfo.addRow();
	ds_temp_projinfo.setColumn( 0, "proj_kind",    ds_main_projinfo.getColumn(0, "kind"));
	ds_temp_projinfo.setColumn( 0, "proj_kindnm",  ds_main_projinfo.getColumn(0, "kindnm"));
	ds_temp_projinfo.setColumn( 0, "proj_projcd",  ds_main_projinfo.getColumn(0, "projcd"));
	ds_temp_projinfo.setColumn( 0, "proj_studycd", ds_main_projinfo.getColumn(0, "studycd"));
	ds_temp_projinfo.setColumn( 0, "proj_projnm",  ds_main_projinfo.getColumn(0, "projnm"));
	ds_temp_projinfo.setColumn( 0, "proj_rshid",   ds_main_projinfo.getColumn(0, "rshid"));
	ds_temp_projinfo.setColumn( 0, "proj_rshnm",   ds_main_projinfo.getColumn(0, "rshnm"));
	ds_temp_projinfo.setColumn( 0, "proj_unitcd",  ds_main_projinfo.getColumn(0, "unitcd"));
	ds_temp_projinfo.setColumn( 0, "proj_unitnm",  ds_main_projinfo.getColumn(0, "unitnm"));
	ds_temp_projinfo.setColumn( 0, "proj_fromdd",  fGetDF4Rpt(ds_main_projinfo.getColumn(0, "fromdd")));
	ds_temp_projinfo.setColumn( 0, "proj_todd",    fGetDF4Rpt(ds_main_projinfo.getColumn(0, "todd")));
	ds_temp_projinfo.setColumn( 0, "proj_projamt", ds_main_projinfo.getColumn(0, "projamt"));
	ds_temp_projinfo.setColumn( 0, "proj_remnamt", ds_main_projinfo.getColumn(0, "remnamt"));
	ds_temp_projinfo.setColumn( 0, "proj_depoamt", ds_main_projinfo.getColumn(0, "depoamt"));

	var row = ds_main_reptlist_reptinfo.rowposition; 
	ds_temp_reptinfo.clearData();
	ds_temp_reptinfo.addRow();

	ds_temp_reptinfo.setColumn( 0, "rept_projcd",  ds_main_reptlist_reptinfo.getColumn(row, "projcd"));
	ds_temp_reptinfo.setColumn( 0, "rept_studycd", ds_main_reptlist_reptinfo.getColumn(row, "studycd"));
	ds_temp_reptinfo.setColumn( 0, "rept_subjno",  ds_main_reptlist_reptinfo.getColumn(row, "subjno"));
	ds_temp_reptinfo.setColumn( 0, "rept_reptcd",  ds_main_reptlist_reptinfo.getColumn(row, "reptcd"));
	ds_temp_reptinfo.setColumn( 0, "rept_reptnm",  ds_main_reptlist_reptinfo.getColumn(row, "reptnm"));
	ds_temp_reptinfo.setColumn( 0, "rept_seqno",   ds_main_reptlist_reptinfo.getColumn(row, "seqno"));

	var status = ds_main_reptlist_reptinfo.getColumn(row, "status");
	if (status == "P") {
		status = "진행";
	} else if (status == "R") {
		status = "반려";
	} else if (status == "E") {
		status = "제출";
	} else if (status == "A") {
		status = "확인";
	}
	ds_temp_reptinfo.setColumn( 0, "rept_status",  status);
	ds_temp_reptinfo.setColumn( 0, "rept_bsdd",    fGetDF4Rpt(ds_main_reptlist_reptinfo.getColumn(row, "bsdd")));
	ds_temp_reptinfo.setColumn( 0, "rept_sbmtdd",  fGetDF4Rpt(ds_main_reptlist_reptinfo.getColumn(row, "sbmtdd")));
	ds_temp_reptinfo.setColumn( 0, "rept_bsid",    ds_main_reptlist_reptinfo.getColumn(row, "bsid"));
	ds_temp_reptinfo.setColumn( 0, "rept_bsnm",    ds_main_reptlist_reptinfo.getColumn(row, "bsnm"));
	ds_temp_reptinfo.setColumn( 0, "rept_ptcnt",   ds_main_reptlist_reptinfo.getColumn(row, "ptcnt"));
	ds_temp_reptinfo.setColumn( 0, "rept_clamamt", ds_main_reptlist_reptinfo.getColumn(row, "clamamt"));

	ds_temp_ptlist_ptinfo.clearData(); ds_temp_ptlist_ptinfo.addRow();

	var cnt = ds_main_ptlist_uncoinfo.rowcount; 
	
	ds_temp_ptlist_ptinfo.clearData();

	for (var i = 0; i < cnt; i++) {
		idx = ds_temp_ptlist_ptinfo.addRow()
		ds_temp_ptlist_ptinfo.setColumn( idx, "pid", ds_main_ptlist_uncoinfo.getColumn(i, "pid"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "hngnm", ds_main_ptlist_uncoinfo.getColumn(i, "hngnm"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "rcptexecdd", fGetDF4Rpt(ds_main_ptlist_uncoinfo.getColumn(i, "rcptexecdd")));
		ds_temp_ptlist_ptinfo.setColumn( idx, "orddd", fGetDF4Rpt(ds_main_ptlist_uncoinfo.getColumn(i, "orddd")));

		var ordtype = ""//ds_main_ptlist_ptinfo.getColumn(i, "ordtype"); -> model.getValue("/root/main/ptlist/ptinfo[" + i + "]/ordtype"); 없는 노드
		if (ordtype == "I") {
			ordtype = "입원";
		} else if (ordtype == "O") {
			ordtype = "외래";
		} else if (ordtype == "E") {
			ordtype = "응급";
		}

		ds_temp_ptlist_ptinfo.setColumn( idx, "ordtype", ordtype);
		ds_temp_ptlist_ptinfo.setColumn( idx, "orddeptnm", ds_main_ptlist_uncoinfo.getColumn(i, "orddeptnm"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "orddrnm", ds_main_ptlist_uncoinfo.getColumn(i, "orddrnm"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "insukindnm", ds_main_ptlist_uncoinfo.getColumn(i, "insukindnm"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "suppkindnm", ds_main_ptlist_uncoinfo.getColumn(i, "suppkindnm"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "unconm", ds_main_ptlist_uncoinfo.getColumn(i, "unconm"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "uncoamt", ds_main_ptlist_uncoinfo.getColumn(i, "remnamt"));
		ds_temp_ptlist_ptinfo.setColumn( idx, "clamamt", ds_main_ptlist_uncoinfo.getColumn(i, "clamamt"));
	}
	
	var objDOM = rptf_createDOM();
	var objParam = new Object();
		rptf_setNodeListToDOM(objDOM, "root/temp/ptlist/ptinfo" , ds_temp_ptlist_ptinfo);
		rptf_setNodeListToDOM(objDOM, "root/temp/reptinfo" , ds_temp_reptinfo);
		rptf_setNodeListToDOM(objDOM, "root/temp/projinfo" , ds_temp_projinfo);
		objParam.xml_data_XML1 	= objDOM.documentElement.source;
	var option = "open=1;save=1;directprint=0;printdialog=1;print=1;zoom=0";
	rptf_exeReportPreview30(["RPPAM00403"],[objParam], option);

}

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