YNU_JEUS/app_home/himed/xpapps/lis/colgverixp/xp/SPLVJ90100_판독대기자리스트조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPLVJ90100" position="absolute 0 0 408 759" titletext="SPLVJ90100" oninit="SPLVJ90100_oninit" onload="SPLVJ90100_onload">
    <Layouts>
      <Layout>
        <Static id="caption1" text="판독대기자조회" class="tit_1" position="absolute 0 0 169 23"/>
        <Tab id="switch1" taborder="1" tabindex="0" position="absolute 0 26 408 733" anchor="all">
          <Tabpages>
            <Tabpage id="case1" text="대기자목록">
              <Layouts>
                <Layout>
                  <Div id="group2" taborder="1" position="absolute 0 1 400 36" class="div_SA">
                    <Layouts>
                      <Layout>
                        <Static id="caption2" text="검사대분류 :" class="search_name" position="absolute 15 9 119 26"/>
                        <Combo id="testlrgcd" taborder="1" innerdataset="@ds_init_lb0104" codecolumn="cd" datacolumn="nm" position="absolute 121 8 305 27"/>
                        <Button id="button3" taborder="2" text="조회" class="btn1" position="absolute 333 7 389 29" onclick="switch1_case1_group2_button3_onclick"/>
                        <Shape id="line3" linetype="vertical" class="line_4" position="absolute 320 7 326 29"/>
                      </Layout>
                    </Layouts>
                  </Div>
                  <Static id="caption3" text="대기자목록" class="tit_2" position="absolute 0 45 131 66"/>
                  <Grid id="waitlist" taborder="2" binddataset="ds_main_waitlist" useinputpanel="false" position="absolute 0 66 400 671" cellsizingtype="col" autofittype="col" oncelldblclick="switch1_case1_waitlist_oncelldblclick">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="80"/>
                          <Column size="80"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="95"/>
                          <Column size="94"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="0"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell text="등록번호"/>
                          <Cell col="1" text="성명"/>
                          <Cell col="2" text="구분"/>
                          <Cell col="3" text="상태"/>
                          <Cell col="4" text="진료과"/>
                          <Cell col="5" text="병동"/>
                          <Cell col="6" text="orddd"/>
                          <Cell col="7"/>
                          <Cell col="8"/>
                        </Band>
                        <Band id="body">
                          <Cell style="align:left middle;background:EXPR(readstat == '0' ? '#f3e1bf' : '');background2:EXPR(readstat == '0' ? '#f3e1bf' : '');" text="bind:pid"/>
                          <Cell col="1" style="align:left middle;background:EXPR(readstat == '0' ? '#f3e1bf' : '');background2:EXPR(readstat == '0' ? '#f3e1bf' : '');" text="bind:patnm"/>
                          <Cell col="2" style="align:left middle;background:EXPR(readstat == '0' ? '#f3e1bf' : '');background2:EXPR(readstat == '0' ? '#f3e1bf' : '');" text="bind:flag"/>
                          <Cell col="3" style="align:left middle;background:EXPR(readstat == '0' ? '#f3e1bf' : '');background2:EXPR(readstat == '0' ? '#f3e1bf' : '');" text="bind:state"/>
                          <Cell col="4" style="align:left middle;background:EXPR(readstat == '0' ? '#f3e1bf' : '');background2:EXPR(readstat == '0' ? '#f3e1bf' : '');" text="bind:orddeptnm"/>
                          <Cell col="5" style="align:left middle;background:EXPR(readstat == '0' ? '#f3e1bf' : '');background2:EXPR(readstat == '0' ? '#f3e1bf' : '');" text="bind:wardnm"/>
                          <Cell col="6" text="bind:orddd"/>
                          <Cell col="7" text="bind:prcpkey"/>
                          <Cell col="8" text="bind:instcd"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                  <Shape id="line1" linetype="horizontal" class="line_10" position="absolute 0 61 400 67"/>
                </Layout>
              </Layouts>
            </Tabpage>
            <Tabpage id="case2" text="판독완료목록">
              <Layouts>
                <Layout>
                  <Div id="group4" taborder="1" position="absolute 0 1 400 71" class="div_SA">
                    <Layouts>
                      <Layout>
                        <Static id="caption4" text="검색구분 :" class="search_name" position="absolute 15 9 119 26" anchor="default"/>
                        <Combo id="combo1" taborder="1" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 106 8 190 27" anchor="default">
                          <Dataset id="innerdataset">
                            <ColumnInfo>
                              <Column id="codecolumn"/>
                              <Column id="datacolumn"/>
                            </ColumnInfo>
                            <Rows>
                              <Row>
                                <Col id="codecolumn">1</Col>
                                <Col id="datacolumn">검증번호</Col>
                              </Row>
                              <Row>
                                <Col id="codecolumn">2</Col>
                                <Col id="datacolumn">등록번호</Col>
                              </Row>
                              <Row>
                                <Col id="codecolumn">3</Col>
                                <Col id="datacolumn">성명</Col>
                              </Row>
                            </Rows>
                          </Dataset>
                        </Combo>
                        <Button id="button1" taborder="2" text="조회" class="btn1" position="absolute 333 37 389 59" anchor="default" onclick="switch1_case2_group4_button1_onclick"/>
                        <Shape id="line4" linetype="vertical" class="line_4" position="absolute 320 7 326 64" anchor="default"/>
                        <Edit id="input1" taborder="3" position="absolute 195 8 315 27" anchor="default"/>
                        <Static id="caption5" text="보고일자 :" class="search_name" position="absolute 15 39 131 56" anchor="default"/>
                        <Static id="caption11" text="~" class="search_n_b" position="absolute 205 39 217 56" anchor="default"/>
                        <Calendar id="ipt_usdt" taborder="4" class="input_s_essential" position="absolute 107 38 200 57" anchor="default" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd" value="null"/>
                        <Calendar id="input2" taborder="5" class="input_s_essential" position="absolute 222 38 315 57" anchor="default" autoselect="true" autoskip="true" dateformat="yyyy-MM-dd"/>
                      </Layout>
                    </Layouts>
                  </Div>
                  <Static id="caption6" text="판독완료목록" class="tit_2" position="absolute 0 75 131 97"/>
                  <Grid id="readlist" taborder="2" binddataset="ds_main_readlist" useinputpanel="false" position="absolute 0 96 400 670" cellsizingtype="col" oncelldblclick="switch1_case2_readlist_oncelldblclick">
                    <Formats>
                      <Format id="default">
                        <Columns>
                          <Column size="75"/>
                          <Column size="75"/>
                          <Column size="100"/>
                          <Column size="75"/>
                          <Column size="75"/>
                          <Column size="75"/>
                          <Column size="75"/>
                          <Column size="100"/>
                          <Column size="0"/>
                          <Column size="0"/>
                          <Column size="0"/>
                        </Columns>
                        <Rows>
                          <Row size="24" band="head"/>
                          <Row size="24"/>
                        </Rows>
                        <Band id="head">
                          <Cell text="보고자"/>
                          <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"/>
                          <Cell col="9"/>
                          <Cell col="10"/>
                        </Band>
                        <Band id="body">
                          <Cell style="align:left middle;" text="bind:readnm"/>
                          <Cell col="1" text="bind:printnm"/>
                          <Cell col="2" style="align:left middle;" text="bind:printdt" calendardisplaynulltype="nulltext"/>
                          <Cell col="3" style="align:left middle;" text="bind:pid"/>
                          <Cell col="4" style="align:left middle;" text="bind:patnm"/>
                          <Cell col="5" style="align:left middle;" text="bind:flag"/>
                          <Cell col="6" style="align:left middle;" text="bind:orddeptnm"/>
                          <Cell col="7" style="align:left middle;" text="bind:wardnm"/>
                          <Cell col="8" text="bind:orddd"/>
                          <Cell col="9" text="bind:prcpkey"/>
                          <Cell col="10" text="bind:instcd"/>
                        </Band>
                      </Format>
                    </Formats>
                  </Grid>
                  <Shape id="line5" linetype="horizontal" class="line_10" position="absolute 0 91 400 97"/>
                </Layout>
              </Layouts>
            </Tabpage>
          </Tabpages>
        </Tab>
        <Shape id="line2" class="line_6" position="absolute 0 727 399 733"/>
        <Button id="button5" taborder="2" text="닫기" class="btn4" position="absolute 344 732 400 754" onclick="button5_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="testlrgcd" type="STRING" size="256"/>
          <Column id="search" type="STRING" size="256"/>
          <Column id="keyword" type="STRING" size="256"/>
          <Column id="readsno" type="STRING" size="256"/>
          <Column id="readeno" type="STRING" size="256"/>
          <Column id="codeflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="testlrgcd">00</Col>
            <Col id="search">1</Col>
            <Col id="keyword"/>
            <Col id="readsno"/>
            <Col id="readeno"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_lb0104" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cd" type="STRING" size="256"/>
          <Column id="nm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_waitlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="flag" type="STRING" size="256" sumtext="구분(보험)"/>
          <Column id="state" type="STRING" size="256" sumtext="판독상태"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="wardnm" type="STRING" size="256" sumtext="병동"/>
          <Column id="orddd" type="STRING" size="256" sumtext="일자"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="prcpkey" type="STRING" size="256" sumtext="처방키"/>
          <Column id="readstat" type="STRING" size="256" sumtext="판독상태"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_readlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="readnm" type="STRING" size="256" sumtext="보고자"/>
          <Column id="printnm" type="STRING" size="256" sumtext="출력자"/>
          <Column id="printdt" type="STRING" size="256" sumtext="출력시간"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="patnm" type="STRING" size="256" sumtext="환자명"/>
          <Column id="flag" type="STRING" size="256" sumtext="구분(보험)"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="wardnm" type="STRING" size="256" sumtext="병동"/>
          <Column id="orddd" type="STRING" size="256" sumtext="병동"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="prcpkey" type="STRING" size="256" sumtext="처방키"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="switch1.case1.group2.testlrgcd" propid="value" datasetid="ds_hidden_ref" columnid="testlrgcd"/>
      <BindItem id="item1" compid="switch1.case2.group4.combo1" propid="value" datasetid="ds_hidden_ref" columnid="search"/>
      <BindItem id="item2" compid="switch1.case2.group4.input1" propid="value" datasetid="ds_hidden_ref" columnid="keyword"/>
      <BindItem id="item3" compid="switch1.case2.group4.ipt_usdt" propid="value" datasetid="ds_hidden_ref" columnid="readsno"/>
      <BindItem id="item4" compid="switch1.case2.group4.input2" propid="value" datasetid="ds_hidden_ref" columnid="readeno"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-09
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-09      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LLZ001.xjs";
function SPLVJ90100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	
}

