YNU_JEUS/app_home/himed/xpapps/emr/ercarexp/xp/SMMNE04100_응급진료정보전송.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMMNE04100" position="absolute 0 0 1196 783" titletext="응급진료정보 미전송내역" oninit="SMMNE04100_oninit" onload="SMMNE04100_onload" ontimer="SMMNE04100_ontimer">
    <Layouts>
      <Layout>
        <Div id="group6" taborder="0" position="absolute 0 25 1194 65" class="div_SA">
          <Layouts>
            <Layout>
              <Static id="caption15" class="search_name" position="absolute 6 11 12 28" anchor="default"/>
              <Combo id="combo3" taborder="1" codecolumn="codecolumn" datacolumn="datacolumn" class="combo_search" position="absolute 17 9 102 30" 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>
                  </Rows>
                </Dataset>
              </Combo>
              <Calendar id="input1" taborder="2" class="input_s_essential" position="absolute 109 9 204 30" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true" autoskip="true"/>
              <Static id="caption16" text="~" position="absolute 208 14 216 27" anchor="default"/>
              <Calendar id="input2" taborder="3" class="input_s_essential" position="absolute 220 9 315 30" anchor="default" dateformat="yyyy-MM-dd" value="null" autoselect="true"/>
              <Radio id="radio2" taborder="4" columncount="4" rowcount="0" codecolumn="codecolumn" datacolumn="datacolumn" class="radio_search" position="absolute 394 10 662 30" anchor="default" visible="false">
                <Dataset id="innerdataset">
                  <ColumnInfo>
                    <Column id="codecolumn"/>
                    <Column id="datacolumn"/>
                  </ColumnInfo>
                  <Rows>
                    <Row>
                      <Col id="codecolumn">A</Col>
                      <Col id="datacolumn">전체</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">E</Col>
                      <Col id="datacolumn">전송실패</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">Y</Col>
                      <Col id="datacolumn">전송대기</Col>
                    </Row>
                    <Row>
                      <Col id="codecolumn">T</Col>
                      <Col id="datacolumn">전송완료</Col>
                    </Row>
                  </Rows>
                </Dataset>
              </Radio>
              <Edit id="ipt_pid" taborder="5" position="absolute 391 8 471 30" anchor="default" onkeyup="group6_ipt_pid_onkeyup" autoselect="true"/>
              <Button id="button2" taborder="6" text="조회" class="btn1" position="absolute 848 10 904 32" anchor="top right" onclick="group6_button2_onclick"/>
              <Button id="button7" taborder="7" text="출력" class="btn6" position="absolute 1049 10 1105 32" anchor="top right" onclick="group6_button7_onclick"/>
              <Button id="button8" taborder="8" text="엑셀저장" class="btn7" position="absolute 1108 10 1188 32" anchor="top right" onclick="group6_button8_onclick"/>
              <Shape id="line5" linetype="vertical" class="line_4" position="absolute 838 10 844 32" anchor="top right"/>
              <Button id="button6" taborder="9" text="전송준비" class="btn2" position="absolute 907 10 987 32" anchor="top right" onclick="group6_button6_onclick"/>
              <Button id="btn_send" taborder="10" text="전송" class="btn5" enable="false" position="absolute 990 10 1046 32" anchor="top right" onclick="group6_btn_send_onclick"/>
              <Static id="caption17" text="검색조건 :" class="search_name" position="absolute 319 12 390 29" anchor="default" visible="false"/>
              <Static id="caption20" text="환자번호 :" class="search_name" position="absolute 319 11 390 29" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Shape id="line6" linetype="horizontal" class="line_1" position="absolute 0 93 1194 99" anchor="left top right"/>
        <Grid id="grd_datagrid3" taborder="1" binddataset="ds_main_trsmlistinfo" useinputpanel="false" position="absolute 0 99 1194 769" autofittype="col" anchor="all" oncelldblclick="grd_datagrid3_oncelldblclick" cellsizingtype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="20"/>
                <Column size="46"/>
                <Column size="80"/>
                <Column size="100"/>
                <Column size="90"/>
                <Column size="60"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="60"/>
                <Column size="275"/>
                <Column size="85"/>
                <Column size="85"/>
                <Column size="85"/>
                <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="NEDIS상태"/>
                <Cell col="4" text="내원일자"/>
                <Cell col="5" text="내원시간"/>
                <Cell col="6" text="등록번호"/>
                <Cell col="7" text="환자명"/>
                <Cell col="8" text="S/A"/>
                <Cell col="9" text="전송상세내역"/>
                <Cell col="10" text="수정일자"/>
                <Cell col="11" text="퇴실일자"/>
                <Cell col="12" text="퇴원일자"/>
                <Cell col="13" text="생성번호"/>
                <Cell col="14" text="입실일자"/>
                <Cell col="15"/>
              </Band>
              <Band id="body">
                <Cell celltype="head" expr="expr:currow + 1"/>
                <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:boolflag" expr="expr:boolflag == 'Y' || boolflag == '1' ? '1' : '0'"/>
                <Cell col="2" displaytype="combo" style="align:center middle;color:EXPR(eragstat == 'E' ? '#ff0000' : eragstat == 'T' ? '#0000ff' : '');color2:EXPR(eragstat == 'E' ? '#ff0000' : eragstat == 'T' ? '#0000ff' : '');" text="bind:eragstat" combodataset="ds_hidden_trsmitem" combocodecol="cdid" combodatacol="cdnm" enable="false"/>
                <Cell col="3" displaytype="combo" style="align:center;" text="bind:ptmistat" combodataset="ds_ptmistat" combocodecol="value" combodatacol="label" combodisplayrowcount="20"/>
                <Cell col="4" displaytype="expr:utlf_isNull(eragindt) ? '' : 'date'" text="bind:eragindt"/>
                <Cell col="5" displaytype="text" style="align:center middle;" text="bind:eragintm" mask="expr:utlf_isNull(eragintm) ? '' : '99:99'"/>
                <Cell col="6" text="bind:eragidno"/>
                <Cell col="7" text="bind:patnm"/>
                <Cell col="8" text="bind:grdrage"/>
                <Cell col="9" style="align:left middle;padding:0 0 0 5;" text="bind:eragcmmt"/>
                <Cell col="10" displaytype="expr:utlf_isNull(eragupdt) ? '' : 'date'" text="bind:eragupdt"/>
                <Cell col="11" displaytype="expr:utlf_isNull(eroutdt) ? '' : 'date'" text="bind:eroutdt"/>
                <Cell col="12" displaytype="expr:utlf_isNull(eragoudd) ? '' : 'date'" text="bind:eragoudd"/>
                <Cell col="13" text="bind:cretno"/>
                <Cell col="14" text="bind:indd"/>
                <Cell col="15" text="bind:ordtype"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Static id="caption18" text="응급진료정보 전송내역&#13;&#10;      if(button5.attribute(&quot;visibility&quot;) == &quot;hidden&quot; ){&#13;&#10;       button5.attribute(&quot;visibility&quot;)  = &quot;visible&quot;;       &#13;&#10;      }else{&#13;&#10;       button5.attribute(&quot;visibility&quot;)  = &quot;hidden&quot;;       &#13;&#10;      }  &#13;&#10;     " class="tit_2" position="absolute 0 78 155 96"/>
        <Button id="button10" taborder="2" text="WEB LINK" class="btn2" position="absolute 1119 72 1194 94" anchor="top right" onclick="button10_onclick"/>
        <Static id="caption19" text="국가 응급환자 진료정보망(NEDIS)&#13;&#10;      if(button5.attribute(&quot;visibility&quot;) == &quot;hidden&quot; ){&#13;&#10;       button5.attribute(&quot;visibility&quot;)  = &quot;visible&quot;;       &#13;&#10;      }else{&#13;&#10;       button5.attribute(&quot;visibility&quot;)  = &quot;hidden&quot;;       &#13;&#10;      }  &#13;&#10;     " class="tit_2" position="absolute 888 78 1114 94" anchor="top right"/>
        <Button id="button5" taborder="3" text="검색내역 재전송준비" class="btn2" visible="false" position="absolute 165 72 293 94" onclick="button5_onclick"/>
        <Static id="caption1" text="[표]" position="absolute 1171 771 1196 783" anchor="right bottom"/>
        <Static id="caption6" text="응급진료정보 미전송내역" class="tit_1" position="absolute 0 0 189 25"/>
        <Shape id="line00" class="line_10" position="absolute 0 94 1194 100" anchor="left top right"/>
        <Button id="btn_text" taborder="4" text="Button00" position="absolute 890 77 1110 92" style="background:transparent;border:1 none transparent transparent;color:transparent;gradation:none 0,0 white 100,100 black;" ondblclick="btn_text_ondblclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_trsmlistinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="boolflag" type="STRING"/>
          <Column id="eragstat" type="STRING"/>
          <Column id="eragindt" type="STRING"/>
          <Column id="eragintm" type="STRING"/>
          <Column id="eragidno" type="STRING"/>
          <Column id="patnm" type="STRING"/>
          <Column id="grdrage" type="STRING"/>
          <Column id="eragcmmt" type="STRING"/>
          <Column id="eragupdt" type="STRING"/>
          <Column id="eroutdt" type="STRING"/>
          <Column id="eragoudd" type="STRING"/>
          <Column id="cretno" type="STRING"/>
          <Column id="indd" type="STRING"/>
          <Column id="ordtype" type="STRING"/>
          <Column id="ptmistat" type="STRING"/>
          <Column id="ptmiotdt" type="STRING"/>
          <Column id="ptmidcdt" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_cond" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256"/>
          <Column id="todd" type="STRING" size="256"/>
          <Column id="srchflag" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
          <Column id="srchkind" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="srchflag">A</Col>
            <Col id="srchkind">2</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden_trsmitem" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdid" type="STRING" size="256"/>
          <Column id="cdnm" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="cdid">Y</Col>
            <Col id="cdnm">전송완료</Col>
          </Row>
          <Row>
            <Col id="cdid">E</Col>
            <Col id="cdnm">전송에러</Col>
          </Row>
          <Row>
            <Col id="cdid">N</Col>
            <Col id="cdnm">전송대기</Col>
          </Row>
          <Row>
            <Col id="cdid">F</Col>
            <Col id="cdnm">전송대기</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_temp_trsmlistinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_ptmistat" 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">E</Col>
          </Row>
          <Row>
            <Col id="label">삭제</Col>
            <Col id="value">K</Col>
          </Row>
          <Row>
            <Col id="label">실시간전송</Col>
            <Col id="value">H</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">Z</Col>
          </Row>
          <Row>
            <Col id="label">기타</Col>
            <Col id="value">AA</Col>
          </Row>
          <Row>
            <Col id="label"/>
            <Col id="value"/>
          </Row>
        </Rows>
      </Dataset>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group6.combo3" propid="value" datasetid="ds_main_cond" columnid="srchkind"/>
      <BindItem id="item1" compid="group6.input1" propid="value" datasetid="ds_main_cond" columnid="fromdd"/>
      <BindItem id="item2" compid="group6.input2" propid="value" datasetid="ds_main_cond" columnid="todd"/>
      <BindItem id="item3" compid="group6.radio2" propid="value" datasetid="ds_main_cond" columnid="srchflag"/>
      <BindItem id="item4" compid="group6.ipt_pid" propid="value" datasetid="ds_main_cond" columnid="pid"/>
    </Bind>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2015-11-13
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2015-11-13      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_carecomxp::CareCom.xjs";
include "emr_prcpmngtxp::MMO001.xjs";

