YNU_JEUS/app_home/himed/xpapps/ast/pharmacyxp/xp/SMADC01500_TPN회신결과입력.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SMADC01500" position="absolute 0 0 1193 748" titletext="Untitle" oninit="SMADC01500_oninit" onload="SMADC01500_onload">
    <Layouts>
      <Layout>
        <Static id="caption6" text="NST회신결과입력" class="tit_1" position="absolute 0 0 141 25"/>
        <Static id="caption14" text="회신결과입력" class="tit_2" position="absolute 5 78 149 95"/>
        <Shape id="line5" linetype="horizontal" class="line_3" position="absolute 0 727 1185 733" anchor="right bottom"/>
        <Static id="caption1" text="회신서 내역 조회" class="tit_2" position="absolute 605 78 749 95"/>
        <Button id="button1" taborder="1" text="저장" class="btn4" position="absolute 530 73 586 95" onclick="button1_onclick"/>
        <Div id="group2" taborder="2" position="absolute 0 25 1184 64" class="div_SA" anchor="left top right">
          <Layouts>
            <Layout>
              <Static id="caption2" text="회신일자 :" class="search_name" position="absolute 95 11 166 28" anchor="default"/>
              <Static id="caption3" text="등록번호 :" class="search_name" position="absolute 314 11 388 28" anchor="default"/>
              <Button id="button61" taborder="5" class="icon_search" position="absolute 552 11 568 27" anchor="default" onclick="group2_button61_onclick"/>
              <Edit id="output1" taborder="6" readonly="true" position="absolute 581 9 1021 30" anchor="default" visible="false"/>
              <Calendar id="ipt_repldd" taborder="7" class="input_search" position="absolute 170 9 272 30" anchor="default" dateformat="yyyy-MM-dd" value="null" onkeydown="group2_ipt_repldd_onkeydown"/>
              <Edit id="ipt_pid" taborder="8" class="input_s_essential" position="absolute 396 9 546 30" anchor="default" onkeydown="group2_ipt_pid_onkeydown"/>
              <Button id="btn_srch" taborder="9" text="조회" class="btn1" position="absolute 1112 9 1168 31" anchor="top right" onclick="group2_btn_srch_onclick"/>
              <Button id="btn_print" taborder="10" text="출력" class="btn6" position="absolute 1052 9 1108 31" anchor="top right" visible="false"/>
              <Static id="caption7" text="환자정보" class="tit_2" position="absolute 7 10 94 28" anchor="default"/>
            </Layout>
          </Layouts>
        </Div>
        <Grid id="grd_replrslt" taborder="3" binddataset="ds_main_replrslt" useinputpanel="false" position="absolute 0 98 590 728" oncelldblclick="grd_replrslt_oncelldblclick" autofittype="col" anchor="left top bottom">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="0"/>
                <Column size="25"/>
                <Column size="72"/>
                <Column size="164"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="131"/>
                <Column size="100"/>
                <Column size="100"/>
                <Column size="100"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <Cell col="1"/>
                <Cell col="2" text="회신결과"/>
                <Cell col="3" text="회신내용"/>
                <Cell col="4" text="회신일시"/>
                <Cell col="5" text="의뢰약물"/>
                <Cell col="6" text="의뢰내용"/>
                <Cell col="7"/>
                <Cell col="8"/>
                <Cell col="9"/>
              </Band>
              <Band id="body">
                <Cell celltype="head"/>
                <Cell col="1" celltype="head" text="expr:currow + 1"/>
                <Cell col="2" displaytype="combo" edittype="combo" text="bind:cnstrslt" combodataset="ds_init_cnstrslt" combocodecol="value" combodatacol="label"/>
                <Cell col="3" displaytype="combo" edittype="combo" text="bind:rsltact" combodataset="ds_init_rsltact" combocodecol="value" combodatacol="label"/>
                <Cell col="4" text="bind:repldd"/>
                <Cell col="5" text="bind:reqdrug"/>
                <Cell col="6" text="bind:reqcnts"/>
                <Cell col="7" text="bind:pid"/>
                <Cell col="8" text="bind:rgstseqno"/>
                <Cell col="9" text="bind:instcd"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <TextArea id="tar_replcnts" taborder="5" position="absolute 595 98 1185 728" anchor="all"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_main_replrslt" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cnstrslt" type="STRING"/>
          <Column id="rsltact" type="STRING"/>
          <Column id="repldd" type="STRING"/>
          <Column id="reqdrug" type="STRING"/>
          <Column id="reqcnts" type="STRING"/>
          <Column id="pid" type="STRING"/>
          <Column id="rgstseqno" type="STRING"/>
          <Column id="instcd" type="STRING"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_main_replcnts" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="replcnts" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_req" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_send_srchinfo" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="repldd" type="STRING" size="256"/>
          <Column id="pid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_srchreplcnts" 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="rgstseqno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row>
            <Col id="pid"/>
            <Col id="rgstseqno"/>
            <Col id="instcd"/>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_cnstrslt" 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 id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">01.Accept</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">02.Reject</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">99.기타</Col>
            <Col id="value">4</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_init_rsltact" 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 id="value">1</Col>
          </Row>
          <Row>
            <Col id="label">01.제형변경</Col>
            <Col id="value">2</Col>
          </Row>
          <Row>
            <Col id="label">02.투여계획(용량등) 변경</Col>
            <Col id="value">3</Col>
          </Row>
          <Row>
            <Col id="label">03.전해질 교정</Col>
            <Col id="value">4</Col>
          </Row>
          <Row>
            <Col id="label">04. Lab Order</Col>
            <Col id="value">5</Col>
          </Row>
          <Row>
            <Col id="label">05. Catheter 관리(line)</Col>
            <Col id="value">6</Col>
          </Row>
          <Row>
            <Col id="label">06.약물상호작용</Col>
            <Col id="value">7</Col>
          </Row>
          <Row>
            <Col id="label">07.추가 약물(Insuline등)</Col>
            <Col id="value">8</Col>
          </Row>
          <Row>
            <Col id="label">08.TPN 기본지침</Col>
            <Col id="value">9</Col>
          </Row>
          <Row>
            <Col id="label">99.기타</Col>
            <Col id="value">10</Col>
          </Row>
        </Rows>
      </Dataset>
      <Dataset id="ds_hidden" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
    </Objects>
    <Bind>
      <BindItem id="item0" compid="group2.ipt_repldd" propid="value" datasetid="ds_send_srchinfo" columnid="repldd"/>
      <BindItem id="item1" compid="group2.ipt_pid" propid="value" datasetid="ds_send_srchinfo" columnid="pid"/>
      <BindItem id="item2" compid="tar_replcnts" propid="value" datasetid="ds_main_replcnts" columnid="replcnts"/>
    </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 "com_basiccodexp::ZBC001.xjs";
