YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO08030_권역외상전송현황.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO08030" position="absolute 0 0 1210 800" titletext="권역외상센터 대상자 조회" oninit="SPMMO08030_oninit" onload="SPMMO08030_onload">
    <Layouts>
      <Layout>
        <Div position="absolute 0 20 1210 60" id="roundrect1" type="roundrectangle" class="div_SA" anchor="left top right"/>
        <Shape position="absolute 0 65 1210 71" linetype="horizontal" id="line1" class="line_10" anchor="left top right"/>
        <Button position="absolute 942 30 998 52" id="btn_search" class="btn1" text="조회" onclick="btn_search_onclick" taborder="0" anchor="top right"/>
        <Grid position="absolute 0 70 1210 765" id="grd_translist" class="datagrid2" binddataset="ds_main_translist" oncelldblclick="grd_translist_oncelldblclick" taborder="1" anchor="all" oncellclick="grd_translist_oncellclick" selecttype="multirow" cellsizebandtype="allband" cellsizingtype="col" cellclickbound="cell" onrbuttondown="grd_translist_onrbuttondown">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="25" band="left"/>
                <Column size="22"/>
                <Column size="30"/>
                <Column size="30"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="35"/>
                <Column size="35"/>
                <Column size="80"/>
                <Column size="45"/>
                <Column size="80"/>
                <Column size="45"/>
                <Column size="130"/>
                <Column size="80"/>
                <Column size="45"/>
                <Column size="70"/>
                <Column size="100"/>
                <Column size="35"/>
                <Column size="55"/>
                <Column size="55"/>
                <Column size="55"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <Column size="0"/>
                <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="checkbox" edittype="checkbox"/>
                <Cell col="2" text="중증"/>
                <Cell col="3" text="ISS"/>
                <Cell col="4" text="환자번호"/>
                <Cell col="5" text="이름"/>
                <Cell col="6" text="나이"/>
                <Cell col="7" text="성별"/>
                <Cell col="8" colspan="2" text="내원일시" taborder="undefined"/>
                <Cell col="10" colspan="2" text="퇴실일시" taborder="undefined"/>
                <Cell col="12" text="응급진료결과"/>
                <Cell col="13" colspan="2" text="퇴원일시" taborder="undefined"/>
                <Cell col="15" text="퇴원결과"/>
                <Cell col="16" text="메모"/>
                <Cell col="17" text="합본"/>
                <Cell col="18" text="저장상태"/>
                <Cell col="19" text="전송상태"/>
                <Cell col="20" text="전송자"/>
                <Cell col="21"/>
                <Cell col="22"/>
                <Cell col="23"/>
                <Cell col="24"/>
                <Cell col="25"/>
                <Cell col="26"/>
                <Cell col="27"/>
                <Cell col="28"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" text="expr:currow+1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');" text="bind:sel" expr="expr:sel == 'Y' || sel == '1' ? 1 : 0"/>
                <Cell col="2" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:serflag"/>
                <Cell col="3" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:trmsciss"/>
                <Cell col="4" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptidno"/>
                <Cell col="5" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptname"/>
                <Cell col="6" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:age"/>
                <Cell col="7" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptsexx"/>
                <Cell col="8" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptindt" mask="expr:!utlf_isNull(erptindt) ? '####-##-##' : ''"/>
                <Cell col="9" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptintm" mask="expr:!utlf_isNull(erptintm) ? '##:##' : ''"/>
                <Cell col="10" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptotdt" mask="expr:!utlf_isNull(erptotdt) ? '####-##-##' : ''"/>
                <Cell col="11" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptottm" mask="expr:!utlf_isNull(erptottm) ? '##:##' : ''"/>
                <Cell col="12" displaytype="text" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptemrt"/>
                <Cell col="13" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptdcdt" mask="expr:!utlf_isNull(erptdcdt) ? (erptdcdt != '-' ? '####-##-##' : '') : ''"/>
                <Cell col="14" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptdctm" mask="expr:!utlf_isNull(erptdctm) ? (erptdctm != '-' ? '##:##' : '') : ''"/>
                <Cell col="15" displaytype="text" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:erptdcrt"/>
                <Cell col="16" displaytype="text" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:trmsmemo"/>
                <Cell col="17" displaytype="text" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:bindhistyn"/>
                <Cell col="18" displaytype="combo" style="align:center;background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:savestat" combodataset="ds_init_savestat" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="19" displaytype="combo" style="align:center;background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:transtat" combodataset="ds_init_transtat" combocodecol="value" combodatacol="label" enable="false"/>
                <Cell col="20" style="background:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');background2:EXPR(bindyn == 'Y' ? '#ffff99' : '#ffffff');color:EXPR(lf_SetColor(currow, self.col));color2:EXPR(lf_SetColor(currow, self.col));" text="bind:tranuser" enable="false"/>
                <Cell col="21" text="bind:instcd"/>
                <Cell col="22" text="bind:pid"/>
                <Cell col="23" text="bind:orddd"/>
                <Cell col="24" text="bind:cretno"/>
                <Cell col="25" text="bind:ordtype"/>
                <Cell col="26" text="bind:dschdd"/>
                <Cell col="27" text="bind:indschacptstat"/>
                <Cell col="28" text="bind:bindyn"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Combo position="absolute 84 31 169 50" id="combo3" class="combo_search" codecolumn="value" datacolumn="label" innerdataset="@ds_srch_kind" taborder="2"/>
        <Calendar position="absolute 176 31 272 50" id="input3" class="input_search" taborder="3" autoselect="true" dateformat="yyyy-MM-dd" value="null"/>
        <Calendar position="absolute 299 31 395 50" id="input1" class="input_search" taborder="4" autoselect="true" dateformat="yyyy-MM-dd"/>
        <Static text="~" position="absolute 278 31 298 51" id="caption1"/>
        <Static text="검색조건 :" position="absolute 8 32 79 49" id="caption8" class="search_name"/>
        <Static text="권역 외상센터 전송 현황" position="absolute 0 0 173 20" id="caption6" class="tit_1"/>
        <Shape position="absolute 923 29 929 52" linetype="vertical" id="line2" anchor="top right"/>
        <Button position="absolute 1000 30 1056 52" id="button1" class="btn4" enable="false" text="전송" onclick="button1_onclick" taborder="5" anchor="top right"/>
        <Static text="환자번호:" position="absolute 402 32 474 49" id="caption2" class="search_name"/>
        <Edit position="absolute 480 31 556 50" id="input2" onkeydown="input2_onkeydown" taborder="6" autoselect="true"/>
        <Button position="absolute 1058 30 1120 52" id="button2" class="btn7" text="excel" onclick="button2_onclick" taborder="7" anchor="top right"/>
        <CheckBox position="absolute 569 31 645 51" id="checkbox1" text="임시저장" taborder="8" truevalue="Y" onclick="checkbox1_onclick"/>
        <Button id="btn_bind" taborder="9" text="합본처리" class="btn4" position="absolute 1122 30 1199 52" onclick="btn_bind_onclick" anchor="top right"/>
        <Static id="rectangle1" position="absolute 14 772 29 787" style="background:#ffff99ff;border:1 solid #000000ff ;" anchor="left bottom"/>
        <Static id="caption29" text="합본환자" position="absolute 34 767 93 793" style="color:#000000ff;" anchor="left bottom"/>
        <PopupMenu id="pmenu" idcolumn="idcolumn" captioncolumn="captioncolumn" levelcolumn="levelcolumn" enablecolumn="enablecolumn" iconcolumn="iconcolumn" checkboxcolumn="checkboxcolumn" hotkeycolumn="hotkeycolumn" userdatacolumn="userdatacolumn" onmenuclick="pmenu_onmenuclick" position="absolute 1223 3 1396 67">
          <Dataset id="innerdataset">
            <ColumnInfo>
              <Column id="idcolumn" size="256"/>
              <Column id="captioncolumn" size="256"/>
              <Column id="levelcolumn" size="256"/>
              <Column id="enablecolumn" size="256"/>
              <Column id="iconcolumn" size="256"/>
              <Column id="checkboxcolumn" size="256"/>
              <Column id="hotkeycolumn" size="256"/>
              <Column id="userdatacolumn" size="256"/>
            </ColumnInfo>
            <Rows>
              <Row>
                <Col id="idcolumn">mtralistold_popmenu</Col>
                <Col id="captioncolumn">권역외상등록체계(OLD)</Col>
                <Col id="levelcolumn"/>
                <Col id="enablecolumn"/>
                <Col id="iconcolumn"/>
                <Col id="checkboxcolumn"/>
                <Col id="hotkeycolumn"/>
                <Col id="userdatacolumn"/>
              </Row>
              <Row>
                <Col id="idcolumn">mtralistnew_popmenu</Col>
                <Col id="captioncolumn">권역외상등록체계(NEW)</Col>
                <Col id="levelcolumn"/>
                <Col id="enablecolumn"/>
                <Col id="iconcolumn"/>
                <Col id="checkboxcolumn"/>
                <Col id="hotkeycolumn"/>
                <Col id="userdatacolumn"/>
              </Row>
              <Row>
                <Col id="idcolumn">mtralistver3_popmenu</Col>
                <Col id="captioncolumn">권역외상등록체계(Ver3)</Col>
                <Col id="levelcolumn"/>
                <Col id="enablecolumn"/>
                <Col id="iconcolumn"/>
                <Col id="checkboxcolumn"/>
                <Col id="hotkeycolumn"/>
                <Col id="userdatacolumn"/>
              </Row>
            </Rows>
          </Dataset>
        </PopupMenu>
        <Shape id="Shape00" position="absolute 7 769 87 790" type="roundrectangle" style="strokepen:1 solid #3366ffff;fillbrush:solid transparent true;" anchor="left bottom"/>
        <CheckBox id="checkbox2" taborder="10" text="미전송" truevalue="Y" onclick="checkbox2_onclick" position="absolute 650 31 726 51"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_translist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_translist_oncolumnchanged">
        <ColumnInfo>
          <Column id="sel" type="STRING"/>
          <Column id="erptidno" type="STRING"/>
          <Column id="erptname" type="STRING"/>
          <Column id="age" type="STRING"/>
          <Column id="erptsexx" type="STRING"/>
          <Column id="erptindt" type="STRING"/>
          <Column id="erptintm" type="STRING"/>
          <Column id="erptotdt" type="STRING"/>
          <Column id="erptottm" type="STRING"/>
          <Column id="erptemrt" type="STRING"/>
          <Column id="erptdcdt" type="STRING"/>
          <Column id="erptdctm" type="STRING"/>
          <Column id="erptdcrt" type="STRING"/>
          <Column id="savestat" type="STRING"/>
          <Column id="transtat" type="STRING"/>
          <Column id="tranuser" type="STRING"/>
          <Column id="serflag" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srch_kind" type="STRING" size="256"/>
          <Column id="srch_sdate" type="STRING" size="256"/>
          <Column id="srch_edate" type="STRING" size="256"/>
          <Column id="srch_pid" type="STRING" size="256"/>
          <Column id="srch_gbn" type="STRING" size="256"/>
          <Column id="srch_trnsyn" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srch_kind">2</Col>
            <Col id="srch_sdate"/>
            <Col id="srch_edate"/>
            <Col id="srch_pid"/>
            <Col id="srch_gbn"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="srch_kind" type="STRING" size="256"/>
          <Column id="srch_sdate" type="STRING" size="256"/>
          <Column id="srch_edate" type="STRING" size="256"/>
          <Column id="srch_pid" type="STRING" size="256"/>
          <Column id="srch_gbn" type="STRING" size="256"/>
          <Column id="srch_trnsyn" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_trandata" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="indt" type="STRING" size="256"/>
          <Column id="intm" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_srch_kind" 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">1</Col>
          </Row>
          <Row>
            <Col id="label">내원일</Col>
            <Col id="value">2</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_savestat" 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">S</Col>
          </Row>
          <Row>
            <Col id="label">임시저장</Col>
            <Col id="value">T</Col>
          </Row>
          <Row>
            <Col id="value">P</Col>
            <Col id="label">P저장완료</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_transtat" 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">T</Col>
          </Row>
          <Row>
            <Col id="label">전송오류</Col>
            <Col id="value">E</Col>
          </Row>
          <Row>
            <Col id="label">전송대기</Col>
            <Col id="value">C</Col>
          </Row>
          <Row>
            <Col id="label">퇴실 항목 전송 완료</Col>
            <Col id="value">G</Col>
          </Row>
          <Row>
            <Col id="label">퇴실 항목 재검토 필요</Col>
            <Col id="value">B</Col>
          </Row>
          <Row>
            <Col id="label">퇴실 항목 재검토 완료</Col>
            <Col id="value">Y</Col>
          </Row>
          <Row>
            <Col id="label">퇴원 항목 전송 완료</Col>
            <Col id="value">S</Col>
          </Row>
          <Row>
            <Col id="label">퇴원 항목 재검토 필요</Col>
            <Col id="value">N</Col>
          </Row>
          <Row>
            <Col id="label">정상 처리</Col>
            <Col id="value">T</Col>
          </Row>
          <Row>
            <Col id="label">퇴원항목 재검토 완료</Col>
            <Col id="value">Z</Col>
          </Row>
          <Row>
            <Col id="label">-</Col>
            <Col id="value">-</Col>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="combo3" propid="value" datasetid="ds_init" columnid="srch_kind"/>
      <BindItem id="item1" compid="input3" propid="value" datasetid="ds_init" columnid="srch_sdate"/>
      <BindItem id="item2" compid="input1" propid="value" datasetid="ds_init" columnid="srch_edate"/>
      <BindItem id="item3" compid="input2" propid="value" datasetid="ds_init" columnid="srch_pid"/>
      <BindItem id="item4" compid="checkbox1" propid="value" datasetid="ds_init" columnid="srch_gbn"/>
      <BindItem id="item5" compid="checkbox2" propid="value" datasetid="ds_init" columnid="srch_trnsyn"/>
    </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";

