帆软以及oracle操作

var itemid=this.getValue();

function iteminfo(str,strsun)

{

var star=str.indexOf(strsun,0);

var len=strsun.length;

var stop=str.indexOf("ㄉ",star+len);

var thevalue=str.substring(star+len,stop);

return thevalue;

};

 var t1=FR.remoteEvaluate("sql(\"rqfhis\",\" select 'ㄉunit'||a.unitname||'ㄉfactor'||a.factor||'ㄉsalesprice'||to_char(charge.salesprice,'fm9990.0000')||'ㄉWHOLESALESPRICE'||to_char(charge.WHOLESALESPRICE,'fm9990.0000')||'ㄉCOSTPRICE'||to_char(charge.COSTPRICE,'fm9990.0000')||'ㄉentname'||ent.EntName||'ㄉitemspec'||b.ItemSpec||'ㄉitemid'||a.itemid||'ㄉunit_c'||charge.PackageUnit||'ㄉ'  from Dict_Charge_Item_PackageUnit a LEFT JOIN DICT_ITEM b ON a.itemid=b.itemid  left join Dict_Enterprise ent on ent.entid=b.ENTID_FACTORY and ent.TypeID='0001' left join dict_item_charge charge  on b.itemid=charge.itemid where a.itemid='"+itemid+"' and unittypeid='000101'\",1,1)");

 var unit=iteminfo(t1,"ㄉunit");

this.options.form.getWidgetByName("unit").setValue(unit);

this.options.form.getWidgetByName("unit_price").setValue('/'+unit);

 var price=iteminfo(t1,"ㄉCOSTPRICE");

this.options.form.getWidgetByName("price").setValue(price);

 var pfprice=iteminfo(t1,"ㄉWHOLESALESPRICE");

this.options.form.getWidgetByName("pfprice").setValue(pfprice);

_g('${sessionID}').verifyAndWriteReport();
location.reload();

_g('${sessionID}').verifyAndWriteReport();

contentPane.setCellValue("E15",null,itemspec);

var note=_g().options.form.getWidgetByName("report0").element.find("td[id^=F1-]").text();

var  sl1=this.getValue();

//var  sl_c=contentPane.getWidgetByName("sl_c").getValue();

_g().getWidgetByName("sl_c").getValue();

//var sl_c=$("td[id^=D7-]").text();

var  sl=sl1*factor+parseInt(sl_c);

//contentPane.getWidgetByName("tot").setValue(tot.toFixed(4));

contentPane.setCellValue("H7",null,tot.toFixed(4));

var PDFactor=contentPane.curLGP.getCellValue("C27");

  contentPane.curLGP.setCellValue("F21",value);

var factor  = contentPane.getWidgetByName("packFactor").getValue();

var cateType=contentPane.curLGP.getCellValue("F5");

       xs = FR.remoteEvaluate("sql(\"rqfhis\",\"select VALUE from Dict_SysConfig where  sysconfigid =\'040204\'\",1,1)");

select t1.ITEMDES,t1.ITEMID,t1.CATEID,t1.ITEMNAME,t1.ITEMSPEC,t1.INPUTSTR,t1.CATETYPEID,t1.USEDID,t1.EXECMODEID,t1.ShowInOrderFlag,t1.ChargeFlag,
t1.StopFlag_In,t1.StopFlag_Out,t1.Disuse,t1.ENTID_FACTORY,t2.YPID,t3.SALESPRICE
from Dict_Item t1 left join DICT_ITEM_MEDICINE t2 on t1.ITEMID = t2.ITEMID
left join DICT_ITEM_CHARGE t3 on t2.ITEMID=t3.ITEMID
where t1.HOSPID = '${hospid}' and t1.CATETYPEID in
(
select CODEID from table (F_G_DICT_CODE(PHOSPID => '${hospid}', PCODETYPEID =>'000200' ))
where leaf='1' and stopflag='0' and  (select g.configvalue from Bench_Work_Config g where g.benchid='${benchid}' and g.configid='0051') like '%'||codeid||'%')

${if(len(nq) == 0,
if(len(cateid)>0," and t1.CATEID like '" + cateid + "%'"," and 1=2"),
 " and t1.itemname like '"+ cateid +"%'"
)

}

setTimeout( function(){

//5秒后实现的方法写在这个方法里面

}, 5 * 1000 );//延迟5000毫秒

FIND($txt_seach,value("ds1","DICTORDNAME","DICTORDID",$$$))>0

FIND(upper( $txt_seach),

sql("rqfhis","select f_g_pinyin_capital('" +value("ds1","DICTORDNAME","DICTORDID",$$$)+ "') from dual",1,1))>0

      _g().getWidgetByName('report0').gotoPage(1, {

                  dateEditor0:t

      }, 'T');

