YNU_JEUS/app_home/himed/xpapps/emr/injroomxp/xp/SMMNI00600_진료내역조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNI00600" position="absolute 0 0 1256 805" titletext="진료내역조회" oninit="model1_oninit" onload="SMMNI00600_onload" scrollbars="none">
    <Layouts>
      <Layout>
        <Div id="group3" position="absolute 0 0 1256 805" anchor="all" positiontype="position" scrollbars="none">
          <Layouts>
            <Layout>
              <Div id="group2" position="absolute 0 10 1194 70" style="align:center top;" anchor="default" positiontype="position">
                <Layouts>
                  <Layout>
                    <Shape id="line4" class="line_4" position="absolute 1072 19 1072 41" anchor="default" linetype="vertical" positiontype="position"/>
                  </Layout>
                </Layouts>
              </Div>
              <Grid id="datagrid7" class="datagrid2" position="absolute 0 122 1256 805" anchor="all" positiontype="position" autofittype="col" binddataset="ds_grid_datagrid7" onmousemove="group3_datagrid7_onmousemove">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="25"/>
                      <Column size="80"/>
                      <Column size="55"/>
                      <Column size="40"/>
                      <Column size="60"/>
                      <Column size="68"/>
                      <Column size="265"/>
                      <Column size="49"/>
                      <Column size="49"/>
                      <Column size="45"/>
                      <Column size="59"/>
                      <Column size="62"/>
                      <Column size="54"/>
                      <Column size="80"/>
                      <Column size="79"/>
                      <Column size="80"/>
                    </Columns>
                    <Rows>
                      <Row size="22" 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="진료과"/>
                      <Cell col="15" text="주치의"/>
                    </Band>
                    <Band id="body">
                      <Cell celltype="head" text="expr:currow+1"/>
                      <Cell col="1" text="bind:orddd" mask="@@@@-@@-@@"/>
                      <Cell col="2" text="bind:rcptyn"/>
                      <Cell col="3" text="bind:hosinhosoutflag"/>
                      <Cell col="4" text="bind:precureprcpflag"/>
                      <Cell col="5" style="align:left;" text="bind:prcpcd"/>
                      <Cell col="6" style="align:left middle;" text="bind:prcpnm"/>
                      <Cell col="7" text="bind:prcpvol"/>
                      <Cell col="8" text="bind:prcpvolunitflag"/>
                      <Cell col="9" text="bind:prcpqty"/>
                      <Cell col="10" style="align:center middle;" text="bind:prcpqtyunitflag"/>
                      <Cell col="11" style="align:center middle;" text="bind:prcptims"/>
                      <Cell col="12" style="align:center middle;" text="bind:prcpdayno"/>
                      <Cell col="13" style="align:center middle;" text="bind:hngnm"/>
                      <Cell col="14" style="align:left;" text="bind:depthngnm"/>
                      <Cell col="15" style="align:center middle;" text="bind:usernm"/>
                      <Cell col="16"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
              <Static id="caption10" class="tit_2" position="absolute 0 102 165 122" anchor="default" text="당일 업무대상자 리스트" positiontype="position"/>
              <Shape id="line7" class="line_1" position="absolute 0 93 1194 93" anchor="default" linetype="horizontal" positiontype="position"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="caption6" class="tit_1" position="absolute 0 0 112 25" anchor="default" positiontype="position" text="진료내역조회"/>
        <Div id="grp_sea" taborder="1" style="align:center top;" class="div_SA" position="absolute 0 25 1256 92" anchor="left top right">
          <Layouts>
            <Layout>
              <Button id="button1" taborder="0" text="조회" onlbuttonup="button1_onlbuttonup" class="btn1" position="absolute 1188 23 1244 43" anchor="right" positiontype="position" onclick="button1_onclick"/>
              <Edit id="opt_diag" taborder="1" position="absolute 519 10 877 30" anchor="default" imemode="hangul" positiontype="position" readonly="true" class="output"/>
              <Combo id="cmb_prcp" taborder="2" class="combo_search" position="absolute 519 35 877 55" anchor="default" positiontype="position" innerdataset="@ds_data_prcpitemlist" codecolumn="orddd" datacolumn="prcpdata" onitemchanged="grp_sea_cmb_prcp_onitemchanged"/>
              <Static id="caption2" text="진단명" class="search_name" position="absolute 445 10 521 30" anchor="default" positiontype="position"/>
              <Static id="caption3" text="처방정보" class="search_name" position="absolute 445 35 521 55" anchor="default" positiontype="position"/>
              <Static id="caption1" text="조회일자" class="search_name" position="absolute 8 35 94 55" anchor="default" positiontype="position" visible="true"/>
              <Calendar id="ipt_fromdd" taborder="3" class="input_search" position="absolute 83 35 181 55" style="align:center middle;" mask="####-##-##" anchor="default" dateformat="yyyy-MM-dd " value="null" positiontype="position" onchanged="grp_sea_ipt_fromdd_onchanged" visible="true"/>
              <Calendar id="ipt_todd" taborder="6" class="input_search" position="absolute 200 35 298 55" style="align:center middle;" mask="####-##-##" anchor="default" dateformat="yyyy-MM-dd " value="null" positiontype="position" onchanged="grp_sea_ipt_todd_onchanged" visible="true"/>
              <Edit id="opt_gndrage" taborder="8" readonly="true" position="absolute 294 9 339 29" anchor="default" positiontype="position" class="output"/>
              <Static id="caption00" text="~" position="absolute 182 35 198 55" style="align:center;" visible="true"/>
              <Static id="caption11" text="등록번호" class="search_name" position="absolute 7 9 80 28"/>
              <Edit id="ipt_pid" taborder="9" onkeyup="group2_ipt_pid_onkeyup" position="absolute 82 9 167 28"/>
              <Button id="button61" taborder="10" onclick="group2_button61_onclick" class="icon_search" position="absolute 169 10 185 26"/>
              <Edit id="opt_hngnm" taborder="11" readonly="true" position="absolute 194 9 279 28" class="output"/>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grid_datagrid7" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddd" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
          <Column id="usernm" type="STRING"/>
          <Column id="hosinhosoutflag" type="STRING"/>
          <Column id="precureprcpflag" type="STRING"/>
          <Column id="prcpcd" type="STRING"/>
          <Column id="prcpnm" type="STRING"/>
          <Column id="prcpqty" type="STRING"/>
          <Column id="drprcpetc3" type="STRING"/>
          <Column id="drprcpetc7" type="STRING"/>
          <Column id="prcptims" type="STRING"/>
          <Column id="prcpdayno" type="STRING"/>
          <Column id="abbrnm" type="STRING"/>
          <Column id="hngnm" type="STRING"/>
          <Column id="execyn" type="STRING"/>
          <Column id="rcptyn" type="STRING"/>
          <Column id="depthngnm" type="STRING"/>
          <Column id="usernm1" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_refpidinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="hngnm" type="STRING" size="256"/>
          <Column id="gndrage" type="STRING" size="256"/>
          <Column id="prcp" type="STRING" size="256"/>
          <Column id="diag" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_data_pamlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_data_rghtreflist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_data_prcpitemlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdata" type="STRING" size="256"/>
          <Column id="orddd" type="STRING" size="256"/>
          <Column id="termengnm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_diaginfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="diagdata" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_prcpinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpdata" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_datainfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item2" compid="grp_sea.opt_gndrage" propid="value" datasetid="ds_refpidinfo" columnid="gndrage"/>
      <BindItem id="item3" compid="grp_sea.ipt_fromdd" propid="value" datasetid="ds_datainfo" columnid="fromdd"/>
      <BindItem id="item4" compid="grp_sea.ipt_todd" propid="value" datasetid="ds_datainfo" columnid="todd"/>
      <BindItem id="item5" compid="grp_sea.opt_diag" propid="value" datasetid="ds_diaginfo" columnid="diagdata"/>
      <BindItem id="item6" compid="grp_sea.cmb_prcp" propid="value" datasetid="ds_prcpinfo" columnid="prcpdata"/>
      <BindItem id="item0" compid="grp_sea.ipt_pid" propid="value" datasetid="ds_refpidinfo" columnid="pid"/>
      <BindItem id="item1" compid="grp_sea.opt_hngnm" propid="value" datasetid="ds_refpidinfo" columnid="hngnm"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	KU2.0
 * Job Name 		:	
 * File Name 		:	SMMNI00600_진료내역조회.xfdl
 * Creator 	    :	
 * Make Date 		:	2016-04-27
 *                                                                                        
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	Modify Description                                     
 *--------------------------------------------------------------------------------------- 
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";