/******************************************************************
 * Argument          : 
 * Description       : 초기화
 ******************************************************************/
function SMMNE04100_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
}

function SMMNE04100_onload(obj:Form, e:LoadEventInfo)
{
	var sUserId = sysf_getUserInfo("userid");
	if( lf_ContainsHardCD("486", sUserId) ) { // Nedis 전송가능 사용자 버튼 활성화 2015.04.23 엄영만
		group6.btn_send.enable = true;
	} else {
		group6.btn_send.enable = false;
	}
	
	//datagrid3.fixedcellcheckbox(0,1) = true;
	//model.removeNodeset("/root/main/trsmlistinfo");
	var sTodt = utlf_getCurrentDate();
	var sFrdt = getDateAddc(utlf_getCurrentDate(), -7);
	ds_main_cond.setColumn(0, "fromdd", sFrdt);
	ds_main_cond.setColumn(0, "todd"    , sTodt);
	
	//속도개선
	this.setTimer(0, 100);	
	//frmf_inputEnterKey("group6.button2", "onclick", new ClickEventInfo);	
	//grdf_initGrid(grd_datagrid3);
}

/******************************************************************
 * Argument          : 
 * Description       : 환자번호
 ******************************************************************/
function group6_ipt_pid_onkeyup(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		obj.updateToDataset();
		frmf_inputEnterKey("group6.button2", "onclick", new ClickEventInfo);
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function group6_button2_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send.clear();
	ds_main_trsmlistinfo.clearData();
	
	ds_send.copyData(ds_main_cond);
	
	var oParam = {};
		oParam.id          = "TRMNE04101";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqGetTrsmList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_main_trsmlistinfo=trsmlist";
		oParam.async       = true;
		//oParam.callback    = "cf_TRMNE04101";

	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 전송준비 button event
 ******************************************************************/
function group6_button6_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_temp_trsmlistinfo.clear();
	ds_temp_trsmlistinfo.copyData(ds_main_trsmlistinfo);
	ds_temp_trsmlistinfo.filter("boolflag == 'Y' || boolflag == '1'");

	if( ds_temp_trsmlistinfo.rowcount == 0 ){
		sysf_messageBox("선택한 목록이 존재하지 않습니다.", "I");
		return;
	}
	
	ds_send.clear();
	
	ds_send.addColumn("batchflag", "string");
	ds_send.addColumn("sfrdt", "string");
	ds_send.addColumn("stodt", "string");
	ds_send.addColumn("boolflag", "string");
	ds_send.addColumn("eragstat", "string");
	ds_send.addColumn("eragindt", "string");
	ds_send.addColumn("eragintm", "string");
	ds_send.addColumn("eragidno", "string");
	ds_send.addColumn("eragoudd", "string");
	ds_send.addColumn("cretno", "string");
	ds_send.addColumn("indd", "string");
	
	ds_temp_trsmlistinfo.filter("");
	
	for( var i = 0; i < ds_temp_trsmlistinfo.rowcount; i++ ){
		if( ds_temp_trsmlistinfo.getColumn(i, "boolflag") == "Y" || ds_temp_trsmlistinfo.getColumn(i, "boolflag") == "1" ){
			ds_temp_trsmlistinfo.setColumn(i, "boolflag", "Y");
		}else{
			ds_temp_trsmlistinfo.setColumn(i, "boolflag", "N");
		}
		
		var addRow = ds_send.addRow();
		ds_send.setColumn(addRow, "batchflag", "R");
		ds_send.setColumn(addRow, "sfrdt", ds_main_cond.getColumn(0, "fromdd"));
		ds_send.setColumn(addRow, "stodt", ds_main_cond.getColumn(0, "todd"));
		ds_send.setColumn(addRow, "boolflag", ds_temp_trsmlistinfo.getColumn(i, "boolflag"));
		ds_send.setColumn(addRow, "eragstat", ds_temp_trsmlistinfo.getColumn(i, "eragstat"));
		ds_send.setColumn(addRow, "eragindt", ds_temp_trsmlistinfo.getColumn(i, "eragindt"));
		ds_send.setColumn(addRow, "eragintm", ds_temp_trsmlistinfo.getColumn(i, "eragintm"));
		ds_send.setColumn(addRow, "eragidno", ds_temp_trsmlistinfo.getColumn(i, "eragidno"));
		ds_send.setColumn(addRow, "eragoudd", ds_temp_trsmlistinfo.getColumn(i, "eragoudd"));
		ds_send.setColumn(addRow, "cretno", ds_temp_trsmlistinfo.getColumn(i, "cretno"));
		ds_send.setColumn(addRow, "indd", ds_temp_trsmlistinfo.getColumn(i, "indd"));
	}
	
	var oParam = {};
		oParam.id          = "TXMNE04102";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqExeReERBatch";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXMNE04102";

	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 전송 button event
 ******************************************************************/
function group6_btn_send_onclick(obj:Button,  e:ClickEventInfo)
{
	if( "6" == sysf_messageBox("전송 하시겠습니까?", "Q") ) {
		var oParam = {};
			oParam.id          = "TXMNE04103";
			oParam.service     = "ercareapp.ERPatMngt";
			oParam.method      = "reqExeEdisAgentBatch";
			oParam.inds        = "req=ds_send";
			oParam.outds       = "";
			oParam.async       = false;
			//oParam.callback    = "cf_TXMNE04103";

		tranf_submit(oParam);
		
		alert("전송이 완료되었습니다.");
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 출력 button event
 ******************************************************************/
function group6_button7_onclick(obj:Button,  e:ClickEventInfo)
{
	if( ds_main_trsmlistinfo.rowcount < 1 ){
		sysf_messageBox("출력할 데이터가 존재하지 않습니다.", "E");
		return;
	}
	
	var objDOM = rptf_createDOM();											// DOM 객체 설정
	rptf_setNodeListToDOM(objDOM, "/root/send/trsmlistinfo/trsmlist", ds_main_trsmlistinfo);		// 데이터셋 1
	rptf_setNodeListToDOM(objDOM, "/root/send/cond", ds_main_cond);								// 데이터셋 2
	//sysf_trace(objDOM.documentElement.source);	// XML 내용출력

	var objParam = new Object();
	objParam.xml_data_XML1 = objDOM.documentElement.source;					// 최상의노드 XML 스트링 추출

	var option = "open=1;save=1;directprint=0;print=1;zoom=0;excel=1;";	
	rptf_exeReportPreview30(["RPMNE04100"],[objParam], option, null, null);
}

/******************************************************************
 * Argument          : 
 * Description       : 엑셀저장 button event
 ******************************************************************/
function group6_button8_onclick(obj:Button,  e:ClickEventInfo)
{
	var srchflag = ds_main_cond.getColumn(0, "srchflag");
	var Title = "";
	if( srchflag == "A" ){
		Title = "응급자료전송(전체 리스트)";
	} else if( srchflag == "T" ) {
		Title = "응급자료전송(전송완료 리스트)";
	} else if( srchflag == "E" ) {
		Title = "응급자료전송(전송실패 리스트)";
	} else if( srchflag == "Y" ) {
		Title = "응급자료전송(전송대기 리스트)";
	}
	
	
	if( ds_main_trsmlistinfo.rowcount > 0 ){
		grdf_exportExcel(grd_datagrid3, Title, Title, false, "", "user", false);
	} else {
		sysf_messageBox("조회된 데이터가 ", "I004");
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 검색내역 재전송준비 button event
 ******************************************************************/
function button5_onclick(obj:Button,  e:ClickEventInfo)
{
	ds_send.clear();
	ds_send.addColumn("batchflag", "string");
	ds_send.addColumn("sfrdt", "string");
	ds_send.addColumn("stodt", "string");
	ds_send.addColumn("sptno", "string");
	var iRow = ds_send.addRow();
	
	ds_send.setColumn(iRow, "batchflag", "T");
	ds_send.setColumn(iRow, "sfrdt", ds_main_cond.getColumn(0, "fromdd") );
	ds_send.setColumn(iRow, "stodt", ds_main_cond.getColumn(0, "todd") );
	ds_send.setColumn(iRow, "sptno", "9999999999");
	
	var oParam = {};
		oParam.id          = "TXMNE04101";
		oParam.service     = "ercareapp.ERPatMngt";
		oParam.method      = "reqExeERBatch";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "";
		oParam.async       = false;
		//oParam.callback    = "cf_TXMNE04101";

	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : WEB LINK button event
 ******************************************************************/
function button10_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_openHtml("http://portal.nemc.or.kr/");
}

/******************************************************************
 * Argument          : 
 * Description       : 국가 응급환자 진료정보망(NEDIS) event
 ******************************************************************/
function btn_text_ondblclick(obj:Button,  e:MouseEventInfo)
{
	if( button5.visible == true ){
		button5.visible = false;
	} else {
		button5.visible = true;
	}
}

/******************************************************************
 * Argument          : 
 * Description       : list event
 ******************************************************************/
function grd_datagrid3_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	if( ds_main_trsmlistinfo.rowcount < 1 ){
		return;
	}
	
	var cRow = ds_main_trsmlistinfo.rowposition;
	
	var sOrdtype	= ds_main_trsmlistinfo.getColumn(cRow, "ordtype");
	var sPid		= ds_main_trsmlistinfo.getColumn(cRow, "eragidno");
	var sIndd		= ds_main_trsmlistinfo.getColumn(cRow, "indd");
	var sCretno		= ds_main_trsmlistinfo.getColumn(cRow, "cretno");
	var sInstcd		= sysf_getUserInfo("posinstcd");
	var sSrcdd		= ds_main_trsmlistinfo.getColumn(cRow, "eragoudd");
	
	if(sSrcdd == "99991231"){
		sSrcdd = utlf_getCurrentDate();
	}
		
	var param = sOrdtype	+ "▦" 
				   + sPid		+ "▦" 
				   + sIndd		+ "▦" 
				   + sCretno		+ "▦"     
				   + sInstcd		+ "▦" 
				   + sSrcdd		+ "▦" ;
	
// 	frmf_setParameter("condparam",  param);
// 	frmf_modal("SPMMO08900", "SPMMO08900", null, null, null, null, null, null, null, null, null, null, "M");
	
	appf_initPatientInfo(param);	//상단정보 셋팅
	
	sPatInfo = ds_main_trsmlistinfo.getColumn(cRow, "eragidno")+"▦"
			   + ds_main_trsmlistinfo.getColumn(cRow, "indd")+"▦"
			   + ds_main_trsmlistinfo.getColumn(cRow, "cretno")+"▦"
			   + ds_main_trsmlistinfo.getColumn(cRow, "eragindt") 
			   + ds_main_trsmlistinfo.getColumn(cRow, "eragintm") +"▩";
	frmf_setParameter("SMMNE001_Param",sPatInfo);
	frmf_modal("SMMNE00100", "SMMNE00100", null, null, null, null, null, null, null, null, null, null, "M");
}

function SMMNE04100_ontimer(obj:Form, e:TimerEventInfo)
{
	if (e.timerid == 0) {
		this.killTimer(0);
		frmf_inputEnterKey("group6.button2", "onclick", new ClickEventInfo);	
		grdf_initGrid(grd_datagrid3);
	}
}
]]></Script>
  </Form>
</FDL>