YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMB08600_선택진료의검색.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMB08600" position="absolute 0 0 291 367" titletext="선택진료의검색" class="frm_POP" oninit="SPMMB08600_oninit" onload="SPMMB08600_onload">
    <Layouts>
      <Layout>
        <Button position="absolute 143 338 283 360" id="button2" class="btn4" text="선택진료 하지않음" onclick="button2_onclick"/>
        <Grid position="absolute 8 143 283 333" id="grd_userlist" binddataset="ds_userlist" autofittype="col" oncelldblclick="grd_userlist_oncelldblclick">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="129"/>
                <Column size="146"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell text="진료의ID"/>
                <Cell col="1" text="진료의명"/>
              </Band>
              <Band id="body">
                <Cell displaytype="text" text="bind:userid"/>
                <Cell col="1" displaytype="text" text="bind:usernm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static text="※병리 처방은 반드시&#13;&#10;   판독의를 지정하세요." position="absolute 8 336 138 361" id="caption3" style="color:#ff0000ff;"/>
        <Div id="Div00" taborder="1" position="absolute 8 41 283 119" class="div_SA2">
          <Layouts>
            <Layout>
              <Combo id="combo1" taborder="0" innerdataset="@ds_orddept" codecolumn="deptcd" datacolumn="depthngnm" position="absolute 85 54 268 73" onitemchanged="Div00_combo1_onitemchanged"/>
              <Static id="caption5" text="진 료 과" class="search_name" position="absolute 8 54 97 71"/>
              <Static id="caption1" text="처방코드" class="search_name" position="absolute 8 6 84 23"/>
              <Static id="caption2" text="처 방 명" class="search_name" position="absolute 8 30 86 47"/>
              <Edit id="input_prcpcd" taborder="1" position="absolute 85 6 268 25"/>
              <Edit id="input_prcpnm" taborder="2" position="absolute 85 30 268 49"/>
            </Layout>
          </Layouts>
        </Div>
        <Static id="stt_titleText" text="선택진료의검색" class="sta_POP_title" position="absolute 12 8 261 28" style="align:left middle;"/>
        <Button id="btn_close" taborder="2" onclick="btn_close_onclick" class="btn_POP_cls" position="absolute 269 12 283 25" visible="false"/>
        <Static id="caption4" text="※의사가 조회 되지 않으면 진료과를 선택 하세요." position="absolute 8 121 283 141"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="orddeptcd" type="STRING" size="256"/>
          <Column id="orddrid" type="STRING" size="256"/>
          <Column id="prcpcd" type="STRING" size="256"/>
          <Column id="prcpnm" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="codeflag" type="STRING" size="256"/>
          <Column id="schflag" type="STRING" size="256"/>
          <Column id="calcscorcd" type="STRING" size="256"/>
          <Column id="prcpclscd" type="STRING" size="256"/>
          <Column id="prcpexecdeptcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_orddept" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="depthngnm" type="STRING"/>
          <Column id="deptcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_userlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_spcdrinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="todayspcdrid" type="STRING" size="256" sumtext="수가 오늘 선택진료의"/>
          <Column id="allspcdrid" type="STRING" size="256" sumtext="수가 가능 선택진료의"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="Div00.input_prcpcd" propid="value" datasetid="ds_cond" columnid="prcpcd"/>
      <BindItem id="item1" compid="Div00.input_prcpnm" propid="value" datasetid="ds_cond" columnid="prcpnm"/>
      <BindItem id="item2" compid="Div00.combo1" propid="value" datasetid="ds_cond" columnid="prcpexecdeptcd"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-12-10
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-12-10      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

var arErrorCode = new HashArray();

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

function SPMMB08600_onload(obj:Form, e:LoadEventInfo)
{
	var prcpdd 		  = opener.frmf_getParameter("SPMMB08600_prcpdd");
	var prcpclscd     = opener.frmf_getParameter("SPMMB08600_prcpclscd");
	var prcpcd 		  = opener.frmf_getParameter("SPMMB08600_prcpcd");
	var prcpnm 		  = opener.frmf_getParameter("SPMMB08600_prcpnm");
	var orddeptcd     = opener.frmf_getParameter("SPMMB08600_orddeptcd");
	var orddrid       = opener.frmf_getParameter("SPMMB08600_orddrid");
	var drugmthdspccd = opener.frmf_getParameter("SPMMB08600_drugmthdspccd");
	var ioflag        = opener.frmf_getParameter("SPMMB08600_ioflag");
	
	// 현행화, rev.71080
	var prcpexecdeptcd 	= opener.frmf_getParameter("SPMMB08600_prcpexecdeptcd");
				
	if (prcpclscd == "D2" && (drugmthdspccd != "" || drugmthdspccd != "-")) {
		ds_cond.setColumn(0, "codeflag", "G");  // 수가코드(S) 검체 코드(G) 셋팅
		ds_cond.setColumn(0, "calcscorcd", drugmthdspccd); 
	} else {
		ds_cond.setColumn(0, "codeflag", "S");  // 수가코드(S) 검체 코드(G) 셋팅
		ds_cond.setColumn(0, "calcscorcd", prcpcd); 
	}
	
	// 현행화, rev.71080
	if(utlf_isNull(orddrid)) {
		ds_cond.setColumn(0, "orddeptcd", sysf_getUserInfo("dutplcecd"));
		ds_cond.setColumn(0, "orddrid", sysf_getUserInfo("userid"));	
	}  else {
		ds_cond.setColumn(0, "orddeptcd", orddeptcd);	
		ds_cond.setColumn(0, "orddrid", orddrid);	
	}

	ds_cond.setColumn(0, "prcpdd", prcpdd);
	ds_cond.setColumn(0, "prcpcd", prcpcd);
	ds_cond.setColumn(0, "prcpnm", prcpnm);	

	lf_mmbfGetDeptCodeComboList(ds_orddept, "A");
	
	frmf_addComboItem("Div00.combo1", "수가정보 가능 선택진료의", "ALLSPCDR", "above");
	frmf_addComboItem("Div00.combo1", "수가정보 오늘 선택진료의", "TODAYSPCDR", "above");
	
	var oParam = {};
		oParam.id       = "TRMMB08601";
		oParam.service  = "prcpmngtapp.PrcpMngt";
		oParam.method   = "reqGetPrcpSpcDrInfo";
		oParam.inds     = "req=ds_cond";
		oParam.outds    = "ds_spcdrinfo=info";
		oParam.async    = false;
		oParam.callback = "cf_TRMMB08601";

	tranf_submit(oParam);

	if(arErrorCode.pop("TRMMB08601") > -1) {
		if ( ds_spcdrinfo.getColumn(0, "todayspcdrid") != "NO_DATA_FOUND" && ds_spcdrinfo.getColumn(0, "todayspcdrid") != "ERROR" ) {
			prcpexecdeptcd = "TODAYSPCDR";	// 현행화, rev.71080   orddeptcd = "TODAYSPCDR";
		} else if( ds_spcdrinfo.getColumn(0, "allspcdrid") != "NO_DATA_FOUND" && ds_spcdrinfo.getColumn(0, "allspcdrid") != "ERROR"  ){
			prcpexecdeptcd = "ALLSPCDR";	// 현행화, rev.71080   orddeptcd = "ALLSPCDR";
		}
	}
	
	if(utlf_isNull(orddeptcd)){
		Div00.combo1.index = 0;
	}else{
		ds_cond.setColumn(0, "prcpexecdeptcd", prcpexecdeptcd);	// 현행화, rev.71080  ds_cond.setColumn(0, "orddeptcd", orddeptcd);
	}
	
	switch(Div00.combo1.value){
		case "TODAYSPCDR":
			ds_cond.setColumn(0, "schflag", "S");    // 조회구분(S 오늘 선택의, A 가능 선택의) 셋팅
			
			var oParam = {};
				oParam.id       = "TRMMB08602";
				oParam.service  = "prcpmngtapp.PrcpMngt";
				oParam.method   = "reqGetPrcpSpcDrList";
				oParam.inds     = "req=ds_cond";
				oParam.outds    = "ds_userlist=usercombo";
				oParam.async    = false;

			tranf_submit(oParam);
			break;
			
		case "ALLSPCDR":
			ds_cond.setColumn(0, "schflag", "A");    // 조회구분(S 오늘 선택의, A 가능 선택의) 셋팅
			
			var oParam = {};
				oParam.id       = "TRMMB08602";
				oParam.service  = "prcpmngtapp.PrcpMngt";
				oParam.method   = "reqGetPrcpSpcDrList";
				oParam.inds     = "req=ds_cond";
				oParam.outds    = "ds_userlist=usercombo";
				oParam.async    = false;

			tranf_submit(oParam);
			break;
		
		default:
			lf_mmbfGetUserComboList(ds_userlist,  Div00.combo1.value, "0330", "Y");
			break;
	}
	
    var usernm = ds_userlist.getColumn(0, "usernm");
	if (utlf_isNull(usernm)) {				       	
		ds_cond.setColumn(0, "orddeptcd", sysf_getUserInfo("dutplcecd"));
		
		lf_mmbfGetUserComboList(ds_userlist,  Div00.combo1.value, "0330", "Y");
	}
}

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

