1 PACKAGE GMS_ENC_ADJUSTMENTS AUTHID CURRENT_USER AS
2 /* $Header: gmsencas.pls 120.1 2006/02/07 02:52:57 cmishra noship $ */
3
4 -- INVALID_ITEM EXCEPTION;
5 -- SUBROUTINE_ERROR EXCEPTION;
6
7 ExpItemsIdTab pa_utils.IdTabTyp ;
8
9 -- Added the following table to keep track of all the EI's that are
10 -- being adjusted by Txn Import program.
11
12 ExpAdjItemTab pa_utils.IdTabTyp;
13 BackOutId NUMBER;
14 x_dummy VARCHAR2(250);
15 -- The following variable will decide if MRC data needs to be updated.
16 -- This flag is useful in cases where the MRC triggres are disabled(
17 -- For example during install/upgrade)
18 -- pa41fixs.sql uses this flag to upgrade MRC data.
19
20 G_update_mrc_data Varchar2(1) := 'N';
21 /*
22 PROCEDURE CopyItems ( X_orig_enc_id IN NUMBER
23 , X_new_enc_id IN NUMBER
24 , X_date IN DATE
25 , X_person_id IN NUMBER );
26 */
27
28 PROCEDURE preapproved ( copy_option IN VARCHAR2
29 , copy_items IN VARCHAR2
30 , orig_enc_group IN VARCHAR2
31 , new_enc_group IN VARCHAR2
32 , orig_enc_id IN NUMBER
33 , enc_ending_date IN DATE
34 , new_inc_by_person IN NUMBER
35 , userid IN NUMBER
36 , procedure_num_copied IN OUT NOCOPY NUMBER
37 , procedure_num_rejected IN OUT NOCOPY NUMBER
38 , procedure_return_code IN OUT NOCOPY VARCHAR2 );
39
40
41 PROCEDURE ReverseEncGroup ( X_orig_enc_group IN VARCHAR2
42 , X_new_enc_group IN VARCHAR2
43 , X_user_id IN NUMBER
44 , X_module IN VARCHAR2
45 , X_num_reversed IN OUT NOCOPY NUMBER
46 , X_num_rejected IN OUT NOCOPY NUMBER
47 , X_return_code IN OUT NOCOPY VARCHAR2
48 , X_encgrp_status IN VARCHAR2 DEFAULT 'WORKING' );
49 /*
50
51 PROCEDURE BackoutItem( X_enc_item_id IN NUMBER
52 , X_encumbrance_id IN NUMBER
53 , X_adj_activity IN VARCHAR2
54 , X_module IN VARCHAR2
55 , X_user IN NUMBER
56 , X_login IN NUMBER
57 , X_status OUT NOCOPY NUMBER );
58
59 */
60
61 PROCEDURE revalidate_employee ( p_incurred_by_person_id IN NUMBER,
62 p_week_end_date IN DATE,
63 x_count OUT NOCOPY NUMBER,
64 x_org_id OUT NOCOPY NUMBER,
65 x_org_name OUT NOCOPY VARCHAR2 );
66
67 END GMS_ENC_ADJUSTMENTS;
[Home] [Help]