/********************************************************************************
 * 설   명	:	처방정보 및 진단명 정보 조회
 * argument	:   
 ********************************************************************************/
function fPrcpSrch(){
 
	var pid    = grp_sea.ipt_pid.value;
	var rsrvdd = ds_datainfo.getColumn(0,"fromdd");
	var orddd  = ds_datainfo.getColumn(0,"todd");
	
	var ds_temp = dsf_createDsRow("ds_temp", [{col: "pid", 			val:pid }
											 ,{col: "rsrvdd", 		val:rsrvdd }
											 ,{col: "orddd", 		val:orddd }]);
											
  	
  	var objParam 		= new Object();
	objParam.id 		= "TRMNI00602";
	objParam.service 	= "injroomapp.InjRoomPatMngt";
	objParam.method 	= "reqGetPrcpRef";
	objParam.inds 		= "refCond="+ds_temp;
	objParam.outds 		= "ds_data_prcpitemlist=prcpitemlist"
	objParam.async		= false;
	objParam.callback	= "cbk_TRMNI00602";
	
	tranf_submit(objParam);
  	
}

/********************************************************************************
 * 설   명	:	처방정보 및 진단명 정보 조회 콜백
 * argument	:   
 ********************************************************************************/
function cbk_TRMNI00602(sScvId, nErrorCode, sErrorMsg){
 	if(nErrorCode == 0){//성공하였을때
	   ds_diaginfo.setColumn(0,"diagdata",ds_data_prcpitemlist.getColumn(0,"termengnm"));
	   var prcpvalue =  ds_data_prcpitemlist.getColumn(0,"orddd")
	   grp_sea.cmb_prcp.value = prcpvalue;
    }else{
       sysf_messageBox(sErrorMsg, "E");
    }
}

