YNU_JEUS/app_home/himed/xpapps/lis/refprintmngtxp/xp/SMLLP01800_응급검사모니터링조회.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMLLP01800" position="absolute 0 0 1172 751" titletext="응급모니터링" oninit="SMLLP01800_oninit" onload="SMLLP01800_onload" ontimer="SMLLP01800_ontimer">
    <Layouts>
      <Layout>
        <Static id="caption6" text="응급검사모니터링 화면" class="tit_1" position="absolute 1 2 164 27" anchor="left top"/>
        <Static id="caption1" text="응급검사리스트" class="tit_2" position="absolute 5 182 137 196" anchor="left top"/>
        <Grid id="grd_erprcplist" taborder="1" binddataset="ds_erprcplist" useinputpanel="false" position="absolute 3 202 1168 747" anchor="all" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="22"/>
                <Column size="24"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="80"/>
                <Column size="177"/>
                <Column size="116"/>
                <Column size="147"/>
                <Column size="97"/>
                <Column size="94"/>
                <Column size="84"/>
                <Column size="83"/>
                <Column size="0"/>
                <Column size="0"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1" displaytype="normal"/>
                <Cell col="2" displaytype="normal" text="바코드번호"/>
                <Cell col="3" displaytype="normal" text="처방부서"/>
                <Cell col="4" displaytype="normal" text="등록번호"/>
                <Cell col="5" displaytype="normal" text="환자명"/>
                <Cell col="6" displaytype="normal" text="검사항목명"/>
                <Cell col="7" displaytype="normal" text="채혈일시"/>
                <Cell col="8" displaytype="normal" text="접수일시"/>
                <Cell col="9" displaytype="normal" text="경과(분)"/>
                <Cell col="10" displaytype="normal" text="상태"/>
                <Cell col="11" displaytype="normal" text="재검"/>
                <Cell col="12" displaytype="normal" text="Rack Position"/>
                <Cell col="13" displaytype="normal" text="erprcpflag"/>
                <Cell col="14" displaytype="normal" text="dpflag"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow + 1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:chk"/>
                <Cell col="2" displaytype="normal" edittype="text" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:bcno"/>
                <Cell col="3" displaytype="normal" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:orddeptcd"/>
                <Cell col="4" displaytype="normal" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:pid"/>
                <Cell col="5" celltype="none" displaytype="normal" style="align:left middle;background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:patnm"/>
                <Cell col="6" displaytype="normal" style="align:left middle;background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:tclsnmlist" wordwrap="char"/>
                <Cell col="7" displaytype="date" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:bcolldt" mask="yyyy-MM-dd HH:mm" calendardisplaynulltype="nulltext"/>
                <Cell col="8" displaytype="normal" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:spcacptdt"/>
                <Cell col="9" displaytype="normal" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:term"/>
                <Cell col="10" displaytype="normal" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:rsltstat"/>
                <Cell col="11" displaytype="normal" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:retestyn"/>
                <Cell col="12" displaytype="normal" style="background:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);background2:EXPR(dpflag == &quot;1&quot; ? &quot;#dec6a4&quot;: dpflag == &quot;2&quot; ? &quot;#7BE6B7&quot; : erprcpflag == 'N' ? &quot;#ffffff&quot; : &quot;#f7a08b&quot;);" text="bind:rackposition"/>
                <Cell col="13" displaytype="normal" text="bind:erprcpflag"/>
                <Cell col="14" displaytype="normal" text="bind:dpflag"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Button id="btn_prntset" taborder="2" text="프린터설정" class="btn3" position="absolute 970 174 1062 196" onclick="btn_prntset_onclick" anchor="top right"/>
        <Button id="btn_barcdreprnt" taborder="3" text="바코드재출력" class="btn4" position="absolute 1063 174 1167 196" onclick="btn_barcdreprnt_onclick" anchor="top right"/>
        <Button id="button89" taborder="4" class="btn5" position="absolute 871 175 968 194" onclick="button89_onclick" text="자동조회 On" anchor="top right"/>
        <Div id="grp_sea" taborder="5" position="absolute 0 37 1165 172" anchor="left top right" class="div_SA2">
          <Layouts>
            <Layout>
              <Static id="caption2" text="조회일시 :" class="search_name" position="absolute 16 39 110 56" anchor="left top"/>
              <Static id="caption3" text="~" class="search_no_b" position="absolute 213 40 228 57" anchor="left top"/>
              <Calendar id="input26" taborder="1" class="input_s_essential" position="absolute 105 38 211 57" anchor="left top"/>
              <Calendar id="input1" taborder="2" class="input_s_essential" position="absolute 226 38 332 57" anchor="left top"/>
              <MaskEdit id="iptSearch" taborder="3" mask="999999" class="input_search" position="absolute 725 8 770 27" anchor="top right" onkeyup="grp_sea_iptSearch_onkeyup"/>
              <Static id="caption8" text="분 이상 경과" class="search_no_b" position="absolute 775 9 875 26" anchor="top right" style="color:red;font:Dotum,9,bold;"/>
              <Static id="caption4" text="응급접수후" class="search_no_b" position="absolute 655 9 725 26" anchor="top right" style="color:red;font:Dotum,9,bold;"/>
              <Static id="caption5" text="시행부서 :" class="search_name" position="absolute 16 69 110 86" anchor="left top"/>
              <Combo id="combo1" taborder="4" innerdataset="ds_init_combo1" codecolumn="cd" datacolumn="nm" position="absolute 105 68 332 87" anchor="left top"/>
              <TextArea id="textarea1" taborder="5" position="absolute 655 30 1140 130" anchor="top right"/>
              <Combo id="combo2" taborder="6" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 105 10 332 29" anchor="left top">
                <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>
                  </Rows>
                </Dataset>
              </Combo>
              <Static id="caption7" text="조회구분 :" class="search_name" position="absolute 16 10 110 27" anchor="left top"/>
              <Static id="caption9" text="응급구분 :" class="search_name" position="absolute 357 10 451 27" anchor="left top"/>
              <Radio id="radio1" taborder="7" columncount="3" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" position="absolute 439 8 622 28" anchor="left top" onitemchanged="grp_sea_radio1_onitemchanged" onitemclick="grp_sea_radio1_onitemclick">
                <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">3</Col>
                      <Col id="datacolumn">비응급</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">2</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Button id="button61" taborder="8" class="icon_search" position="absolute 334 99 350 115" anchor="left top" onclick="grp_sea_button61_onclick"/>
              <Static id="caption11" text="검사그룹 :" class="search_name" position="absolute 16 99 116 116" anchor="left top"/>
              <Button id="button1" taborder="10" text="조회" class="btn1" position="absolute 1085 7 1141 29" anchor="top right" onclick="grp_sea_button1_onclick"/>
              <Combo id="combo3" taborder="11" innerdataset="ds_init_combo3" codecolumn="cd" datacolumn="nm" onitemchanged="grp_sea_combo3_onitemchanged" position="absolute 106 98 333 117" anchor="left top" style="itemcolor:black;color:#262626ff;"/>
            </Layout>
          </Layouts>
        </Div>
        <Edit id="ipt_tclscdlist" taborder="6" oneditclick="group1_ipt_tclscdlist_oneditclick" position="absolute 472 135 490 153" visible="false"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_erprcplist" firefirstcount="0" firenextcount="0" useclientlayout="true" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING"/>
          <Column id="bcno" type="STRING"/>
          <Column id="orddeptcd" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="tclsnmlist" type="STRING"/>
          <Column id="bcolldt" type="STRING"/>
          <Column id="spcacptdt" type="STRING"/>
          <Column id="term" type="STRING"/>
          <Column id="rsltstat" type="STRING"/>
          <Column id="retestyn" type="STRING"/>
          <Column id="rackposition" type="STRING"/>
          <Column id="erprcpflag" type="STRING"/>
          <Column id="dpflag" type="STRING"/>
        </ColumnInfo>
        <Rows/>
      </Dataset>
      <Dataset id="ds_init_combo1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init_combo3" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="nm" type="STRING"/>
          <Column id="cd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="codeflag" type="STRING" size="256"/>
          <Column id="data" type="STRING" size="256"/>
          <Column id="bcdgbn" type="STRING" size="256"/>
          <Column id="scrnid" type="STRING" size="256"/>
          <Column id="testgrupnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ref" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="sdd" type="STRING" size="256"/>
          <Column id="edd" type="STRING" size="256"/>
          <Column id="term" type="STRING" size="256"/>
          <Column id="execdeptcd" type="STRING" size="256"/>
          <Column id="getgbn" type="STRING" size="256"/>
          <Column id="erflag" type="STRING" size="256"/>
          <Column id="tclscdlist" type="STRING" size="256"/>
          <Column id="termlist" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="term">60</Col>
            <Col id="execdeptcd">A1</Col>
            <Col id="getgbn">2</Col>
            <Col id="erflag">1</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_ref_tclscdlist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tclsnmlist" type="STRING" size="256"/>
          <Column id="tclscdlist" type="STRING" size="256"/>
          <Column id="tclscdlist2" type="STRING" size="256"/>
          <Column id="testgrup" type="STRING" size="256"/>
          <Column id="tclsnmlist2" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_testgrupdetl" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="chk" type="STRING" size="256"/>
          <Column id="tclsnm" type="STRING" size="256"/>
          <Column id="tclscd" type="STRING" size="256"/>
          <Column id="spccd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_barcodeinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="tsectlblnm" type="STRING" size="256"/>
          <Column id="tsectlblnm2" type="STRING" size="256"/>
          <Column id="bcno" type="STRING" size="256"/>
          <Column id="barcdprndt" type="STRING" size="256"/>
          <Column id="patnm" type="STRING" size="256"/>
          <Column id="patnm2" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="sexage" type="STRING" size="256"/>
          <Column id="deptroom" type="STRING" size="256"/>
          <Column id="spclblnm" type="STRING" size="256"/>
          <Column id="tubelblnm" type="STRING" size="256"/>
          <Column id="secttsect" type="STRING" size="256"/>
          <Column id="tclslblnmlist" type="STRING" size="256"/>
          <Column id="tclslblnmlist2" type="STRING" size="256"/>
          <Column id="infcinfolist" type="STRING" size="256"/>
          <Column id="erprcpflag" type="STRING" size="256"/>
          <Column id="bcollbarcdprntcnt" type="STRING" size="256"/>
          <Column id="spcacptbarcdprntcnt" type="STRING" size="256"/>
          <Column id="microbarcdprntcnt" type="STRING" size="256"/>
          <Column id="mdiabarcdprntcnt" type="STRING" size="256"/>
          <Column id="workno" type="STRING" size="256"/>
          <Column id="orddrnm" type="STRING" size="256"/>
          <Column id="roomcd" type="STRING" size="256"/>
          <Column id="dept" type="STRING" size="256"/>
          <Column id="spcacptdd" type="STRING" size="256"/>
          <Column id="dnornm" type="STRING" size="256"/>
          <Column id="divgrupcd" type="STRING" size="256"/>
          <Column id="divgrupnm" type="STRING" size="256"/>
          <Column id="prcphopedd" type="STRING" size="256"/>
          <Column id="bedposcnts" type="STRING" size="256"/>
          <Column id="prntkind" type="STRING" size="256"/>
          <Column id="prntsetupinfo" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_barcodeinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_sendtclsnm" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="grp_sea.iptSearch" propid="value" datasetid="ds_hidden_ref" columnid="term"/>
      <BindItem id="item1" compid="grp_sea.textarea1" propid="value" datasetid="ds_hidden_ref" columnid="termlist"/>
      <BindItem id="item2" compid="grp_sea.combo2" propid="value" datasetid="ds_hidden_ref" columnid="getgbn"/>
      <BindItem id="item3" compid="grp_sea.radio1" propid="value" datasetid="ds_hidden_ref" columnid="erflag"/>
      <BindItem id="item6" compid="ipt_tclscdlist" propid="" datasetid="ds_hidden_ref_tclscdlist" columnid=""/>
      <BindItem id="item4" compid="grp_sea.combo3" propid="value" datasetid="ds_hidden_ref_tclscdlist" columnid="testgrup"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-05-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-05-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

