YNU_JEUS/app_home/himed/xpapps/ast/tissuebankxp/xp/SMAVT02100_폐기대장.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMAVT02100" position="absolute 0 0 1211 795" titletext="조직은행 폐기대장" onload="SMAVT02100_onload">
    <Layouts>
      <Layout>
        <Div id="grp_tle" position="absolute 0 0 1195 25" style="">
          <Layouts>
            <Layout>
              <Static id="caption6" class="tit_1" position="absolute 0 0 210 23" style="" text="조직은행 폐기대장"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_biz" scrollbars="autoboth" position="absolute 0 13 1195 757" style="">
          <Layouts>
            <Layout>
              <Static id="caption1" class="tit_2" position="absolute 5 54 152 72" style="" text="조직은행 폐기대장"/>
              <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 73 1194 77" style="" anchor="default"/>
              <Grid id="dtg_abnlist" binddataset="ds_main_abnlist_item" position="absolute 0 76 1194 740" style="align:center ;" onheadclick="grp_biz_dtg_abnlist_onheadclick" autofittype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="24" band="left"/>
                      <Column size="30"/>
                      <Column size="80"/>
                      <Column size="40"/>
                      <Column size="40"/>
                      <Column size="80"/>
                      <Column size="80"/>
                      <Column size="172"/>
                      <Column size="80"/>
                      <Column size="90"/>
                      <Column size="44"/>
                      <Column size="140"/>
                      <Column size="140"/>
                      <Column size="140"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                      <Column size="0"/>
                    </Columns>
                    <Rows>
                      <Row size="23" band="head"/>
                      <Row size="23"/>
                    </Rows>
                    <Band id="head">
                      <Cell/>
                      <Cell col="1"/>
                      <Cell col="2" text="GraftNo"/>
                      <Cell col="3" text="Seq"/>
                      <Cell col="4" text="No"/>
                      <Cell col="5" text="폐기일시"/>
                      <Cell col="6" text="폐기자"/>
                      <Cell col="7" text="폐기사유"/>
                      <Cell col="8" text="환자번호"/>
                      <Cell col="9" text="환자명"/>
                      <Cell col="10" text="ABO"/>
                      <Cell col="11" text="수술명"/>
                      <Cell col="12" text="진단명"/>
                      <Cell col="13" text="폐기단계"/>
                      <Cell col="14"/>
                      <Cell col="15"/>
                      <Cell col="16"/>
                      <Cell col="17"/>
                      <Cell col="18"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" expr="expr:currow + 1"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:sel" expr="expr:(sel == 'Y' || sel == '1') ? '1' : '0'"/>
                      <Cell col="2" text="bind:graftno"/>
                      <Cell col="3" text="bind:partseq"/>
                      <Cell col="4" text="bind:batchno"/>
                      <Cell col="5" displaytype="date" text="bind:deldd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="6" text="bind:usernm"/>
                      <Cell col="7" displaytype="combo" text="bind:delsaud" combodataset="ds_init_combobscdlst_R01" combocodecol="cdid" combodatacol="cdnm"/>
                      <Cell col="8" text="bind:pid"/>
                      <Cell col="9" text="bind:hngnm"/>
                      <Cell col="10" style="align:left top;padding:4 4 4 4;" text="bind:aborh"/>
                      <Cell col="11" style="align:left top;padding:4 4 4 4;" text="bind:opengnm"/>
                      <Cell col="12" style="align:left top;padding:4 4 4 4;" text="bind:diagengnm"/>
                      <Cell col="13" text="bind:delstepnm"/>
                      <Cell col="14" displaytype="combo" text="bind:partcode" combodataset="ds_init_comboptcdlst_item" combocodecol="partcode" combodatacol="partname"/>
                      <Cell col="15" text="bind:radialynd"/>
                      <Cell col="16" text="bind:pickdd"/>
                      <Cell col="17" text="bind:medadmin"/>
                      <Cell col="18" text="bind:sex"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Div id="grp_sea" position="absolute 0 10 1194 45" style="align: top;" class="div_SA">
                <Layouts>
                  <Layout>
                    <Static id="caption2" class="search_name" position="absolute 15 9 87 26" style="" text="폐기일자 :"/>
                    <Static id="caption5" class="search_no_b" position="absolute 203 10 212 27" style="" text="~"/>
                    <Shape id="line13" class="line_4" linetype="vertical" position="absolute 1107 7 1110 29" style="" anchor="default"/>
                    <Calendar id="ipt_fromdd" class="input_essential" position="absolute 96 9 196 28" style="" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
                    <Calendar id="ipt_todd" class="input_essential" position="absolute 219 10 319 29" style="" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
                    <Button id="btn_sea" class="btn1" position="absolute 1123 7 1179 29" style="" text="조회" onclick="grp_biz_grp_sea_btn_sea_onclick"/>
                  </Layout>
                </Layouts>
              </Div>
              <Button id="btn_excsave" class="btn7" position="absolute 1116 50 1193 69" style="" text="엑셀저장" onclick="grp_biz_btn_excsave_onclick"/>
              <CheckBox id="bool1" taborder="1" position="absolute 31 80 47 97" onclick="grp_biz_bool1_onclick" falsevalue="false" truevalue="true"/>
            </Layout>
          </Layouts>
        </Div>
        <Div id="grp_btn" position="absolute 0 757 1195 784" style="">
          <Layouts>
            <Layout>
              <Button id="btn_prt" class="btn6" position="absolute 0 5 104 27" style="" text="폐기장부출력" onclick="grp_btn_btn_prt_onclick"/>
              <Button id="button2" class="btn6" position="absolute 105 5 261 27" style="" text="조직폐기기록지 출력" onclick="grp_btn_button2_onclick"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_abnlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="graftno" type="STRING" size="256"/>
          <Column id="partseq" type="STRING" size="256"/>
          <Column id="batchno" type="STRING" size="256"/>
          <Column id="deldd" type="STRING" size="256"/>
          <Column id="lastupdtrid" type="STRING" size="256"/>
          <Column id="usernm" type="STRING" size="256"/>
          <Column id="delstepnm" type="STRING" size="256"/>
          <Column id="delsaunm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="diagengnm" type="STRING" size="256"/>
          <Column id="opengnm" type="STRING" size="256"/>
          <Column id="aborh" type="STRING" size="256"/>
          <Column id="delsaud" type="STRING" size="256"/>
          <Column id="sel" type="STRING" size="256"/>
          <Column id="radialynd" type="STRING" size="256"/>
          <Column id="partcode" type="STRING" size="256"/>
          <Column id="medadmin" type="STRING" size="256"/>
          <Column id="pickdd" type="STRING" size="256"/>
          <Column id="sex" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="graftno"/>
            <Col id="partseq"/>
            <Col id="batchno"/>
            <Col id="deldd"/>
            <Col id="lastupdtrid"/>
            <Col id="usernm"/>
            <Col id="delstepnm"/>
            <Col id="delsaunm"/>
            <Col id="pid"/>
            <Col id="hngnm"/>
            <Col id="diagengnm"/>
            <Col id="opengnm"/>
            <Col id="aborh"/>
            <Col id="delsaud"/>
            <Col id="sel"/>
            <Col id="radialynd"/>
            <Col id="partcode"/>
            <Col id="medadmin"/>
            <Col id="pickdd"/>
            <Col id="sex"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="hidden" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="hidden"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_temp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="temp"/>
          </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_rexreptinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="abninfo" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="combobscdlst" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="combobscdlst"/>
          </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="srchfromdd" type="STRING" size="256"/>
          <Column id="srchtodd" type="STRING" size="256"/>
          <Column id="check" type="STRING" size="256"/>
          <Column id="srgraftno" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchfromdd"/>
            <Col id="srchtodd"/>
            <Col id="check"/>
            <Col id="srgraftno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_combobscdlst_R01" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_comboptcdlst_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="partcode" type="STRING" size="256"/>
          <Column id="partname" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="partcode"/>
            <Col id="partname"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_rexprnt_abnlist_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_rexprnt_abnlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_main_cntlst_cntinfo_item" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_rexreptinfo_abninfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_biz.grp_sea.ipt_fromdd" propid="value" datasetid="ds_send" columnid="srchfromdd"/>
      <BindItem id="item1" compid="grp_biz.grp_sea.ipt_todd" propid="value" datasetid="ds_send" columnid="srchtodd"/>
      <BindItem id="item2" compid="grp_biz.bool1" propid="value" datasetid="ds_send" columnid="check"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs";
include "com_commodulexp::SSZFM00901.xjs";
include "ast_tissuebankbasexp::tissuebankcombolist.xjs";	//yjh : 커밋
//include "ast_healexamxp::AHA001.xjs";	//yjh : 커밋
include "com_zipcodexp::ZBP001.xjs";	//yjh : 커밋

var arErrorCode = new HashArray();


//스크립트 시작 *** 
//전체에서 event와 src를 제외한  script 를 모두포함.

// 화면 초기화
function fGetScreenInit(){

	ds_send.setColumn( 0, "srchfromdd", utlf_getCurrentDate());
	ds_send.setColumn( 0, "srchtodd", 	utlf_getCurrentDate());

	ds_main_abnlist_item.clearData();
					   
    var arrparm = [
		{dsNm: "ds_init_combobscdlst_R01", cdGrpId: "R01"}			// R01 폐기사유
	];		// C25 의료관리자  2011.1.19  cyw
	
	tbGetBscdList( arrparm );
	//grp_biz.bool1.value = "false";

	ds_init_comboptcdlst_item.clearData();
	
	//submit("TRAVB00002");
	var oParam = {};
	oParam.id          = "TRAVB00002";
	oParam.service     = "tissuebankbaseapp.TissueBankPart";
	oParam.method      = "reqGetComboList";
	oParam.inds        = "req=ds_send";
	oParam.outds       = "ds_init_comboptcdlst_item=item";
	oParam.async       = false;
	tranf_submit(oParam);
	//model.refresh();

}

// 폐기대장 조회
function fGetAbnList(){
	//if( submit("TRAVT02100") ) {
	var oParam = {};
	oParam.id          = "TRAVT02100";
	oParam.service     = "tissuebankapp.TissueBankProcess";
	oParam.method      = "reqGettissuebankAbnlist";
	oParam.inds        = "req=ds_send";
	oParam.outds       = "ds_main_abnlist_item=item";
	oParam.async       = false;
	oParam.callback    = "cf_TRAVT02100";
	tranf_submit(oParam);

	if(arErrorCode.pop("TRAVT02100") > -1) {
		for(var i = 0; i < ds_main_abnlist_item.rowcount; i++ ){
			var seq = ds_main_abnlist_item.getColumn(i, "partseq");
			var no   = ds_main_abnlist_item.getColumn(i, "batchno");

			if(  seq != "" && seq < 10 ) {
				ds_main_abnlist_item.setColumn( i , "partseq", "0" + seq );
			}

			if( no != "" && no < 10 ){
				ds_main_abnlist_item.setColumn( i , "batchno", "00" + no );
			}else if(  no != "" && no > 9  &&  no < 100 ) {
				ds_main_abnlist_item.setColumn( i , "batchno", "0" + no );
			}
		}
	}

	//model.refresh();

}

function cf_TRAVT02100(sSvcId, nErrorCode, sErrorMsg) {
	arErrorCode.push(sSvcId, nErrorCode);
}


//스크립트 끝
 function SMAVT02100_onload(obj:Form, e:LoadEventInfo) {
	frmf_initForm(obj);
	
	grdf_setGridSort(grp_biz.dtg_abnlist);
	fGetScreenInit();
}

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

	if( ds_send.getColumn(0, "srchfromdd") == ""){
		sysf_messageBox("폐기일자", "E013", "입력 후 다시 조회하세요.");
		return;
	}

	if( ds_send.getColumn(0, "srchtodd") == "" ){
		sysf_messageBox("폐기일자", "E013", "입력 후 다시 조회하세요.");
		return;
	}

	fGetAbnList();

}

function grp_biz_btn_excsave_onclick(obj:Button, e:ClickEventInfo) {
    grdf_exportExcel(grp_biz.dtg_abnlist, "excel", "Sheet1", true, "" , 'user' , true);
}

function grp_btn_btn_prt_onclick(obj:Button, e:ClickEventInfo) {
	ds_rexprnt_abnlist.clearData();
    ds_rexprnt_abnlist_item.clearData();
    
	dsf_makeValue(ds_rexprnt_abnlist, "srchfromdd", "string", ds_send.getColumn(0, 'srchfromdd'));
	dsf_makeValue(ds_rexprnt_abnlist, "srchtodd", "string", ds_send.getColumn(0, 'srchtodd'));
	
	ds_rexprnt_abnlist_item.copyData(ds_main_abnlist_item, false);
	
	var objDOM = rptf_createDOM();
	var objParam = new Object();
	
	rptf_setNodeListToDOM(objDOM, "root/rexprnt/abnlist/item" , ds_rexprnt_abnlist_item);
	rptf_setValueToDOM(objDOM, "root/rexprnt/abnlist/srchfromdd", grp_biz.grp_sea.ipt_fromdd.text);
	rptf_setValueToDOM(objDOM, "root/rexprnt/abnlist/srchtodd", grp_biz.grp_sea.ipt_todd.text);
	objParam.xml_data_XML1 	= objDOM.documentElement.source;
	
	var option = "open=1;save=1;directprint=0;printdialog=1;print=1;zoom=0";
	rptf_exeReportPreview30(["RPAVT00110"],[objParam], option); 	

}