function fClickPatList(i) {
	
	if ( i > -1 ) {
		
		eORDTYPE = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "ordtype"));
		ePID	 = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "pid"));
		eINDD	 = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "orddd"));
		eCRETNO  = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "cretno"));
		eINSTCD  = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "instcd"));
		eSRCHDD  = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "dschdd"));
		eStat	 = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "indschacptstat"));
		
		if (eStat == "A") {
			var param =  eORDTYPE  + "▦"
						+ ePID     + "▦"
						+ eINDD    + "▦"
						+ eCRETNO  + "▦"
						+ eINSTCD  + "▦" ;
			
		} else {
			var param =  eORDTYPE  + "▦"
						+ ePID     + "▦"
						+ eINDD    + "▦"
						+ eCRETNO  + "▦"
						+ eINSTCD  + "▦"
						+ eSRCHDD  + "▦" ;
		}
		
		appf_initPatientInfo(param);
		
	}
}

function mtralistold_popmenu() {

		var row = ds_main_translist.rowposition;
					
		//상단정보
		fClickPatList(row);
		
		//조회 조건 환자번호 설정
		ds_init.setColumn(0, "srch_pid", ds_main_translist.getColumn(row, "erptidno"));
		
		//조회 조건 임시저장자료만 해제
		if(ds_init.getColumn(0, "srch_gbn") == "Y") {
			ds_init.setColumn(0, "srch_gbn", "");
		}
	
		frmf_setParameter("idno", ds_main_translist.getColumn(row, "erptidno"));
		frmf_setParameter("indd", ds_main_translist.getColumn(row, "erptindt"));
		frmf_setParameter("intm", ds_main_translist.getColumn(row, "erptintm"));
		frmf_setParameter("orddd", ds_main_translist.getColumn(row, "orddd"));
		frmf_setParameter("cretno", ds_main_translist.getColumn(row, "cretno"));
		
		frmf_open("SPMMO08010", "SPMMO08010", null, false, "1", null, null, null, null, null, null, null, "M");

}
function mtralistnew_popmenu() {
		var row = ds_main_translist.rowposition;
					
		//상단정보
		fClickPatList(row);
		
		//조회 조건 환자번호 설정
		ds_init.setColumn(0, "srch_pid", ds_main_translist.getColumn(row, "erptidno"));
		
		//조회 조건 임시저장자료만 해제
		if(ds_init.getColumn(0, "srch_gbn") == "Y") {
			ds_init.setColumn(0, "srch_gbn", "");
		}
	
		frmf_setParameter("idno", ds_main_translist.getColumn(row, "erptidno"));
		frmf_setParameter("indd", ds_main_translist.getColumn(row, "erptindt"));
		frmf_setParameter("intm", ds_main_translist.getColumn(row, "erptintm"));
		frmf_setParameter("orddd", ds_main_translist.getColumn(row, "orddd"));
		frmf_setParameter("cretno", ds_main_translist.getColumn(row, "cretno"));
		
		frmf_open("SPMMO08012", "SPMMO08012", null, false, "1", null, null, null, null, null, null, null, "M");

}