include "com_commonxp::comm_main.xjs";
include "lis_commonxp::LPZ001.xjs";
include "lis_commonxp::LZZ002.xjs";
include "lis_commonxp::LZZ001.xjs";
include "lis_commonxp::LLZ001.xjs";

function cf_TRLLF90401(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}

function SMLLP01800_oninit(obj:Form, e:InitEventInfo)
{
	//폼 초기화 함수
	frmf_initForm(obj);
}

function SMLLP01800_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_erprcplist);
	lf_setInit();
}	

function lf_setInit(ref)
{	
	if(ref != 2)
		{
		var iCnt;
		grp_sea.combo2.value = '2';
		grp_sea.radio1.value = '1';
		grp_sea.input26.value = utlf_addDate(utlf_getCurrentDate(), -1);
		grp_sea.input1.value  = utlf_getCurrentDate();
		
		var sInDsName = dsf_createDsRow("ds_temp_scrnid"
									  , [{col: "scrnid", val: frmf_getScreenID()}]);
								
		var sOutDsName = dsf_createDsRow("ds_temp_barcdprntsetup"
									   , [{col: "prntsetupinfo"}
									   ,  {col: "macaddr"}]);
									   
		var oParam = {};
			oParam.id          = "TRLLC90101";
			oParam.service     = "diagtestapplib.LisCommon";
			oParam.method      = "reqGetSetUpInfo";
			oParam.inds        = "scrnid="+sInDsName;
			oParam.outds       = sOutDsName+"=getSetUpInfo";
			oParam.async       = false;
			oParam.callback    = "cbf_TRLLC90101";

		tranf_submit(oParam);		
		
	//	lzzfMakeBrcdPrntObjHanDo("CommAX");
		
		var sInDsName = dsf_createDsRow("ds_temp_search", [{col: "codeflag",   val : "0103|0106|"}]);
		
		var oParam = {};
		oParam.id          = "TRLZZ00101";
		oParam.service     = "diagtestapplib.DiagTestBaseInfoMngt";
		oParam.method      = "reqGetInitCodeInfo";
		oParam.inds        = "cond=" + sInDsName;
		oParam.outds       = "ds_init_combo1=0106 ds_init_combo3=0103"
		oParam.async       = false;
		oParam.callback    = "cf_TRLZZ00101";

		tranf_submit(oParam);
		grp_sea.combo1.value = 'A1';
		fGetErPrcpList(); //조회
		fGetRefresh(); //시행부서
	}
}

