YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO00710_구두처방확인.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO00710" position="absolute 0 0 1000 460" titletext="구두처방확인" oninit="SPMMO00710_oninit" onload="SPMMO00710_onload">
    <Layouts>
      <Layout>
        <Grid position="absolute 7 21 993 430" id="grd_prcplist" taborder="1" binddataset="ds_grd_prcplist">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="35"/>
                <Column size="120"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="70"/>
                <Column size="80"/>
                <Column size="250"/>
                <Column size="40"/>
                <Column size="35"/>
                <Column size="35"/>
                <Column size="35"/>
                <Column size="40"/>
                <Column size="40"/>
                <Column size="106"/>
                <Column size="40"/>
                <Column size="60"/>
                <Column size="120"/>
                <Column size="70"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell displaytype="checkbox" edittype="checkbox"/>
                <Cell col="1" text="처방일시"/>
                <Cell col="2" text="처방의"/>
                <Cell col="3" text="입력자"/>
                <Cell col="4" text="환자번호"/>
                <Cell col="5" text="환자명"/>
                <Cell col="6" text="처방코드"/>
                <Cell col="7" text="처방명"/>
                <Cell col="8" colspan="2" text="1회용량" taborder="undefined"/>
                <Cell col="10" colspan="2" text="1회수량" taborder="undefined"/>
                <Cell col="12" text="횟수"/>
                <Cell col="13" text="일수"/>
                <Cell col="14" text="용법/검체"/>
                <Cell col="15" text="전달"/>
                <Cell col="16" text="상태"/>
                <Cell col="17" text="진료과"/>
                <Cell col="18" text="전문의"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="checkbox" text="bind:ableyn" expr="expr:(ableyn == &quot;Y&quot; || ableyn == 1) ? 1 : 0"/>
                <Cell col="1" text="bind:rgstdt" mask="expr:utlf_isNull(rgstdt) ? &quot;&quot; : &quot;####-##-## ##:##:##&quot;"/>
                <Cell col="2" text="bind:rgstridnm"/>
                <Cell col="3" text="bind:fstrgstrnm"/>
                <Cell col="4" text="bind:pid"/>
                <Cell col="5" text="bind:hngnm"/>
                <Cell col="6" displaytype="normal" edittype="none" text="bind:prcpcd"/>
                <Cell col="7" style="align:left middle;" text="bind:prcpnm"/>
                <Cell col="8" text="bind:drprcpetc7"/>
                <Cell col="9" text="bind:prcpvolunitnm"/>
                <Cell col="10" text="bind:drprcpetc8"/>
                <Cell col="11" text="bind:prcpqtyunitnm"/>
                <Cell col="12" text="bind:prcptims"/>
                <Cell col="13" text="bind:prcpdayno"/>
                <Cell col="14" displaytype="normal" edittype="none" style="align:left middle;" text="bind:drugmthdspccdnm"/>
                <Cell col="15" text="bind:prcpdelivefact"/>
                <Cell col="16" displaytype="combo" style="align:center;" text="bind:prcpstatcd" combodataset="ds_M0011" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="17" style="align:left middle;" text="bind:orddeptnm"/>
                <Cell col="18" text="bind:orddrnm"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape position="absolute 7 17 992 18" linetype="vertical" id="line5" class="line_1"/>
        <Static text="구두처방확인" position="absolute 12 0 183 13" id="caption1" class="tit_2"/>
        <Button position="absolute 800 435 933 457" id="btn_conf" class="btn4" visible="true" text="구두처방 인증저장" onclick="btn_conf_onclick"/>
        <Button position="absolute 939 435 995 457" id="btn_close" class="btn4" visible="true" text="닫기" onclick="btn_close_onclick"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_grd_prcplist" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" reversesubsum="false" oncolumnchanged="ds_grd_prcplist_oncolumnchanged">
        <ColumnInfo>
          <Column id="ableyn" type="STRING" size="256" sumtext="확인가능여부"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관기호"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="prcpno" type="STRING" size="256" sumtext="처방번호"/>
          <Column id="prcphistno" type="STRING" size="256" sumtext="처방이력번호"/>
          <Column id="orddeptcd" type="STRING" size="256" sumtext="진료과코드"/>
          <Column id="orddeptnm" type="STRING" size="256" sumtext="진료과"/>
          <Column id="orddrid" type="STRING" size="256" sumtext="주치의"/>
          <Column id="orddrnm" type="STRING" size="256" sumtext="주치의명"/>
          <Column id="pid" type="STRING" size="256" sumtext="환자번호"/>
          <Column id="hngnm" type="STRING" size="256" sumtext="성명"/>
          <Column id="prcpstatcd" type="STRING" size="256" sumtext="처방상태코드"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpvolunitnm" type="STRING" size="256" sumtext="처방용량단위명"/>
          <Column id="prcpqtyunitnm" type="STRING" size="256" sumtext="처방수량단위명"/>
          <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
          <Column id="drugmthdspccdnm" type="STRING" size="256" sumtext="투여방법검체코드명"/>
          <Column id="prcpdelivefact" type="STRING" size="256" sumtext="전달사항"/>
          <Column id="rgstdt" type="STRING" size="256" sumtext="등록일시"/>
          <Column id="rgstridnm" type="STRING" size="256" sumtext="처방의명"/>
          <Column id="fstrgstrnm" type="STRING" size="256" sumtext="입력자명"/>
          <Column id="drprcpetc7" type="STRING" size="256" sumtext="의사처방기타7"/>
          <Column id="drprcpetc8" type="STRING" size="256" sumtext="의사처방기타8"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="instcd" 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="원무접수번호"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
    </Objects>
    <Script type="xscript4.0"><![CDATA[/***************************************************************************************  
 * System Name		:	
 * Job Name 		:	
 * Creator 	    :	
 * Make Date 		:	2014-09-01
 * Description  	:	                                                                   
 *--------------------------------------------------------------------------------------- 
 * Modify Date     	Modifier  	  Modify Description                                   
 *--------------------------------------------------------------------------------------- 
 * 2014-09-01      Live Converter   TF->XP                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/
include "com_commonxp::comm_main.xjs";
include "emr_prcpmngtxp::MMO001.xjs";
function SPMMO00710_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	
	try {
		ds_send.copyData(arg_ds_send);
	} catch(e) {}
	
}

function SPMMO00710_onload(obj:Form, e:LoadEventInfo)
{
	grdf_initGrid(grd_prcplist);
	grdf_setToolTipBind(grd_prcplist);
	
	appf_getCodeList([{dsNm: "ds_M0003", cdGrpId: "M0003"}
	                , {dsNm: "ds_M0005", cdGrpId: "M0005"}
	                , {dsNm: "ds_M0011", cdGrpId: "M0011"}
					, {dsNm: "ds_M0029", cdGrpId: "M0029"}
					, {dsNm: "ds_M0037", cdGrpId: "M0037"}], true);
					
	var oParam = {};
		oParam.id          = "TRMMO00711";
		oParam.service     = "prcpmngtapp.PrcpMngt";
		oParam.method      = "reqGetTellPrcpConfList";
		oParam.inds        = "req=ds_send";
		oParam.outds       = "ds_grd_prcplist=prcplist";
		oParam.async       = false;

	tranf_submit(oParam);					
	
	if(sysf_getUserInfo("dutplceinstcd") == "031" && utlf_getCurrentDate() < "20180116") {
		sysf_messageBox ( "현재 구두처방 건 수가 지속적으로 증가함에 따라 환자 안전에 심각한 위험이 예상되어\n\n향후 prn 처방 가능 목록은 구두처방 불가능 하도록 전산 제어할 예정이오니\n\n평상 시 prn 처방을 지침에 맞도록 적극 활용해 주시기 바랍니다.\n\n진료지원실장-양동헌", "I" );
	}
}

function btn_close_onclick(obj:Button,  e:ClickEventInfo)
{
	close();
}

function btn_conf_onclick(obj:Button,  e:ClickEventInfo)
{
	var nFindRow = ds_grd_prcplist.findRowExpr("ableyn == 'Y'");
	if (nFindRow < 0) {
		sysf_messageBox("선택 된 구두처방이 없습니다.", "E999");
		return;
	}
	
	var oParam = {};
    oParam.id          = "TXMMO00711";
    oParam.service     = "prcpmngtapp.EtcPrcpMngt";
    oParam.method      = "reqExeConfTellPrcp";
    oParam.inds        = "req=ds_grd_prcplist";
    oParam.outds       = "";
    oParam.async       = false;
    
    tranf_submit(oParam);		
    
    close();
}

function ds_grd_prcplist_oncolumnchanged(obj:Dataset, e:DSColChangeEventInfo)
{
	if(e.columnid == "ableyn")
		obj.setColumn(e.row, e.columnid, (e.newvalue == "Y" || e.newvalue == 1) ? "Y" : "N");
}
]]></Script>
  </Form>
</FDL>