[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;
1814: l_num_of_items_distributed := 0;
1815:
1816: -- Initialize Collection
1817: l_dist_bus_rules := SYSTEM.DIST_BUS_RULES_NST();
1818: l_dist_items := SYSTEM.WR_ITEM_DATA_NST();
1819: --l_dist_workitem_data := SYSTEM.WR_ITEM_DATA_NST();
1820:
1821: BEGIN
1822:
1815:
1816: -- Initialize Collection
1817: l_dist_bus_rules := SYSTEM.DIST_BUS_RULES_NST();
1818: l_dist_items := SYSTEM.WR_ITEM_DATA_NST();
1819: --l_dist_workitem_data := SYSTEM.WR_ITEM_DATA_NST();
1820:
1821: BEGIN
1822:
1823: SELECT WS_B.DISTRIBUTION_FUNCTION ,
2517: l_api_version CONSTANT NUMBER := 1.0;
2518: l_api_name CONSTANT VARCHAR2(30) := 'DISTRIBUTE_WR_ITEMS';
2519:
2520: l_num_of_items_distributed NUMBER := 0; -- Number of Items Distributed
2521: l_dist_workitem_data SYSTEM.WR_ITEM_DATA_NST;
2522: l_dist_items_ctr NUMBER := 1;
2523: l_ctr NUMBER := 0;
2524: l_num_of_dist_items NUMBER := 0; -- Number of Items Requested to be Distributed
2525:
2669: p_source_lang IN VARCHAR2,
2670: p_num_of_dist_items IN NUMBER,
2671: p_extra_where_clause IN VARCHAR2,
2672: p_bindvar_list IN IEU_UWQ_BINDVAR_LIST,
2673: x_uwqm_workitem_data OUT NOCOPY SYSTEM.WR_ITEM_DATA_NST,
2674: x_num_of_items_distributed OUT NOCOPY NUMBER,
2675: x_msg_count OUT NOCOPY NUMBER,
2676: x_msg_data OUT NOCOPY VARCHAR2,
2677: x_return_status OUT NOCOPY VARCHAR2) IS
2705: l_dist_items IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_DIST_ITEM_DATA;
2706: l_dist_bus_rules IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_DIST_RULES;
2707: */
2708:
2709: l_dist_items SYSTEM.WR_ITEM_DATA_NST;
2710: l_dist_bus_rules SYSTEM.DIST_BUS_RULES_NST;
2711:
2712: L_MSG_COUNT NUMBER;
2713: L_MSG_DATA VARCHAR2(4000);
2789: -- Initialize Message list
2790:
2791: FND_MSG_PUB.INITIALIZE;
2792:
2793: x_uwqm_workitem_data := SYSTEM.WR_ITEM_DATA_NST();
2794:
2795: -- Get the Where Clause
2796: -- IEU_UWQ_GET_NEXT_WORK_PVT.GET_WS_WHERE_CLAUSE('DIST_FROM',l_where_clause);
2797:
3082:
3083: --dbms_output.put_line('bus rules: '||l_dist_bus_rules.count);
3084:
3085: -- Initialize this table for new WS
3086: l_dist_items := SYSTEM.WR_ITEM_DATA_NST();
3087:
3088: for i in l_nw_items_list2.first .. l_nw_items_list2.last
3089: loop
3090:
3608:
3609: /**
3610: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM, DISTRIBUTE_WORK_ITEMS
3611: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3612: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3613: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3614: ** 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
3615: ** to table of records of type - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST
3616: **/
3610: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM, DISTRIBUTE_WORK_ITEMS
3611: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3612: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3613: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3614: ** 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
3615: ** to table of records of type - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST
3616: **/
3617:
3618: PROCEDURE SET_WR_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3615: ** to table of records of type - IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST
3616: **/
3617:
3618: PROCEDURE SET_WR_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3619: p_dist_workitem_data IN SYSTEM.WR_ITEM_DATA_NST,
3620: p_dist_del_workitem_data IN IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC,
3621: x_ctr IN OUT NOCOPY NUMBER,
3622: x_uwqm_workitem_data IN OUT NOCOPY IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_ACT_DATA_LIST) IS
3623:
3804: ** This was required as Distribute Only can return multiple records. Distribute and Deliver requires the Return Record
3805: ** to be of type IEU_FRM_PVT.T_IEU_MEDIA_DATA for processing on the FORM.
3806: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM
3807: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3808: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3809: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3810: ** 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
3811: ** to table of records of type - IEU_FRM_PVT.T_IEU_MEDIA_DATA
3812: **/
3806: ** Called by PROCEDURE - DISTRIBUTE_AND_DELIVER_WR_ITEM
3807: ** The in var can be either a rec of type IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC OR
3808: ** table of objects SYSTEM.WR_ITEM_DATA_NST
3809: ** The In var - p_var_in_type_code indicates if its a record - 'REC' or an object - 'OBJ'
3810: ** 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
3811: ** to table of records of type - IEU_FRM_PVT.T_IEU_MEDIA_DATA
3812: **/
3813:
3814: PROCEDURE SET_DIST_AND_DEL_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3811: ** to table of records of type - IEU_FRM_PVT.T_IEU_MEDIA_DATA
3812: **/
3813:
3814: PROCEDURE SET_DIST_AND_DEL_ITEM_DATA_REC( p_var_in_type_code IN VARCHAR2,
3815: p_dist_workitem_data IN SYSTEM.WR_ITEM_DATA_NST,
3816: p_dist_del_workitem_data IN IEU_UWQ_GET_NEXT_WORK_PVT.IEU_WR_ITEM_DATA_REC,
3817: x_ctr IN OUT NOCOPY NUMBER,
3818: x_workitem_action_data IN OUT NOCOPY IEU_FRM_PVT.T_IEU_MEDIA_DATA) IS
3819: