YNU_JEUS/app_home/himed/xpapps/emr/wardcarexp/xp/SPMNW13900_통증관리처방기준자료팝업.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMNW13900" position="absolute 0 0 834 477" titletext="통증관리 처방기준자료" oninit="SPMNW13900_oninit" onload="SPMNW13900_onload" onbeforeclose="SPMNW13900_onbeforeclose">
    <Layouts>
      <Layout>
        <Div position="absolute 0 0 827 477" id="group5" scrollbars="autoboth">
          <Layouts>
            <Layout>
              <Button position="absolute 785 0 827 19" id="button1" class="btn2" text="확인" onclick="group5_button1_onclick" anchor="default"/>
              <Static text="통증관리 처방기준자료" position="absolute 0 4 157 20" id="cap_title" class="tit_2" anchor="default"/>
              <Shape position="absolute 0 20 826 26" linetype="horizontal" id="line1" class="line_10" anchor="default"/>
              <Grid position="absolute 0 25 827 474" id="grd_painprcplist" binddataset="ds_main_painprcpinfo_painprcplist" anchor="default" autoenter="none" autofittype="col">
                <Formats>
                  <Format id="default">
                    <Columns>
                      <Column size="0"/>
                      <Column size="20"/>
                      <Column size="140"/>
                      <Column size="140"/>
                      <Column size="40"/>
                      <Column size="40"/>
                      <Column size="40"/>
                      <Column size="30"/>
                      <Column size="30"/>
                      <Column size="40"/>
                      <Column size="49"/>
                      <Column size="38"/>
                      <Column size="250"/>
                      <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="26" band="head"/>
                      <Row size="24"/>
                    </Rows>
                    <Band id="head">
                      <Cell text="상태"/>
                      <Cell col="1"/>
                      <Cell col="2" text="처방일시"/>
                      <Cell col="3" text="수행일시"/>
                      <Cell col="4" text="1일&#10;용량"/>
                      <Cell col="5" colspan="2" text="1회용량" taborder="undefined"/>
                      <Cell col="7" text="1일&#10;수량"/>
                      <Cell col="8" colspan="2" text="1회수량" taborder="undefined"/>
                      <Cell col="10" text="1일횟수"/>
                      <Cell col="11" text="기간"/>
                      <Cell col="12" text="처방명"/>
                      <Cell col="13" text="처방코드"/>
                      <Cell col="14" text="prcpdd"/>
                      <Cell col="15" text="prcpno"/>
                      <Cell col="16" text="prcphistno"/>
                      <Cell col="17" text="pid"/>
                      <Cell col="18" text="indd"/>
                      <Cell col="19" text="cretno"/>
                      <Cell col="20" text="pncdseq"/>
                    </Band>
                    <Band id="body">
                      <Cell displaytype="combo" edittype="combo" text="bind:status"/>
                      <Cell col="1" displaytype="checkbox" edittype="checkbox" text="bind:chk"/>
                      <Cell col="2" style="align:left;" text="bind:prcpdt" tooltiptext="bind:prcpdt"/>
                      <Cell col="3" style="align:left;" text="bind:execdt" tooltiptext="bind:execdt"/>
                      <Cell col="4" style="align:right;" text="bind:prcpvol"/>
                      <Cell col="5" style="align:right;linetype:onlyhorz;" text="bind:drprcpetc7"/>
                      <Cell col="6" style="align:left;" text="bind:prcpvolunitflag"/>
                      <Cell col="7" style="align:right;" text="bind:prcpqty"/>
                      <Cell col="8" style="align:right;linetype:onlyhorz;" text="bind:drprcpetc8"/>
                      <Cell col="9" style="align:left;" text="bind:prcpqtyunitflag"/>
                      <Cell col="10" style="align:left;" text="bind:prcptims"/>
                      <Cell col="11" style="align:left;" text="bind:prcpdayno"/>
                      <Cell col="12" style="align:left;" text="bind:prcpnm"/>
                      <Cell col="13" text="bind:prcpcd"/>
                      <Cell col="14" text="bind:prcpdd"/>
                      <Cell col="15" text="bind:prcpno"/>
                      <Cell col="16" text="bind:prcphistno"/>
                      <Cell col="17" text="bind:pid"/>
                      <Cell col="18" text="bind:indd"/>
                      <Cell col="19" text="bind:cretno"/>
                      <Cell col="20" text="bind:pncdseq"/>
                    </Band>
                  </Format>
                </Formats>
              </Grid>
            </Layout>
          </Layouts>
        </Div>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="fromdd" type="STRING" size="256" sumtext="시작일자"/>
          <Column id="todd" type="STRING" size="256" sumtext="종료일자"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일"/>
          <Column id="cretno" type="STRING" size="256" sumtext="원무생성번호"/>
          <Column id="obsrecseq" type="STRING" size="256" sumtext="통증관리기록순번"/>
          <Column id="grupcd" type="STRING" size="256" sumtext="그룹코드"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_main_painprcpinfo_painprcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_main_painprcpinfo_painprcplist_oncolumnchanged">
        <ColumnInfo>
          <Column id="status" type="STRING" size="256" sumtext="상태"/>
          <Column id="chk" type="STRING" size="256" sumtext="선택"/>
          <Column id="prcpdt" type="STRING" size="256" sumtext="처방일시"/>
          <Column id="execdt" type="STRING" size="256" sumtext="수행일시"/>
          <Column id="prcpvol" type="STRING" size="256" sumtext="처방용량"/>
          <Column id="prcpvolunitflag" type="STRING" size="256" sumtext="처방용량단위"/>
          <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
          <Column id="prcpqtyunitflag" type="STRING" size="256" sumtext="처방수량단위"/>
          <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
          <Column id="drprcpetc7" type="STRING" size="256" sumtext="처방용량"/>
          <Column id="drprcpetc8" type="STRING" size="256" sumtext="처방수량"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방내역"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일"/>
          <Column id="prcpno" type="INT" size="256" sumtext="처방번호"/>
          <Column id="prcphistno" type="INT" size="256" sumtext="처방이력번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="indd" type="STRING" size="256" sumtext="입원일"/>
          <Column id="cretno" type="INT" size="256" sumtext="원무생성번호"/>
          <Column id="pncdseq" type="INT" size="256" sumtext="통증관리기준자료순번"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_upflag" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="upflag" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************
 * System Name		:	경대 의료정보시스템
 * Job Name 		:	emr_wardcarexp -> SPMNW13900
 * Creator			:	yjh
 * Make Date 		:	2016-02-19
 * Description		:	
 *---------------------------------------------------------------------------------------
 * Modify Date		Modifier		Modify Description
 *---------------------------------------------------------------------------------------
 * 2016-02-19		yjh				TF->XP
 * 
 *---------------------------------------------------------------------------------------
 ****************************************************************************************/