//시행부서
function fGetRefresh()
{		
	
	if(ds_hidden_ref.getColumn(0, "execdeptcd") != "A1")
	{
		if(ds_hidden_ref.getColumn(0, "erflag") == "2")
		{
			iCnt = 1;
		}
		else
		{
			iCnt = 2;
		}
	}
	else
	{
		iCnt = 2;
	}
	if(iCnt%2 == 0)
	{		
		this.setTimer(0, 120000);
	}
	else
	{		
	}
}

// 조회일자 3일 이전으로 못가게 막기
function fSetRefFromdd()
{	
	var fromdd = grp_sea.input26.value;
	var todd = grp_sea.input1.value;
	var mDate = utlf_addDate(String(grp_sea.input1.value), -4);
	
	if(mDate > fromdd)
	{
		sysf_messageBox("5일 이내의 기간만 검색","I006");
		return false;			
	}
	else if(todd < fromdd) 
	{
		sysf_messageBox("기간설정이 잘못", "E005");	
		return false;
	}
	else 
	{
		return true;
	}
}

//조회
function fGetErPrcpList()
{
	ds_hidden_ref.setColumn(0, "sdd", grp_sea.input26.value);
	ds_hidden_ref.setColumn(0, "edd", grp_sea.input1.value);
	ds_hidden_ref.setColumn(0, "execdeptcd", grp_sea.combo1.value);
	
	if( fSetRefFromdd() == false )
	{
		return;
	}
	// 	submit("TRLLP01801");
	var oParam = {};
	oParam.id          = "TRLLP01801";
	oParam.service     = "refprintmngtapp.GeneralRefPrintMngt";
	oParam.method      = "reqGetErprcpList";
	oParam.inds        = "cond=ds_hidden_ref";
	oParam.outds       = "ds_erprcplist=getErprcpList";
	oParam.async       = false;
	//oParam.callback    = "cf_TRLLP01801";

	tranf_submit(oParam);
    
	fSetErTextList();
	
	ds_erprcplist.rowposition = -1;
}