function SPLVJ90100_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(switch1.case1.waitlist);
	grdf_initGrid(switch1.case2.readlist);
	
	var toDay =  utlf_getCurrentDate();
	
	ds_hidden_ref.setColumn(0, "readsno", toDay);
	ds_hidden_ref.setColumn(0, "readeno", toDay);
	
	lf_getDbDeptcd("0104|", "");
	
	freadwaitlist(1);
}

function freadwaitlist(flag)
{
	if(flag == 1)
	{
		var oParam = {};
			oParam.id          = "TRLVJ90101";
			oParam.service     = "verificationbasemngtapp.CmtCdMngt";
			oParam.method      = "reqGetReadWaitList";
			oParam.inds        = "cond=ds_hidden_ref";
			oParam.outds       = "ds_main_waitlist=getReadWaitList";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLVJ90101";

		tranf_submit(oParam);
	}
	else
	{
		ds_hidden_ref.setColumn(0, "codeflag", ds_hidden_ref.getColumn(0, "search"));
		
		var oParam = {};
			oParam.id          = "TRLVJ90102";
			oParam.service     = "verificationbasemngtapp.CmtCdMngt";
			oParam.method      = "reqGetReadEndList";
			oParam.inds        = "cond=ds_hidden_ref";
			oParam.outds       = "ds_main_readlist=getReadEndList";
			oParam.async       = false;
			//oParam.callback    = "cf_TRLVJ90102";

		tranf_submit(oParam);
	}				
}

