PACKAGE BODY: APPS.PA_CLIENT_EXTN_TXN

Source

1 package body PA_Client_Extn_Txn as
2 /*  $Header: PAXCCETB.pls 120.1.12000000.3 2007/04/11 08:41:13 srachako ship $ */
3 
4   procedure Add_Transactions( x_expenditure_item_id    IN     number,
5                               x_sys_linkage_function   IN     varchar2,
6                               x_status                 IN OUT NOCOPY number    ) is
7 
8 
9 
10 
11    begin
12 	-- Initialize the output parameters.
13 	x_status := 0;
14 
15         if (x_sys_linkage_function = 'ST') then
16             -- add your code for straight time expenditure item.
17            -- Do not add 'commit' or 'rollback' in your code, since Oracle
18            -- Project Accounting controls the transaction for you.
19            -- If the processing for straight time and overtime expenditure
20            -- items are identical, remove this 'if' statement.
21            null;
22 
23 
24         else
25 	   -- Add your code for overtime expenditure item.
26 	   null;
27         end if;
28 
29    exception
30 	when others then
31         -- Add your exception handler here.
32 	-- To raise an application error, assign a positive number to x_status.
33 	-- To raise an ORACLE error, assign SQLCODE to x_status.
34 	null;
35 
36    end Add_Transactions;
37 
38 
39 end PA_Client_Extn_Txn;