YNU_JEUS/app_home/himed/xpapps/emr/prcpmngtxp/xp/SPMMO01001_외래예약처방입원전환.xfdl

<?xml version="1.0" encoding="utf-8"?>
<FDL version="1.5">
  <TypeDefinition url="..\..\..\default_typedef.xml"/>
  <Form id="SPMMO01000" position="absolute 0 0 890 392" titletext="외래예약처방 입원전환" oninit="SPMMO01000_oninit" onload="SPMMO01000_onload">
    <Layouts>
      <Layout>
        <Grid position="absolute 0 0 890 366" id="grd_prcplist" taborder="1" binddataset="ds_initsrch_rsrvcvrtprcp" autofittype="col">
          <Formats>
            <Format id="default">
              <Columns>
                <Column size="29"/>
                <Column size="68"/>
                <Column size="110"/>
                <Column size="72"/>
                <Column size="0"/>
                <Column size="72"/>
                <Column size="55"/>
                <Column size="253"/>
                <Column size="30"/>
                <Column size="30"/>
                <Column size="30"/>
                <Column size="133"/>
              </Columns>
              <Rows>
                <Row size="24" band="head"/>
                <Row size="24"/>
              </Rows>
              <Band id="head">
                <Cell/>
                <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" text="수량"/>
                <Cell col="9" text="횟수"/>
                <Cell col="10" text="일수"/>
                <Cell col="11" text="예약일시"/>
              </Band>
              <Band id="body">
                <Cell displaytype="checkbox" edittype="expr:isReadonly(currow, &quot;choiflag&quot;) ? &quot;none&quot; : &quot;checkbox&quot;" style="controlbackground:EXPR(isReadonly(currow, &quot;choiflag&quot;) ? &quot;silver&quot; : &quot;default&quot;);controlborder:EXPR(isReadonly(currow, &quot;choiflag&quot;) ? &quot;1 solid #708090cc&quot; : &quot;default&quot;);" text="bind:choiflag" expr="expr:(choiflag == &quot;Y&quot; || choiflag == 1) ? 1 : 0"/>
                <Cell col="1" displaytype="date" text="bind:prcpdd"/>
                <Cell col="2" text="bind:depthngnm"/>
                <Cell col="3" text="bind:usernm"/>
                <Cell col="4" displaytype="combo" edittype="combo" text="bind:prcpclscd"/>
                <Cell col="5" displaytype="combo" edittype="combo" text="bind:prcpclscd" combodataset="ds_init_prcpclscd" combocodecol="cdid" combodatacol="cdnm"/>
                <Cell col="6" text="bind:prcpcd"/>
                <Cell col="7" text="bind:prcpnm"/>
                <Cell col="8" text="bind:prcpqty" mask="#.###"/>
                <Cell col="9" text="bind:prcptims"/>
                <Cell col="10" text="bind:prcpdayno"/>
                <Cell col="11" displaytype="date" text="bind:rsrvdt" mask="yyyy-MM-dd hh:mm:ss"/>
              </Band>
            </Format>
          </Formats>
        </Grid>
        <Shape position="absolute 7 0 890 1" linetype="vertical" id="line5" class="line_1"/>
        <Button position="absolute 774 372 830 392" id="button1" class="btn4" text="저장" onclick="button1_onclick"/>
        <Button position="absolute 834 372 890 392" id="button2" class="btn4" text="취소" onclick="button2_onclick"/>
        <Static text="외래 예약처방 입원전환은 해당 진료과 처방만 가능합니다." position="absolute 0 372 400 392" id="caption4"/>
      </Layout>
    </Layouts>
    <Objects>
      <Dataset id="ds_paminfo" 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="orddd" type="STRING" size="256"/>
          <Column id="cretno" type="STRING" size="256"/>
          <Column id="instcd" type="STRING" size="256"/>
          <Column id="prcpdd" type="STRING" size="256"/>
          <Column id="deptcd" type="STRING" size="256"/>
          <Column id="userid" type="STRING" size="256"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_init" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="prcpkindcd" type="STRING" size="256"/>
          <Column id="prcpclscd" type="STRING" size="256"/>
          <Column id="prcpstatcd" type="STRING" size="256"/>
          <Column id="hosinprcpresncd" type="STRING" size="256"/>
          <Column id="payflagcd" type="STRING" size="256"/>
          <Column id="orddept" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_initsrch" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="rsrvcvrtprcp" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_initsrch_rsrvcvrtprcp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false" oncolumnchanged="ds_initsrch_rsrvcvrtprcp_oncolumnchanged">
        <ColumnInfo>
          <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="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
          <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
          <Column id="prcpgenrflag" type="STRING" size="256" sumtext="처방발생구분"/>
          <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
          <Column id="execprcpno" type="STRING" size="256" sumtext="실시처방번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="actorddd" type="STRING" size="256" sumtext="실시진료일자"/>
          <Column id="actcretno" type="STRING" size="256" sumtext="실시생성번호"/>
          <Column id="execprcpqty" type="STRING" size="256" sumtext="실시처방수량"/>
          <Column id="execprcptims" type="STRING" size="256" sumtext="실시처방횟수"/>
          <Column id="execprcpdayno" type="STRING" size="256" sumtext="실시처방일수"/>
          <Column id="rsrvdt" type="STRING" size="256" sumtext="예약일시"/>
          <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
          <Column id="choiflag" type="STRING" size="256" sumtext="선택구분"/>
          <Column id="depthngnm" type="STRING" size="256" sumtext="처방과"/>
          <Column id="usernm" type="STRING" size="256" sumtext="처방의"/>
          <Column id="smdeptyn" type="STRING" size="256" sumtext="처방과동일여부"/>
        </ColumnInfo>
      </Dataset>
      <Dataset id="ds_send_cond1" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <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="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="prcpcd" type="STRING" size="256" sumtext="처방코드"/>
          <Column id="prcpnm" type="STRING" size="256" sumtext="처방명"/>
          <Column id="prcpqty" type="STRING" size="256" sumtext="처방수량"/>
          <Column id="prcptims" type="STRING" size="256" sumtext="처방횟수"/>
          <Column id="prcpdayno" type="STRING" size="256" sumtext="처방일수"/>
          <Column id="prcpclscd" type="STRING" size="256" sumtext="처방분류코드"/>
          <Column id="execprcpno" type="STRING" size="256" sumtext="실시처방번호"/>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="actorddd" type="STRING" size="256" sumtext="실시진료일자"/>
          <Column id="actcretno" type="STRING" size="256" sumtext="실시생성번호"/>
          <Column id="execprcpqty" type="STRING" size="256" sumtext="실시처방수량"/>
          <Column id="execprcptims" type="STRING" size="256" sumtext="실시처방횟수"/>
          <Column id="execprcpdayno" type="STRING" size="256" sumtext="실시처방일수"/>
          <Column id="rsrvdt" type="STRING" size="256" sumtext="예약일시"/>
          <Column id="execprcpuniqno" type="STRING" size="256" sumtext="실시처방유일번호"/>
          <Column id="choiflag" type="STRING" size="256" sumtext="선택구분"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_send_cond2" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="pid" type="STRING" size="256" sumtext="등록번호"/>
          <Column id="orddd" type="STRING" size="256" sumtext="진료일자 (입원일 경우 입원일자)"/>
          <Column id="cretno" type="STRING" size="256" sumtext="생성번호"/>
          <Column id="instcd" type="STRING" size="256" sumtext="기관코드"/>
          <Column id="prcpdd" type="STRING" size="256" sumtext="처방일자"/>
          <Column id="deptcd" type="STRING" size="256" sumtext="부서코드"/>
          <Column id="userid" type="STRING" size="256" sumtext="userid"/>
        </ColumnInfo>
        <Rows>
          <Row/>
        </Rows>
      </Dataset>
      <Dataset id="ds_rsrvcvrtprcp" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false"/>
      <Dataset id="ds_init_prcpclscd" firefirstcount="0" firenextcount="0" useclientlayout="false" updatecontrol="true" enableevent="true" loadkeymode="keep" loadfiltermode="keep" reversesubsum="false">
        <ColumnInfo>
          <Column id="cdnm" type="STRING" size="256"/>
          <Column id="cdid" type="STRING" size="256"/>
        </ColumnInfo>
      </Dataset>
    </Objects>
    <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                                           
 *                                                                                        
 *--------------------------------------------------------------------------------------- 
 ****************************************************************************************/