document.onkeydown = function(event) {

      //监听键盘

      var e = event || window.event || arguments.callee.caller.arguments[0];

      //任何键盘 读取操作员，看看是否有值

      if (!'${=$fine_username}'.length > 0) {

            alert("页面失效，请重新登陆");

            top.window.location = "/webroot/decision/login";

      };

      if (e.keyCode == 13) {

            if ($("[name=PATINAME_TXT]").is(":focus")) {

                  if ($("[name=PATINAME_TXT] input").val() != "") {

                       $("[name=PATINAME_TXT]").find("input").blur();

                       $("[id=fr-btn-SELECT_BTN]").find("button").focus();

                       $("[id=fr-btn-SELECT_BTN]").find("button").click();

                       //_g().getWidgetByName('button4').click();

                       return

                  }

            }          

      }

}

//监听鼠标

$(document).mousedown(function(event) {

      if (!'${=$fine_username}'.length > 0) {

            alert("页面失效，请重新登陆");

            top.window.location = "/webroot/decision/login";

      };

});

var  ctr3 = FR.remoteEvaluate('value("dsitem", "ctr3", "ITEMID","'+itemid+'")');

var  m= FR.remoteEvaluate("sql(\"rqfhis\",\"select f_i_inv_drug_header('"+empid+"' , '"+orgid+"','"+invid+"'  ,'"+inout+"'   ,'"+date+"'   ,'"+note+"'    ,'"+num+"'      ,'"+hospid+"','"+empid_inout+"','1'  ) from dual\",1,1)");

var ordids=FR.remoteEvaluate('VALUE("ds_ordids",1,1)');

       $('[widgetname="BUTTON0"]').show();

_g().getWidgetByName('ordid_txt').setValue(ordids);

FR.Msg.confirm("警告","确定要删除吗？",function(value){

if(value){

              console.log("确定删除");

}else{

       console.log("退出删除");

}

})

查看处方

var s = FR.remoteEvaluate("sql(\"rqfhis\",\"select CONFIGVALUE from BENCH_WORK_CONFIG where BENCHID = '${benchid}' and CONFIGID = '0104'\",1,1)");

var url = "${servletURL}?viewlet=" + s + "&op=write&cfid="+id+"&type="+type;

var $iframe = $("<iframe id='inp1' name='inp1' width='100%' top='0px' height='100%' scrolling='no' frameborder='0'>");

  $iframe.attr("src",url);

var  o = {

       title: "处方",

       width: 500,

       height: 500

};

window.FR.showDialog(o.title, o.width, o.height, $iframe, o);

select replace(wm_concat(name),',','|') from test;

_g().parameterEl.getWidgetByName('patiid').setValue(patiid);

var OrgID_Pl=_g().parameterEl.getWidgetByName('cob1').getValue();

       FR.Msg.toast("填报成功");

var ordids = ordids2.join(',');

setTimeout(function() {

}, 100);

双引号

  var  m= FR.remoteEvaluate("sql(\"rqfhis\",\" update PATI_OUT_ORDER set orddes='皮示(+)',PSEMPID='"+psempid+"' where  EMPID_CANC='0' and USAGEID='皮试' and  ordtypeid='01' and ORDID='"+ordid+"' \",1,1)");

     _g().getWidgetByName('report0').gotoPage(1, {

       }, 'T');

       //location.reload();

单引号：

var t = FR.remoteEvaluate('sql("rqfhis","delete DIAGNOSISRESULT   where SERIALNUMBER=\''+serialnumber+'\'AND TYPEID=\''+typeid+'\' and CONTENTID=\''+contentid+'\'",1,1)');

CREATE OR REPLACE PROCEDURE test 

AS 

BEGIN 

    update MY_TIME_TEST1 set discript = '6' where discript = '1' ; 

    If sql%rowcount>1  then  --上面update影响行数>1就插入到my_time_test1  

    insert into MY_TIME_TEST1 values(sysdate,'7'); 

    end if; 

END; 

_g().parameterCommit();

setTimeout(function(){

       $("#REPORT0").css('overflow-x','hidden');

       },100);

f_g_pkidnum(po.hospid,po.empid_input,po.ordid)

select i.ITEMNAME||' '|| item.ITEMSPEC||'-'

                                                 ||case  SUBSTR(i.PerdosageQuantity, 1, 1)  when '.' then '0'||i.PerdosageQuantity||i.DosageUnit else TO_CHAR(i.PerdosageQuantity)||i.DosageUnit end  itemname

                from pati_in_order_item i

                                                 LEFT JOIN dict_item item on item.ITEMID=i.ITEMID

                where

                  i.showinorderflag = 1   and i.itemname like '%氯化钾%'

select decode(substr(a.UNITQUANTITY,1,1),'.','0'||a.UNITQUANTITY,a.UNITQUANTITY) from table_name

contentPane.setCellValue("K"+rol,null,SalesPrice);//设置值给其他单元格获取不到的时候，可以在填报中使用公式直接获取value("itemC","SalesPrice","itemid",I5,1,1)

var i2 = str.indexOf("S"); //4

str.substring(0, str.indexOf(","))

__cutpage__   ：v

var xj = _g().options.form.getWidgetByName("settle").element.find("td[id^=I6-]").text();