function switch1_case1_group2_button3_onclick(obj:Button,  e:ClickEventInfo)
{
	freadwaitlist(1);
}

function switch1_case1_waitlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var pos = switch1.case1.waitlist.vscrollbar.pos;
	fwaitlistclick(1);		
	switch1.case1.waitlist.vscrollbar.pos = pos;
}

function fwaitlistclick()
{
	var row = ds_main_waitlist.rowposition;
	
	fUpPatinfo();
	
	opener.ds_hidden_ref.setColumn(0, "pid", ds_main_waitlist.getColumn(row, "pid"));
	opener.ds_hidden_ref.setColumn(0, "orddd", ds_main_waitlist.getColumn(row, "orddd"));
	
	opener.fgetreadrsltlist(1);
	freadwaitlist(1);
}

function fUpPatinfo()
{
	var row = ds_main_waitlist.rowposition;
	var prcpkey = ds_main_waitlist.getColumn(row, "prcpkey");
	var prcpkeycnt = prcpkey.indexOf("/");
	 
	if(appf_getPatientInfo("pid") != ds_main_waitlist.getColumn(row, "pid"))
	{
		if(row > -1)
		{
			frmf_setParameter("errflag", "Y"); 
			var condparam = "S" + "▦" + prcpkey.substr(0,8)+ "▦" 
							+ prcpkey.substr(9) + "▦" 
							+  ds_main_waitlist.getColumn(row, "instcd");
			frmf_setParameter("condparam", condparam);
			appf_initPatientInfo(condparam);
		}
			
		var paminfo = sysf_getGlobalVariable("paminfo");
		
		if((paminfo.length < 0) || (appf_getPatientInfo("pid") != ds_main_waitlist.getColumn(row, "pid")))
		{
			appf_delPatientInfos(); 
			
		   var pid   = ds_main_waitlist.getColumn(row, "pid");
		   var hngnm = ds_main_waitlist.getColumn(row, "patnm");
		   
		   appf_setPatientInfo("pid"       , pid);                     //등록번호
		   appf_setPatientInfo("pname"     , pid + "|" + hngnm);       //환자명
		}
	}
}