function fSetErTextList()
{
	var String = "";
	for(i = 0; i < grd_erprcplist.rowcount ; i++)
	{
		var tclsterm = ds_erprcplist.getColumn(i, "term");
		var term = ds_hidden_ref.getColumn(0, "term");
		if(parseInt(tclsterm) >= parseInt(term))
		{
			if(ds_erprcplist.getColumn(i, "erprcpflag") != "N")
			{	
				String += ds_erprcplist.getColumn(i, "bcno") + "     " + ds_erprcplist.getColumn(i, "orddeptcd") + "     " + ds_erprcplist.getColumn(i, "pid") + "     "  
		               +  ds_erprcplist.getColumn(i, "patnm") + "     " + ds_erprcplist.getColumn(i, "term") + "분 \n";
			}
		}
	}
	ds_hidden_ref.setColumn(0, "termlist", String);
	
	ds_erprcplist.filter("");		
	 if(ds_hidden_ref.getColumn(0, "erflag") == "3")
		{ //응급일 경우
			ds_erprcplist.filter("erprcpflag == 'N'");
		//  grd_erprcplist.rowHidden(i) = true;

		}
		
}

function fSelectTestGrup()
{
	ds_send.setColumn(0, "testgrupnm", grp_sea.combo3.text);
	
	var oParam = {};
    oParam.id          = "TRLLF90401";
    oParam.service     = "diagtestapplib.LisCommon";
    oParam.method      = "reqGetTestGrupDetl";
    oParam.inds        = "cond=ds_send";
    oParam.outds       = "ds_testgrupdetl=getTestGrupDetl";
    oParam.async       = false;
    oParam.callback    = "cf_TRLLF90401";

	tranf_submit(oParam);

	lf_setPopUpTclscdList();

}			