数据集写法：  ${IF(len($cattype2)>0," and im.CATETYPEID in ('"+ JOINARRAY($cattype2,"','")+"') "," ")}

case when t.itemxml is null then '' else xmltype(t.itemxml).extract('/data/tczc/text()').getstringval() end as tczc

regexp_substr(to_char(t5.des),'[^|]+',1,44)

/usr/local/his/tomcat/webapps/webroot/WEB-INF/reportlets

语法格式：row_number() over(partition by 分组列 order by 排序列 desc)

row_number() over()分组排序功能：

在使用 row_number() over()函数时候，over()里头的分组以及排序的执行晚于 where 、group by、  order by 的执行。

//$("#frozen-center").css("overflow","auto visible");

setTimeout(function() {   //鼠标经过 

    $(".x-table tr").mousemove(function() { 

         $(this).css("background-color","Cyan"); 

    }); 

    //鼠标点击 

    $(".x-table tr").mousedown(function() { 

        $(this).css("background-color","yellow"); 

    }); 

    //鼠标离开 

    $(".x-table tr").mouseout(function() { 

    //所在行背景色:白色 

        $(this).css("background-color","white"); 

    })

},1000);

window.parent._g().parameterCommit();

window.parent.FR.closeDialog();

window.parent.FR.distroyDialog();

var Widget = _g().getWidgetByName('rHIframe0');

Widget.setValue(url);

setTimeout(function() {

    parent.window.location = FR.cjkEncode("${servletURL}?viewlet=suntest1.cpt");

}, 1000);

var sid='${=$sid}'

$.ajax({

 url: '/webroot/decision/view/report?op=fr_dialog&cmd=parameters_d',

 type: 'POST',

 data: {

 },

 headers: {

  sessionID: sid // 参数session传递值sessionID

 },

 complete: function(res, status) {

  if (window.FR && FR.Chart && FR.Chart.WebUtils) {

   FR.Chart.WebUtils.clearCharts();

  }

  parent._g().loadContentPane();

 }

});

刷新本页：：

var sid='${=$sessionID}';

$.ajax({

 url: '/webroot/decision/view/report?op=fr_dialog&cmd=parameters_d',

 type: 'POST',

 data: {

 },

 headers: {

  sessionID: sid // 参数session传递值sessionID

 },

 complete: function(res, status) {

  if (window.FR && FR.Chart && FR.Chart.WebUtils) {

   FR.Chart.WebUtils.clearCharts();

  }

  _g().loadContentPane();

 }

});

encodeURIComponent(dqdaystr)     

//下拉框回车选择
//$(&apos;.parameter-container-collapseimg-up&apos;).remove();
$("#frozen-center").css("overflow", "auto visible");
setTimeout(function() { //鼠标经过 
$(".x-table tr").mousemove(function() {
$(this).css("background-color", "Cyan");
});
//鼠标点击  
$(".x-table tr").mousedown(function() {
$(this).css("background-color", "yellow");
});
//鼠标离开  
$(".x-table tr").mouseout(function() {
//所在行背景色:白色  
$(this).css("background-color", "white");
});
}, 1000);

//隐藏tools
timer = setTimeout(function () {
var zt=_g().parameterEl.getWidgetByName(&apos;zt&apos;).getValue();
if (zt == "0") {
contentPane.toolbar.options.items[2].setEnable(true);
contentPane.toolbar.options.items[3].setEnable(true);
contentPane.toolbar.options.items[4].setEnable(false);
contentPane.toolbar.options.items[5].setEnable(true);
};

contentPane.toolbar.options.items[5].setEnable(true);

this.setVisible(false);

window.location = FR.cjkEncode("${servletURL}?viewlet=suntest2.cpt");

select codeid,codename,ctr9 from table (F_G_DICT_CODE(PHOSPID => '1010', PCODETYPEID =>'000247' ))

where leaf='1' and stopflag='0'

select t2.username,t2.sid,t2.serial#,t2.logon_time 

   from v$locked_object t1,v$session t2 

   where t1.session_id=t2.sid order by t2.logon_time

alter system kill session '11,28049';

var yburl = '${=$nmyburl}'; //直接用

var hospid = '${=$hospid}';

var empid = '${=$fine_username}'; //empid

var t = '{"ybjg":"'+ybjg+'","hospid":"'+hospid+'","ybtype":"'+ybtype+'","empid":"'+empid+'"}';

var url = yburl+"method=qd&inparams="+t

jsObj.yburl = url;

var result = JSON.parse(jsObj.getYbResult());

FR.Msg.toast(result.Message);

SELECT REGEXP_SUBSTR ('1|2|3,23|22|21,33|32|31', '[^,]+', 1,rownum)

from dual connect by rownum<=LENGTH ('1|2|3,23|22|21,33|32|31') - LENGTH (regexp_replace('1|2|3,23|22|21,33|32|31', ',', ''))+1;

span.linkspan:hover {font-size: 130%;font-weight:bold;}

span.linkspan:active{font-weight:bold;}