YNU_JEUS/app_home/himed/xpapps/emr/carecomxp/xp/SPMNC00900_공통진단수진이력조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMNC00900" position="absolute 0 0 740 500" titletext="내원 진단 이력 조회" oninit="SPMNC00900_oninit" onload="SPMNC00900_onload">
    <Layouts>
      <Layout>
        <Static text="등록번호" position="absolute 0 26 84 45" align="align:center middle;" id="caption31" class="cell_1" style="align:center middle;"/>
        <Button position="absolute 682 25 735 44" id="btn_closenewpat" class="btn2" text="닫 기" onclick="btn_closenewpat_onclick"/>
        <Shape position="absolute 0 46 735 52" linetype="horizontal" id="line1" class="line_10"/>
        <Static text="수진이력" position="absolute 0 0 100 25" id="caption6" class="tit_1"/>
        <Edit position="absolute 85 26 191 45" id="input1" enable="false"/>
        <Button position="absolute 626 25 679 44" id="button1" class="btn2" text="선 택" onclick="button1_onclick"/>
        <Grid position="absolute 0 51 736 491" align="align:center middle;" id="grd_otptlist" class="datagrid2" binddataset="ds_main_otptlists_otptlist" onmousemove="grd_otptlist_onmousemove" oncelldblclick="grd_otptlist_oncelldblclick" cellsizingtype="both" extendsizetype="row">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="45"/>
                <Column size="82"/>
                <Column size="57"/>
                <Column size="104"/>
                <Column size="68"/>
                <Column size="48"/>
                <Column size="99"/>
                <Column size="204"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="30" 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="진단&#10;구분"/>
                <Cell col="7" text="진단코드"/>
                <Cell col="8" text="진단명"/>
                <Cell col="9" text="pid"/>
                <Cell col="10" text="cretno"/>
                <Cell col="11" text="org_orddd"/>
                <Cell col="12" text="org_indd"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" displaytype="combo" edittype="none" style="align:center middle;" text="bind:gubn" mask="####-##-##" combodataset="ds_gubn" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="2" edittype="none" text="bind:orddd" enable="false"/>
                <Cell col="3" displaytype="normal" edittype="none" style="align:center middle;" text="bind:ordtm" mask="##:##" enable="false"/>
                <Cell col="4" displaytype="normal" edittype="none" style="align:center middle;" text="bind:orddeptnm" enable="false"/>
                <Cell col="5" displaytype="normal" edittype="none" style="align:center middle;" text="bind:orddrnm" enable="false"/>
                <Cell col="6" displaytype="combo" edittype="none" text="bind:genrflagcd" combodataset="ds_genrflagcd" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="7" text="bind:diagcd" enable="false"/>
                <Cell col="8" style="align:left middle;" text="bind:diagnm" enable="true"/>
                <Cell col="9" text="bind:pid"/>
                <Cell col="10" text="bind:cretno"/>
                <Cell col="11" text="bind:org_orddd"/>
                <Cell col="12" text="bind:org_indd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <CheckBox position="absolute 196 25 296 45" id="checkbox1" text="가접수포함" truevalue="Y"/>
        <Static text="※ 주진단이 있는 수진이력만 조회 됩니다." position="absolute 301 26 571 46" id="caption1"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_cond_oncolumnchanged">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="stat" type="STRING" size="256"/>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="orddd"/>
            <Col id="stat"/>
            <Col id="orddeptcd"/>
            <Col id="orddrid"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_otptlists_otptlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="gubn" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="ordtm" type="STRING" size="256"/>
          <Column id="orddeptnm" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="genrflagcd" type="STRING" size="256"/>
          <Column id="diagcd" type="STRING" size="256"/>
          <Column id="diagnm" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="org_orddd" type="STRING" size="256"/>
          <Column id="org_indd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="gubn"/>
            <Col id="orddd"/>
            <Col id="ordtm"/>
            <Col id="orddeptnm"/>
            <Col id="orddrnm"/>
            <Col id="genrflagcd"/>
            <Col id="diagcd"/>
            <Col id="diagnm"/>
            <Col id="pid"/>
            <Col id="cretno"/>
            <Col id="org_orddd"/>
            <Col id="org_indd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="temp" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_gubn" 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">O</Col>
          </Row>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_genrflagcd" 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">O</Col>
          </Row>
          <Row>
            <Col id="label">입원</Col>
            <Col id="value">I</Col>
          </Row>
          <Row>
            <Col id="label">응급</Col>
            <Col id="value">E</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="input1" propid="value" datasetid="ds_cond" columnid="pid"/>
      <BindItem id="item1" compid="checkbox1" propid="value" datasetid="ds_cond" columnid="stat"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";

var arErrorCode = new HashArray();

function cf_TRMNC00900(sSvcId, nErrorCode, sErrorMsg) {
	arErrorCode.push(sSvcId, nErrorCode);
	if(nErrorCode < 0) return;
	utlf_addLog("***** cf_TRMNC00900 *****");
}

function SPMNC00900_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SPMNC00900_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_otptlist);
	fInit();
}

