DBA Data[Home] [Help]

PACKAGE: APPS.PA_REVERSE_COSTED_LAB

Source


1 PACKAGE PA_REVERSE_COSTED_LAB AUTHID CURRENT_USER AS
2 /* $Header: PAXTREVS.pls 120.9 2011/06/07 09:55:50 byeturi noship $ */
3 		/* Main Procedure */
4 
5 -- Global variables for the parameters
6     g_org_id       NUMBER;
7     g_debug_mode   VARCHAR(1);
8     g_request_id   NUMBER(15) := NULL;
9     g_program_id   NUMBER(15) := NULL;
10     g_prog_appl_id NUMBER(15) := NULL;
11     g_user_id      NUMBER;
12     g_login_id     NUMBER;
13     g_commit_size  NUMBER;
14     g_err_stage    VARCHAR2(630);
15     /* TYPE OF MESSAGE */
16     log            NUMBER := 1;
17     debug          NUMBER := 2;
18 
19 
20     PROCEDURE parevtxn( errbuf                  OUT NOCOPY VARCHAR2,
21                         retcode                 OUT NOCOPY VARCHAR2,
22                         P_costing_method        IN  VARCHAR2,
23                         P_enable_accrue_flag_yn IN  VARCHAR2,
24                         P_accrual_flag       	  IN  VARCHAR2,
25                         P_Enable_cost_set_flag 	IN VARCHAR2,
26                         p_cost_set 		          IN NUMBER,
27                         P_Enable_date 			    IN VARCHAR2,
28                         P_from_date             IN  VARCHAR2,
29                         P_to_date  		          IN  VARCHAR2,
30                         P_incur_by_org_id    	  IN  VARCHAR2,
31                         P_project_id            IN  VARCHAR2,
32                         P_person_id             IN  VARCHAR2
33 
34                         );
35 
36 	FUNCTION is_ei_reversable ( X_expenditure_item_id IN NUMBER ) RETURN VARCHAR2 ;
37     	FUNCTION uncosted_eis_exist(P_interface_run_id IN NUMBER  , P_incurred_by_person_id IN  VARCHAR2) RETURN VARCHAR2;
38 	PROCEDURE  createreversecdl (X_exp_item_id  IN     NUMBER,
39                        		     X_backout_id   IN     NUMBER,
40 				     X_user         IN     NUMBER,
41                                      X_status       OUT    NOCOPY NUMBER);
42 
43     PROCEDURE reverse_costed_trans ( P_costing_method     IN  VARCHAR2,
44 				     P_accrual_only_flag  IN  VARCHAR2,
45                                      P_cost_set 	        IN  NUMBER,
46                                      P_from_date          IN  VARCHAR2,
47                                      P_to_date            IN  VARCHAR2,
48                                      P_inc_by_org_id      IN  VARCHAR2,
49                                      P_project_id         IN  VARCHAR2,
50                                      P_inc_by_person_id   IN  VARCHAR2,
51 									X_status       		OUT NOCOPY NUMBER);
52 
53     PROCEDURE  createorigexpitem(  X_exp_item_id   IN NUMBER
54                                   ,X_adj_activity  IN VARCHAR2
55 								  , X_module       IN VARCHAR2
56 								  , X_user         IN NUMBER
57 				                  , X_login        IN NUMBER
58 				                  , X_status       OUT NOCOPY NUMBER );
59 
60     PROCEDURE  mark_processed_costedset( P_interface_run_id IN NUMBER,
61 										 P_person_id        IN  NUMBER,
62 										 X_status       	OUT  NOCOPY NUMBER);
63 
64     PROCEDURE write_log (   P_message_type   IN NUMBER,
65 			    P_message        IN VARCHAR2);
66 END PA_REVERSE_COSTED_LAB ;