function mtralistver3_popmenu() {
		var row = ds_main_translist.rowposition;
					
		//상단정보
		fClickPatList(row);
		
		//조회 조건 환자번호 설정
		ds_init.setColumn(0, "srch_pid", ds_main_translist.getColumn(row, "erptidno"));
		
		//조회 조건 임시저장자료만 해제
		if(ds_init.getColumn(0, "srch_gbn") == "Y") {
			ds_init.setColumn(0, "srch_gbn", "");
		}
	
		frmf_setParameter("idno", ds_main_translist.getColumn(row, "erptidno"));
		frmf_setParameter("indd", ds_main_translist.getColumn(row, "erptindt"));
		frmf_setParameter("intm", ds_main_translist.getColumn(row, "erptintm"));
		frmf_setParameter("orddd", ds_main_translist.getColumn(row, "orddd"));
		frmf_setParameter("cretno", ds_main_translist.getColumn(row, "cretno"));
		
		frmf_open("SPMMO08016", "SPMMO08016", null, false, "1", null, null, null, null, null, null, null, "M");

}


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

function SPMMO08030_onload(obj:Form, e:LoadEventInfo)
{
	// 그리드 초기화
	grdf_initGrid(grd_translist);
	grdf_setToolTipBind(grd_translist);
	
	//grdf_initGrid(grd_translist, '1.0');
	
	ds_main_translist.clearData();
	
	var sSdate = utlf_getCurrentDate().substr(0, 6) + "01";
	var sEdate = utlf_getCurrentDate();

	ds_init.setColumn(0, "srch_sdate", sSdate);
	ds_init.setColumn(0, "srch_edate", sEdate);
}