function lf_setPopUpTclscdList()
{
	for(i = 0; i < ds_testgrupdetl.rowcount; i++)
	{	
 		if (i == 0 ){
 		 var sendtclsnm = ds_testgrupdetl.getColumn(0, "tclsnm");
 		 var sendtclscd  =ds_testgrupdetl.getColumn(0, "tclscd");
 	    }	 
 		else{
			sendtclsnm = sendtclsnm + ", " + ds_testgrupdetl.getColumn(i, "tclsnm")
			sendtclscd = sendtclscd + "','" + ds_testgrupdetl.getColumn(i, "tclscd")
		}	
	}
		ds_hidden_ref.setColumn(0, "tclscdlist", "'" + sendtclscd + "'");
//		ipt_tclscdlist.value = sendtclsnm.substr(0, sendtclsnm.length);
}

//자동조회 on / off
function fTimer()
{
	iCnt ++;
	
    trace("timer time :" + utlf_getCurrentDateTime());
	if(iCnt%2 == 0)
	{				
		//this.setTimer(0,60000);
		this.setTimer(0, 120000);
		fSetErTextList();
		fGetRefresh();
		fGetErPrcpList();
	}
	else
	{							
		this.killTimer(1);
	}
}

// 바코드 재출력_바코드 재출력 화면에 있는 모듈 사용
function fExeBarcdReprnt()
{
	var bcno = "";
	var bcollTF = false;
	
	for(i = 0; i < grd_erprcplist.rowcount ; i++)
	{
		if(ds_erprcplist.getColumn(i, "chk") == "1")
		{
			bcno = bcno + "'" + ds_erprcplist.getColumn(i, "bcno") + "'" + ",";
			bcollTF = true;
		}
	}
	
	if(bcollTF == false)
	{
		alert("재출력할 검체를 선택하십시오. ");	
	}
	
	if(bcollTF)
	{
		bcno = bcno.substring( 0 ,bcno.length - 1);	
		var bcdgbn = "1";		//바코드 재출력 화면 모듈에서 1: 채혈바코드, 2:분주, 3:분자배지
		
		var sInDsName = dsf_createDsRow("ds_temp_search"
											, [{col: "bcnolist", val: bcno}
											,  {col: "bcdgbn", val:bcdgbn}
											,  {col: "reprint", val:"1"}]);
		var oParam = {};
			oParam.id          = "TRLLJ00402";
			oParam.service     = "acptmngtapp.AcptMngt";
			oParam.method      = "reqGetAcptBarCodeInfo";
			oParam.inds        = "bcollbcnolist="+sInDsName;
			oParam.outds       = "ds_init_barcodeinfo=barcodeinfo";
			oParam.async       = false;
			oParam.callback    = "cbf_SMLLJ00400";
			tranf_submit(oParam);
		
		var prtkind = "";
		
		if( prtkind == "10" || prtkind == "2" || prtkind == "6" || prtkind == "7")
		{
			fLisSpcBarcodePrint2(ds_init_barcodeinfo);
		}
		else
		{
			fLisSpcBarcodePrint(ds_init_barcodeinfo);
		}
	}
}

