资源描述：
《oracle数据库-plsql使用方法整理》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。
1、Oracle数据库-PLSQL使用方法整理Oracle数据库-PL/SQL使用方法整理 --获取系统记录行数 go_block(’T_WARITEMPRT’); last_record; row_count:=:system.trigger_record;--system.cursor_record --execute_trigger(’POST-CHANGE’); --设置鼠标状态 set_application_property(cursor_style,’BUSY’); --raiseform_tr
2、igger_failure; --显示错误信息 exceptionwhenothersthen display_note(sqlerrm
3、
4、sqlcode,:global.logon_user); --decode decode(a.freightmode,’0’,’企业自付’,’1’,’供应商付费’,’2’,’企业代付’,’3’,’供应商代付’,null) decode(qtyonhand-qtyinit,invtranqty,invtranqty,null) --导出路径 select*fromt_p
5、arameterwheref_name=’LeanERPTempDir’; selectf_c_valuefromt_parameterwheref_name=’WebServer1’; --合同附件 selectf_c_valuefromt_parameterwheref_name=’purorderaccesspath’; selectf_c_valuefromt_parameterwheref_name=’purorderaccessurl’; --设置值列表 SET_ITEM_PROPERTY(’to
6、p.ORIGINALNO’,LOV_NAME,’LOV_MSO’); LIST_VALUES; --下拉列表 n:=populate_group(’rec_lb’); populate_list(’BLK_BUT.APPTYPE’,’rec_lb’); :bLK_BUT.APPTYPE:=’0’; --调用另一模块 DECLARE pl_idParamList; v_stringvarchar2(1000); v_itemnamevarchar2(1000); BEGIN pl_id:=Get_P
7、arameter_List(’calendar’); IFNOTId_Null(pl_id)THEN Destroy_Parameter_List(pl_id); ENDIF; pl_id:=Create_Parameter_List(’calendar’); v_itemname:=:system.current_block
8、
9、’.’
10、
11、:system.current_item; v_string:=name_in(v_itemname); Add_Parameter(pl_id,’p_str’,TEXT
12、_PARAMETER,v_string); Call_Form(’input_str’,no_hide,no_replace,no_query_only,pl_id); copy(:global.str,v_itemname);Erase(:global.str); END; --批量处理 set_application_property(cursor_style,’BUSY’); SYNCHRONIZE; first_record; loop null; exitwhen:system.last_r
13、ecord=’TRUE’; next_record; endloop; set_application_property(cursor_style,’DEFAULT’); bell; display_note(’SRMP035’,:global.logon_user); --采购计划关闭完毕! --对话框 IFdisplay_stop(’INV081’,:GLOBAL.logon_user)<>alert_button1THEN RETURN; ENDIF; --取得货币名称 begin sel
14、ectcurrencydesc intov_currencydesc fromt_currency wherecurrencycode=c1.splymoneyflag; exceptionwhenothersthenv_currencydesc:=’人民币(元)’; end; --询问对话框-1 de
