1 package PA_CC_UTILS AUTHID CURRENT_USER as
2 -- $Header: PAXCCUTS.pls 115.6 2002/12/13 22:22:46 vgade ship $
3 --
4 -- Global variables used by the Borrowed and Lent and
5 -- IC Billing process
6 --
7
8 g_login_id NUMBER;
9 g_program_application_id NUMBER;
10 g_program_id NUMBER;
11 g_request_id NUMBER;
12 g_user_id NUMBER;
13
14 g_primary_sob_id gl_sets_of_books.set_of_books_id%TYPE;
15 g_prvdr_org_id pa_implementations_all.org_id%TYPE;
16 g_reporting_sob_id PA_PLSQL_DATATYPES.IDTabTyp;
17 g_reporting_curr_code PA_PLSQL_DATATYPES.Char15TabTyp;
18 g_debug_mode BOOLEAN;
19
20 -- FUNCTION
21 -- is_receiver_control_setup
22 --
23 --
24 Function is_receiver_control_setup (x_provider_org_id IN number,
25 x_receiver_org_id IN number) Return number;
26 --Bug2698541
27 --pragma RESTRICT_REFERENCES (is_receiver_control_setup, WNDS, WNPS);
28 --
29 -- FUNCTION
30 -- check_pvdr_rcvr_control_exist
31 --
32 --
33 Function check_pvdr_rcvr_control_exist (x_project_id IN number)
34 return number;
35 --Bug2698541
36 --pragma RESTRICT_REFERENCES (check_pvdr_rcvr_control_exist, WNDS, WNPS);
37
38 -- Procedure log_message
39 -- Displays a message using the current function set by the
40 -- procedure set_curr_function
41 -- in addition to that, it sends the write mode
42 -- write mode: 0 print in debug mode
43 -- 1 print always
44
45 PROCEDURE log_message(p_message IN VARCHAR2, p_write_mode IN NUMBER DEFAULT 0);
46
47 -- Procedure set_curr_function
48 -- Sets the current function name passed in and also sets the stack
49 -- information. Always call this at the beginning of each procedure
50
51 PROCEDURE set_curr_function(p_function IN VARCHAR2);
52
53 -- Procedure reset_curr_function
54 -- Resets the current function name and also resets the stack
55 -- information. Always call this at the end of each procedure.
56 -- Has no arguments
57
58 PROCEDURE reset_curr_function;
59
60 end PA_CC_UTILS;