function Div00_combo1_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	switch(Div00.combo1.value){
		case "TODAYSPCDR":
			ds_cond.setColumn(0, "schflag", "S");    // 조회구분(D 부서별 선택의  S 오늘 선택의, A 가능 선택의)
			
			var oParam = {};
				oParam.id       = "TRMMB08602";
				oParam.service  = "prcpmngtapp.PrcpMngt";
				oParam.method   = "reqGetPrcpSpcDrList";
				oParam.inds     = "req=ds_cond";
				oParam.outds    = "ds_userlist=usercombo";
				oParam.async    = false;

			tranf_submit(oParam);
			break;
			
		case "ALLSPCDR":
			ds_cond.setColumn(0, "schflag", "A");    // 조회구분(D 부서별 선택의  S 오늘 선택의, A 가능 선택의)
			
			var oParam = {};
				oParam.id       = "TRMMB08602";
				oParam.service  = "prcpmngtapp.PrcpMngt";
				oParam.method   = "reqGetPrcpSpcDrList";
				oParam.inds     = "req=ds_cond";
				oParam.outds    = "ds_userlist=usercombo";
				oParam.async    = false;

			tranf_submit(oParam);
			break;
		
		default:
			ds_cond.setColumn(0, "schflag", "D");    // 조회구분(D 부서별 선택의  S 오늘 선택의, A 가능 선택의)
			
			var oParam = {};
				oParam.id       = "TRMMB08602";
				oParam.service  = "prcpmngtapp.PrcpMngt";
				oParam.method   = "reqGetPrcpSpcDrList";
				oParam.inds     = "req=ds_cond";
				oParam.outds    = "ds_userlist=usercombo";
				oParam.async    = false;

			tranf_submit(oParam);
			break;
	}
}

function grd_userlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var currow = ds_userlist.rowposition;
	if(currow > -1){
		var userid = ds_userlist.getColumn(currow, "userid");
		var usernm = ds_userlist.getColumn(currow, "usernm");	
		opener.frmf_setParameter("SPMMB08600_useyn", "Y");
		opener.frmf_setParameter("SPMMB08600_userid", userid);
		opener.frmf_setParameter("SPMMB08600_orddeptcd", Div00.combo1.value);
		opener.frmf_setParameter("SPMMB08600_userinfo", "[" + Div00.combo1.text + "][" + usernm + "]" );
		close();
	}
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	close();
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	close();
}
]]></Script>
  </Form>
</FDL>