[Home] [Help]
976: l_ws_code IEU_UWQM_WORK_SOURCES_B.WS_CODE%TYPE;
977: l_dist_bus_rules SYSTEM.DIST_BUS_RULES_NST;
978: l_work_item_status VARCHAR2(50);
979: l_work_item_status_id NUMBER;
980: l_dist_items SYSTEM.WR_ITEM_DATA_NST;
981: l_priority_code IEU_UWQM_PRIORITIES_B.PRIORITY_CODE%TYPE;
982: l_NUM_OF_DIST_ITEMS NUMBER := 1;
983: l_dist_wr_cur_cnt NUMBER;
984: l_dist_work_item_id NUMBER;
1848: l_num_of_items_distributed := 0;
1849:
1850: -- Initialize Collection
1851: l_dist_bus_rules := SYSTEM.DIST_BUS_RULES_NST();
1852: l_dist_items := SYSTEM.WR_ITEM_DATA_NST();
1853: --l_dist_workitem_data := SYSTEM.WR_ITEM_DATA_NST();
1854:
1855: BEGIN
1856:
1849:
1850: -- Initialize Collection
1851: l_dist_bus_rules := SYSTEM.DIST_BUS_RULES_NST();
1852: l_dist_items := SYSTEM.WR_ITEM_DATA_NST();
1853: --l_dist_workitem_data := SYSTEM.WR_ITEM_DATA_NST();
1854:
1855: BEGIN
1856:
1857: SELECT WS_B.DISTRIBUTION_FUNCTION ,
2551: l_api_version CONSTANT NUMBER := 1.0;
2552: l_api_name CONSTANT VARCHAR2(30) := 'DISTRIBUTE_WR_ITEMS';
2553:
2554: l_num_of_items_distributed NUMBER := 0; -- Number of Items Distributed
2555: l_dist_workitem_data SYSTEM.WR_ITEM_DATA_NST;
2556: l_dist_items_ctr NUMBER := 1;
2557: l_ctr NUMBER := 0;
2558: l_num_of_dist_items NUMBER := 0; -- Number of Items Requested to be Distributed
2559:
2703: p_source_lang IN VARCHAR2,
2704: p_num_of_dist_items IN NUMBER,
2705: p_extra_where_clause IN VARCHAR2,
2706: p_bindvar_list IN IEU_UWQ_BINDVAR_LIST,
2707: x_uwqm_workitem_data OUT NOCOPY SYSTEM.WR_ITEM_DATA_NST,
2708: x_num_of_items_distributed OUT NOCOPY NUMBER,
2709: x_msg_count OUT NOCOPY NUMBER,
2710: x_msg_data OUT NOCOPY VARCHAR2,
2711: x_return_status OUT NOCOPY VARCHAR2) IS
2739: l_dist_items IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_DIST_ITEM_DATA;
2740: l_dist_bus_rules IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_DIST_RULES;
2741: */
2742:
2743: l_dist_items SYSTEM.WR_ITEM_DATA_NST;
2744: l_dist_bus_rules SYSTEM.DIST_BUS_RULES_NST;
2745:
2746: L_MSG_COUNT NUMBER;
2747: L_MSG_DATA VARCHAR2(4000);
2823: -- Initialize Message list
2824:
2825: FND_MSG_PUB.INITIALIZE;
2826:
2827: x_uwqm_workitem_data := SYSTEM.WR_ITEM_DATA_NST();
2828:
2829: -- Get the Where Clause
2830: -- IEU_UWQ_GET_NEXT_WORK_PVT.GET_WS_WHERE_CLAUSE('DIST_FROM',l_where_clause);
2831:
3116:
3117: --dbms_output.put_line('bus rules: '||l_dist_bus_rules.count);
3118:
3119: -- Initialize this table for new WS
3120: l_dist_items := SYSTEM.WR_ITEM_DATA_NST();
3121:
3122: for i in l_nw_items_list2.first .. l_nw_items_list2.last
3123: loop
3124:
3642:
3643: /**
3644: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM, DISTRIBUTE_WORK_ITEMS
3645: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3646: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3647: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3648: ** Copies the Work Item data from table of objects - SYSTEM.WR_ITEM_DATA_NST or rec - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC
3649: ** to table of records of type - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST
3650: **/
3644: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM, DISTRIBUTE_WORK_ITEMS
3645: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3646: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3647: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3648: ** Copies the Work Item data from table of objects - SYSTEM.WR_ITEM_DATA_NST or rec - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC
3649: ** to table of records of type - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST
3650: **/
3651:
3652: PROCEDURE SET_WR_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3649: ** to table of records of type - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST
3650: **/
3651:
3652: PROCEDURE SET_WR_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3653: p_dist_workitem_data IN SYSTEM.WR_ITEM_DATA_NST,
3654: p_dist_del_workitem_data IN IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC,
3655: x_ctr IN OUT NOCOPY NUMBER,
3656: x_uwqm_workitem_data IN OUT NOCOPY IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST) IS
3657:
3838: ** This was required as Distribute Only can return multiple records. Distribute and Deliver requires the Return Record
3839: ** to be of type IEU_FRM_PVT.T_IEU_MEDIA_DATA for processing on the FORM.
3840: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM
3841: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3842: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3843: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3844: ** Copies the Work Item data from table of objects - SYSTEM.WR_ITEM_DATA_NST or rec - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC
3845: ** to table of records of type - IEU_FRM_PVT.T_IEU_MEDIA_DATA
3846: **/
3840: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM
3841: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3842: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3843: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3844: ** Copies the Work Item data from table of objects - SYSTEM.WR_ITEM_DATA_NST or rec - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC
3845: ** to table of records of type - IEU_FRM_PVT.T_IEU_MEDIA_DATA
3846: **/
3847:
3848: PROCEDURE SET_DIST_AND_DEL_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3845: ** to table of records of type - IEU_FRM_PVT.T_IEU_MEDIA_DATA
3846: **/
3847:
3848: PROCEDURE SET_DIST_AND_DEL_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3849: p_dist_workitem_data IN SYSTEM.WR_ITEM_DATA_NST,
3850: p_dist_del_workitem_data IN IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC,
3851: x_ctr IN OUT NOCOPY NUMBER,
3852: x_workitem_action_data IN OUT NOCOPY IEU_FRM_PVT.T_IEU_MEDIA_DATA) IS
3853: