YNU_JEUS/app_home/himed/xpapps/pam/patinfomngtxp/xp/SMPMC00910_신체감정환자조회.xfdl

<?xml version="1.0" encoding="utf-8" standalone="no"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMPMC00910" position="absolute 0 0 534 347" titletext="환자기초정보조회" onload="SMPMC00910_onload">
    <Layouts>
      <Layout>
        <Div id="group3" scrollbars="autoboth" position="absolute 0 0 518 316" style="">
          <Layouts>
            <Layout>
              <Static id="caption1" class="tit_2" position="absolute 5 4 100 21" style="" text="환자조회"/>
              <Shape id="line1" class="line_10" linetype="horizontal" position="absolute 0 21 517 25" style="" anchor="default"/>
              <Grid id="grd_patrefl" binddataset="ds_main_list1_grdpatreflist" taborder="7" position="absolute 0 25 517 315" style="" oncelldblclick="group3_grd_patrefl_oncelldblclick" onkeypress="group3_grd_patrefl_onkeypress">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="24"/>
                      <Column size="80"/>
                      <Column size="87"/>
                      <Column size="87"/>
                      <Column size="87"/>
                      <Column size="87"/>
                      <Column size="104"/>
                      <Column size="104"/>
                    </Columns>
                    <Rows>
                      <Row size="23" band="head"/>
                      <Row size="23"/>
                    </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="첨부자료구분"/>
                    </Band>
                    <Band id="body">
                      <Cell expr="currow + 1"/>
                      <Cell col="1" text="bind:judgseqno"/>
                      <Cell col="2" displaytype="date" text="bind:courtacptdd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="3" displaytype="date" text="bind:delivedd" mask="yyyy-MM-dd" calendardisplaynulltype="nulltext"/>
                      <Cell col="4" style="align:left middle;" text="bind:pid"/>
                      <Cell col="5" style="align:left middle;" text="bind:hngnm"/>
                      <Cell col="6" displaytype="combo" style="align:left middle;" text="bind:judgflag" combodataset="ds_init_judgflag" combocodecol="value" combodatacol="label"/>
                      <Cell col="7" style="align:left middle;" text="bind:attdataflag"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
        <Div id="group1" scrollbars="autoboth" position="absolute 0 316 518 343" style="">
          <Layouts>
            <Layout>
              <Button id="btn_confirm" taborder="8" class="btn4_letter2" position="absolute 402 5 458 27" style="" text="확인" onclick="group1_btn_confirm_onclick" anchor="default"/>
              <Button id="btn_cancel" taborder="9" class="btn4_letter2" position="absolute 461 5 517 27" style="" text="취소" onclick="group1_btn_cancel_onclick" anchor="default"/>
              <Shape id="line32" class="line_6" linetype="horizontal" position="absolute 0 0 518 3" style="" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_list1_grdpatreflist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_hidden_uid" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="myself" type="STRING" size="256"/>
          <Column id="opener" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_P0350list" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo/>
      </Dataset>
      <Dataset id="ds_init_P0350list_P0350" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdnm"/>
            <Col id="cdid"/>
          </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_init" 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/>
      </Dataset>
      <Dataset id="ds_send_data1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="keep">
        <ColumnInfo>
          <Column id="refcond" type="STRING" size="256"/>
          <Column id="refcondnm" type="STRING" size="256"/>
          <Column id="judgflag" type="STRING" size="256"/>
          <Column id="rsltflag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="refcond"/>
            <Col id="refcondnm"/>
            <Col id="judgflag"/>
            <Col id="rsltflag"/>
            <Col id="pid"/>
          </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_init_judgflag" 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">1</Col>
          </Row>
          <Row>
            <Col id="label">필름감정</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">진료기록감정</Col>
            <Col id="value">3</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind/>
    <Script type="xscript4.0"><![CDATA[include "com_commonxp::comm_main.xjs"
include "com_basiccodexp::ZBC001.xjs"

function SMPMC00910_onload(obj:Form, e:LoadEventInfo) {
	frmf_initForm(obj); 
	grdf_initGrid(group3.grd_patrefl); 
	//grdf_setGridSort(grd_XXX); 
	//grdf_setRowTypeIcon(grd_XXX, 0_컬럼위치값); 

	ds_main_list1_grdpatreflist.clearData();

	/* 
	ds_send_data1.setColumn( 0, "refcond","");
	ds_send_data1.setColumn( 0, "refcondnm","");
	ds_send_data1.setColumn( 0, "judgflag","");
	ds_send_data1.setColumn( 0, "rsltflag","");
	ds_send_data1.setColumn( 0, "pid","00036823");
	*/

//					if(submit("TRPMC00901")) {
var oParam = {};
    oParam.id          = "TRPMC00901";
    oParam.service     = "patinfomngtapp.OrgnJudgPat";
    oParam.method      = "reqGetOJPatRef";
    oParam.inds        = "req=ds_send_data1";
    oParam.outds       = "ds_hidden_rcv_list1_grdpatreflist=grdpatreflist";
    oParam.async       = false;
    oParam.callback    = "cf_TRPMC00901";

tranf_submit(oParam);

	if(arErrorCode.pop("TRPMC00901") > -1) {
		var patrefcnt = ds_hidden_rcv_list1_grdpatreflist.rowcount;

		if (patrefcnt > 0) {
			ds_main_list1_grdpatreflist.copyData(ds_hidden_rcv_list1_grdpatreflist);
		} else {
			ds_main_list1_grdpatreflist.clearData();
		}
	}

//model.refresh();

}

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


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

	if ( frmf_checkOpener() ) {
			row = ds_main_list1_grdpatreflist.rowposition;

		if( row > 0 ){
			if( ds_main_list1_grdpatreflist.rowcount > 0 ){

				opener.ds_send_data5.setColumn( 0, "pid",group3.grd_patrefl.valueMatrix(row,4));
				opener.ds_send_data5.setColumn( 0, "judgseqno",group3.grd_patrefl.valueMatrix(row,1));

				opener.dsf_makeValue( ds_main, "popupendflag", "string", "" );
				opener.ds_main.setColumn( 0, "popupendflag", "ok");

//opener.model.refresh();

				this.close();
			}								
		}
	} else {
		sysf_messageBox("상위화면이 변경되어 데이터를 가져올 수", "I004");
	}

}

function group3_grd_patrefl_onkeydown(obj:Grid, e:KeyEventInfo) {

	if( e.keycode == 13 ){
		group1.btn_confirm.dispatch("DOMActivate");
	}

}

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

	if ( frmf_checkOpener() ) {
		   row = ds_main_list1_grdpatreflist.rowposition;

		opener.ds_main.setColumn( 0, "popupendflag", "cancel");

		if( row > 0 ){

			if( ds_main_list1_grdpatreflist.rowcount > 0 ){

				//opener.model.copyNode("ds_send_data5_pid",group3.grd_patrefl.valueMatrix(row,4));
				opener.ds_send_data5.setColumn( 0, "pid", ds_main_list1_grdpatreflist.getColumn( row, "pid"));
				
				//opener.model.copyNode("ds_send_data5_judgseqno",group3.grd_patrefl.valueMatrix(row,1));
				opener.ds_send_data5.setColumn( 0, "judgseqno", ds_main_list1_grdpatreflist.getColumn( row, "judgseqno"));

				//opener.dsf_makeValue( ds_main, "popupendflag", "string", "" );
				dsf_makeValue( opener.ds_main, "popupendflag", "string", "");
				opener.ds_main.setColumn( 0, "popupendflag", "ok");
			}	

		}else {
			sysf_messageBox("행이 정확히 선택되지", "E007");	
		}
	} else {
		  sysf_messageBox("상위화면이 변경되어 데이터를 가져올 수", "I004");
	}

//opener.model.refresh();

	this.close();

}

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

	opener.ds_main.setColumn( 0, "popupendflag", "cancel");
	this.close();

}

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