YNU_JEUS/app_home/himed/xpapps/emr/medirecxp/xp/SPMMR09000.xjs

<?xml version="1.0" encoding="utf-8"?>
<Script type="xscript4.0"><![CDATA[function fInit() {

	ds_cond.setColumn(0,"cond1", opener.parent.ds_data_paminfo.getColumn(0,"pid"));
	ds_cond.setColumn(0,"cond2", utlf_getNewDate().getAddDate(-6, "M").getDateFormat("YYYYMMDD"));
	ds_cond.setColumn(0,"cond3", "0");        //처방권한 구분
	ds_cond.setColumn(0,"cond4", utlf_getCurrentDate());              //처방일자				
	ds_cond.setColumn(0,"cond5", "bfprcp");              //전처방 where 조건 구분자				
	ds_cond.setColumn(0,"cond6", "" );            //최초구분
	ds_cond.setColumn(0,"cond7", opener.parent.ds_data_paminfo.getColumn(0,"orddrid"));
	ds_cond.setColumn(0,"cond8", utlf_getCurrentDate());//parent.opener.opener.model.getValue(vPath + "/orddd"));
	ds_cond.setColumn(0,"cond9", opener.parent.ds_data_paminfo.getColumn(0,"ordtype"));
	ds_cond.setColumn(0,"cond10", opener.parent.ds_data_paminfo.getColumn(0,"orddeptcd"));
	ds_cond.setColumn(0,"cond11", opener.parent.ds_data_paminfo.getColumn(0,"cretno"));	
	ds_cond.setColumn(0,"cond97", "fromto");
	ds_cond.setColumn(0,"cond98", opener.parent.ds_data_paminfo.getColumn(0,"hngnm"));	

/*
	ds_cond.setColumn(0,"cond1", parent.opener.opener.ds_main_paminfo.getColumn(0,"pid"));
	ds_cond.setColumn(0,"cond2", utlf_getNewDate().getAddDate(-6, "M").getDateFormat("YYYYMMDD"));
	ds_cond.setColumn(0,"cond3", "0");        //처방권한 구분
	ds_cond.setColumn(0,"cond4", utlf_getCurrentDate());              //처방일자				
	ds_cond.setColumn(0,"cond5", "bfprcp");              //전처방 where 조건 구분자				
	ds_cond.setColumn(0,"cond6", "" );            //최초구분
	ds_cond.setColumn(0,"cond7", parent.opener.opener.ds_main_paminfo.getColumn(0,"orddrid"));
	ds_cond.setColumn(0,"cond8", utlf_getCurrentDate());//parent.opener.opener.model.getValue(vPath + "/orddd"));
	ds_cond.setColumn(0,"cond9", parent.opener.opener.ds_main_paminfo.getColumn(0,"ordtype"));
	ds_cond.setColumn(0,"cond10", parent.opener.opener.ds_main_paminfo.getColumn(0,"orddeptcd"));
	ds_cond.setColumn(0,"cond11", parent.opener.opener.ds_main_paminfo.getColumn(0,"cretno"));	
	ds_cond.setColumn(0,"cond97", "fromto");
	ds_cond.setColumn(0,"cond98", parent.opener.opener.ds_main_paminfo.getColumn(0,"hngnm"));	
*/
	fGetPrcpList();
	
}
/**
 * @desc   :환자처방정보 가져오기
 * @id     :
 * @event  : onclick
 * @return : void
 * @authur : 박종훈
 */
 function fGetPrcpList() {
//  	grd_prcplist.redraw();
//     var pageInfo = new PAGEINFO();
	var prcpdd = utlf_getCurrentDate();
    
	var curprcpdd = opener.parent.objects["ds_init"] != null ? opener.parent.ds_init.getColumn(0,"prcpdd") : "";
	if(utlf_isNull(curprcpdd)) {
		curprcpdd = opener.objects["ds_init"] != null ? opener.ds_init.getColumn(0,"prcpdd") : "";
		if (utlf_isNull(curprcpdd)){
			curprcpdd = utlf_getCurrentDate();
		}
	}
    
    var insukind = opener.parent.ds_data_paminfo.getColumn(0,"insukind");
	
	if (utlf_isNull(insukind)) {
		insukind = ds_paminfo.getColumn(0,"insukind");
	}
	
	if (!utlf_isNull(insukind)){
		ds_cond.setColumn(0,"cond13", insukind );        //외래follow up
	}
	
	ds_cond.setColumn(0,"cond14", curprcpdd );
	ds_cond.setColumn(0,"cond99", "getBfPrcpSrchInfo" );//검색구분
		
    //처방정보 가져오기(퇴원처방 prcpkindcd = 60)
    var oParam = {};
		oParam.id          = "TRMMO00100";
		oParam.service     = "prcpmngtapp.PrcpMngt";
		oParam.method      = "reqGetPrcpSrchInfo";
		oParam.inds        = "req=ds_cond";
		oParam.outds       = "ds_prcpsrch_prcplist=prcplist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMO00100";

	tranf_submit(oParam);
	
    if(arErrorCode.pop("TRMMO00100") > -1) {
    	var iCols = grd_prcplist.getCellCount("Head")-1;
    	for (var i = 0; i < ds_prcpsrch_prcplist.rowcount; i++) {
    		
    		if (utlf_isNull(ds_prcpsrch_prcplist.getColumn(i,"prcpclscd"))) {
    			if (ds_cond.getColumn(0,"cond9") != "O") {
    				ds_prcpsrch_prcplist.setColumn(i,"tempcol6", ds_prcpsrch_prcplist.getColumn(i,"tempcol6")+" / " +ds_prcpsrch_prcplist.getColumn(i,"tempcol7"));
    			}
    			ds_prcpsrch_prcplist.setColumn(i, "bFont", "bold");
    			ds_prcpsrch_prcplist.setColumn(i, "bReadOnly", 0);
    			//grd_prcplist.isReadonly(i, grd_prcplist.colRef("chkcol"))	= false;
    			//grd_prcplist.mergeByFree(i, 3, i, iCols);
    			//grd_prcplist.rowStyle(i, "data", "font-weight") = "bold";
			} else {
				ds_prcpsrch_prcplist.setColumn(i, "bFont", "");
    			ds_prcpsrch_prcplist.setColumn(i, "bReadOnly", 1);
			//	grd_prcplist.isReadonly(i, grd_prcplist.colRef("chkcol"))	= true;
			}
		}
		
		
    }
}
function cf_TRMMO00100(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
    
    ds_prcpsrch_prcplist.addColumn("bFont", "string", 256);
    ds_prcpsrch_prcplist.addColumn("bReadOnly", "string", 256);
}


/**
 * 선택한 처방 내역 복사 후 창 닫기
 */
 
function fCnfm() {
  //var pageInfo = new PAGEINFO();
  var prcpkind = "";          //처방종류
  var orgprcpnm = "";         //처방명
  var drugmthdspccdnm = "";          //용법
  var prcpdelivefact = "";    //전달사항
  var prcplist = "";
  var prcphistcd = "";        //임시,인증구분
  var prcpclscd = "";
    
  var tmpdrugmthdspccdnm = "";
  var itemCd = "0000080001"; //처방 버튼id에서 가져옴
    
   ds_prcpsrch_prcplist.filter("chkcol == 1 && !utlf_isNull(prcpkindcd) && prcphistcd != 'C' && prcphistcd != 'L' && prcphistcd != 'E'");
   if(ds_prcpsrch_prcplist.rowcount >= 1){
        for(var i = 0; i < ds_prcpsrch_prcplist.rowcount; i++)
        {
            tmpdrugmthdspccdnm = utlf_transNullToEmpty(ds_prcpsrch_prcplist.getColumn(i,"drugmthdspccdnm"));
            prcpkind = ds_prcpsrch_prcplist.getColumn(i,"tempcol13")
            orgprcpnm = utlf_transNullToEmpty(ds_prcpsrch_prcplist.getColumn(i,"tempcol6"));
            drugmthdspccdnm = utlf_transNullToEmpty(ds_prcpsrch_prcplist.getColumn(i,"tempcol7"));
            prcpclscd = ds_prcpsrch_prcplist.getColumn(i,"prcpclscd");
            
            //2012.06.08 처방 가져오기 개인 설정 조회 엄영만
            //fGetUserEnvOcsOrdAnsw("/root/send/reqdata", "/root/envinit/getprcpcnt", "033");
            ds_envinit.copyData(emr_getOrderBaseInfo("envinfo"));
				
		    var getprcpcnt = ds_envinit.lookup("qestcd", '033', "answcnt");		
		    
            switch(getprcpcnt)
            {
                case "001" :  // 기본값 용법 삭제
                    drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
                    break;
                    
                case "002" : // 약품처방 용법표시
                    if (prcpclscd != "A2" && prcpclscd != "A4" && prcpclscd != "A6") {
                        drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
                    }
                    break;
               
                default:
                    drugmthdspccdnm = drugmthdspccdnm.replace(tmpdrugmthdspccdnm, "");
                    break;
            }
            
            drugmthdspccdnm = drugmthdspccdnm.replace(/\[급\]|\[일\]|\[본\]|\(집\)|\[home\]|\[임상\]|\[prn\]/g, "");
            prcpdelivefact = ds_prcpsrch_prcplist.getColumn(i,"prcpdelivefact");
            prcphistcd = ds_prcpsrch_prcplist.getColumn(i,"prcphistcd");
            
            if(prcphistcd == "T") {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") {
                    prcplist += "[임] " + orgprcpnm + " " + drugmthdspccdnm + "\n";
                } else {
                    prcplist += "[임] " + orgprcpnm + "\n";
                }
            } else {
                if (prcpclscd == "A2" || prcpclscd == "A4" || prcpclscd == "A6") {
                    prcplist += orgprcpnm + " " + drugmthdspccdnm + " " + "\n";
                }
                else {
                    prcplist += orgprcpnm + "\n";
                }
            }
        }
    }
	
	var nFindRow = opener.ds_data_recitem.findRow("fstlevlitemcd", itemCd);
	var prerec = opener.ds_data_recitem.getColumn(nFindRow, "reccnts");
    if (!utlf_isNull(prerec)) {
        prerec = prerec + "\n" + prcplist + "\n";
    }
    else {
        prerec = prcplist + "\n";
    }
	
	dsf_createDsRow("ds_cond_TRMMR00301", [{col:"pid", type:"string", size:"256", val:ds_cond.getColumn(0, "cond1")}]);
	
	dsf_createDs("ds_data_resvlist", [{col:"pid", type:"string", size:"256"}
										, {col:"orddd", type:"string", size:"256"}
										, {col:"cretno", type:"DECIMAL", size:"256"}
										, {col:"ordtm", type:"string", size:"256"}
										, {col:"orddeptcd", type:"string", size:"256"}
										, {col:"orddeptnm", type:"string", size:"256"}
										, {col:"orddrid", type:"string", size:"256"}
										, {col:"orddrnm", type:"string", size:"256"}
										, {col:"dutdeptcd", type:"string", size:"256"}]);
	

	var oParam = {};
		oParam.id          = "TRMMR00301";
		oParam.service     = "medirecapp.ComnMediRec";
		oParam.method      = "reqGetResvList";
		oParam.inds        = "req=ds_cond_TRMMR00301";
		oParam.outds       = "ds_data_resvlist=resvlist";
		oParam.async       = false;
		oParam.callback    = "cf_TRMMR00301";

	tranf_submit(oParam);

	if (arErrorCode.pop("TRMMR00301") > -1) {
		
		var resvinfo;

		if (ds_data_resvlist.rowcount > 0) {
			resvinfo = "진료예약 : ";
			var orddd = "";
			var ordtm = "";
			var orddeptnm = "";
			var orddrnm = "";

			for (var i = 0; i < ds_data_resvlist.rowcount; i++) {
				var orddd = utlf_transNullToEmpty(ds_data_resvlist.getColumn(i, "orddd"));
				var ordtm = utlf_transNullToEmpty(ds_data_resvlist.getColumn(i, "ordtm"));
				var orddeptnm = utlf_transNullToEmpty(ds_data_resvlist.getColumn(i, "orddeptnm"));
				var orddrnm = utlf_transNullToEmpty(ds_data_resvlist.getColumn(i, "orddrnm"));

				if (i == 1) {
					resvinfo += orddd.substr(0, 4) + "-" + orddd.substr(4, 2) + "-"
							 + orddd.substr(6, 2) + " " + ordtm.substr(0, 2) + ":"
							 + ordtm.substr(2, 2) + ", 진료과 : " + orddeptnm + ", 진료의 : " + orddrnm + "\n";
				} else {
					resvinfo += "               " + orddd.substr(0, 4) + "-" + orddd.substr(4, 2) + "-"
							 + orddd.substr(6, 2) + " " + ordtm.substr(0, 2) + ":"
							 + ordtm.substr(2, 2) + ", 진료과 : " + orddeptnm + ", 진료의 : " + orddrnm + "\n";
				}
			}
		} else {
			resvinfo = "";
		}
	}

	if (!utlf_isNull(resvinfo)) {
		prerec += resvinfo;
	}


	//opener.model.setValue(pageInfo.recItemRef + "[fstlevlitemcd='" + itemCd + "']/reccnts", prerec);
	if(!utlf_isNull(prerec))
	{
		var objTextArea	  = opener.ComnFormObj.components["tar_" + itemCd];
		var objDivArea	  = opener.ComnFormObj.components["ivw_" + itemCd];
		
		/*
		if(!utlf_isNull(objDivArea.url))	// careplan에 세팅
		{
			var arrTmp = prerec.split("\n");
			var grdObj = objDivArea.ds_grid_grd_diaglist;
			var nRow = grdObj.rowcount;
			var nNewRow;
			for(var k = 0; k < arrTmp.length; k++)
			{
				if(!utlf_isNull(arrTmp[k]))	// 처방내역이 있으면
				{
					if(utlf_isNull(grdObj.getColumn(nRow - 1, "reccnts4")))
					{
						nNewRow = nRow - 1;
					}
					else
					{
						nNewRow = grdObj.addRow();
						objDivArea.lf_addRecItemOne(nNewRow);	// recitem row 추가
					}
					grdObj.setColumn(nNewRow, "reccnts4", arrTmp[k]);
				}
			}
		}
		else
		{
		*/
			if(nFindRow == -1)
			{
				var nTmpPrntRow = opener.ds_temp_mainrecitem.findRowExpr("fstlevlitemcd == '" + itemCd + "' && degnitemlevlno == '1' && degnitemkind == 'MTX'");
				if(nTmpPrntRow != -1)
				{
					nFindRow = opener.ds_data_recitem.addRow();
					opener.ds_data_recitem.copyRow(opener.ds_data_recitem.rowcount - 1, opener.ds_temp_mainrecitem, nTmpPrntRow);
					 
				}	
			}
			opener.ds_data_recitem.setColumn(nFindRow, "reccnts", prerec);
			objTextArea.value = prerec;
		//}
	}

    
    
    this.close();
    
}

function cf_TRMMR00301(sSvcId, nErrorCode, sErrorMsg) {
    arErrorCode.push(sSvcId, nErrorCode);
}

/**
 * 창 닫기
 */
function fCncl() {
	this.close();
}]]></Script>