function fUpPatinfo2()
{
	var row = ds_main_readlist.rowposition;
	var prcpkey = ds_main_readlist.getColumn(row, "prcpkey");
	
	var prcpkeycnt = prcpkey.indexOf("/");
	 
	if(appf_getPatientInfo("pid") != ds_main_readlist.getColumn(row, "pid"))
	{
		if(row > -1)
		{
			frmf_setParameter("errflag", "Y"); 
			var condparam = "S" + "▦" + prcpkey.substr(0,8)+ "▦" 
							+ prcpkey.substr(9) + "▦" 
							+  ds_main_readlist.getColumn(row, "instcd");
			frmf_setParameter("condparam", condparam);
			appf_initPatientInfo(condparam);
		}
			
		var paminfo = sysf_getGlobalVariable("paminfo");
		
		if((paminfo.length < 0) || (appf_getPatientInfo("pid") != ds_main_readlist.getColumn(row, "pid")))
		{
			appf_delPatientInfos(); //환자정보 전체 삭제
			
			var pid   = ds_main_readlist.getColumn(row, "pid");
			var hngnm = ds_main_readlist.getColumn(row, "patnm");
			
			appf_setPatientInfo("pid"       , pid);                     //등록번호
			appf_setPatientInfo("pname"     , pid + "|" + hngnm);       //환자명
		}
	}
}

function switch1_case2_group4_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	freadwaitlist(2);
}

function switch1_case2_readlist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	freadlistclick();	
}

function freadlistclick()
{
	var row = ds_main_readlist.rowposition;
	
	fUpPatinfo2();
	opener.ds_hidden_ref.setColumn(0, "pid", ds_main_readlist.getColumn(row, "pid"));
	opener.ds_hidden_ref.setColumn(0, "orddd", ds_main_readlist.getColumn(row, "orddd"));
	opener.fgetreadrsltlist();
}

function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeCancel();
}

function fExeCancel()
{
	this.close();
}]]></Script>
  </Form>
</FDL>