function fInit(){
	var sParam = opener.frmf_getParameter("SPMNC00900_searchcond");
	opener.frmf_setParameter("SPMNC00900_searchcond","");
	if( utlf_isNull(sParam) || sParam == "undefined"){
		alert("진단명을 생성할 환자 정보가 존재하지 않습니다.");
		this.close();
	}else{
		//===============================
		//넘어온 파라미터 정보
		//var param = sPid+"▦"+sOrddd;
		//===============================
		var sParamArr = utlf_transNullToEmpty(sParam).split("▦");
		ds_cond.setColumn(0, "pid"		, sParamArr[0]);
		ds_cond.setColumn(0, "orddd"	, sParamArr[1]);
		ds_cond.setColumn(0, "orddeptcd", sParamArr[2]);
		ds_cond.setColumn(0, "orddrid"	, sParamArr[3]);
		
		fGetOtptInptDiagList();
	}
}

//해당  외래입원 수진이력 조회
function fGetOtptInptDiagList(){
	ds_send.clearData();
	dsf_makeValue(ds_send,"pid"			, "string", ds_cond.getColumn(0, "pid"));
	dsf_makeValue(ds_send,"orddd"		, "string", ds_cond.getColumn(0, "orddd"));
	dsf_makeValue(ds_send,"orddeptcd"	, "string", ds_cond.getColumn(0, "orddeptcd"));
	dsf_makeValue(ds_send,"orddrid"		, "string", ds_cond.getColumn(0, "orddrid"));
	dsf_makeValue(ds_send,"stat"		, "string", ds_cond.getColumn(0, "stat"));

	var oParam = {};
    oParam.id          = "TRMNC00900";
    oParam.service     = "homecareapp.HomeCare";
    oParam.method      = "reqGetComOtptInptDiag";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "ds_main_otptlists_otptlist=otptlist";
    oParam.async       = false;
    oParam.callback    = "cf_TRMNC00900";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRMNC00900") > -1){
		if(ds_main_otptlists_otptlist.rowcount < 1){
			alert("선택할 수진이력이 존재하지 않습니다.");	
			return;
		}
	}else{
		alert("수진이력 조회시 서버 오류가 발생 되었습니다.");
		return;
	}
}

function btn_closenewpat_onclick(obj:Button,  e:ClickEventInfo)
{
	this.close();
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fOnClickOkBtn();
}

function fOnClickOkBtn(){
	var iGridCnt = ds_main_otptlists_otptlist.rowcount;
	if(iGridCnt < 1){
		alert("선택할 수진이력이 존재하지 않습니다.");	
		return;
	}
	
	var iSelectCnt = 0;
	var iSelectPos = 0;
	for(var i = 0; i < iGridCnt; i++){
		if(ds_main_otptlists_otptlist.getSelect(i) == true)	{
			iSelectCnt ++;
			iSelectPos = i;
		}
	}
	
	if(iSelectCnt > 1){
		alert("하나의 수진이력만 선택하셔야 합니다.");
		return;
	}else{
		var sGridXpath 	= "ds_main_otptlists_otptlist";
		var sPid 		= utlf_transNullToEmpty(ds_main_otptlists_otptlist.getColumn(iSelectPos, "pid")); 
		var sOrddd 		= utlf_transNullToEmpty(ds_main_otptlists_otptlist.getColumn(iSelectPos, "org_orddd"));
		var sIndd 		= utlf_transNullToEmpty(ds_main_otptlists_otptlist.getColumn(iSelectPos, "org_indd"));
		var sCretno 	= utlf_transNullToEmpty(ds_main_otptlists_otptlist.getColumn(iSelectPos, "cretno"));
		var sGenrflagcd = utlf_transNullToEmpty(ds_main_otptlists_otptlist.getColumn(iSelectPos, "genrflagcd"));
		var sOrddeptcd 	= utlf_transNullToEmpty(ds_main_otptlists_otptlist.getColumn(iSelectPos, "orddeptcd"));		//파라미터 추가_20100118_SMY
		
		//var param = sPid+"▦"+sOrddd+"▦"+sIndd+"▦"+sCretno+"▦"+sGenrflagcd;
		var param = sPid+"▦"+sOrddd+"▦"+sIndd+"▦"+sCretno+"▦"+sGenrflagcd+"▦"+sOrddeptcd;
		opener.frmf_setParameter("preDiagResult", param);
		this.close();
	}
}

function grd_otptlist_onmousemove(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row >-1 && e.col > -1){
 	
		if(!utlf_isNull(grd_otptlist.getCellValue(e.row,e.col))){
		
			grd_otptlist.tooltiptext = grd_otptlist.getCellValue(e.row,e.col);
			
		}else{
			grd_otptlist.tooltiptext ="";
		}
 		
 	}
}

function grd_otptlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	fOnClickOkBtn();
}

function ds_cond_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "stat" ){
 		obj.setColumn(0, "stat", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "");
 		fGetOtptInptDiagList();
 	}
}
]]></Script>
  </Form>
</FDL>