include "ast_commonxp::AST.xjs";

var arErrorCode = new HashArray();

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

function SMADC01500_onload(obj:Form, e:LoadEventInfo)
{
	//Row 상태값 설정
	grdf_setRowTypeIcon(grd_replrslt, 0);
	
	grd_replrslt.setFormatColProperty(7,"size",0);
	grd_replrslt.setFormatColProperty(8,"size",0);
	grd_replrslt.setFormatColProperty(9,"size",0);
}

/******************************************************************
 * Argument          : 
 * Description       : 회신일자 enter event
 ******************************************************************/
function group2_ipt_repldd_onkeydown(obj:Calendar, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		frmf_inputEnterKey("group2.btn_srch", "onclick", new ClickEventInfo);
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 등록번호 enter event
 ******************************************************************/
function group2_ipt_pid_onkeydown(obj:Edit, e:KeyEventInfo)
{
	if( e.keycode == 13 ){
		group2.ipt_pid.updateToDataset();
		frmf_inputEnterKey("group2.btn_srch", "onclick", new ClickEventInfo);
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 등록번호(돋보기) enter event
 ******************************************************************/
function group2_button61_onclick(obj:Button,  e:ClickEventInfo)
{
	frmf_modal("SPPMC02500", "SPPMC02500", null, null, null, 200, 200, null, null, null, null, null, "M");
	
	if(!utlf_isNull(this.objects["ds_patinfolist"])) {
		ds_send_srchinfo.setColumn(0,"pid",ds_patinfolist.getColumn(0, "pid"));
	}
}

/******************************************************************
 * Argument          : 
 * Description       : 조회 button event
 ******************************************************************/
function group2_btn_srch_onclick(obj:Button,  e:ClickEventInfo)
{
	// 필수입력사항 (등록번호) 기입여부
	var pid = ds_send_srchinfo.getColumn(0, "pid");
	if( utlf_isNull(pid) ){
		sysf_messageBox("등록번호를 ","C001");
	}else{
		var oParam = {};
			oParam.id          = "TRADC01501";
			oParam.service     = "pharmacyconsultapp.TDMMngt";
			oParam.method      = "reqGetNSTReplRslt";
			oParam.inds        = "req=ds_send_srchinfo";
			oParam.outds       = "ds_main_replrslt=replrslt";
			oParam.async       = false;
			oParam.callback    = "cf_TRADC01501";

		tranf_submit(oParam);
	}
}

function cf_TRADC01501(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    ds_main_replrslt.updateColID("druginfo", "reqdrug");
    ds_main_replrslt.updateColID("nutrprob", "reqcnts");
}

/******************************************************************
 * Argument          : 
 * Description       : 회신결과입력 상세
 ******************************************************************/
function grd_replrslt_oncelldblclick(obj:Grid, e:GridClickEventInfo)
{
	var cRow = ds_main_replrslt.rowposition;
	ds_send_srchreplcnts.setColumn(0, "pid", ds_main_replrslt.getColumn(cRow, "pid"));
	ds_send_srchreplcnts.setColumn(0, "rgstseqno", ds_main_replrslt.getColumn(cRow, "rgstseqno"));
	ds_send_srchreplcnts.setColumn(0, "instcd", ds_main_replrslt.getColumn(cRow, "instcd"));
	var oParam = {};
		oParam.id          = "TRADC01502";
		oParam.service     = "pharmacyconsultapp.TDMMngt";
		oParam.method      = "reqGetNSTReplCnts";
		oParam.inds        = "req=ds_send_srchreplcnts";
		oParam.outds       = "ds_main_replcnts=replcnts";
		oParam.async       = false;
		//oParam.callback    = "cf_TRADC01502";

	tranf_submit(oParam);
}

/******************************************************************
 * Argument          : 
 * Description       : 저장 button event
 ******************************************************************/
function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	if ( sysf_messageBox("변경사항을","Q002")==6 ){
		var oDsUpdate = grdf_getGridUpdateData(grd_replrslt);
		if( utlf_isNull(oDsUpdate) ){
			messageBox("업데이트 정보가", "I004");
				return;
		} else {
			grdf_setStatusColumn(oDsUpdate, "m");			// 각행의 status에 rowType 값에 따라 'i', 'u', 'd'로 업데이트 시켜준다
			ds_send_req.copyData(oDsUpdate, true);
			
			var oParam = {};
				oParam.id          = "TXADC01501";
				oParam.service     = "pharmacyconsultapp.TDMMngt";
				oParam.method      = "reqExeNSTReplRslt";
				oParam.inds        = "req=ds_send_req";
				oParam.outds       = "ds_hidden=item";
				oParam.async       = false;
				//oParam.callback    = "cf_TXADC01501";

			tranf_submit(oParam);
		}
	}
	var oParam = {};
		oParam.id          = "TRADC01501";
		oParam.service     = "pharmacyconsultapp.TDMMngt";
		oParam.method      = "reqGetNSTReplRslt";
		oParam.inds        = "req=ds_send_srchinfo";
		oParam.outds       = "ds_main_replrslt=replrslt";
		oParam.async       = false;
		oParam.callback    = "cf_TRADC01501";

	tranf_submit(oParam);
}
]]></Script>
  </Form>
</FDL>