DBA Data[Home] [Help]

PACKAGE: APPS.PQH_COMMITMENT_POSTING

Source


1 PACKAGE pqh_commitment_posting AUTHID CURRENT_USER AS
2 /* $Header: pqglcmmt.pkh 120.2 2006/12/28 09:49:26 krajarat noship $ */
3 --
4 TYPE t_period_amt_type IS RECORD
5 (
6  period_id                   NUMBER(15),
7  period_name                 VARCHAR2(30),
8  accounting_date             DATE,
9  cost_allocation_keyflex_id  NUMBER(15),
10  code_combination_id         NUMBER(15),
11  project_id                  NUMBER(15),
12  task_id                     NUMBER(15),
13  award_id                    NUMBER(15),
14  expenditure_type            VARCHAR2(30),
15  organization_id             NUMBER(15),
16  commitment1                 NUMBER,
17  commitment2                 NUMBER,
18  commitment3                 NUMBER
19 );
20 --
21 TYPE t_period_amt_tab IS TABLE OF t_period_amt_type
22   INDEX BY BINARY_INTEGER;
23 --
24 type t_distribution_record IS RECORD
25 (
26 budget_period_id              pqh_budget_periods.budget_period_id%TYPE,
27 budget_set_id                 pqh_budget_sets.budget_set_id%TYPE,
28 budget_set_dist_percent       number,
29 budget_set_commitment         number,
30 budget_element_id             pqh_budget_elements.budget_element_id%TYPE,
31 element_type_id               pqh_budget_elements.element_type_id%TYPE,
32 el_distribution_percentage    pqh_budget_fund_srcs.distribution_percentage%TYPE,
33 element_commitment            number,
34 budget_fund_src_id            pqh_budget_fund_srcs.budget_fund_src_id%TYPE,
35 cost_allocation_keyflex_id    pqh_budget_fund_srcs.cost_allocation_keyflex_id%TYPE,
36 project_id                    NUMBER(15),
37 task_id                       NUMBER(15),
38 award_id                      NUMBER(15),
39 expenditure_type              VARCHAR2(30),
40 organization_id               NUMBER(15),
41 fs_distribution_percentage    pqh_budget_fund_srcs.distribution_percentage%TYPE,
42 fs_commitment                 number
43 );
44 --
45 TYPE t_distribution_table IS TABLE OF t_distribution_record
46   INDEX BY BINARY_INTEGER;
47 --
48 type t_ratio_record IS RECORD
49 (
50 budget_set_id           pqh_budget_sets.budget_set_id%TYPE,
51 budgeted_amt            number,
52 budget_set_percent      number);
53 --
54 type t_ratio_table IS TABLE OF t_ratio_record
55   INDEX BY BINARY_INTEGER;
56 --
57 -- Additional parameter is added p_effecitve_date for the bug 2288274
58 --
59 PROCEDURE post_budget_commitment
60 (
61  errbuf                         OUT NOCOPY  VARCHAR2,
62  retcode                        OUT NOCOPY  VARCHAR2,
63  p_effective_date		 IN  VARCHAR2  ,
64  p_budget_version_id             IN  pqh_budget_versions.budget_version_id%TYPE,
65  p_post_to_period_name		 IN  gl_period_statuses.period_name%TYPE DEFAULT NULL,
66  p_validate                      IN  VARCHAR2    default 'N'
67 );
68 --
69 End;