视图调用存储过程全局变量
2014-03-24 21:05
363 查看
刚学到的一个用法，具体好处不知道，可能是为了满足业务需求的一种实现方法吧，拿来分享下。
FORM：
xxrdc550.SP_SetCurrParameter ( :parameter.org_id,
:query.qINVENTORY_ITEM_ID ,
:query.qPO_HEADER_ID,
:query.qPO_LINE_ID,
:query.qPO_RELEASE_ID,
:query.qPO_LINE_LOCATION_ID,
:query.qCARD_NUMBER,
:query.qTRANSACTION_TYPE,
:query.qRDC_INVENTORY,
:query.qRDC_LOCATION,
:query.QRDC_MANAGER) ;
go_block('XXINV_R_INV_MTL_QUANITY_V');
EXECUTE_QUERY;
存储过程:xxrdc550
create or replace package xxrdc550 is
G_ORGANIZATION_ID Number;
G_INVENTORY_ITEM_ID NUMBER ;
G_PO_HEADER_ID NUMBER;
G_PO_LINE_ID NUMBER;
G_PO_RELEASE_ID NUMBER;
G_PO_LINE_LOCATION_ID NUMBER;
G_CARD_NUMBER VARCHAR2(60);
G_TRANSACTION_TYPE VARCHAR2(60);
G_RDC_INVENTORY VARCHAR2(60);
G_RDC_LOCATION VARCHAR2(60);
G_RDC_MANAGER VARCHAR2(60);
Procedure SP_SetCurrParameter ( P_ORGANIZATION_ID Number,
P_INVENTORY_ITEM_ID NUMBER ,
P_PO_HEADER_ID NUMBER,
P_PO_LINE_ID NUMBER,
P_PO_RELEASE_ID NUMBER,
P_PO_LINE_LOCATION_ID NUMBER,
P_CARD_NUMBER VARCHAR2,
P_TRANSACTION_TYPE VARCHAR2,
P_RDC_INVENTORY varchar2,
P_RDC_LOCATION varchar2,
P_RDC_MANAGER varchar2) ;
Function FN_Get_ORGANIZATION_ID
Return Number;
Function FN_Get_INVENTORY_ITEM_ID
Return Number;
Function FN_Get_PO_HEADER_ID
Return Number;
Function FN_Get_PO_LINE_ID
Return Number;
Function FN_Get_PO_RELEASE_ID
Return Number;
Function FN_Get_PO_LINE_LOCATION_ID
Return Number;
Function FN_Get_CARD_NUMBER
Return VARCHAR2;
Function FN_Get_TRANSACTION_TYPE
Return VARCHAR2;
Function FN_Get_RDC_INVENTORY
Return VARCHAR2;
Function FN_Get_RDC_LOCATION
Return VARCHAR2;
Function FN_Get_RDC_MANAGER
Return VARCHAR2;
end xxrdc550;
/
create or replace package body xxrdc550 is
Function FN_Get_ORGANIZATION_ID
Return Number
Is
Begin
Return G_ORGANIZATION_ID;
End FN_Get_ORGANIZATION_ID;
Function FN_Get_INVENTORY_ITEM_ID
Return Number
Is
Begin
Return G_INVENTORY_ITEM_ID;
End FN_Get_INVENTORY_ITEM_ID;
Function FN_Get_PO_HEADER_ID
Return Number
Is
Begin
Return G_PO_HEADER_ID ;
End FN_Get_PO_HEADER_ID;
Function FN_Get_PO_LINE_ID
Return Number
Is
Begin
Return G_PO_LINE_ID;
End FN_Get_PO_LINE_ID ;
Function FN_Get_PO_RELEASE_ID
Return Number
Is
Begin
Return G_PO_RELEASE_ID;
End FN_Get_PO_RELEASE_ID;
Function FN_Get_PO_LINE_LOCATION_ID
Return Number
Is
Begin
Return G_PO_LINE_LOCATION_ID;
End FN_Get_PO_LINE_LOCATION_ID ;
Function FN_Get_CARD_NUMBER
Return VARCHAR2
Is
Begin
Return G_CARD_NUMBER ;
End FN_Get_CARD_NUMBER;
Function FN_Get_TRANSACTION_TYPE
Return VARCHAR2
Is
Begin
Return G_TRANSACTION_TYPE;
End FN_Get_TRANSACTION_TYPE ;
Function FN_Get_RDC_INVENTORY
Return VARCHAR2
Is
Begin
Return G_RDC_INVENTORY ;
End FN_Get_RDC_INVENTORY;
Function FN_Get_RDC_LOCATION
Return VARCHAR2
Is
Begin
Return G_RDC_LOCATION;
End FN_Get_RDC_LOCATION ;
Function FN_Get_RDC_MANAGER
Return VARCHAR2
Is
Begin
Return G_RDC_MANAGER;
End FN_Get_RDC_MANAGER ;
Procedure SP_SetCurrParameter ( P_ORGANIZATION_ID Number,
P_INVENTORY_ITEM_ID NUMBER ,
P_PO_HEADER_ID NUMBER,
P_PO_LINE_ID NUMBER,
P_PO_RELEASE_ID NUMBER,
P_PO_LINE_LOCATION_ID NUMBER,
P_CARD_NUMBER VARCHAR2,
P_TRANSACTION_TYPE VARCHAR2,
P_RDC_INVENTORY varchar2,
P_RDC_LOCATION varchar2,
P_RDC_MANAGER varchar2)
Is
Begin
G_ORGANIZATION_ID :=P_ORGANIZATION_ID;
G_INVENTORY_ITEM_ID := P_INVENTORY_ITEM_ID;
G_PO_HEADER_ID :=P_PO_HEADER_ID;
G_PO_LINE_ID :=P_PO_LINE_ID;
G_PO_RELEASE_ID :=P_PO_RELEASE_ID;
G_PO_LINE_LOCATION_ID :=P_PO_LINE_LOCATION_ID;
G_CARD_NUMBER :=P_CARD_NUMBER;
G_TRANSACTION_TYPE:= P_TRANSACTION_TYPE;
G_RDC_INVENTORY:=P_RDC_INVENTORY;
G_RDC_LOCATION:=P_RDC_LOCATION;
G_RDC_MANAGER :=P_RDC_MANAGER;
End SP_SetCurrParameter;
End xxrdc550;
/
视图:XXINV_R_INV_MTL_QUANITY_V
CREATE OR REPLACE VIEW XXINV_R_INV_MTL_QUANITY_V AS
SELECT XRT.ORGANIZATION_ID
,XRT.INVENTORY_ITEM_ID
,msi.segment1
,msi.description
,XRT.PRIMARY_UNIT_OF_MEASURE
,sum(XRT.QUANTITY) mtl_count
,xrm.rdc_manager
FROM XXINV_R_RDC_TRANSACTIONS XRT,
mtl_system_items_b msi,
xxinv_r_item_master xrm
where xrt.INVENTORY_ITEM_ID=xrm.inventory_item_id
and xrt.organization_id=xrm.organization_id
and xrm.organization_id=msi.organization_id
and xrm.inventory_item_id=msi.inventory_item_id
AND XRT.ORGANIZATION_ID=XXRDC550.FN_Get_ORGANIZATION_ID
and xrt.inventory_item_id=NVL(XXRDC550.FN_Get_INVENTORY_ITEM_ID,xrt.inventory_item_id)
and xrt.TRANSACTION_TYPE=nvl(xxrdc550.FN_Get_TRANSACTION_TYPE,xrt.transaction_type)
and xrt.po_header_id+0=nvl(xxrdc550.FN_Get_PO_HEADER_ID,xrt.po_header_id)
and NVL(xrt.po_release_id,0)=nvl(xxrdc550.FN_Get_PO_RELEASE_ID,NVL(xrt.po_release_id,0))
and NVL(xrt.po_line_id,0)=nvl(xxrdc550.FN_Get_PO_LINE_ID,NVL(xrt.po_line_id,0))
and NVL(xrt.po_line_location_id,0)=nvl(xxrdc550.FN_Get_PO_LINE_LOCATION_ID,NVL(xrt.po_line_location_id,0))
and NVL(xrt.card_number,'?')=nvl(xxrdc550.FN_Get_CARD_NUMBER,NVL(xrt.card_number,'?'))
and NVL(xrt.rdc_inventory,'?')=nvl(xxrdc550.FN_Get_RDC_INVENTORY,NVL(xrt.rdc_inventory,'?'))
and NVL(xrt.rdc_location,'?')=nvl(xxrdc550.FN_Get_RDC_LOCATION,NVL(xrt.rdc_location,'?'))
and nvl(xrm.rdc_manager,'?')=nvl(xxrdc550.FN_Get_RDC_MANAGER,nvl(xrm.rdc_manager,'?'))
group by XRT.ORGANIZATION_ID
,XRT.INVENTORY_ITEM_ID
,msi.segment1
,msi.description
,XRT.PRIMARY_UNIT_OF_MEASURE
,xrm.rdc_manager;
由FORM调用包xxrdc550的SP_SetCurrParameter的存储过程，在包xxrdc550中定义全局变量，都在存储过程赋值完成，再由FUNCTION返回。视图调用包中的FUNCTION获取返回值。
FORM：
xxrdc550.SP_SetCurrParameter ( :parameter.org_id,
:query.qINVENTORY_ITEM_ID ,
:query.qPO_HEADER_ID,
:query.qPO_LINE_ID,
:query.qPO_RELEASE_ID,
:query.qPO_LINE_LOCATION_ID,
:query.qCARD_NUMBER,
:query.qTRANSACTION_TYPE,
:query.qRDC_INVENTORY,
:query.qRDC_LOCATION,
:query.QRDC_MANAGER) ;
go_block('XXINV_R_INV_MTL_QUANITY_V');
EXECUTE_QUERY;
存储过程:xxrdc550
create or replace package xxrdc550 is
G_ORGANIZATION_ID Number;
G_INVENTORY_ITEM_ID NUMBER ;
G_PO_HEADER_ID NUMBER;
G_PO_LINE_ID NUMBER;
G_PO_RELEASE_ID NUMBER;
G_PO_LINE_LOCATION_ID NUMBER;
G_CARD_NUMBER VARCHAR2(60);
G_TRANSACTION_TYPE VARCHAR2(60);
G_RDC_INVENTORY VARCHAR2(60);
G_RDC_LOCATION VARCHAR2(60);
G_RDC_MANAGER VARCHAR2(60);
Procedure SP_SetCurrParameter ( P_ORGANIZATION_ID Number,
P_INVENTORY_ITEM_ID NUMBER ,
P_PO_HEADER_ID NUMBER,
P_PO_LINE_ID NUMBER,
P_PO_RELEASE_ID NUMBER,
P_PO_LINE_LOCATION_ID NUMBER,
P_CARD_NUMBER VARCHAR2,
P_TRANSACTION_TYPE VARCHAR2,
P_RDC_INVENTORY varchar2,
P_RDC_LOCATION varchar2,
P_RDC_MANAGER varchar2) ;
Function FN_Get_ORGANIZATION_ID
Return Number;
Function FN_Get_INVENTORY_ITEM_ID
Return Number;
Function FN_Get_PO_HEADER_ID
Return Number;
Function FN_Get_PO_LINE_ID
Return Number;
Function FN_Get_PO_RELEASE_ID
Return Number;
Function FN_Get_PO_LINE_LOCATION_ID
Return Number;
Function FN_Get_CARD_NUMBER
Return VARCHAR2;
Function FN_Get_TRANSACTION_TYPE
Return VARCHAR2;
Function FN_Get_RDC_INVENTORY
Return VARCHAR2;
Function FN_Get_RDC_LOCATION
Return VARCHAR2;
Function FN_Get_RDC_MANAGER
Return VARCHAR2;
end xxrdc550;
/
create or replace package body xxrdc550 is
Function FN_Get_ORGANIZATION_ID
Return Number
Is
Begin
Return G_ORGANIZATION_ID;
End FN_Get_ORGANIZATION_ID;
Function FN_Get_INVENTORY_ITEM_ID
Return Number
Is
Begin
Return G_INVENTORY_ITEM_ID;
End FN_Get_INVENTORY_ITEM_ID;
Function FN_Get_PO_HEADER_ID
Return Number
Is
Begin
Return G_PO_HEADER_ID ;
End FN_Get_PO_HEADER_ID;
Function FN_Get_PO_LINE_ID
Return Number
Is
Begin
Return G_PO_LINE_ID;
End FN_Get_PO_LINE_ID ;
Function FN_Get_PO_RELEASE_ID
Return Number
Is
Begin
Return G_PO_RELEASE_ID;
End FN_Get_PO_RELEASE_ID;
Function FN_Get_PO_LINE_LOCATION_ID
Return Number
Is
Begin
Return G_PO_LINE_LOCATION_ID;
End FN_Get_PO_LINE_LOCATION_ID ;
Function FN_Get_CARD_NUMBER
Return VARCHAR2
Is
Begin
Return G_CARD_NUMBER ;
End FN_Get_CARD_NUMBER;
Function FN_Get_TRANSACTION_TYPE
Return VARCHAR2
Is
Begin
Return G_TRANSACTION_TYPE;
End FN_Get_TRANSACTION_TYPE ;
Function FN_Get_RDC_INVENTORY
Return VARCHAR2
Is
Begin
Return G_RDC_INVENTORY ;
End FN_Get_RDC_INVENTORY;
Function FN_Get_RDC_LOCATION
Return VARCHAR2
Is
Begin
Return G_RDC_LOCATION;
End FN_Get_RDC_LOCATION ;
Function FN_Get_RDC_MANAGER
Return VARCHAR2
Is
Begin
Return G_RDC_MANAGER;
End FN_Get_RDC_MANAGER ;
Procedure SP_SetCurrParameter ( P_ORGANIZATION_ID Number,
P_INVENTORY_ITEM_ID NUMBER ,
P_PO_HEADER_ID NUMBER,
P_PO_LINE_ID NUMBER,
P_PO_RELEASE_ID NUMBER,
P_PO_LINE_LOCATION_ID NUMBER,
P_CARD_NUMBER VARCHAR2,
P_TRANSACTION_TYPE VARCHAR2,
P_RDC_INVENTORY varchar2,
P_RDC_LOCATION varchar2,
P_RDC_MANAGER varchar2)
Is
Begin
G_ORGANIZATION_ID :=P_ORGANIZATION_ID;
G_INVENTORY_ITEM_ID := P_INVENTORY_ITEM_ID;
G_PO_HEADER_ID :=P_PO_HEADER_ID;
G_PO_LINE_ID :=P_PO_LINE_ID;
G_PO_RELEASE_ID :=P_PO_RELEASE_ID;
G_PO_LINE_LOCATION_ID :=P_PO_LINE_LOCATION_ID;
G_CARD_NUMBER :=P_CARD_NUMBER;
G_TRANSACTION_TYPE:= P_TRANSACTION_TYPE;
G_RDC_INVENTORY:=P_RDC_INVENTORY;
G_RDC_LOCATION:=P_RDC_LOCATION;
G_RDC_MANAGER :=P_RDC_MANAGER;
End SP_SetCurrParameter;
End xxrdc550;
/
视图:XXINV_R_INV_MTL_QUANITY_V
CREATE OR REPLACE VIEW XXINV_R_INV_MTL_QUANITY_V AS
SELECT XRT.ORGANIZATION_ID
,XRT.INVENTORY_ITEM_ID
,msi.segment1
,msi.description
,XRT.PRIMARY_UNIT_OF_MEASURE
,sum(XRT.QUANTITY) mtl_count
,xrm.rdc_manager
FROM XXINV_R_RDC_TRANSACTIONS XRT,
mtl_system_items_b msi,
xxinv_r_item_master xrm
where xrt.INVENTORY_ITEM_ID=xrm.inventory_item_id
and xrt.organization_id=xrm.organization_id
and xrm.organization_id=msi.organization_id
and xrm.inventory_item_id=msi.inventory_item_id
AND XRT.ORGANIZATION_ID=XXRDC550.FN_Get_ORGANIZATION_ID
and xrt.inventory_item_id=NVL(XXRDC550.FN_Get_INVENTORY_ITEM_ID,xrt.inventory_item_id)
and xrt.TRANSACTION_TYPE=nvl(xxrdc550.FN_Get_TRANSACTION_TYPE,xrt.transaction_type)
and xrt.po_header_id+0=nvl(xxrdc550.FN_Get_PO_HEADER_ID,xrt.po_header_id)
and NVL(xrt.po_release_id,0)=nvl(xxrdc550.FN_Get_PO_RELEASE_ID,NVL(xrt.po_release_id,0))
and NVL(xrt.po_line_id,0)=nvl(xxrdc550.FN_Get_PO_LINE_ID,NVL(xrt.po_line_id,0))
and NVL(xrt.po_line_location_id,0)=nvl(xxrdc550.FN_Get_PO_LINE_LOCATION_ID,NVL(xrt.po_line_location_id,0))
and NVL(xrt.card_number,'?')=nvl(xxrdc550.FN_Get_CARD_NUMBER,NVL(xrt.card_number,'?'))
and NVL(xrt.rdc_inventory,'?')=nvl(xxrdc550.FN_Get_RDC_INVENTORY,NVL(xrt.rdc_inventory,'?'))
and NVL(xrt.rdc_location,'?')=nvl(xxrdc550.FN_Get_RDC_LOCATION,NVL(xrt.rdc_location,'?'))
and nvl(xrm.rdc_manager,'?')=nvl(xxrdc550.FN_Get_RDC_MANAGER,nvl(xrm.rdc_manager,'?'))
group by XRT.ORGANIZATION_ID
,XRT.INVENTORY_ITEM_ID
,msi.segment1
,msi.description
,XRT.PRIMARY_UNIT_OF_MEASURE
,xrm.rdc_manager;
由FORM调用包xxrdc550的SP_SetCurrParameter的存储过程，在包xxrdc550中定义全局变量，都在存储过程赋值完成，再由FUNCTION返回。视图调用包中的FUNCTION获取返回值。
内容来自用户分享和网络整理，不保证内容的准确性，如有侵权内容，可联系管理员处理 
相关文章推荐
- 对话框子视图Android自定义Dialog二次调用报错解决方法：The specified child already has a parent. You must call removeView()-java教程
- 解决文档/视图结构中相互调用不方便的问题
- 文档，视图，框架类之间的关系及其互相调用
- View()/Redirect()/RedirectToAction()的区别(控制器调用另一个控制器||视图)
- ios的视图控制器的viewWillAppear和viewDidAppear什么时候被调用
- j2ee-规范-jdbc-视图调用(oracle为例）
- 写一个sql中视图和存储过程的简单创建和调用方法！！！自我备忘用····
- mybatis mysql 调用视图
- springMVC的视图层解析与服务层调用
- 视图或自定义函数调用存储过程结果集办法(可执行动态SQL)
- Android如何绘制视图，解释了为何onMeasure有时要调用多次
- ASP.NET MVC3调用分部视图-PartialView的几种方式(集)
- C#调用dll函数时出错：视图加载格式不正常的程序
- 在C#中调用视图
- MVC，如何在视图中申明方法，调用方法？
- 如何在任何类中调用视图类中的函数
- ASP.NET MVC3调用分部视图
- mysql中的存储过程、触发器、视图是如何创建的，以及PHP中是如何调用的
- Android如何绘制视图，解释了为何onMeasure有时要调用多次
- 4.IDA-导航（跳转到地址、导航按钮、栈帧、调用约定、局部变量布局、IDA的栈视图）