function grp_btn_button2_onclick(obj:Button, e:ClickEventInfo) {
	for(var i = 0; i < ds_main_abnlist_item.rowcount ; i++ ){
		if( ds_main_abnlist_item.getColumn(i, "sel") == "Y" ) {	
			var graftno = ds_main_abnlist_item.getColumn(i, "graftno") ;
			graftno = graftno + ds_main_abnlist_item.getColumn(i, "partseq") ;
			graftno = graftno + ds_main_abnlist_item.getColumn(i, "batchno") ;

			ds_send.setColumn( 0, "srgraftno", ds_main_abnlist_item.getColumn(i, "graftno") );

			//if( submit("TRAVT02102") ){
			var oParam = {};
			oParam.id          = "TRAVT02102";
			oParam.service     = "tissuebankapp.TissueBankProcess";
			oParam.method      = "reqGetTissuebankProcCnt";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "ds_main_cntlst_cntinfo_item=item";
			oParam.async       = false;
			oParam.callback    = "cf_TRAVT02102";

			tranf_submit(oParam);

			if(arErrorCode.pop("TRAVT02102") > -1) {
				if( parseInt(ds_main_cntlst_cntinfo_item.getColumn(0, "graftcnt")) > 0 ){
					dsf_makeValue( ds_rexreptinfo_abninfo, "stated", "string",  "유" );
				}else{
					dsf_makeValue( ds_rexreptinfo_abninfo, "stated", "string",  "무" );
				}
				ds_main_cntlst_cntinfo_item.clearData();
			}

			dsf_makeValue( ds_rexreptinfo_abninfo, "pid", "string",  ds_main_abnlist_item.getColumn(i, "pid"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "hngnm", "string",  ds_main_abnlist_item.getColumn(i, "hngnm"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "diaghngnm", "string",  ds_main_abnlist_item.getColumn(i, "diagengnm"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "ophngnm", "string",  ds_main_abnlist_item.getColumn(i, "opengnm"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "aborh", "string",  ds_main_abnlist_item.getColumn(i, "aborh"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "radialynd", "string",  ds_main_abnlist_item.getColumn(i, "radialynd"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "partcdnm", "string",  grp_biz.dtg_abnlist.labelMatrix(i, grp_biz.dtg_abnlist.colRef("partcode")));
			dsf_makeValue( ds_rexreptinfo_abninfo, "sex", "string",  ds_main_abnlist_item.getColumn(i, "sex"));
			var pgraftno = ds_main_abnlist_item.getColumn(i, "graftno") ;
			pgraftno = pgraftno +  ds_main_abnlist_item.getColumn(i, "partseq");
			pgraftno = pgraftno +  ds_main_abnlist_item.getColumn(i, "batchno");
			dsf_makeValue( ds_rexreptinfo_abninfo, "graftno", "string",  pgraftno );
			dsf_makeValue( ds_rexreptinfo_abninfo, "delsaud", "string",  grp_biz.dtg_abnlist.labelMatrix(i, grp_biz.dtg_abnlist.colRef("delsaud")) );
			dsf_makeValue( ds_rexreptinfo_abninfo, "deldd", "string",  ds_main_abnlist_item.getColumn(i, "deldd"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "pickdd", "string",  ds_main_abnlist_item.getColumn(i, "pickdd"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "usernm", "string",  ds_main_abnlist_item.getColumn(i, "usernm"));
			dsf_makeValue( ds_rexreptinfo_abninfo, "medadmin", "string",  ds_main_abnlist_item.getColumn(i, "medadmin"));
			var objDOM = rptf_createDOM();
			var objParam = new Object();
			rptf_setNodeListToDOM(objDOM, "root/rexreptinfo/abninfo" , ds_rexreptinfo_abninfo);
			objParam.xml_data_XML1 	= objDOM.documentElement.source;
			var option = "open=1;save=1;directprint=0;printdialog=1;print=1;zoom=0";
			rptf_exeReportPreview30(["RPAVT00106"],[objParam], option); 	
			ds_rexreptinfo_abninfo.clearData();							
		}
	}
}

function cf_TRAVT02102(sSvcId, nErrorCode, sErrorMsg) {
	arErrorCode.push(sSvcId, nErrorCode);
}


function grp_biz_bool1_onclick(obj: CheckBox, e: ClickEventInfo) {
    if(ds_main_abnlist_item.rowcount < 1){
        return;
    }
    
    var value = ds_send.getColumn(0, 'check');
    if (value == 'true') {
        for (var i = 0; i < ds_main_abnlist_item.rowcount; i++) {
            ds_main_abnlist_item.setColumn(i, "sel", "Y");
        }
    }
    else if (value == 'false') {
        for (var i = 0; i < ds_main_abnlist_item.rowcount; i++) {
            ds_main_abnlist_item.setColumn(i, "sel", "N");
        }
    }
}
]]></Script>
  </Form>
</FDL>