//=======================================================================================
// Lib Include
//---------------------------------------------------------------------------------------
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMOCommon.xjs";


//=======================================================================================
// Global Form Variable
//---------------------------------------------------------------------------------------
var wincloseButton = false;


//=======================================================================================
// Function
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Argument			: N/A
 * Description		: 
 ****************************************************************************************/
function fInitialize(){
	ds_upflag.setColumn(0, "upflag", opener.frmf_getParameter("Upflag"));
	
	var recdd           = opener.frmf_getParameter("SPMNW13900_PARAM_RECDD");
	var pid               = opener.frmf_getParameter("SPMNW13900_PARAM_PID");
	var indd             = opener.frmf_getParameter("SPMNW13900_PARAM_INDD");
	var cretno          = opener.frmf_getParameter("SPMNW13900_PARAM_CRETNO");
	var painprcpinfo = utlf_transNullToEmpty(opener.frmf_getParameter("SPMNW13900_PARAM_PAINPRCPINFO"));
	
	// 통증기록순번, 그룹코드 추가
	var obsrecseq = opener.frmf_getParameter("SPMNW13900_PARAM_OBSRECSEQ");
	var grupcd = opener.frmf_getParameter("SPMNW13900_PARAM_GRUPCD");
	
	ds_main_painprcpinfo_painprcplist.clearData();
	
	ds_send.setColumn(0, "fromdd", recdd.toDate().getAddDate(-3,"D").getDateFormat());
	ds_send.setColumn(0, "todd", recdd);
	ds_send.setColumn(0, "pid", pid);
	ds_send.setColumn(0, "indd", indd);
	ds_send.setColumn(0, "cretno", cretno);
	
	ds_send.setColumn(0, "obsrecseq", obsrecseq);
	ds_send.setColumn(0, "grupcd", grupcd);
	
	var oParam = {};
		oParam.id          = "TRMNW13801";
		oParam.service     = "wardcareapp.WardPainCareMngt";
		oParam.method      = "reqGetPainPrcpList";
		oParam.inds        = "refCond=ds_send";
		oParam.outds       = "ds_main_painprcpinfo_painprcplist=painprcplist";
		oParam.async       = false;
		//oParam.callback    = "cf_TRMNW13801";

	tranf_submit(oParam);
	
	ds_main_painprcpinfo_painprcplist.enableevent = false;
	ds_main_painprcpinfo_painprcplist.updatecontrol = false;
	
	for( var i=0 ; i<ds_main_painprcpinfo_painprcplist.rowcount ; i++ ){
		if( ds_main_painprcpinfo_painprcplist.getColumn(i, "chk") == "true" ){
			ds_main_painprcpinfo_painprcplist.setColumn(i, "chk", "1");
		}else{
			ds_main_painprcpinfo_painprcplist.setColumn(i, "chk", "0");
		}
	}
	
	ds_main_painprcpinfo_painprcplist.updatecontrol = true;
	ds_main_painprcpinfo_painprcplist.enableevent = true;
	
	var colHidnValue = lf_grdBaseColHidn("D");
	lf_grdBaseColHidn(colHidnValue, "group5.grd_painprcplist", 37, "prcpvol", "prcpqty", "drprcpetc7", "drprcpetc8");
}