//프린트설정
function fSetPrint()
{	
	var count = ds_barcodeinfo.rowcount;
	
	if(count == 0) 
	{	
		ds_barcodeinfo.addRow();
	}
	var objArg = new Object();
	objArg.arg_ds_barcdprntsetup_info = ds_temp_barcdprntsetup;
	frmf_open("SPLLC90100", "SPLLC90100", objArg, "", "", "", "", "", "", "", "", "", "M");
}		
	
//콜백함수
function cbf_TRLLC90101(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}

//콜백함수
function cf_TRLZZ00101(strSvcID, nErrorCode, strErrorMag)
{
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");
}

//콜백함수
function cbf_SMLLJ00400(strSvcID, nErrorCode, strErrorMag){
	if(nErrorCode != 0) sysf_messageBox("ID: " + strSvcID + "  Error: " + strErrorMag, "E009", "");	
	if(strSvcID == "TRLLC90101" && nErrorCode==0)
	{
		lf_getClobPasing();
		lzzfMakeBrcdPrntObjHanDo();
	}
}

//조회
function grp_sea_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	fGetErPrcpList();
}

//자동조회 on/off
function button89_onclick(obj:Button,  e:ClickEventInfo)
{
    trace(iCnt);
	if(button89.text == "자동조회 On") //On에서 Off시킬때
	{
		iCnt = 1;
		button89.text = "자동조회 Off";
		btn_barcdreprnt.enable = true;
		this.killTimer(0);
	}
	else //Off에서 On시킬때
	{
		if(ds_hidden_ref.getColumn(0, "execdeptcd") != "A1")
		{
			if(ds_hidden_ref.getColumn(0, "erflag") == "2")
			{
				iCnt = 1;
			}
			else
			{
				iCnt = 2;
			}
		}
		else
		{
			iCnt = 2;
		}
		button89.text = "자동조회 On";
		
		btn_barcdreprnt.enable = false;
	    this.setTimer(0, 120000);
	    fTimer();
	}
	
}

function grp_sea_button61_onclick(obj:Button,  e:ClickEventInfo)
{
	var testgrup = ds_hidden_ref_tclscdlist.setColumn(0, "testgrup");
	var objArg = new Object();
	objArg.testGrup = ds_hidden_ref_tclscdlist;
		frmf_modal("SMLLF90400","SMLLF90400",objArg, "", "", "", "", "", "", "", "", "", "M");
		
	ds_hidden_ref.setColumn(0, "tclscdlist", ds_hidden_ref_tclscdlist.getColumn(0, "tclscdlist"));
}

//검사그룹
function grp_sea_combo3_onitemchanged(obj:Combo, e:ItemChangeEventInfo)
{
	fSelectTestGrup();
}

//바코드재출력
function btn_barcdreprnt_onclick(obj:Button,  e:ClickEventInfo)
{
	fExeBarcdReprnt();
}

//프린트설정
function btn_prntset_onclick(obj:Button,  e:ClickEventInfo)
{
	fSetPrint();
}

//응급구분
function grp_sea_radio1_onitemchanged(obj:Radio, e:ItemChangeEventInfo)
{
	fGetRefresh();
	fGetErPrcpList();
}

function SMLLP01800_ontimer(obj:Form, e:TimerEventInfo)
{
	if(e.timerid == 0)
	{
		var pos = grd_erprcplist.vscrollbar.pos;
		var pos1 = grd_erprcplist.hscrollbar.pos;
		fTimer();
		grd_erprcplist.vscrollbar.pos = pos;
		grd_erprcplist.hscrollbar.pos = pos1;
	}	
}
]]></Script>
  </Form>
</FDL>