// 20200115 이돈희 : 처방창 오픈시 자동 오픈용

include "com_commonxp::comm_main.xjs";

function SPMMO01000_oninit(obj:Form, e:InitEventInfo)
{
	frmf_initForm(obj);
	ds_initsrch_rsrvcvrtprcp.copyData(arg_ds_initsrch_rsrvcvrtprcp);
	
	var arrParam = [{dsNm: "ds_init_prcpclscd", cdGrpId: "M0005"}]

	appf_getCodeList(arrParam);	

}


function SPMMO01000_onload(obj:Form, e:LoadEventInfo)
{

	//진료과가 다를경우 Checkbox 비활성화
	/*
	for(var i = 0; i < grd_prcplist.rowcount; i++){
		var smdeptyn = ds_initsrch_rsrvcvrtprcp.getColumn(i, "smdeptyn");			//model.getValue("/root/initsrch/rsrvcvrtprcp[" + i + "]/smdeptyn");
		if (smdeptyn == "N") {
			grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'displaytype', 'none');
			grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'edittype', 'none');
		} else {
			grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'displaytype', 'checkbox');
			grd_prcplist.setCellProperty('body', grd_prcplist.getBindCellIndex("body", "choiflag"), 'edittype', 'checkbox');
		}
	}
	*/
}