//=======================================================================================
// Event
//---------------------------------------------------------------------------------------
/****************************************************************************************
 * Components		: Form
 * Components ID	: SPMNW13900
 * Event			: oninit
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 처음 초기화시
 ****************************************************************************************/
function SPMNW13900_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);	//폼 초기화
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPMNW13900
 * Event			: onload
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 로딩 완료시
 ****************************************************************************************/
function SPMNW13900_onload(obj:Form, e:LoadEventInfo)
{
	fInitialize();
}

/****************************************************************************************
 * Components		: Form
 * Components ID	: SPMNW13900
 * Event			: onbeforeclose
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 화면 닫기전
 ****************************************************************************************/
function SPMNW13900_onbeforeclose(obj:Form, e:CloseEventInfo)
{
	if( !wincloseButton){
		opener.frmf_setParameter("returnnull","close");
	} else {
		opener.frmf_setParameter("returnnull","confirmbutton");
	}
}

/****************************************************************************************
 * Components		: Dataset
 * Components ID	: ds_main_painprcpinfo_painprcplist
 * Event			: oncolumnchanged
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 데이터셋 값 변경시
 ****************************************************************************************/
function ds_main_painprcpinfo_painprcplist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	var status = ds_main_painprcpinfo_painprcplist.getColumn(e.row, "status");
	var chk = ds_main_painprcpinfo_painprcplist.getColumn(e.row, "chk");
	var pncdseq = ds_main_painprcpinfo_painprcplist.getColumn(e.row, "pncdseq");

	if(chk != "1") {
		if( !utlf_isNull(pncdseq) ){
			ds_main_painprcpinfo_painprcplist.setColumn(e.row, "status", "D");
		}else{
			ds_main_painprcpinfo_painprcplist.setColumn(e.row, "status", "-");
		}
	} else if(chk == "1") {
		if( !utlf_isNull(pncdseq) ){
			ds_main_painprcpinfo_painprcplist.setColumn(e.row, "status", "-");
		}else{
			ds_main_painprcpinfo_painprcplist.setColumn(e.row, "status", "I");
		}
	}
}

/****************************************************************************************
 * Components		: Button
 * Components ID	: button1
 * Event			: onclick
 * Argument			: 01.obj	: Object Event has occurred
 *					: 02.e		: Event Object
 * Description		: 확인버튼 클릭시
 ****************************************************************************************/
function group5_button1_onclick(obj:Button,  e:ClickEventInfo)
{
	wincloseButton = true;

	opener.frmf_setParameter("SMMNW04800_PARAM", "Y");
	
	var PainPrcpInfoHeader = "status◆pid◆indd◆cretno◆pncdseq◆prcpdd◆prcpno◆prcphistno■";
	var PainPrcpInfoData = "";
	
	var ParamPainPrcpNm = "";
	var PainPrcpNm = "";
	var Status = "";
	var Chk = "";
	
	for( var i=0 ; i<ds_main_painprcpinfo_painprcplist.rowcount ; i++ ){		
		Status = ds_main_painprcpinfo_painprcplist.getColumn(i, "status");
		Chk = ds_main_painprcpinfo_painprcplist.getColumn(i, "chk");
	
		//통증관리 처방기준자료 저장데이터
		if (Status == "I" || Status == "D") {
			PainPrcpInfoData +=  utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "status"))	+"◆"	
							+ utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "pid"))					+"◆"	
							+ utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "indd"))					+"◆"	
							+ utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "cretno"))				+"◆"	
							+ utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "pncdseq"))			+"◆"	
							+ utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "prcpdd"))				+"◆"	
							+ utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "prcpno"))				+"◆"	
							+ utlf_transNullToEmpty(ds_main_painprcpinfo_painprcplist.getColumn(i, "prcphistno"))			+"■";
		}
			
		//통증관리기록 약물중재명 저장데이터
		if (Chk == "1") {
			PainPrcpNm = ds_main_painprcpinfo_painprcplist.getColumn(i, "prcpnm");
			if ( !utlf_isNull(ParamPainPrcpNm) ) {
				ParamPainPrcpNm = ParamPainPrcpNm + "," +  PainPrcpNm;
			} else {
				ParamPainPrcpNm = PainPrcpNm;
			}
		}
	}
	if( utlf_isNull(ParamPainPrcpNm) ){
		ParamPainPrcpNm = "-";
	}

	opener.frmf_setParameter("SPMNW13900_PARAMPainPrcpInfo", PainPrcpInfoHeader + PainPrcpInfoData);
	opener.frmf_setParameter("SPMNW13900_PARAMPainPrcpNm", ParamPainPrcpNm);

	opener.frmf_setParameter("SPMNW13900_PARAUPFLAG", ds_upflag.getColumn(0, "upflag"));
	
	close();
}
]]></Script>
  </Form>
</FDL>