function btn_search_onclick(obj:Button,  e:ClickEventInfo)
{
	//그리드 초기화
	grdf_clearSort(grd_translist);

	//var vScroll = grd_translist.vscrollbar.pos;
//var vRowposition = ds_main_translist.rowposition;	
/*
	ds_send_cond.clearData();
	var nRow = ds_send_cond.addRow();
	ds_send_cond.setColumn(nRow, "srch_kind", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_kind")));
	ds_send_cond.setColumn(nRow, "srch_sdate", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_sdate")));
	ds_send_cond.setColumn(nRow, "srch_edate", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_edate")));
	ds_send_cond.setColumn(nRow, "srch_pid", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_pid")));
	ds_send_cond.setColumn(nRow, "srch_gbn", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_gbn")));
	ds_send_cond.setColumn(nRow, "srch_trnsyn", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_trnsyn")));

	
	ds_main_translist.clearData();
	
	var oParam = {};
		oParam.id          = "TRMMO08030";
		oParam.service     = "prcpmngtapp.ErMngt";
		oParam.method      = "retGetTrmsTransList";
		oParam.inds        = "req=ds_send_cond";
		oParam.outds       = "ds_main_translist=translist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMO08030";

	tranf_submit(oParam);
*/
lf_Search();
	
// 	ds_main_translist.selectRow(vRowposition);
//	ds_main_translist.rowposition =vRowposition;
	//grd_translist.vscrollbar.pos = vScroll;
}
function lf_Search(){
	ds_send_cond.clearData();
	var nRow = ds_send_cond.addRow();
	ds_send_cond.setColumn(nRow, "srch_kind", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_kind")));
	ds_send_cond.setColumn(nRow, "srch_sdate", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_sdate")));
	ds_send_cond.setColumn(nRow, "srch_edate", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_edate")));
	ds_send_cond.setColumn(nRow, "srch_pid", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_pid")));
	ds_send_cond.setColumn(nRow, "srch_gbn", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_gbn")));
	ds_send_cond.setColumn(nRow, "srch_trnsyn", utlf_transNullToEmpty(ds_init.getColumn(0, "srch_trnsyn")));

	
	ds_main_translist.clearData();
	
	var oParam = {};
		oParam.id          = "TRMMO08030";
		oParam.service     = "prcpmngtapp.ErMngt";
		oParam.method      = "retGetTrmsTransList";
		oParam.inds        = "req=ds_send_cond";
		oParam.outds       = "ds_main_translist=translist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMO08030";

	tranf_submit(oParam);

}

function lf_SetColor(nRow, nCol){
	var nColor = "";
	
	var savestat = ds_main_translist.getColumn(nRow, "savestat");
	var erptdcdt = ds_main_translist.getColumn(nRow, "erptdcdt");
	
	if (savestat == "T") {
		nColor = "#0000ff";

		if ( (nCol >= 13 && nCol <= 15) && erptdcdt != "-" && !utlf_isNull(erptdcdt)) {
			nColor = "#ff0000";
		}
	} else {
		nColor = "#333333";
	}
	
	return nColor;
}

function cf_TRMMO08030(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    ds_main_translist.addColumn("sel", "string");
}

function grd_translist_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var row = ds_main_translist.rowposition;
					
	//상단정보
	fClickPatList(row);
	
	//조회 조건 환자번호 설정
	ds_init.setColumn(0, "srch_pid", ds_main_translist.getColumn(row, "erptidno"));
	
	//조회 조건 임시저장자료만 해제
	if(ds_init.getColumn(0, "srch_gbn") == "Y") {
		ds_init.setColumn(0, "srch_gbn", "");
	}
	
	frmf_setParameter("idno", 		ds_main_translist.getColumn(row, "erptidno"));
	frmf_setParameter("indd", 		ds_main_translist.getColumn(row, "erptindt"));
	frmf_setParameter("intm", 		ds_main_translist.getColumn(row, "erptintm"));
	frmf_setParameter("orddd", 		ds_main_translist.getColumn(row, "orddd"));	
	frmf_setParameter("cretno", 	ds_main_translist.getColumn(row, "cretno"));	
	
	//20160901 권역외상등록체계 Ver2.0 개정
	if(ds_main_translist.getColumn(row, "erptindt") >= "20200101")
	{
		frmf_open("SPMMO08016", "SPMMO08016", null, false, 1, null, null, null, null, null, null, null, "M");
	}
	else if(ds_main_translist.getColumn(row, "erptindt") >= "20160901")
	{
		frmf_open("SPMMO08012", "SPMMO08012", null, false, 1, e.clientX, e.clientY, null, null, null, null, null, "M");
	}else
	{
		frmf_open("SPMMO08010", "SPMMO08010", null, false, 1, e.clientX, e.clientY, null, null, null, null, null, "M");
	}
	
	
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	var rowcnts = ds_main_translist.rowcount;
	var head = "idno▦indt▦intm▩"
	var data = "";
	
	for ( var i = 0; i < rowcnts; i ++) {
		if (ds_main_translist.getColumn(i, "sel") == "Y") {
			idno = 	ds_main_translist.getColumn(i, "erptidno");
			indt = idno = 	ds_main_translist.getColumn(i, "erptindt");
			intm = idno = 	ds_main_translist.getColumn(i, "erptintm");
			
			savestat = ds_main_translist.getColumn(i, "savestat");
			transtat   = ds_main_translist.getColumn(i, "transtat");
			
			if (savestat == "S") {
				data += idno + "▦" + indt + "▦" + intm + "▩";
			}
		}
	}
	var tempDs = head + data;
	dsf_setCSVToDs("ds_send_trandata", tempDs);
}

function input2_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if(e.keycode == 13) {
		obj.updateToDataset();
		btn_search.click();
	}
}

function button2_onclick(obj:Button,  e:ClickEventInfo)
{
	grdf_exportExcel(grd_translist, "권역외상센터전송현황", "SheetName", false, null, null, false);
}

function btn_bind_onclick(obj:Button,  e:ClickEventInfo)
{
	var sPid      = "";
	var sInDt     = "";
	var sInTm     = "";
	var sBindYn   = "";
	var sSaveStat = "";
	var nCnt      = 0;
	
	var nRowcnts = ds_main_translist.rowcount;
	
	for ( var i = 0; i < nRowcnts; i ++) {
		if (ds_main_translist.getColumn(i, "sel") == "Y") {
			sPid      = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "erptidno"));
			sInDt     = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "erptindt"));
			sInTm     = utlf_transNullToEmpty(ds_main_translist.getColumn(i, "erptintm"));
			sBindYn   = ds_main_translist.getColumn(i, "bindyn");	
			sSaveStat = ds_main_translist.getColumn(i, "savestat");	
			
			nCnt = nCnt + 1;
		}
	}
	
	if (nCnt == 0) {
		sysf_messageBox ( "선택된 환자가 없습니다.", "E" ); 
		return;
	} else if (nCnt > 1) {
		sysf_messageBox ( "1건씩 처리가 가능 합니다.", "E" ); 
		return;
	}
	
	if(sBindYn != "Y") {
		sysf_messageBox ( "합본환자가 아닙니다.", "E" ); 
		return;
	}
	
	if(!utlf_isNull(sSaveStat) && sSaveStat != "T" ) {
		sysf_messageBox ( "현재 환자 번호로 저장된 내역이 존재 하여 합본 처리가 불가능 합니다.", "E" ); 
		return;
	}
	
	ds_send.clearData();
	var nRow = ds_send.addRow();
	ds_send.setColumn(nRow, "pid", sPid);
	ds_send.setColumn(nRow, "indt", sInDt);
	ds_send.setColumn(nRow, "intm", sInTm);
	
	var oParam = {};
    oParam.id          = "TXMMO08031";
    oParam.service     = "prcpmngtapp.ErMngt";
    oParam.method      = "reqExeTrmsBindInfo";
    oParam.inds        = "req=ds_send";
    oParam.outds       = "";
    oParam.async       = false;
    oParam.callback    = "cf_TXMMO08031";

	tranf_submit(oParam);
}

function cf_TXMMO08031(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) {
		sysf_messageBox ( "합본처리에 실패 하였습니다.", "E" ); 
		return;
    } else {
		btn_search.click();
    }
}

function checkbox1_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value != "Y")
		ds_init.setColumn(0, "srch_gbn", "");
}

function ds_main_translist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if( e.columnid == "sel" ){
		obj.setColumn(e.row, "sel", (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
	}
}

function pmenu_onmenuclick(obj:PopupMenu, e:MenuClickEventInfo)
{
	eval(e.id + "()");
}

function grd_translist_onrbuttondown(obj:Grid, e:GridMouseEventInfo)
{
	if(e.row < 0) return;
	
	grdf_setSelectedCell(obj, e);
	
	pmenu.trackPopup(e.screenX,e.screenY);
}

function checkbox2_onclick(obj:CheckBox,  e:ClickEventInfo)
{
	if(obj.value != "Y")
		ds_init.setColumn(0, "srch_trnsyn", "");
}
]]></Script>
  </Form>
</FDL>