function button1_onclick(obj:Button,  e:ClickEventInfo)
{
	//var srcNodeList = model.instances(0).selectNodes ("/root/initsrch/rsrvcvrtprcp");	
	//var destNode = model.instances(0).selectSingleNode( "/root/rsrvcvrtprcp" );
	var curitem = 0;
	var chkcnt = 0;
	var nochkcnt = 0;
	
	dsf_copyColInfo(ds_rsrvcvrtprcp, ds_initsrch_rsrvcvrtprcp);

	for ( var i = 0; i < ds_initsrch_rsrvcvrtprcp.rowcount; i++ ) {
		if ( ds_initsrch_rsrvcvrtprcp.getColumn(i, "choiflag") != "Y" ) {
			nochkcnt++;
		} 

		curitem = i - 1;
		chkcnt++;
		var row = ds_rsrvcvrtprcp.addRow();
		ds_rsrvcvrtprcp.copyRow(row, ds_initsrch_rsrvcvrtprcp, i);
		
		//destNode.appendChild(srcNodeList.item(curitem).cloneNode(true));			
		//kimsj app단에서 "Y", "N"에 따라 다른 프로세스로 이동하기 때문에 여기에서 걸러낼 필요없는 것으로 보임	
	}

	if ( chkcnt > 0 ) {
		ds_paminfo.setColumn(0, "pid",    opener.ds_paminfo.getColumn(0, "pid"));
		ds_paminfo.setColumn(0, "orddd",  opener.ds_paminfo.getColumn(0, "indd"));
		ds_paminfo.setColumn(0, "cretno", opener.ds_paminfo.getColumn(0, "cretno"));
		ds_paminfo.setColumn(0, "instcd", opener.ds_paminfo.getColumn(0, "instcd"));
		ds_paminfo.setColumn(0, "prcpdd", opener.ds_init.getColumn(0, "prcpdd"));
		ds_paminfo.setColumn(0, "deptcd", sysf_getUserInfo("dutplcecd"));
		ds_paminfo.setColumn(0, "userid", sysf_getUserInfo("userid"));
		
		for( var j = 0; j < ds_rsrvcvrtprcp.colcount; j++ ) {
			var colId = ds_rsrvcvrtprcp.getColID(j);
			ds_send_cond1.setColumn( 0, colId, ds_rsrvcvrtprcp.getColumn(0, colId) );
		}
		
		for( var j = 0; j < ds_paminfo.colcount; j++ ) {
			var colId = ds_paminfo.getColID(j);
			ds_send_cond2.setColumn( 0, colId, ds_paminfo.getColumn(0, colId) );
		}
		
		if ( nochkcnt > 0 &&  sysf_messageBox ( "체크안된 처방은 승계되지 않습니다. 저장하시겠습니까?", "Q" ) != "6" ) {
			return;
		}

		var oParam = {};
		oParam.id          = "TXMMO01001";
		oParam.service     = "prcpmngtapp.PrcpMngt";
		oParam.method      = "reqExeSaveRsrvPrcpCvrt";
		oParam.inds        = "rsrvcvrtprcp=ds_rsrvcvrtprcp paminfo=ds_paminfo";
		//oParam.outds       = "";
		oParam.async       = false;
		oParam.callback    = "cf_TXMMO01001";

		tranf_submit(oParam);
			
	} else {
		sysf_messageBox ( "선택된 처방이", "I004" );
		return;
	}
	close();
}

function cf_TXMMO01001(sSvcId, nErrorCode, sErrorMsg) {
    if(nErrorCode < 0) return;
    
    opener.frmf_setParameter ( "SPMMO01000_rtnyn", "Y" );		
}

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

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

// TF의 readonly bind 통합처리
function isReadonly(currow, colId) {
	var result = false;

	if(colId == "choiflag") {					// TF bind1
		var smdeptyn = ds_initsrch_rsrvcvrtprcp.getColumn(currow, "smdeptyn");
		if (smdeptyn == "N") {
			result = true;
		}
	}
	return result; 
}	]]></Script>
  </Form>
</FDL>