DBA Data[Home] [Help]

APPS.PA_EXPENDITURE_ITEMS_PKG dependencies on PA_EXPENDITURE_ITEMS

Line 1: package body pa_expenditure_items_pkg as

1: package body pa_expenditure_items_pkg as
2: /* $Header: PAXTITMB.pls 120.3 2007/02/07 19:10:14 eyefimov ship $ */
3:
4: procedure insert_row (x_rowid in out NOCOPY VARCHAR2,
5: x_expenditure_item_id in out NOCOPY NUMBER,

Line 107: cursor return_rowid is select rowid from pa_expenditure_items

103: p_unit_of_measure IN varchar2 default null ,
104: P_Org_ID IN NUMBER default NULL -- 12i MOAC changes
105: ) is
106:
107: cursor return_rowid is select rowid from pa_expenditure_items
108: where expenditure_item_id = x_expenditure_item_id;
109: cursor get_itemid is select pa_expenditure_items_s.nextval from sys.dual;
110:
111: status NUMBER;

Line 109: cursor get_itemid is select pa_expenditure_items_s.nextval from sys.dual;

105: ) is
106:
107: cursor return_rowid is select rowid from pa_expenditure_items
108: where expenditure_item_id = x_expenditure_item_id;
109: cursor get_itemid is select pa_expenditure_items_s.nextval from sys.dual;
110:
111: status NUMBER;
112: l_rowid VARCHAR2(1000);
113: l_expenditure_item_id NUMBER;

Line 126: insert into pa_expenditure_items (

122: end if;
123:
124: -- if amt is negative, need to update reversed original
125:
126: insert into pa_expenditure_items (
127: expenditure_item_id,
128: last_update_date,
129: last_updated_by,
130: creation_date,

Line 342: update pa_expenditure_items

338: if (((x_quantity < 0) or (x_burden_cost < 0)) and
339: (x_net_zero_adjustment_flag = 'Y')) then */
340:
341: If x_net_zero_adjustment_flag = 'Y' then
342: update pa_expenditure_items
343: set net_zero_adjustment_flag = 'Y'
344: where expenditure_item_id = x_adjusted_expenditure_item_id;
345:
346: /*Added for bug 5639026 to update transfer price columns*/

Line 348: UPDATE pa_expenditure_items

344: where expenditure_item_id = x_adjusted_expenditure_item_id;
345:
346: /*Added for bug 5639026 to update transfer price columns*/
347: IF nvl(x_adjusted_expenditure_item_id, 0) <> 0 then
348: UPDATE pa_expenditure_items
349: SET(cc_prvdr_organization_id,
350: cc_recvr_organization_id,
351: cc_rejection_code,
352: denom_tp_currency_code,

Line 397: FROM pa_expenditure_items ei

393: ei.project_tp_rate_date,
394: ei.project_tp_rate_type,
395: ei.project_tp_exchange_rate,
396: (0 -ei.project_transfer_price)
397: FROM pa_expenditure_items ei
398: WHERE ei.expenditure_item_id = x_adjusted_expenditure_item_id)
399: WHERE expenditure_item_id = x_expenditure_item_id;
400: END if;
401: /* End of bug fix for 5639026 */

Line 562: update pa_expenditure_items

558:
559: BEGIN
560: -- need to check status, force user to use adjust if necessary
561:
562: update pa_expenditure_items
563: set expenditure_item_id = x_expenditure_item_id,
564: last_update_date = x_last_update_date,
565: last_updated_by = x_last_updated_by,
566: expenditure_id = x_expenditure_id,

Line 664: update pa_expenditure_items

660: /* Bug 1715308 : Removed the condition of x_quantity < 0
661: if (((x_quantity < 0) or (x_burden_cost < 0)) and
662: (x_net_zero_adjustment_flag = 'Y')) then */
663: if x_net_zero_adjustment_flag = 'Y' then
664: update pa_expenditure_items
665: set net_zero_adjustment_flag = 'Y'
666: where expenditure_item_id = x_adjusted_expenditure_item_id;
667:
668: -- Date : 17-JUN-99

Line 729: select adjusted_expenditure_item_id from pa_expenditure_items

725:
726: procedure delete_row (x_expenditure_item_id in NUMBER) is
727:
728: cursor check_reversing is
729: select adjusted_expenditure_item_id from pa_expenditure_items
730: where expenditure_item_id = x_expenditure_item_id;
731:
732: cursor check_source is
733: select expenditure_item_id, adjusted_expenditure_item_id

Line 734: from pa_expenditure_items

730: where expenditure_item_id = x_expenditure_item_id;
731:
732: cursor check_source is
733: select expenditure_item_id, adjusted_expenditure_item_id
734: from pa_expenditure_items
735: where source_expenditure_item_id = x_expenditure_item_id;
736:
737: rev_item check_reversing%rowtype;
738: source_item check_source%rowtype;

Line 746: update pa_expenditure_items

742: -- reset the adjustment flag.
743: open check_reversing;
744: fetch check_reversing into rev_item;
745: if (rev_item.adjusted_expenditure_item_id is not null) then
746: update pa_expenditure_items
747: set net_zero_adjustment_flag = 'N'
748: where expenditure_item_id = rev_item.adjusted_expenditure_item_id;
749:
750: open check_source ;

Line 765: update pa_expenditure_items

761: if check_source%notfound then exit ;
762: end if;
763: fetch check_source into source_item ;
764: if (source_item.adjusted_expenditure_item_id is not null) then
765: update pa_expenditure_items
766: set net_zero_adjustment_flag = 'N'
767: where expenditure_item_id = source_item.adjusted_expenditure_item_id ;
768:
769: delete from pa_expenditure_items

Line 769: delete from pa_expenditure_items

765: update pa_expenditure_items
766: set net_zero_adjustment_flag = 'N'
767: where expenditure_item_id = source_item.adjusted_expenditure_item_id ;
768:
769: delete from pa_expenditure_items
770: where expenditure_item_id = source_item.expenditure_item_id;
771: end if ;
772: END LOOP;
773: --

Line 784: delete from pa_expenditure_items

780: -- error checking?
781: delete from pa_expenditure_comments
782: where expenditure_item_id = x_expenditure_item_id;
783:
784: delete from pa_expenditure_items
785: where expenditure_item_id = x_expenditure_item_id;
786:
787:
788: END delete_row;

Line 793: cursor get_itemid is select expenditure_item_id from pa_expenditure_items

789:
790:
791: procedure delete_row (x_rowid in VARCHAR2) is
792:
793: cursor get_itemid is select expenditure_item_id from pa_expenditure_items
794: where rowid = x_rowid;
795: x_expenditure_item_id NUMBER;
796:
797: BEGIN

Line 812: END pa_expenditure_items_pkg;

808: BEGIN
809: null;
810: END lock_row;
811:
812: END pa_expenditure_items_pkg;