/********************************************************************************
 * 설   명	:	당일 업무대상자 리스트 조회
 * argument	:   
 ********************************************************************************/
function fPatOrdList(){
	var pid   = grp_sea.ipt_pid.value;
	var orddd = ds_prcpinfo.getColumn(0,"prcpdata");

	var ds_temp = dsf_createDsRow("ds_temp", [{col: "pid", 			val:pid }
											 ,{col: "orddd", 		val:orddd }]);
											
	
	var objParam 		= new Object();
	objParam.id 		= "TRMNI00603";
	objParam.service 	= "injroomapp.InjRoomPatMngt";
	objParam.method 	= "reqPatOrdList";
	objParam.inds 		= "refCond="+ds_temp;
	objParam.outds 		= "ds_grid_datagrid7=biztrgtmanlist";
	objParam.async		= false;
	objParam.callback	= "cbk_TRMNI00603";
	
	tranf_submit(objParam);
}

/********************************************************************************
 * 설   명	:	당일 업무대상자 리스트 조회 콜백
 * argument	:   
 ********************************************************************************/
function cbk_TRMNI00603(sScvId, nErrorCode, sErrorMsg){
	if(nErrorCode == 0){//성공하였을때
	   ds_grid_datagrid7.rowposition = -1;
	}else{
	   sysf_messageBox(sErrorMsg, "E");
	}
}


//=======================================================================================
// Event
//---------------------------------------------------------------------------------------

/****************************************************************************************
 * Components	    : Form
 * Components ID  : SMMNI00600
 * Event 		    : onload
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 
 ****************************************************************************************/
function SMMNI00600_onload(obj:Form, e:LoadEventInfo)
{
	frmf_initForm(obj);
						
	var Ndate = utlf_getNewDate()
	var Odate = Ndate.getAddDate(-1, "Y");
	var Idate = Odate.getDateFormat("YYYYMMDD")	
	
	var fromdd = Idate;
	var todd   = utlf_getCurrentDate();
	
	ds_datainfo.setColumn(0,"fromdd",fromdd);
	ds_datainfo.setColumn(0,"todd",todd);
	

	var sPamInfo = sysf_getGlobalVariable("paminfo");
	dsf_setCSVToDs("ds_data_pamlist",sPamInfo);
	
	var uppid     = ds_data_pamlist.getColumn(0,"pid");
	var uphngnm   = ds_data_pamlist.getColumn(0,"hngnm");
	var upgndrage = ds_data_pamlist.getColumn(0,"sex") + "/" + ds_data_pamlist.getColumn(0,"age");
	if(!utlf_isNull(uppid)){
		grp_sea.ipt_pid.value = uppid; 
		fpidref("new");
	}
	fPatOrdList();
		
}

/****************************************************************************************
 * Components	    : Button
 * Components ID  : button1
 * Event 		    : onclick
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 조회버튼
 ****************************************************************************************/
function button1_onclick(obj:Button, e:ClickEventInfo)
{
	fPatOrdList();						
}

/****************************************************************************************
 * Components	    : Calendar
 * Components ID  : ipt_fromdd
 * Event 		    : onchanged
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 조회일자 변경시 처방조회
 ****************************************************************************************/
function grp_sea_ipt_fromdd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	fPrcpSrch();
}

/****************************************************************************************
 * Components	    : Calendar
 * Components ID  : ipt_todd
 * Event 		    : onchanged
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 조회일자 변경시 처방조회
 ****************************************************************************************/
function grp_sea_ipt_todd_onchanged(obj:Calendar, e:ChangeEventInfo)
{
	fPrcpSrch();
}

/****************************************************************************************
 * Components	    : Combo
 * Components ID  : cmb_prcp
 * Event 		    : onitemchanged
 * Argument		: 01.obj	: Object Event has occurred
 *				: 02.e		: Event Object
 * Description	: 처방변경시 해당 환자 조회
 ****************************************************************************************/
function grp_sea_cmb_prcp_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	
	ds_diaginfo.setColumn(0,"diagdata",ds_data_prcpitemlist.getColumn(e.postindex,"termengnm"));
						
	fPatOrdList();
}



function finit(){
	var fromdd = utlf_addMonth(utlf_getCurrentDate(), -12);
	var todd   = utlf_getCurrentDate();
	
	ds_cond.setColumn(0,"fromdd",fromdd);
	ds_cond.setColumn(0,"todd",todd);
	

	var sPamInfo = sysf_getGlobalVariable("paminfo");
	if(!utlf_isNull(sPamInfo)){		
		ds_data_pamlist.loadCSV(sPamInfo);
		var uppid     = ds_data_pamlist.getColumn(0,"pid");
		var uphngnm   = ds_data_pamlist.getColumn(0,"hngnm");
		var upgndrage = ds_data_pamlist.getColumn(0,"sex") + "/" + ds_data_pamlist.getColumn(0,"age");
		if(!utlf_isNull(uppid)){
			grp_sea.ipt_pid.value = uppid; 
			grp_sea.opt_hngnm.value = uphngnm; 
			ds_cond.setColumn(0,"gndrage",upgndrage); 
			fPrcpSrch();
		}
		fPatOrdList();
	}				
}

function group2_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		fpidref("new");
		fPatOrdList();
	}
}

function group2_button61_onclick(obj:Button,  e:ClickEventInfo)
{
	fPatSrch();
}
function fPatSrch(){
	frmf_modal("SPPMC02500","SPPMC02500","","","","","","","","","","","P");
	var popupendflag = ds_main.getColumn(0,"popupendflag");
	 // if (popupendflag == "ok"){
	
	  	ds_refpidinfo.setColumn(0,"pid",ds_patinfolist.getColumn(0,"pid"));
	  
	    var pid = ds_refpidinfo.getColumn(0,"pid");
	    if (!utlf_isNull(pid) && pid != " " && pid != "-"){
	  		fpidref();
	  	}
	 // }		
}
function fpidref(){		
	
	var pid = grp_sea.ipt_pid.value;
		
	dsf_createDsRow("ds_send" , [                  
                 {col: "pid", 	val:pid}					 
				 ]);	
	//20090601 dhkim
	//그리드초기화
	ds_grid_datagrid7.clearData();
	
		var oParam = {};
		oParam.id          = "TRMNI00601";
		oParam.service     = "injroomapp.InjRoomPatMngt";
		oParam.method      = "reqGetPidRef";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_refpidinfo=rghtreflist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMNI00601";

	tranf_submit(oParam);
	fPrcpSrch();

}
function cf_TRMNI00601(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    var hngnm=ds_refpidinfo.getColumn(0,"hngnm");
		//데이타가 없을시 이전 출력 내용 삭제.
		if(utlf_isNull(hngnm)){
			grp_sea.opt_hngnm.value="";
			grp_sea.opt_gndrage.value="";
			grp_sea.cmb_prcp.value="";
			grp_sea.opt_diag.value="";
			
		}
}


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